Follow us: Subscribe via RSS Feed Connect on YouTube Connect on YouTube

Pages

Sunday, 5 February 2017

How to Submit a Concurrent Request from backend

DECLARE
   l_responsibility_id   NUMBER;
   l_application_id      NUMBER;
   l_user_id             NUMBER;
   l_request_id          NUMBER;
BEGIN

   SELECT DISTINCT fr.responsibility_id, frx.application_id
              INTO l_responsibility_id, l_application_id
              FROM apps.fnd_responsibility frx, apps.fnd_responsibility_tl fr
             WHERE fr.responsibility_id = frx.responsibility_id
               AND LOWER (fr.responsibility_name) LIKE LOWER ('XXTest Resp');

   SELECT user_id
     INTO l_user_id
     FROM fnd_user
    WHERE user_name = 'DAYAKAR';

   --To set environment context.

   apps.fnd_global.apps_initialize (l_user_id,
                                    l_responsibility_id,
                                    l_application_id
                                   );

   --Submitting Concurrent Request

   l_request_id :=
      fnd_request.submit_request (application      => 'XXCUST',
                                  program          => 'XXEMP',
                                  description      => 'XXTest Employee Details',
                                  start_time       => SYSDATE,
                                  sub_request      => FALSE,
                                  argument1        => 'Smith'
                                 );
   --
   COMMIT;

   IF l_request_id = 0
   THEN
      DBMS_OUTPUT.put_line ('Concurrent request
failed to submit');
   ELSE
      DBMS_OUTPUT.put_line ('Successfully
Submitted the Concurrent Request');
   END IF;
--
EXCEPTION
   WHEN OTHERS
   THEN
      DBMS_OUTPUT.put_line (   'Error While Submitting
Concurrent Request '
                            || TO_CHAR (SQLCODE)
                            || '-'
                            || SQLERRM
                           );
END;

/
Share this article :

0 comments:

Post a Comment