--Add responsibility
DECLARE
v_user_name VARCHAR2(30):= '&USER_NAME';
lc_resp_appl_short_name VARCHAR2(100) := 'SYSADMIN';
lc_responsibility_key VARCHAR2(100) := 'SYSTEM_ADMINISTRATOR';
lc_security_group_key VARCHAR2(100) := 'STANDARD';
ld_resp_start_date DATE := TO_DATE(sysdate);
ld_resp_end_date DATE := NULL;
BEGIN
fnd_user_pkg.addresp
( username => v_user_name,
resp_app => lc_resp_appl_short_name,
resp_key => lc_responsibility_key,
security_group => lc_security_group_key,
description => NULL,
start_date => ld_resp_start_date,
end_date => ld_resp_end_date
);
COMMIT;
EXCEPTION
WHEN OTHERS THEN
ROLLBACK;
DBMS_OUTPUT.PUT_LINE(SQLERRM);
END;
/
No comments:
Post a Comment