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

keeper125

假定我们用用户THQMRP01登录，我们要看1324503。
注：点击Find Requests按钮，选择“Specific Requests”，输入请求ID 1324503，清空下面的天数，点击Find，没有结果；回到Requests主界面，F11，输入请求ID 1324503，Ctrl + F11，就可以查到结果了，然而View Log和View Output是“灰”的。

确实是，可以看到系统里任何一个人的请求，但是“诊断”和“查看输出”这些按钮是灰色的；对于系统管理员来说，要帮用户解决遇到的问题颇为不妥。楼主方法管用挺好的。

zhycjun

wait

pongstar

再頂

jieping_zhang

占位！！

zhanglinjun007

原帖由 orapeasant 于 2007-12-25 10:43 发表
前提还是要知道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就可以了.

  确实可用!

zhanglinjun007

原帖由 ityilong 于 2007-12-25 17:06 发表
添加程式及请求集

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;

   请问这个有什么作用?

19981998

呵。。。占位

starhot

原帖由 orapeasant 于 2007-12-25 10:08 发表
做得绝一点, 把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;

-- TEST Successfully。
Attached doc is from metalink, May it is useful to you.

Subject:  How to assign and revoke role/responsibility to a user using standard API?
  Doc ID:  Note:373369.1 Type:  HOWTO
  Last Revision Date:  06-MAR-2007 Status:  PUBLISHED

In this Document
  Goal
  Solution



--------------------------------------------------------------------------------



Applies to:
Oracle User Management - Version: 11.5.10.2
Information in this document applies to any platform.

Goal
Q1: How to assign role to a user using APIs?

Q2: How to add a responsibility to a user using APIs?

Q3: How to revoke a responsibility assignment to a user using APIs?

Q4: How to revoke an indirect responsiblity (roles assigned using UMX) assignment to a user using APIs?


Solution
A1: Use the following API wf_local_synch.PropagateUserRole
Example:

Begin
wf_local_synch.PropagateUserRole(
     p_user_name => '&USER_NAME',
     p_role_name => '&ROLE_KEY');
commit;
end;

A2: Use the following API fnd_user_resp_groups_api.Insert_Assignment

begin
fnd_user_resp_groups_api.Insert_Assignment (
   user_id =>&USER_ID ,
   responsibility_id => &RESP_ID,
   responsibility_application_id =>$APPL_ID ,
   start_date => &START_DATE,
   end_date => &END_DATE,
   description =>'Sample
   example' );
commit;
end;

This shall raise an error if the responsibility is assigned to user. But if you need to update responsibility assignment in case of responsibility existence, you can use the following API:

begin
fnd_user_pkg.addresp(
     '&User_Name',
     '&Responsablity_Application_Short_Name',
     '&Responsibility_Key',
     '&Security_Group',
     '&Description',
     '&Start_Date',
     '&End_Date' );
commit;
end;
A3: Use the following API fnd_user_pkg.delresp
Example:

Begin
fnd_user_pkg.delresp(         
     '&User_Name',
      '&Responsibility_application_short_name',
      '&Responsibility_Key',
      '&Security_Group');
commit;
End;
This simply end date the responsibility assignment to a user by the current system date.

A4: Use the following API Wf_local_synch.PropagateUserRole

Begin
Wf_local_synch.PropagateUserRole(
       p_user_name => '&USER_NAME',
       p_role_name => '&ROLE_KEY',
       p_start_date=>'&Start_Date',
       p_expiration_date=>'&End_Date');
commit;
End;
You need to end date the parent Role and it shall end date the rest Roles.

hailen

呵，我也占個位

xamm

好东西！