Update fnd_user all user passwords in clone Oracle Apps r12

DECLARE
l_unenc_pwd VARCHAR2(1000);
CURSOR c1 IS
SELECT *

FROM fnd_user fu 

WHERE fu.user_name='MOGALAFZAL'--comment this line to get all users.

;
BEGIN
FOR I IN c1 LOOP
l_unenc_pwd:=dbms_random.string('x',6);
fnd_user_pkg.UpdateUser(x_user_name=>'001C.ARNAUD@GMAIL.COM'
                       ,x_owner=>'SEED'
                       ,x_unencrypted_password=>l_unenc_pwd--'12345'

                       ,x_password_date=>to_date('2', 'J')
                       ,x_user_guid=>I.user_GUID
                       );
COMMIT;                      
END LOOP;                                           
END;

Other useful random:
select TRUNC(DBMS_RANDOM.value(1,10)) from dual;

Positive Integers:
select abs(dbms_random.random) from dual --> for updating mobile number, EID