DECLARE
v_user_name VARCHAR2 (100) := '<USER_NAME>';v_new_password VARCHAR2 (100) := '<NEW_PASSWORD>';
v_status BOOLEAN := NULL;
BEGIN
v_status := fnd_user_pkg.Changepassword (v_user_name, v_new_password);
COMMIT;
dbms_output.Put_line ('Password is changed successfully for the user '|| v_user_name);
EXCEPTION
WHEN OTHERS THEN
dbms_output.Put_line (
'Error encountered while setting new password to the user and the error is '|| SQLERRM);
END;