[Home] [Help]
598: begin
599: if z_context_change_flag is null then
600: -- For R12, due to MOAC, the org context can change within a session and
601: -- is being handled separately from the other contexts.
602: if fnd_release.major_version >= 12 then
603: z_context_change_flag
604: := security_context_changed
605: or server_context_change
606: or nls_context_change;
1770: -- profiles to determine the ORG_ID to set at initialization:
1771: -- MO: Security Profile
1772: -- MO: Default Operating Unit
1773: -- MO: Operating Unit
1774: if fnd_release.major_version >= 12 then
1775: declare
1776: v_sec_prof_s varchar2(240);
1777: begin
1778: -- Bug 7109984
1914: -- that FND_GLOBAL.ORG_ID = substrb(userenv('CLIENT_INFO'),1,10).
1915: fnd_client_info.set_org_context(org_id);
1916: -- Reset the transient profile option CURRENT_ORG_CONTEXT if the org
1917: -- context changes. Re-initialize the org context for FND_PROFILE.
1918: if fnd_release.major_version >= 12 then
1919: fnd_profile.put('CURRENT_ORG_CONTEXT', org_id);
1920: fnd_profile.initialize_org_context;
1921: end if;
1922: end if;
1940: -- returns a value. It will only be useful if there is an actual profile
1941: -- option value fetch for the ORG_ID profile option.
1942: --
1943: -- if release >= 12
1944: if fnd_release.major_version >= 12 then
1945: -- get XLA_MO_SECURITY_PROFILE_LEVEL value
1946: fnd_profile.get('XLA_MO_SECURITY_PROFILE_LEVEL',tsec_prof);
1947: -- if XLA_MO_SECURITY_PROFILE_LEVEL is not null
1948: if tsec_prof is not null then
2308: mrc_reporting_sob_id number;
2309: icx_language v$nls_parameters.value%type;
2310: begin
2311:
2312: if fnd_release.major_version < 12 then
2313: -- MRC is no longer used beyond 11i.
2314: fnd_profile.get('MRC_REPORTING_SOB_ID',mrc_reporting_sob_id);
2315: put('MRC_REPORTING_SOB_ID',mrc_reporting_sob_id);
2316: end if;
2351: -- we'll let fnd_date default to whatever it does.
2352: if icx_date_format is not null then
2353: -- Bug 9536949: non-Gregorian calendar support was introduced for the
2354: -- R12.FND.B (12.1) release.
2355: if fnd_release.major_version >= 12 and
2356: fnd_release.minor_version > 0 then
2357: -- Fetch the value of the FND_FORMS_USER_CALENDAR. This profile was
2358: -- introduced in R12.FND.B. This profile should only be fetched if
2359: -- instance is 12.1 or higher. This saves a profile fetch for EBS
2352: if icx_date_format is not null then
2353: -- Bug 9536949: non-Gregorian calendar support was introduced for the
2354: -- R12.FND.B (12.1) release.
2355: if fnd_release.major_version >= 12 and
2356: fnd_release.minor_version > 0 then
2357: -- Fetch the value of the FND_FORMS_USER_CALENDAR. This profile was
2358: -- introduced in R12.FND.B. This profile should only be fetched if
2359: -- instance is 12.1 or higher. This saves a profile fetch for EBS
2360: -- instances < 12.1.
2400: doInit boolean;
2401: conditions varchar2(80) := build_conditions;
2402: begin
2403: -- 15959817 R12 check added back with checks for HR ...
2404: if fnd_release.major_version >= 12 then
2405: -- 12875860 expand the conditions to include all security context changes
2406: -- 16196565 remove specific check for PER application
2407: -- to allow init sequence for PER-dependent applications
2408: if application_short_name is not null and z_security_groups_enabled then
2685:
2686: -- If initialize was called for an org_context change and the applications
2687: -- release is R12, then the code will just change the org context if the
2688: -- current org_context is not equal to the org_context passed in.
2689: if upper(name) = 'ORG_ID' and fnd_release.major_version >= 12 then
2690: if (FND_GLOBAL.ORG_ID <> to_number(value)) then
2691: if is_debugging then
2692: -- This will indicate the caller of this API when an attempt to
2693: -- change the org context is made.