Syntax
FND_PROFILE.SAVE(<Profile_Option_Name>,
<Profile_Option_Value>,
<Level SITE/APPL/RESP/USER>,
<Level_Value>,
<Level_Value_App_id>);
Example
SET SERVEROUTPUT ON SIZE 1000000DECLARE l_user_id NUMBER; l_resp_id NUMBER; l_resp_app_id NUMBER; l_success BOOLEAN;BEGIN l_user_id := 1068; --****Use your user id to replace,1068 is MFG*** -- -- This will set value of profile option 'INV_DEBUG_LEVEL' at SITE level to 11 -- l_success := FND_PROFILE.save ( x_name => 'INV_DEBUG_LEVEL' , x_value => 11 , x_level_name => 'SITE' , x_level_value => NULL , x_level_value_app_id => NULL ) ; IF l_success THEN DBMS_OUTPUT.put_line('Profile Updated successfully at site Level'); ELSE DBMS_OUTPUT.put_line('Profile Update Failed at site Level. Error:'||sqlerrm); END IF; -- -- This will set value of profile option 'INV_DEBUG_LEVEL' at RESP level to 11 -- SELECT responsibility_id , application_id INTO l_resp_id , l_resp_app_id FROM fnd_responsibility WHERE responsibility_key = 'INVENTORY'; l_success := FND_PROFILE.save ( x_name => 'INV_DEBUG_LEVEL' , x_value => 11 , x_level_name => 'RESP' , x_level_value => l_resp_id --responsibility_id , x_level_value_app_id => l_resp_app_id --401 ) ; IF l_success THEN DBMS_OUTPUT.put_line('Profile Updated successfully at responsiblity Level'); ELSE DBMS_OUTPUT.put_line('Profile Update Failed at site Level. Error:'||sqlerrm); END IF; -- -- This will set value of profile option 'INV_DEBUG_LEVEL' at user level to 11 -- l_success := FND_PROFILE.save ( x_name => 'INV_DEBUG_LEVEL' , x_value => 11 , x_level_name => 'USER' , x_level_value => l_user_id ) ; IF l_success THEN DBMS_OUTPUT.put_line('Profile Updated successfully at user Level'); ELSE DBMS_OUTPUT.put_line('Profile Update Failed at site Level. Error:'||sqlerrm); END IF; --Commit is needed because this function will not commit Commit;END;/
Useful Queries
SELECT B.USER_PROFILE_OPTION_NAME,A.* FROM FND_PROFILE_OPTIONS A,FND_PROFILE_OPTIONS_TL BWHERE A.PROFILE_OPTION_NAME = B.PROFILE_OPTION_NAMEAND A.PROFILE_OPTION_NAME LIKE 'INV_DEBUG%'AND B.LANGUAGE = 'US'; SELECT C.USER_PROFILE_OPTION_NAME,B.PROFILE_OPTION_NAME,A.* FROM FND_PROFILE_OPTION_VALUES A,FND_PROFILE_OPTIONS B,FND_PROFILE_OPTIONS_TL CWHERE B.PROFILE_OPTION_NAME = C.PROFILE_OPTION_NAMEAND A.PROFILE_OPTION_ID = B.PROFILE_OPTION_IDAND A.APPLICATION_ID = B.APPLICATION_IDAND C.LANGUAGE = 'US'AND Upper(C.USER_PROFILE_OPTION_NAME) LIKE Upper('INV%Debug%Trace%');10001: 'Site', 10002: 'Application', 10003: 'Responsibility', 10004: 'User', 10005: 'Server'
Related Topic: Oracle EBS中查询Profile的各种SQL
再分享一下我老师大神的人工智能教程吧。零基础!通俗易懂!风趣幽默!还带黄段子!希望你也加入到我们人工智能的队伍中来!https://blog.csdn.net/jiangjunshow