DECLARE
L_SUCCESS BOOLEAN;
CURSOR uid is
SELECT user_name,user_id from fnd_user where user_name in
(select user_name from apps.fnd_user where email_address in
(select email_address from apps.per_all_people_f where 1=1 and
employee_number in ('215677
)));
BEGIN
DBMS_OUTPUT.put_line('----------------Applications SSO Login
Types Profile Updated to LOCAL-------------');
DBMS_OUTPUT.put_line('-------------------------Profile
Updatation Started -----------------------------');
FOR I IN UID LOOP
--L_SUCCESS :=
FND_PROFILE.SAVE('APPS_SSO_LOCAL_LOGIN','LOCAL','USER',i.user_id);
L_SUCCESS := FND_PROFILE.SAVE('APPS_SSO_LOCAL_LOGIN','SSO','USER',i.user_id);
IF L_SUCCESS
THEN
DBMS_OUTPUT.put_line(i.user_name||'==>'||'Success');
ELSE
DBMS_OUTPUT.put_line('Profile Update Failed .
Error:'||sqlerrm||i.user_name);
END IF;
COMMIT;
END LOOP;
DBMS_OUTPUT.put_line('--------------------------Profile
Updatation Completed------------------------------');
end;
No comments:
Post a Comment