DECLARE
   V_l_success   NUMBER;
   
BEGIN
   COMMIT_FORM;
   fnd_global.apps_initialize
                           (user_id           => fnd_profile.VALUE ('USER_ID'),
                            resp_id           => fnd_profile.VALUE ('RESP_ID'),
                            resp_appl_id      => fnd_profile.VALUE ('RESP_APPL_ID')
                           );
   V_l_success :=
      fnd_request.submit_request
             ('IMC',   --Customers Online   -- Application Short name of the Concurrent Program.
              'XX_BATCH_PLANT',           -- Program Short Name.
              '',   -- Description of the Program.
              SYSDATE,             -- Submitted date. Always give the SYSDATE.
              FALSE,                                 -- Always give the FLASE.
              :nondb.whse_code,                   -- Passing the Value to the First Parameter of the report.
              :nondb.shift_code,
              TO_CHAR (TRUNC (:nondb.trip_start), 'DD/MM/YYYY'),--:nondb.trip_start,
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              '',
              ''
             );
   STANDARD.COMMIT;
END;