Use the following script to reset passwords of all application users.
DECLARE
RetVal BOOLEAN;
NewPwd VARCHAR2 (200) := 'welcome123';
CURSOR c_user
IS
SELECT user_name
FROM fnd_user
WHERE employee_id IS NOT NULL
AND (end_date IS NULL OR end_date > SYSDATE);
BEGIN
FOR r_user IN c_user
LOOP
RetVal := APPS.FND_USER_PKG.CHANGEPASSWORD (r_user.user_name, NewPwd);
COMMIT;
END LOOP;
END;
No comments:
Post a Comment