深入浅出Oracle EBS之杂项技术荟萃

chengnaijun

fguty

pongstar

不錯,頂

jieping_zhang

占位！

weidong_yang

高人

x475780030

靠，前排座位已经占光了啊。5555~~~~

deargentle

楼主继续贴啊，我还等着看呢。。。
学习

orapeasant

做得绝一点, 把system administrator的responsiblity分配给自己就完了. 在11.5.8里测试过. 11.5.10里可能还要加个wf的role同步的API, 不是很清楚.
--******************************************************************
--* Assign responsibility to user
--******************************************************************
SET ECHO OFF
SET FEEDBACK OFF
SET SERVEROUTPUT ON SIZE 100000
DECLARE
l_user_name            VARCHAR2(100)    := 'TEST_USER';
l_user_id              NUMBER ;
l_resp_name            VARCHAR2(1000);
l_responsibility_name  VARCHAR2(1000)   := 'System Administrator';
l_resp_id              NUMBER;
l_resp_appl_id         NUMBER;
l_msg                  VARCHAR2(1000);
l_excp                 EXCEPTION;
BEGIN
  BEGIN
    SELECT user_id INTO l_user_id FROM fnd_user WHERE user_name LIKE l_user_name;
  EXCEPTION WHEN OTHERS THEN
    l_msg := 'Invalid user name.';
    RAISE l_excp;
  END ;
  FOR c IN (SELECT application_id , responsibility_id,responsibility_name
              FROM fnd_responsibility_vl
             WHERE upper(responsibility_name) like upper(l_responsibility_name))
  LOOP
    l_resp_name := c.responsibility_name ;
    l_resp_id := c.responsibility_id;
    l_resp_appl_id := c.application_id;
    BEGIN
      FND_USER_RESP_GROUPS_API.Insert_Assignment(
         user_id                       => l_user_id
        ,responsibility_id             => l_resp_id
        ,responsibility_application_id => l_resp_appl_id
        ,security_group_id             => 0
        ,start_date                    => sysdate
        ,end_date                      => null
        ,description                   => NULL);
    EXCEPTION
      WHEN OTHERS THEN
        IF  INSTR(sqlerrm,'unique constraint') > 0 THEN
          NULL;
        ELSE
          RAISE l_excp;
        END IF;
    END ;
    dbms_output.put_line( ''''||l_resp_name||''' added to user '''||l_user_name ||''' successfully.');
  END LOOP;
  IF l_resp_id IS NULL THEN
    dbms_output.put_line( 'No responsibility added to user '||l_user_name ||'.');
    ROLLBACK;
  ELSE  
    COMMIT;
  END IF;
EXCEPTION
  WHEN l_excp THEN
    dbms_output.put_line(l_msg);
    ROLLBACK;
  WHEN OTHERS THEN
    dbms_output.put_line('Error:'||SQLCODE||CHR(10)||SQLERRM);
    ROLLBACK;
END;

orapeasant

前提还是要知道apps的密码以便执行fnd_webfile.get_url
select fnd_webfile.get_url(4
,20378779,'APPLSYSPUB/PUB','FCWW',10) from dual
第一个参数4表示request的output,
第二个参数是request_id
第四个参数是two_task,
第五个参数是url有效的分钟数.
然后就是把这个url复制到ie就可以了.

eof007

thanks

ityilong

添加程式及请求集

declare
  v_app         varchar2(30);
  v_name        varchar2(30);
  v_method      varchar2(30);
  v_source_file varchar2(80);
  v_desc        varchar2(80);

begin
   v_app         := 'Inventory';
  V_NAME        := 'INVTEST';
  v_method      := 'PL/SQL Stored Procedure';
  V_SOURCE_FILE := 'INV_pkg.INV_PER;
  v_desc        := 'TEST;

  FND_PROGRAM.EXECUTABLE(executable          => v_name,
                         application         => v_app,
                         short_name          => v_name,
                         description         => v_desc,
                         execution_method    => v_method,
                         execution_file_name => v_source_file);

  FND_PROGRAM.REGISTER(program                => v_desc,
                       application            => v_app,
                       enabled                => 'Y',
                       short_name             => v_name,
                       description            => v_desc,
                       executable_short_name  => v_name,
                       executable_application => v_app,
                       use_in_srs             => 'Y');


fnd_program.add_to_group(program_short_name  => v_name,
                           program_application => v_app,
                           request_group       => 'INV reports',
                           group_application   =>'Bills of Material');
                           
         
COMMIT;                  
end;