declare
l_request_set_code VARCHAR2 (200);
l_set_appl_short_name VARCHAR2 (200);
l_request_group VARCHAR2 (200);
l_group_application VARCHAR2 (200);
BEGIN
l_request_set_code:='FNDRSSUB94'; -- Request Set Code
l_set_appl_short_name:='SQLGL'; -- Application Code Short Name
l_request_group:='GL Concurrent Program Group'; -- Request Group Name
l_group_application:='SQLGL'; -- Application of the RG Name
fnd_set.add_set_to_group (request_set => l_request_set_code,
set_application => l_set_appl_short_name,
request_group => l_request_group,
group_application => l_group_application);
dbms_output.put_line('Request Set has been attached to Request Group Successfully ');
COMMIT;
EXCEPTION
WHEN DUP_VAL_ON_INDEX
THEN
dbms_output.put_line ('Request Set is already available in the Request group');
WHEN OTHERS
THEN
dbms_output.put_line ('Others Exception adding Request Set. ERROR:' || SQLERRM);
END;
/
No comments:
Post a Comment