[Home] [Help]
1: PACKAGE BODY fnd_profile AS
2: /* $Header: AFPFPROB.pls 120.43.12020000.3 2013/03/21 13:56:52 rarmaly ship $ */
3:
4: TYPE val_tab_type IS TABLE OF VARCHAR2(255) INDEX BY BINARY_INTEGER;
5: TYPE name_tab_type IS TABLE OF VARCHAR2(80) INDEX BY BINARY_INTEGER;
50: FND_DELETE_VALUE VARCHAR2(30) := '**FND_DELETE_VALUE**';
51:
52: /*
53: ** Global variable used to indicate that the PUT cache was cleared during
54: ** the current run of FND_PROFILE.INITIALIZE -- Bug 12875860 - PER Rewrite
55: */
56: put_cache_is_clear BOOLEAN;
57:
58: /*
81: point_version NUMBER := fnd_release.point_version;
82:
83: /*
84: ** Global variable that stores the start time of initial
85: ** FND_PROFILE use
86: */
87: start_time NUMBER := dbms_utility.get_time;
88:
89: /*========================================================================
175: profileRowId ROWID := NULL;
176: BEGIN
177: SELECT ROWID
178: INTO profileRowId
179: FROM fnd_profile_options
180: WHERE profile_option_name = profileName
181: AND start_date_active <= SYSDATE
182: AND nvl(end_date_active, SYSDATE) >= SYSDATE;
183: -- Log that the profile exists in fnd_profile_options
179: FROM fnd_profile_options
180: WHERE profile_option_name = profileName
181: AND start_date_active <= SYSDATE
182: AND nvl(end_date_active, SYSDATE) >= SYSDATE;
183: -- Log that the profile exists in fnd_profile_options
184: corelog_using_name(profileName, 'EXISTS in FND_PROFILE_OPTIONS');
185: RETURN profileRowId;
186: EXCEPTION
187: WHEN no_data_found THEN
180: WHERE profile_option_name = profileName
181: AND start_date_active <= SYSDATE
182: AND nvl(end_date_active, SYSDATE) >= SYSDATE;
183: -- Log that the profile exists in fnd_profile_options
184: corelog_using_name(profileName, 'EXISTS in FND_PROFILE_OPTIONS');
185: RETURN profileRowId;
186: EXCEPTION
187: WHEN no_data_found THEN
188: -- Log that profile does not exist
186: EXCEPTION
187: WHEN no_data_found THEN
188: -- Log that profile does not exist
189: corelog_using_name(profileName,
190: 'DOES NOT EXIST in FND_PROFILE_OPTIONS');
191: RETURN NULL;
192: END get_profile_rowid;
193:
194: /*
205: profileName VARCHAR2(80) := NULL;
206: BEGIN
207: SELECT profile_option_name
208: INTO profileName
209: FROM fnd_profile_options
210: WHERE profile_option_id = profileOptionId
211: AND application_id = applicationId;
212: -- Log the profile_option_name given the profileOptionId + applicationId
213: corelog_using_name(profileName,
237: profileId NUMBER := NULL;
238: BEGIN
239: SELECT profile_option_id
240: INTO profileId
241: FROM fnd_profile_options
242: WHERE ROWID = profileOptionRowId;
243: -- Log the profile_option_id given the profileOptionRowId
244: corelog_using_name(profileName, 'PROFILE_OPTION_ID = ' || profileId);
245: RETURN profileId;
264: profileApplId NUMBER := NULL;
265: BEGIN
266: SELECT application_id
267: INTO profileApplId
268: FROM fnd_profile_options
269: WHERE ROWID = profileOptionRowId;
270: -- Log the application_id given the profileOptionRowId
271: corelog_using_name(profileName, 'APPLICATION_ID = ' || profileApplId);
272: RETURN profileApplId;
306: serverresp_enabled_flag,
307: 'SITE',
308: site_enabled_flag)
309: INTO profileLevelEnabled
310: FROM fnd_profile_options
311: WHERE ROWID = profileOptionRowId;
312: -- Log the site_enabled_flag given the profileOptionRowId
313: corelog_using_name(profileName,
314: levelName||'_ENABLED_FLAG = ' || profileLevelEnabled);
336: profileHierarchyType VARCHAR2(8) := NULL;
337: BEGIN
338: SELECT hierarchy_type
339: INTO profileHierarchyType
340: FROM fnd_profile_options
341: WHERE ROWID = profileOptionRowId;
342: -- Log the hierarchy_type given the profileOptionRowId
343: corelog_using_name(profileName,
344: 'HIERARCHY_TYPE = ' || profileHierarchyType);
365: profileUserChangeable VARCHAR2(1) := NULL;
366: BEGIN
367: SELECT user_changeable_flag
368: INTO profileUserChangeable
369: FROM fnd_profile_options
370: WHERE ROWID = profileOptionRowId;
371: -- Log the user_changeable_flag given the profileOptionRowId
372: corelog_using_name(profileName,
373: 'USER_CHANGEABLE_FLAG = ' || profileUserChangeable);
383: ** get_site_value
384: ** get the profile option's site-level value based on the profile
385: ** option's id. The results are cached using the PL/SQL cross-session
386: ** function result caching mechanism. This has a dependency on the view
387: ** fnd_profile_values_site_v
388: */
389: FUNCTION get_site_value
390: (
391: profileOptionId IN NUMBER,
396: applicationId);
397: BEGIN
398: SELECT profile_option_value
399: INTO siteLevelValue
400: FROM fnd_profile_values_site_v
401: WHERE profile_option_id = profileOptionId
402: AND application_id = applicationId
403: AND profile_option_value IS NOT NULL;
404: corelog_using_name(profileName, 'SITE LEVEL=' || siteLevelValue);
413: ** get_appl_value
414: ** get the profile option's application-level value based on the profile
415: ** option's id and level_value. The results are cached using the PL/SQL
416: ** cross-session function result caching mechanism. This has a
417: ** dependency on the view fnd_profile_values_appl_v
418: */
419: FUNCTION get_appl_value
420: (
421: profileOptionId IN NUMBER,
427: applicationId);
428: BEGIN
429: SELECT profile_option_value
430: INTO applLevelValue
431: FROM fnd_profile_values_appl_v
432: WHERE profile_option_id = profileOptionId
433: AND application_id = applicationId
434: AND level_value = applId
435: AND profile_option_value IS NOT NULL;
450: ** get the profile option's responsibility-level value based on the
451: ** profile option's id, level_value, and level_value_application_id. The
452: ** results are cached using the PL/SQL cross-session function result
453: ** caching mechanism. This has a dependency on the view
454: ** fnd_profile_values_resp_v
455: */
456: FUNCTION get_resp_value
457: (
458: profileOptionId IN NUMBER,
465: applicationId);
466: BEGIN
467: SELECT profile_option_value
468: INTO respLevelValue
469: FROM fnd_profile_values_resp_v
470: WHERE profile_option_id = profileOptionId
471: AND application_id = applicationId
472: AND level_value = respId
473: AND level_value_application_id = applId
489: ** get_user_value
490: ** get the profile option's user-level value based on the profile
491: ** option's id and level_value. The results are cached using the PL/SQL
492: ** cross-session function result caching mechanism. This has a
493: ** dependency on the view fnd_profile_values_user_v
494: **
495: ** This is called in get_specific_value().
496: */
497: FUNCTION get_user_value
505: applicationId);
506: BEGIN
507: SELECT profile_option_value
508: INTO userLevelValue
509: FROM fnd_profile_values_user_v
510: WHERE profile_option_id = profileOptionId
511: AND application_id = applicationId
512: AND level_value = userId
513: AND profile_option_value IS NOT NULL;
526: ** get_server_value
527: ** get the profile option's server-level value based on the profile
528: ** option's id and level_value. The results are cached using the PL/SQL
529: ** cross-session function result caching mechanism. This has a
530: ** dependency on the view fnd_profile_values_server_v
531: **
532: ** This is called in get_specific_value().
533: */
534: FUNCTION get_server_value
542: applicationId);
543: BEGIN
544: SELECT profile_option_value
545: INTO serverLevelValue
546: FROM fnd_profile_values_server_v
547: WHERE profile_option_id = profileOptionId
548: AND application_id = applicationId
549: AND level_value = serverId
550: AND profile_option_value IS NOT NULL;
563: ** get_org_value
564: ** get the profile option's org-level value based on the profile
565: ** option's id and level_value. The results are cached using the PL/SQL
566: ** cross-session function result caching mechanism. This has a
567: ** dependency on the view fnd_profile_values_org_v
568: **
569: ** This is called in get_specific_value().
570: */
571: FUNCTION get_org_value
579: applicationId);
580: BEGIN
581: SELECT profile_option_value
582: INTO orgLevelValue
583: FROM fnd_profile_values_org_v
584: WHERE profile_option_id = profileOptionId
585: AND application_id = applicationId
586: AND level_value = orgId
587: AND profile_option_value IS NOT NULL;
600: ** get_servresp_level_value
601: ** get the profile option's servresp level value based on the profile
602: ** option's id, responsibility and server context. The results are cached
603: ** using the PL/SQL cross-session function result caching mechanism.
604: ** This has a dependency on the view fnd_profile_values_servresp_v
605: **
606: ** This is called in get_specific_value().
607: */
608: FUNCTION get_servresp_value
618: applicationId);
619: BEGIN
620: SELECT profile_option_value
621: INTO servrespLevelValue
622: FROM fnd_profile_values_servresp_v
623: WHERE profile_option_id = profileOptionId
624: AND application_id = applicationId
625: AND level_value = respId
626: AND level_value_application_id = applId
939: /*
940: ** invalidate_cache
941: ** Call WF_EVENT.RAISE to invalidate the cache entry corresponding to
942: ** the specified profile. This is needed to notify processes monitoring
943: ** the 'oracle.apps.fnd.profile.value.update' event to invalidate their
944: ** cache and reload from the database.
945: */
946: PROCEDURE invalidate_cache
947: (
995: event_key := levelId || ':' || level_value || ':' ||
996: level_value_appl_id || ':' || profileName;
997: END IF;
998:
999: -- raise event 'oracle.apps.fnd.profile.value.update' to notify
1000: -- processes monitoring the event to invalidate their cache.
1001: fnd_wf_engine.default_event_raise(p_event_name => 'oracle.apps.fnd.profile.value.update',
1002: p_event_key => event_key);
1003:
997: END IF;
998:
999: -- raise event 'oracle.apps.fnd.profile.value.update' to notify
1000: -- processes monitoring the event to invalidate their cache.
1001: fnd_wf_engine.default_event_raise(p_event_name => 'oracle.apps.fnd.profile.value.update',
1002: p_event_key => event_key);
1003:
1004: END invalidate_cache;
1005:
1015: ** cross-session function result caching mechanism.
1016: **
1017: ** The algorithm is such:
1018: ** 1. Using the profile option information acquired at declaration,
1019: ** determine if the profile exists in FND_PROFILE_OPTIONS. If it does
1020: ** not, return NULL.
1021: ** 2. If it exists and the user_enabled_flag is Y, get user level value.
1022: ** 3. If there was no user-level value, proceed to check the applicable
1023: ** levels based on the profile option hierarchy.
1078: -- is placed in Public Put Cache. Since this API does not check Public Put
1079: -- Cache when evaluating a profile option, it would be best not to perform
1080: -- any action related to Public Put Cache. Hence, if profileRowId is NULL,
1081: -- then this API will return NULL for a profile that does not exist in
1082: -- FND_PROFILE_OPTIONS. This is different from value() and get() since
1083: -- profiles that do not exist in FND_PROFILE_OPTIONS are categorized as
1084: -- TRANSIENT and may have values in Public Put Cache.
1085: IF profileRowId IS NULL THEN
1086: -- Log that profile option was not found
1079: -- Cache when evaluating a profile option, it would be best not to perform
1080: -- any action related to Public Put Cache. Hence, if profileRowId is NULL,
1081: -- then this API will return NULL for a profile that does not exist in
1082: -- FND_PROFILE_OPTIONS. This is different from value() and get() since
1083: -- profiles that do not exist in FND_PROFILE_OPTIONS are categorized as
1084: -- TRANSIENT and may have values in Public Put Cache.
1085: IF profileRowId IS NULL THEN
1086: -- Log that profile option was not found
1087: corelog_using_name(profileName,
1085: IF profileRowId IS NULL THEN
1086: -- Log that profile option was not found
1087: corelog_using_name(profileName,
1088: profileName ||
1089: 'does not exist in FND_PROFILE_OPTIONS, returning NULL');
1090: RETURN NULL;
1091: ELSE
1092: -- If profile exists, then retrieve the definition
1093: profileOptionId := get_profile_id(profileRowId, profileName);
1313: ========================================================================*/
1314: /*
1315: ** FOR AOL INTERNAL USE ONLY - DO NOT CALL DIRECTLY,
1316: ** CALL VIA FND_GLOBAL.INITIALIZE('ORG_ID',org_id)
1317: ** FND_PROFILE.INITIALIZE also calls this API to initialize the org context.
1318: **
1319: ** initialize_org_context - Initializes the org context
1320: */
1321: PROCEDURE initialize_org_context IS
1338: -- should return the profile option table value, not the org context.
1339: -- This behavior was confirmed with JMARY and SHNARAYA of the MO Team.
1340: -- CURRENT_ORG_CONTEXT is being introduced so that profiles code can
1341: -- provide similar functionality such that FND_GLOBAL.ORG_ID will be
1342: -- equivalent to FND_PROFILE.VALUE('CURRENT_ORG_CONTEXT').
1343: -- FND_PROFILE.VALUE('ORG_ID') will return a value obtained in the
1344: -- FND_PROFILE_OPTION_VALUES table.
1345:
1346: END initialize_org_context;
1339: -- This behavior was confirmed with JMARY and SHNARAYA of the MO Team.
1340: -- CURRENT_ORG_CONTEXT is being introduced so that profiles code can
1341: -- provide similar functionality such that FND_GLOBAL.ORG_ID will be
1342: -- equivalent to FND_PROFILE.VALUE('CURRENT_ORG_CONTEXT').
1343: -- FND_PROFILE.VALUE('ORG_ID') will return a value obtained in the
1344: -- FND_PROFILE_OPTION_VALUES table.
1345:
1346: END initialize_org_context;
1347:
1340: -- CURRENT_ORG_CONTEXT is being introduced so that profiles code can
1341: -- provide similar functionality such that FND_GLOBAL.ORG_ID will be
1342: -- equivalent to FND_PROFILE.VALUE('CURRENT_ORG_CONTEXT').
1343: -- FND_PROFILE.VALUE('ORG_ID') will return a value obtained in the
1344: -- FND_PROFILE_OPTION_VALUES table.
1345:
1346: END initialize_org_context;
1347:
1348: /*
1564: ** The algorithm is such:
1565: ** 1. Check Public Put Cache to see if a value has already been placed for
1566: ** the profile.
1567: ** 2. If no value was found in Public Put Cache, check to see if the
1568: ** profile option exists in FND_PROFILE_OPTIONS using
1569: ** get_profile_rowid().
1570: ** 3. If the profile option does not exist, then return NULL.
1571: ** If the profile option exists, call get_specific_value() to get a
1572: ** profile option value.
1731: ** The algorithm is such:
1732: ** 1. Check Public Put Cache to see if a value has already been placed for
1733: ** the profile.
1734: ** 2. If no value was found in Public Put Cache, check to see if the
1735: ** profile option exists in FND_PROFILE_OPTIONS using
1736: ** get_profile_rowid().
1737: ** 3. If the profile option does not exist, then return NULL.
1738: ** If the profile option exists, call get_specific_value() to get a
1739: ** profile option value.
1911: ** RETURNS: TRUE, if the profile option has a value
1912: ** FALSE, otherwise.
1913: **
1914: ** NOTE: A return of FALSE does not imply that the profile option is not
1915: ** defined in FND_PROFILE_OPTIONS. It just means that no value was
1916: ** found in Public Put cache or FND_PROFILE_OPTION_VALUES.
1917: */
1918: FUNCTION defined(NAME IN VARCHAR2) RETURN BOOLEAN IS
1919: profileValue VARCHAR2(240);
1912: ** FALSE, otherwise.
1913: **
1914: ** NOTE: A return of FALSE does not imply that the profile option is not
1915: ** defined in FND_PROFILE_OPTIONS. It just means that no value was
1916: ** found in Public Put cache or FND_PROFILE_OPTION_VALUES.
1917: */
1918: FUNCTION defined(NAME IN VARCHAR2) RETURN BOOLEAN IS
1919: profileValue VARCHAR2(240);
1920: BEGIN
1943:
1944: /*
1945: ** save
1946: ** Saves the value of a profile option permanently to the database, at any
1947: ** level using the FND_PROFILE_OPTION_VALUES_PKG. This routine can be used
1948: ** at runtime or during patching. This routine will not actually commit
1949: ** the changes; the caller must commit.
1950: **
1951: ** ('SITE', 'APPL', 'RESP', 'USER', 'SERVER', 'ORG', or 'SERVRESP').
1950: **
1951: ** ('SITE', 'APPL', 'RESP', 'USER', 'SERVER', 'ORG', or 'SERVRESP').
1952: **
1953: ** Examples of use:
1954: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'SITE');
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1951: ** ('SITE', 'APPL', 'RESP', 'USER', 'SERVER', 'ORG', or 'SERVRESP').
1952: **
1953: ** Examples of use:
1954: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'SITE');
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1952: **
1953: ** Examples of use:
1954: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'SITE');
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1953: ** Examples of use:
1954: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'SITE');
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1954: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'SITE');
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1962: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', -1, -1, 25);
1955: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'APPL', 321532);
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1962: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', -1, -1, 25);
1963: **
1956: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'RESP', 321532, 345234);
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1962: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', -1, -1, 25);
1963: **
1964: ** Arguments/Parameters:
1957: ** FND_PROFILE.SAVE('P_NAME', 'P_VAL', 'USER', 123321);
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1962: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', -1, -1, 25);
1963: **
1964: ** Arguments/Parameters:
1965: ** profileName - Profile name you are setting
1958: ** FND_PROFILE.SAVE('P_NAME', 'SERVER', 25);
1959: ** FND_PROFILE.SAVE('P_NAME', 'ORG', 204);
1960: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, 25);
1961: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', 321532, 345234, -1);
1962: ** FND_PROFILE.SAVE('P_NAME', 'SERVRESP', -1, -1, 25);
1963: **
1964: ** Arguments/Parameters:
1965: ** profileName - Profile name you are setting
1966: ** profileValue - Profile value you are setting
2021: x_level_value_app_id,
2022: x_level_value2);
2023:
2024: -- If profile option value being set is > 240 characters, then place the
2025: -- message FND_PROFILE_OPTION_VAL_TOO_LRG into the error stack and
2026: -- return FALSE.
2027: --
2028: -- The lengthb() function replaced the length() function to handle
2029: -- multibyte characters appropriately.
2027: --
2028: -- The lengthb() function replaced the length() function to handle
2029: -- multibyte characters appropriately.
2030: IF lengthb(x_value) > 240 THEN
2031: fnd_message.set_name('FND', 'FND_PROFILE_OPTION_VAL_TOO_LRG');
2032: fnd_message.set_token('PROFILE_OPTION_NAME', profNameUpper);
2033: fnd_message.set_token('PROFILE_OPTION_VALUE', x_value);
2034: RETURN FALSE;
2035: END IF;
2054: userChangeable := get_user_changeable_flag(profileRowId,profNameUpper);
2055: END IF;
2056:
2057: /* The following IF-THEN statements check to see if the arguments passed
2058: ** into SAVE comply with FND_PROFILE_OPTION_VALUES constraints with
2059: ** regards to saving profile option values.
2060: */
2061:
2062: -- The LEVEL_VALUE_APPLICATION_ID applies to the Resp and Server/Resp
2179: IF (x_value IS NULL) THEN
2180: -- If SERVRESP level, then take LEVEL_VALUE2 into consideration.
2181: IF (levelId = SERVRESP_LEVEL_ID) THEN
2182: -- DELETE
2183: fnd_profile_option_values_pkg.delete_row(applicationId,
2184: profileOptionId,
2185: levelId,
2186: levelValueActual,
2187: x_level_value_app_id,
2194: x_level_value_app_id,
2195: levelValue2Actual);
2196: ELSE
2197: -- DELETE
2198: fnd_profile_option_values_pkg.delete_row(applicationId,
2199: profileOptionId,
2200: levelId,
2201: levelValueActual,
2202: x_level_value_app_id);
2208: x_level_value_app_id);
2209: END IF;
2210: ELSE
2211: -- If profile option value passed in is NOT NULL, then update
2212: -- accordingly. FND_PROFILE_OPTION_VALUES_PKG.UPDATE_ROW() will call
2213: -- FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), if needed. There is no
2214: -- need to call FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), explicitly,
2215: -- from here. If SERVRESP level, then take LEVEL_VALUE2 into
2216: -- consideration.
2209: END IF;
2210: ELSE
2211: -- If profile option value passed in is NOT NULL, then update
2212: -- accordingly. FND_PROFILE_OPTION_VALUES_PKG.UPDATE_ROW() will call
2213: -- FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), if needed. There is no
2214: -- need to call FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), explicitly,
2215: -- from here. If SERVRESP level, then take LEVEL_VALUE2 into
2216: -- consideration.
2217: IF (levelId = SERVRESP_LEVEL_ID) THEN
2210: ELSE
2211: -- If profile option value passed in is NOT NULL, then update
2212: -- accordingly. FND_PROFILE_OPTION_VALUES_PKG.UPDATE_ROW() will call
2213: -- FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), if needed. There is no
2214: -- need to call FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), explicitly,
2215: -- from here. If SERVRESP level, then take LEVEL_VALUE2 into
2216: -- consideration.
2217: IF (levelId = SERVRESP_LEVEL_ID) THEN
2218: fnd_profile_option_values_pkg.update_row(applicationId,
2214: -- need to call FND_PROFILE_OPTION_VALUES_PKG.INSERT_ROW(), explicitly,
2215: -- from here. If SERVRESP level, then take LEVEL_VALUE2 into
2216: -- consideration.
2217: IF (levelId = SERVRESP_LEVEL_ID) THEN
2218: fnd_profile_option_values_pkg.update_row(applicationId,
2219: profileOptionId,
2220: levelId,
2221: levelValueActual,
2222: x_level_value_app_id,
2234: levelValueActual,
2235: x_level_value_app_id,
2236: levelValue2Actual);
2237: ELSE
2238: fnd_profile_option_values_pkg.update_row(applicationId,
2239: profileOptionId,
2240: levelId,
2241: levelValueActual,
2242: x_level_value_app_id,
2296: **
2297: ** ('SITE', 'APPL', 'RESP', 'USER', 'SERVER', 'ORG', or 'SERVRESP').
2298: **
2299: ** Examples of use:
2300: ** FND_PROFILE.DELETE('P_NAME', 'SITE');
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2297: ** ('SITE', 'APPL', 'RESP', 'USER', 'SERVER', 'ORG', or 'SERVRESP').
2298: **
2299: ** Examples of use:
2300: ** FND_PROFILE.DELETE('P_NAME', 'SITE');
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2298: **
2299: ** Examples of use:
2300: ** FND_PROFILE.DELETE('P_NAME', 'SITE');
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2299: ** Examples of use:
2300: ** FND_PROFILE.DELETE('P_NAME', 'SITE');
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2300: ** FND_PROFILE.DELETE('P_NAME', 'SITE');
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2308: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', -1, -1, 25);
2301: ** FND_PROFILE.DELETE('P_NAME', 'APPL', 321532);
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2308: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', -1, -1, 25);
2309: **
2302: ** FND_PROFILE.DELETE('P_NAME', 'RESP', 321532, 345234);
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2308: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', -1, -1, 25);
2309: **
2310: ** Arguments/Parameters:
2303: ** FND_PROFILE.DELETE('P_NAME', 'USER', 123321);
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2308: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', -1, -1, 25);
2309: **
2310: ** Arguments/Parameters:
2311: ** profileName - Profile name whose value is to be deleted
2304: ** FND_PROFILE.DELETE('P_NAME', 'SERVER', 25);
2305: ** FND_PROFILE.DELETE('P_NAME', 'ORG', 204);
2306: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, 25);
2307: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', 321532, 345234, -1);
2308: ** FND_PROFILE.DELETE('P_NAME', 'SERVRESP', -1, -1, 25);
2309: **
2310: ** Arguments/Parameters:
2311: ** profileName - Profile name whose value is to be deleted
2312: ** levelName - Level deleting at:
2338: RETURN BOOLEAN IS
2339: deleted BOOLEAN;
2340: BEGIN
2341: -- Call SAVE() and pass NULL for the profile option value. This
2342: -- physically deletes the row from FND_PROFILE_OPTION_VALUES. Ideally,
2343: -- FND_PROFILE_OPTION_VALUES_PKG.DELETE_ROW would be called. However, all
2344: -- validation/conversion performed in SAVE() would have to be written here
2345: -- as well OR writing a completely separate API just to validate the data
2346: -- so that both SAVE and DELETE can use it.
2339: deleted BOOLEAN;
2340: BEGIN
2341: -- Call SAVE() and pass NULL for the profile option value. This
2342: -- physically deletes the row from FND_PROFILE_OPTION_VALUES. Ideally,
2343: -- FND_PROFILE_OPTION_VALUES_PKG.DELETE_ROW would be called. However, all
2344: -- validation/conversion performed in SAVE() would have to be written here
2345: -- as well OR writing a completely separate API just to validate the data
2346: -- so that both SAVE and DELETE can use it.
2347: deleted := SAVE(x_name,
2355:
2356: /*
2357: ** bumpCacheVersion_RF
2358: ** The rule function for FND's subscription on the
2359: ** oracle.apps.fnd.profile.value.update event.
2360: ** Since level hash table caches are no longer used due to the PL/SQL
2361: ** cross-session function result caching mechanism, this is really no
2362: ** longer being used. It will return SUCCESS for backward compatibility.
2363: */
2506: BEGIN
2507: RETURN value(name);
2508: END value_wnps;
2509:
2510: END fnd_profile;