使用 fnd_user_pkg API 建立使用者,新增職責,修改使用者密碼等

liangxichen發表於2008-08-15

比如有一個外圍支援系統,使用者需要在外圍系統登入之後點個link就可以登入到Oracle ERP系統中,那麼我們需要先把外圍系統的使用者建立在Oracle ERP中,並且分配職責給他。


DECLARE

a BOOLEAN;

BEGIN
-------------------------------------------------------------
--Change password
-------------------------------------------------------------
/*
a := apps.fnd_user_pkg.changepassword('SIMON','oracle');

IF NOT a THEN

--RAISE_APPLICATION_ERROR(-20002, 'Password not updated');

dbms_output.put_line('Password not updated');

ELSE

dbms_output.put_line('***Password updated');

COMMIT;

END IF;
*/
-------------------------------------------------------------
--Create User
-------------------------------------------------------------

fnd_user_pkg.CreateUser('SIMON',
'SEED',
'PW$234567'
);
-------------------------------------------------------------
--Add Resp
--select * from fnd_responsibility fr where fr.responsibility_id =
--select * from fnd_responsibility_tl frt where upper(frt.responsibility_name) like '%%'
--select * from fnd_application fa where fa.application_id =
--select * from fnd_security_groups fs
-------------------------------------------------------------


fnd_user_pkg.AddResp ('SIMON',
'SYSADMIN',
'SYSTEM_ADMINISTRATOR',
'STANDARD',
'Test API',
sysdate,
null
);
Commit;
End;

--使用下面程式碼可以在Link中直接登入Oracle ERP系統:



iSupport Login


method="post" name="Login" id="Login">




[@more@]

比如有一個外圍支援系統,使用者需要在外圍系統登入之後點個link就可以登入到 ERP系統中,那麼我們需要先把外圍系統的使用者建立在Oracle ERP中,並且分配職責給他。


DECLARE

a BOOLEAN;

BEGIN
-------------------------------------------------------------
--Change password
-------------------------------------------------------------
/*
a := apps.fnd_user_pkg.changepassword('SIMON','oracle');

IF NOT a THEN

--RAISE_APPLICATION_ERROR(-20002, 'Password not updated');

dbms_output.put_line('Password not updated');

ELSE

dbms_output.put_line('***Password updated');

COMMIT;

END IF;
*/
-------------------------------------------------------------
--Create User
-------------------------------------------------------------

fnd_user_pkg.CreateUser('SIMON',
'SEED',
'PW$234567'
);
-------------------------------------------------------------
--Add Resp
--select * from fnd_responsibility fr where fr.responsibility_id =
--select * from fnd_responsibility_tl frt where upper(frt.responsibility_name) like '%%'
--select * from fnd_application fa where fa.application_id =
--select * from fnd_security_groups fs
-------------------------------------------------------------


fnd_user_pkg.AddResp ('SIMON',
'SYSADMIN',
'SYSTEM_ADMINISTRATOR',
'STANDARD',
'Test API',
sysdate,
null
);
Commit;
End;

--使用下面程式碼可以在Link中直接登入Oracle ERP系統:



iSupport Login


method="post" name="Login" id="Login">




來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/59792/viewspace-1009051/,如需轉載,請註明出處,否則將追究法律責任。

相關文章