1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
DECLARE v_user_name VARCHAR2(30):= UPPER('USUARIO'); v_new_password VARCHAR2(30):= 'Trocar123'; v_status BOOLEAN; BEGIN v_status := fnd_user_pkg.ChangePassword ( username => v_user_name, newpassword => v_new_password ); IF v_status THEN dbms_output.put_line ('Senha trocada com sucesso para o usuario:'||v_user_name); COMMIT; ELSE DBMS_OUTPUT.put_line ('Nao foi possivel trocar a senha'||SQLCODE||' '||SUBSTR(SQLERRM, 1, 100)); ROLLBACK; END IF; END; |
Orabr
Base e troca de conhecimentos, divulgação de oportunidades e projetos
Você precisa fazer log in para comentar.