用脚本新增用户 分配职责 修改密码

--新增用户
BEGIN
  fnd_user_pkg.createuser('test_user', '', 'welcome12a');
  COMMIT;
END;

--新增职责
BEGIN
  fnd_user_pkg.addresp('TEST_USER',
                       'SYSADMIN',
                       'SYSTEM_ADMINISTRATOR',
                       'STANDARD',
                       'Assigned',
                       SYSDATE,
                       NULL);
  COMMIT;
END;

--修改密码
DECLARE  
         l_success boolean;  
BEGIN  
         l_success := FND_USER_PKG.ChangePassword('TEST_USER','sysadmin');  
         IF l_success  
         THEN  
                 DBMS_OUTPUT.PUT_LINE('Password Changed');  
         ELSE  
                 DBMS_OUTPUT.PUT_LINE('Something wrong');  
         END IF;  
END;