Script Oracle Apps Frontend Password from backend

CREATE OR REPLACE PROCEDURE kmc_koushik_ex IS
CURSOR cur_user_dtl IS
SELECT USER_ID, USER_NAME FROM fnd_user WHERE user_id >1000
ORDER BY creation_DATE DESC;
result boolean;
BEGIN
FOR c_user_dtl IN cur_user_dtl LOOP
result := fnd_user_pkg.changepassword(username => c_user_dtl.user_name,
newpassword => 'welcome1');
IF result THEN
NULL;
ELSE
dbms_output.put_line('The password of ' || c_user_dtl.user_name || ' has failed to reset.');
END IF;
END LOOP;
result := fnd_user_pkg.changepassword(username => 'SYSADMIN',
newpassword => 'welcome1');
END kmc_koushik_ex;

/