Tuesday, 21 June 2011

How to call a Concurrent Programe From PL/SQL

  DECLARE
  L_RQST_ID  NUMBER;
  BEGIN
     SELECT * FROM FND_USER;
     SELECT * FROM FND_RESPONSIBILITY ;
     SELECT * FROM FND_APPLICATION;
     SELECT * FROM FND_SECURITY_GROUPS;
         
     /*1st parameter is Userid,
     2nd  parameter responsibility id,
     3rd parameter responsibility application id,
     4th parameter security profile id
    */
    fnd_global.APPS_INITIALIZE(V_USER_ID,V_RESP_ID,V_APP_ID,V_SEQ_GR_ID);     
  
       
    L_RQST_ID := FND_REQUEST.SUBMIT_REQUEST (
                         application => 'XXHCM',                                              -- Application Short Name
                         program     => 'XXHCM_APPRAISAL_TEST',  -- Program Name
                         description =>  NULL,
                         start_time  =>  TRUNC(sysdate),
                         sub_request =>  FALSE,
                         argument1   =>  P_PLAN_NAME,                    -- Parameter 1 for Concurrent Prog
                         argument2   =>  P_PLAN_ID                             -- Parameter 2 for Concurrent Prog
       -------
                        );
    COMMIT;
     IF L_RQST_ID=0 THEN
     FND_FILE.PUT_LINE(FND_FILE.LOG,'Standard Program is Not Submitted');
     ELSE
     FND_FILE.PUT_LINE(FND_FILE.LOG,'Request ID :'||L_RQST_ID);
     END IF;
END;
==============================================================
Note: V_USER_ID   :=FND_PROFILE.VALUE('USER_ID');
          V_RESP_ID   :=FND_PROFILE.VALUE('RESP_ID');
          V_APP_ID    :=FND_PROFILE.VALUE('APPLICATION_ID');
          V_SEQ_GR_ID :=FND_PROFILE.VALUE('SECURITY_GROUP_ID');

No comments:

Post a Comment