DECLARE
CURSOR l_data
IS
SELECT * FROM XX.XX_FND_USER;
BEGIN
FOR r_data IN l_data
LOOP
fnd_user_pkg.createuser (
x_user_name => r_data.user_name,
x_owner => NULL,
x_unencrypted_password => 'Oracle1234',
x_start_date => r_data.start_date,
x_end_date => NULL,
x_description => r_data.description,
x_password_lifespan_days => r_data.password_lifespan_days,
x_email_address => r_data.email_address,
x_fax => r_data.fax);
COMMIT;
END LOOP;
EXCEPTION
WHEN OTHERS
THEN
ROLLBACK;
DBMS_OUTPUT.PUT_LINE (SQLERRM);
END;
/
No comments:
Post a Comment