70: l_excep_org_id FROM PA_IMPLEMENTATIONS;
71:
72: If P_PA_DEBUG_MODE = 'Y' THEN
73: PA_DEBUG.Log_Message(p_message => 'l_excep_org_id => :'||l_excep_org_id);
74: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.INITapi');
75: End If;
76: MO_GLOBAL.INIT('PA');
77: If NVL(l_excep_org_id,-99) = -99 Then
78: l_excep_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID;
72: If P_PA_DEBUG_MODE = 'Y' THEN
73: PA_DEBUG.Log_Message(p_message => 'l_excep_org_id => :'||l_excep_org_id);
74: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.INITapi');
75: End If;
76: MO_GLOBAL.INIT('PA');
77: If NVL(l_excep_org_id,-99) = -99 Then
78: l_excep_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID;
79: End If;
80: If P_PA_DEBUG_MODE = 'Y' THEN
74: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.INITapi');
75: End If;
76: MO_GLOBAL.INIT('PA');
77: If NVL(l_excep_org_id,-99) = -99 Then
78: l_excep_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID;
79: End If;
80: If P_PA_DEBUG_MODE = 'Y' THEN
81: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT');
82: End If;
77: If NVL(l_excep_org_id,-99) = -99 Then
78: l_excep_org_id := MO_GLOBAL.GET_CURRENT_ORG_ID;
79: End If;
80: If P_PA_DEBUG_MODE = 'Y' THEN
81: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT');
82: End If;
83: MO_GLOBAL.SET_POLICY_CONTEXT('S',l_excep_org_id);
84: /* end of bug fix:4367847 */
85:
79: End If;
80: If P_PA_DEBUG_MODE = 'Y' THEN
81: PA_DEBUG.Log_Message(p_message => 'Calling MO_GLOBAL.SET_POLICY_CONTEXT');
82: End If;
83: MO_GLOBAL.SET_POLICY_CONTEXT('S',l_excep_org_id);
84: /* end of bug fix:4367847 */
85:
86: IF p_run_mode IN ( 'F' , 'I' ) OR
87: ( p_run_mode = 'P' AND p_select_criteria IN ( '02' , '01' ) ) THEN