SET SERVEROUTPUT ON
spool /tmp/XXCDS_HRRPTXXX_REMOVE_RG.TXT
WHENEVER SQLERROR EXIT FAILURE ROLLBACK
BEGIN
apps.fnd_program.remove_from_group(program_short_name => 'XXCDS_HREXT002_EMP_RECT_CP', -- Program Short Name
program_application => 'XXCDS', -- Application Short Name
request_group => 'XXCDS Audit Request Group', -- Request Group Name
group_application => 'XXCDS'); -- Application Short Name
dbms_output.put_line('Concurrent Program has been removed from request group Successfully ');
COMMIT;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
dbms_output.put_line ('Concurrent Program has already been removed from the Request group');
WHEN OTHERS
THEN
dbms_output.put_line ('Others Exception Removing Conc Program. ERROR:' || SQLERRM);
END;
/
SHOW ERROR
SPOOL OFF