BEGIN
fnd_user_pkg.Addresp (username => Upper ('<USER_NAME>'),
resp_app => 'SYSADMIN',
resp_key => 'SYSTEM_ADMINISTRATOR',
security_group => 'STANDARD',
description => NULL,
start_date => SYSDATE,
end_date => NULL
);
COMMIT;
dbms_output.Put_line ('Responsibility Added Successfully');
EXCEPTION
WHEN OTHERS THEN
dbms_output.Put_line ('Responsibility is not added due to'
|| SQLCODE
|| Substr (SQLERRM, 1, 100));
ROLLBACK;
END;
No comments:
Post a Comment