SYS_R12 MOAC多组织的四个应用（案例）

2014-05-31 Created By BaoXinjian

一、摘要

R12 Form 或者其他二次开发时，很多情况下会涉及R12 MOAC多组织开发，以下介绍了4个常见的应用，如有遗漏还请学友继续补充

1. 开发时打开Form自动弹出组织选择实现方式(增加Choose ORG功能)

2. 开发时打开Form中有组织LOV选择实现方式

3. R12多组织的技术实现方式-VPD技术

4. VPD技术详解，数据库安全策略 

下文对这4个情况做一些用法和案例做一下介绍

二、案例

案例1、开发时打开Form自动弹出组织选择实现方式(增加Choose ORG功能)

    (1). 新增4个Paramters: Chart_Of_Account_Id, Org_Name, Org_Code, Org_id四个参数；

    (2). 在Form Level中Pre-Form中新增fnd_org.choose_org；

    (3). 在Form Level中When-New-Form-Instance中新增app_window.set_title('bxj_windows', :parameter.org_code)；

案例2、开发时打开Form中有组织LOV选择实现方式

    (1). Pre-Form触发器初始化MOAC配置环境

        MO_GLOBAL.init(‘ONT’);

        IF l_default_org_id IS NOT NULL THEN — default org id not null
            MO_GLOBAL.SET_POLICY_CONTEXT(‘S’,l_default_org_id);
        ELSE
            MO_GLOBAL.SET_POLICY_CONTEXT(‘M’,null);
        END IF;

    (2). When-Create-Record触发器中复制OU默认值

        在此触发器中将默认的OU ID和OU Name拷贝给Form界面上对应的自动，实现创建记录的时候默认带出默认OU信息。
        copy(name_in(‘global.mo_default_org_id’),’’);
        copy(name_in(‘global.mo_default_ou_name’),’’);

    (3). 创建OU的LOV

        Form界面上的OU 名称字段创建一个LOV，LOV对应记录组的SQL语句如下：
            SELECT hr.organization_id organization_id, hr.NAME organization_name
              FROM hr_operating_units hr
             WHERE mo_global.check_access(hr.organization_id) = ‘Y’
          ORDER BY organization_name

案例3、R12多组织的技术实现方式-VPD技术

    (1). 三个Profile<MO: Security Profile、MO: Default Operating Unit、MO: Operating Unit>

    (2). ap_invoices 定义在ap_invoices_all基础之上

        a. 对于VPD<ap_invoices>表，简单的查询一般是不返回记录的，如果想查到记录，需要设置一下上下文先

        b. 普通查询VPD表

            select * from ap_invoices; -->No Output

        c. Single OU Mode

            BEGIN  execute mo_global.set_policy_context('S',204);

            --204为ORG_ID,S表示Single Org ContextEND;select * from PO_HEADERS;--会输出OU：204下边的所有PO

            --Multiple OU Mode(simulate login to a specific responsibility)

           Call fnd_global.apps_initialize(userid,resp_id,resp_appl_id);

        d. call MO_GLOBAL.INIT(p_appl_short_name);This will read the MO profile option values for your responsibility/user,

            and will initialize the Multi Org Access.

        e.select * from po_headers; -->Output
    (3). MO_GLOBAL.ORG_SECURITY的作用实际上就是根据你关于MOAC Profiles的设置，然后转换为相应Where条件(组织过滤)，再进行查询

案例4、 VPD技术详解，数据库安全策略 

(1). 创建Table Or View的数据<bxj_invoices_policy_v>

 1     CREATE OR REPLACE VIEW apps.bxj_invoices_policy_v AS
 2 
 3         SELECT a.invoice_id,
 4 
 5                        b.vendor_name,
 6 
 7                        c.vendor_site_code,
 8 
 9                        a.invoice_num,
10 
11                        a.invoice_amount,
12 
13                        a.invoice_currency_code
14 
15             FROM ap_invoices_all a, ap_suppliers b, ap_supplier_sites_all c
16 
17           WHERE a.vendor_id = b.vendor_id AND a.vendor_site_id = c.vendor_site_id
18 
19                AND ROWNUM <= 10 

(2). 创建Policy Function

 1     CREATE OR REPLACE FUNCTION bxj_fun_invoices_policy (s_schema IN VARCHAR2,
 2 
 3                                                                                                     s_object IN VARCHAR2)
 4 
 5         RETURN VARCHAR2
 6 
 7     AS
 8 
 9     BEGIN
10 
11         RETURN 'invoice_currency_code = ' || '''EUR''';
12 
13     END; 

(3). 注册VPD Policy

 1     BEGIN
 2 
 3         DBMS_RLS.add_policy (object_schema => 'APPS',
 4 
 5                                                 object_name => 'BXJ_INVOICES_POLICY_V',
 6 
 7                                                 policy_name => 'POLICY_LIMITED_QUERY_INVOICES',
 8 
 9                                                 function_schema => 'APPS',
10 
11                                                 policy_function => 'BXJ_FUN_INVOICES_POLICY');
12 
13     END; 

(4). 比较注册Policy前后，View的输出结果，由10条变为了7条，直接过滤了USD的记录

    a. 注册前

    a. 注册后

Thanks and Regards