Oracle 函数 “数据控制，指定某些人只能查看他权限范围内的信息”

 create or replace function work_plan_mask (p_schema VARCHAR2,p_table VARCHAR2)

  return Varchar2 AS  -- 数据控制，指定某些人只能查看他权限范围内的信息

     v_predicate  VARCHAR2(1000) := '1=2';
     v_personcode Personnel.Person_Code%TYPE := SYS_CONTEXT(get_context_name,'PERSON_CODE');
     v_user_name work_plan.reporter%type := SYS_CONTEXT(get_context_name,'APP_USER_NAME');  -- 获取当前账号
     v_number     NUMBER;

     cursor get_work_plan_role is
          select count(*)
          from application_roles
          WHERE role_name = 'work_plan_search' AND username = v_user_name; -- work_plan_search：系统里（给了权限）的角色

 BEGIN

     IF v_personcode in('','') THEN -- 指定这几个人可看
     RETURN '1=1'; -- 返回 true
     END IF;

     insert into person_code_temp -- 将下面查询出来的结果插入person_code_temp(临时表)表中
       SELECT p.PERSON_CODE   -- 树状查询 (查出当前编号以及下一级、下下一级...等 编号，比如：总经理以及所有下属的编号)
       FROM PERSONNEL p
       CONNECT BY  p.MANAGER = PRIOR p.PERSON_CODE
       START WITH p.PERSON_CODE = v_personcode;

     open get_work_plan_role;
     fetch get_work_plan_role into v_number;
     close get_work_plan_role;

     v_predicate := 'reporter = ''' || v_user_name || ''' OR ' || v_number || ' > 0 ' ||
                  ' OR INSERT_USER = ''' || v_user_name || '''' ||
                  ' OR INSERT_USER IN ( SELECT get_username(P.PERSON_CODE) FROM person_code_temp P)';

   RETURN v_predicate;
 end work_plan_mask;

注：如需测试该函数，请复制到Oracle数据库中，右击函数名“work_plan_mask”，选择“test” 进行测试，测试时记得把相应的表名及字段换成自己建立的

这个函数 SYS_CONTEXT()，可以参考 http://blog.csdn.net/rfb0204421/article/details/7861332  或  http://blog.csdn.net/kadwf123/article/details/8065673

原创作者：DSHORE

出处：http://www.cnblogs.com/dshore123/

欢迎转载，转载务必说明出处。（如果本文对你有用，可以点击一下右下角的 推荐，谢谢！）