eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_CC_IDENT dependencies on PA_CC_UTILS

Line 15: P_DEBUG_MODE BOOLEAN := pa_cc_utils.g_debug_mode;

11: G_PrevCCPrjProcessFlag VARCHAR2(1);
12: G_PrevPrjOrgId NUMBER;
13: G_unmatched_neg_txn_flag pa_transaction_interface_all.unmatched_negative_txn_flag%TYPE default 'N'; -- bug 14173646
14:
15: P_DEBUG_MODE BOOLEAN := pa_cc_utils.g_debug_mode;
16:
17: PROCEDURE PRINT_MESSAGE(p_msg varchar2) IS
18:
19: BEGIN

Line 25: pa_cc_utils.LOG_MESSAGE('PRINT_MESSAGE: ' || p_msg);

21: --r_debug.r_msg(p_msg => p_msg);
22: Null;
23: End if;
24: IF P_DEBUG_MODE THEN
25: pa_cc_utils.LOG_MESSAGE('PRINT_MESSAGE: ' || p_msg);
26: END IF;
27:
28:
29: END PRINT_MESSAGE;

Line 85: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN_FI');

81: l_PrevPrvdrOrgId pa_projects_all.org_id%type := Null;
82:
83:
84: BEGIN
85: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN_FI');
86: l_MinRecs := P_SysLinkTab.FIRST;
87: l_MaxRecs := P_SysLinkTab.LAST;
88:
89: FOR j IN l_MinRecs..l_MaxRecs LOOP

Line 97: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.01: This FI is already erroneous and needs no CC identification');

93:
94: -- forecast items
95:
96: IF P_DEBUG_MODE THEN
97: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.01: This FI is already erroneous and needs no CC identification');
98: END IF;
99:
100: NULL ;
101:

Line 107: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.02: Determine the Expenditure OU and its cross charge options');

103: --
104: -- Determine Current Operating Unit
105: --
106: IF P_DEBUG_MODE THEN
107: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.02: Determine the Expenditure OU and its cross charge options');
108: END IF;
109:
110: IF nvl(l_prevexporgid,-99) <> P_ExpOrgidTab(j) Then
111: IF P_DEBUG_MODE THEN

Line 112: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.03: Derive the cross charge options from pa_implementations');

108: END IF;
109:
110: IF nvl(l_prevexporgid,-99) <> P_ExpOrgidTab(j) Then
111: IF P_DEBUG_MODE THEN
112: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.03: Derive the cross charge options from pa_implementations');
113: END IF;
114:
115: SELECT imp.org_id,
116: nvl(imp.cc_process_io_code,'N'),

Line 134: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.04: Retrive cross charge options from cache');

130:
131: ELSE
132:
133: IF P_DEBUG_MODE THEN
134: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.04: Retrive cross charge options from cache');
135: END IF;
136: l_current_org_id := l_PrevPrvdrOrgId;
137: l_current_process_io_code := l_PrevCCProcessIOCode;
138: l_current_process_iu_code := l_PrevCCProcessIUCode;

Line 154: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.05: Derive receiving org id for the given project');

150:
151: -- org id which is the receiver OU.
152: --
153: IF P_DEBUG_MODE THEN
154: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.05: Derive receiving org id for the given project');
155: END IF;
156:
157:
158: SELECT p.carrying_out_organization_id,

Line 176: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.06: Retreive receiving org id cache');

172:
173:
174: ELSE
175: IF P_DEBUG_MODE THEN
176: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.06: Retreive receiving org id cache');
177: END IF;
178:
179: l_recvr_organization_id := l_prev_recvr_organization_id;
180: l_cc_prj_process_flag := l_prev_cc_prj_process_flag;

Line 195: pa_cc_utils.log_message

191: X_RecvrOrgIdTab(j) := P_PrjOrgIdTab(j);
192: X_PrvdrOrgIdTab(j) := l_current_org_id;
193:
194: IF P_DEBUG_MODE THEN
195: pa_cc_utils.log_message
196: ('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.07: Calling Client Extension to override the PRVDR_RECVR orgs');
197: END IF;
198:
199: -- Call client extension to override the provider and receiver organizations.

Line 215: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || 'P_ProjectIdTab='||P_ProjectIdTab(j)||'P_PrvdrOrganizationId='||X_PrvdrOrganizationIdTab(j)

211: X_Error_Stage => X_Error_Stage,
212: X_Error_Code => X_Error_Code );
213:
214: IF P_DEBUG_MODE THEN
215: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || 'P_ProjectIdTab='||P_ProjectIdTab(j)||'P_PrvdrOrganizationId='||X_PrvdrOrganizationIdTab(j)
216: ||'X_RecvrOrganizationIdTab='||X_RecvrOrganizationIdTab(j)||'X_RecvrOrgIdTab='
217: ||X_RecvrOrgIdTab(j)||'P_SysLinkTab='||P_SysLinkTab(j)
218: ||'l_CCPrjFlagTab='||l_CCPrjFlagTab(j)||'l_CCProcessIUCodeTab='
219: ||l_CCProcessIUCodeTab(j)||'l_CCProcessIOCodeTab='||l_CCProcessIOCodeTab(j));

Line 220: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.08: End of Client Extension to override the PRVDR_RECVR orgs');

216: ||'X_RecvrOrganizationIdTab='||X_RecvrOrganizationIdTab(j)||'X_RecvrOrgIdTab='
217: ||X_RecvrOrgIdTab(j)||'P_SysLinkTab='||P_SysLinkTab(j)
218: ||'l_CCPrjFlagTab='||l_CCPrjFlagTab(j)||'l_CCProcessIUCodeTab='
219: ||l_CCProcessIUCodeTab(j)||'l_CCProcessIOCodeTab='||l_CCProcessIOCodeTab(j));
220: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.08: End of Client Extension to override the PRVDR_RECVR orgs');
221: END IF;
222:
223: END IF; -- end of status_tab
224:

Line 227: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.09: Calling PA_CC_GET_CROSS_CHARGE_TYPE api');

223: END IF; -- end of status_tab
224:
225: END LOOP;
226: IF P_DEBUG_MODE THEN
227: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.09: Calling PA_CC_GET_CROSS_CHARGE_TYPE api');
228: END IF;
229:
230:
231: PA_CC_IDENT.PA_CC_GET_CROSS_CHARGE_TYPE (

Line 255: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.10: End of PA_CC_GET_CROSS_CHARGE_TYPE api');

251: ,X_CrossChargeCodeTab => X_CrossChargeCodeTab
252: ,X_Error_Stage => X_Error_Stage
253: ,X_Error_Code => X_Error_Code );
254: IF P_DEBUG_MODE THEN
255: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.10: End of PA_CC_GET_CROSS_CHARGE_TYPE api');
256: END IF;
257:
258: pa_cc_utils.reset_curr_function;
259:

Line 258: pa_cc_utils.reset_curr_function;

254: IF P_DEBUG_MODE THEN
255: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.10: End of PA_CC_GET_CROSS_CHARGE_TYPE api');
256: END IF;
257:
258: pa_cc_utils.reset_curr_function;
259:
260: EXCEPTION
261:
262: WHEN OTHERS THEN

Line 264: pa_cc_utils.log_message('Failed in PA_CC_IDENTIFY_TXN_FI Error:'||SQLCODE||SQLERRM);

260: EXCEPTION
261:
262: WHEN OTHERS THEN
263: IF P_DEBUG_MODE THEN
264: pa_cc_utils.log_message('Failed in PA_CC_IDENTIFY_TXN_FI Error:'||SQLCODE||SQLERRM);
265: END IF;
266: RAISE ;
267:
268: END PA_CC_IDENTIFY_TXN_FI;

Line 342: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN_ADJ');

338:
339: -- Assign all the input values to the tables. These tables will be passed
340: -- to the the main identification procedure.
341:
342: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN_ADJ');
343: IF P_DEBUG_MODE THEN
344: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '10: Assign all the input values to the tables');
345: END IF;
346:

Line 344: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '10: Assign all the input values to the tables');

340: -- to the the main identification procedure.
341:
342: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN_ADJ');
343: IF P_DEBUG_MODE THEN
344: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '10: Assign all the input values to the tables');
345: END IF;
346:
347: l_ExpOrganizationIdTab(1) := P_ExpOrganizationId ;
348: l_ExpOrgIdTab(1) := P_ExpOrgId ;

Line 368: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '20: Calling procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN');

364: l_Error_Code := X_Error_Code;
365: G_unmatched_neg_txn_flag := NVL(PA_TRX_IMPORT.G_unmatched_negative_txn_flag,'N'); -- added bug 14173646
366:
367: IF P_DEBUG_MODE THEN
368: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '20: Calling procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN');
369: END IF;
370:
371: PA_CC_IDENT.PA_CC_IDENTIFY_TXN(
372: P_ExpOrganizationIdTab => l_ExpOrganizationIdTab,

Line 399: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '30: Assigning the returned values to the output variables');

395: /* Added calling module for 3234973 */
396: X_Calling_Module => X_Calling_Module);
397:
398: IF P_DEBUG_MODE THEN
399: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN_ADJ: ' || '30: Assigning the returned values to the output variables');
400: END IF;
401:
402: X_status := l_StatusTab(1);
403: X_CrossChargeType := l_CrossChargeTypeTab(1);

Line 411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);

407: X_RecvrOrgId := l_RecvrOrgIdTab(1);
408:
409:
410: IF P_DEBUG_MODE THEN
411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);
412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);

Line 412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);

408:
409:
410: IF P_DEBUG_MODE THEN
411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);
412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);

Line 413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);

409:
410: IF P_DEBUG_MODE THEN
411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);
412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);
417:

Line 414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);

410: IF P_DEBUG_MODE THEN
411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);
412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);
417:
418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');

Line 415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);

411: pa_cc_utils.log_message( 'X_CrossChargeType :' || X_CrossChargeType);
412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);
417:
418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');
419: END IF;

Line 416: pa_cc_utils.log_message( 'X_status :' || X_status);

412: pa_cc_utils.log_message( 'X_CrossChargeCode :' || X_CrossChargeCode);
413: pa_cc_utils.log_message( 'X_PrvdrOrganizationId :' || X_PrvdrOrganizationId);
414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);
417:
418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');
419: END IF;
420:

Line 418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');

414: pa_cc_utils.log_message( 'X_RecvrOrganizationId :' || X_RecvrOrganizationId);
415: pa_cc_utils.log_message( 'X_RecvrOrgId :' || X_RecvrOrgId);
416: pa_cc_utils.log_message( 'X_status :' || X_status);
417:
418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');
419: END IF;
420:
421: pa_cc_utils.reset_curr_function;
422: EXCEPTION

Line 421: pa_cc_utils.reset_curr_function;

417:
418: pa_cc_utils.log_message('40: Exiting the procedure PA_CC_IDENT.PA_CC_IDENTIFY_TXN_ADJ');
419: END IF;
420:
421: pa_cc_utils.reset_curr_function;
422: EXCEPTION
423:
424: WHEN OTHERS THEN
425: x_error_stage := l_error_stage;

Line 480: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN');

476: -- 2. Receiver Organization
477: -- 3. Provider Operating Unit
478: -- 4. Receiver Operating Unit
479:
480: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN');
481:
482: IF P_DEBUG_MODE THEN
483: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN: ' || '20.10: Calling the procedure to determine the orgs');
484: END IF;

Line 483: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN: ' || '20.10: Calling the procedure to determine the orgs');

479:
480: pa_cc_utils.set_curr_function('PA_CC_IDENTIFY_TXN');
481:
482: IF P_DEBUG_MODE THEN
483: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN: ' || '20.10: Calling the procedure to determine the orgs');
484: END IF;
485:
486: PA_CC_IDENT.PA_CC_GET_PRVDR_RECVR_ORGS (
487: P_ExpOrganizationIdTab => P_ExpOrganizationIdTab,

Line 516: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN: ' || '20.20: Calling the procedure to determine the cross charge code and type');

512: -- This procedure is called for determining the cross charge code.
513: --
514:
515: IF P_DEBUG_MODE THEN
516: pa_cc_utils.log_message('PA_CC_IDENTIFY_TXN: ' || '20.20: Calling the procedure to determine the cross charge code and type');
517: END IF;
518:
519: PA_CC_IDENT.PA_CC_GET_CROSS_CHARGE_TYPE (
520: P_PrvdrOrganizationIdTab => X_PrvdrOrganizationIdTab,

Line 544: pa_cc_utils.reset_curr_function;

540: X_CrossChargeCodeTab => X_CrossChargeCodeTab,
541: X_Error_Stage => X_Error_Stage,
542: X_Error_Code => X_Error_Code);
543:
544: pa_cc_utils.reset_curr_function;
545:
546: EXCEPTION
547:
548: WHEN OTHERS THEN

Line 636: pa_cc_utils.set_curr_function('PA_CC_GET_PRVDR_RECVR_ORGS');

632: FOR j in l_MinRecs..l_MaxRecs LOOP
633: l_UnmatchedNegativeTxnFlagTab(j) := NVL(G_unmatched_neg_txn_flag, 'N');
634: END LOOP;
635:
636: pa_cc_utils.set_curr_function('PA_CC_GET_PRVDR_RECVR_ORGS');
637:
638: --
639: -- Determine Current Operating Unit
640: --

Line 648: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.10: Determine the Expenditure OU and its cross charge options');

644: -- to the procedure except Transaction Import.
645: --
646:
647: IF P_DEBUG_MODE THEN
648: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.10: Determine the Expenditure OU and its cross charge options');
649: print_message('G_PrevCCProcessIOCode=' ||G_PrevCCProcessIOCode);
650: print_message('l_current_org_id=' ||l_current_org_id);
651: print_message('l_current_process_io_code=' ||l_current_process_io_code);
652: print_message('l_current_process_iu_code=' ||l_current_process_iu_code);

Line 711: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');

707: CLOSE GetAdjExpid; /* Bug 12955494 */
708: END IF;
709:
710: IF P_DEBUG_MODE THEN -- begin bug 14173646
711: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
712: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646

Line 712: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));

708: END IF;
709:
710: IF P_DEBUG_MODE THEN -- begin bug 14173646
711: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
712: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646
716:

Line 713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));

709:
710: IF P_DEBUG_MODE THEN -- begin bug 14173646
711: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
712: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646
716:
717: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);

Line 714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);

710: IF P_DEBUG_MODE THEN -- begin bug 14173646
711: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
712: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646
716:
717: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
718: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');

Line 717: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);

713: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646
716:
717: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
718: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');
719:
720: IF l_adj_exp_id IS NULL OR (l_adj_exp_id IS NOT NULL AND l_period_accrual_flag='Y')
721: OR X_Calling_Module ='TRANSACTION_IMPORT' /*Bug 14230879*/ THEN /* end of changes bug 12589016 , added l_period_accrual_flag condition : 12974801 */

Line 718: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');

714: pa_cc_utils.log_message('G_UnmatchedNegativeTxnFlagTab : ' || G_unmatched_neg_txn_flag);
715: END IF; -- end bug 14173646
716:
717: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
718: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');
719:
720: IF l_adj_exp_id IS NULL OR (l_adj_exp_id IS NOT NULL AND l_period_accrual_flag='Y')
721: OR X_Calling_Module ='TRANSACTION_IMPORT' /*Bug 14230879*/ THEN /* end of changes bug 12589016 , added l_period_accrual_flag condition : 12974801 */
722:

Line 729: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.20: This expenditure item is already erroneous and needs no CC identification');

725: -- by this PL/SQL able then do not process CC identification for that
726: -- expenditure item
727:
728: IF P_DEBUG_MODE THEN
729: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.20: This expenditure item is already erroneous and needs no CC identification');
730: END IF;
731: NULL ;
732:
733: ELSE

Line 740: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.30: Determine Provider Organization');

736: --
737: l_project_org_id := NULL ;
738:
739: IF P_DEBUG_MODE THEN
740: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.30: Determine Provider Organization');
741: END IF;
742:
743: -- Determine Provider Organization
744: --

Line 756: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.40: Checking if NLR organization id is NULL for usages');

752: -- will be the non-labor resource organization of the resource. So if
753:
754: X_Error_Stage := 'Checking if NLR organization id is NULL for usages';
755: IF P_DEBUG_MODE THEN
756: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.40: Checking if NLR organization id is NULL for usages');
757: END IF;
758: IF P_NLROrganizationIdTab(j) IS NULL THEN
759: -- So if non-labor resource organization is not provided then an error
760: -- code is returned.

Line 763: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.50: Setting the error code for null NLR organization Id');

759: -- So if non-labor resource organization is not provided then an error
760: -- code is returned.
761:
762: IF P_DEBUG_MODE THEN
763: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.50: Setting the error code for null NLR organization Id');
764: END IF;
765: X_Error_Stage := 'Setting the error code for null NLR organization Id';
766: X_StatusTab(j) := 'PA_CC_NO_NL_ORG_FOR_USG';
767: ELSE

Line 771: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.60: Returning the NLR organization Id');

767: ELSE
768: -- Return non-labor resource organization as the provider organization.
769:
770: IF P_DEBUG_MODE THEN
771: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.60: Returning the NLR organization Id');
772: END IF;
773: X_Error_Stage := 'Returning the NLR organization Id';
774: l_Prvdr_Organization_Id := P_NLROrganizationIdTab(j);
775: END IF;

Line 782: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.70: Returning the expenditure organization id');

778: -- Else the provider organization is the expenditure organization. Return
779: -- expenditure organization as provider organization.
780:
781: IF P_DEBUG_MODE THEN
782: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.70: Returning the expenditure organization id');
783: END IF;
784: X_Error_Stage := 'Returning the expenditure organization id';
785: l_Prvdr_Organization_Id := P_ExpOrganizationIdTab(j);
786: END IF;

Line 795: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.80: Checking if current task id is the same as the previous task id');

791: -- Receiver Organization is the organization that owns the task
792: -- ( Carrying_Out_Organization_Id). In this select we also
793:
794: IF P_DEBUG_MODE THEN
795: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.80: Checking if current task id is the same as the previous task id');
796: END IF;
797: X_Error_Stage := 'Checking if project OU is NULL';
798: IF l_PrevTaskId = P_TaskIdTab(j) THEN
799: -- If the current task id is the same as the previous task id then

Line 804: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.90: current task id is the same as the previous task id');

800: -- the receiver organization and receiver operating unit will be
801: -- the same as previous one
802:
803: IF P_DEBUG_MODE THEN
804: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.90: current task id is the same as the previous task id');
805: END IF;
806: l_Recvr_Organization_Id := l_PrevRecvrOrganizationId ;
807: l_project_org_id := l_PrevRecvrOrgId ;
808: l_cc_prj_process_flag := l_PrevCCPrjFlag ;

Line 828: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.100: If current project id is the same as the previous project id do not join to projects table');

824: -- then we do not need to join to the projects table to get the project
825: -- org id which is the receiver OU.
826: --
827: IF P_DEBUG_MODE THEN
828: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.100: If current project id is the same as the previous project id do not join to projects table');
829: END IF;
830:
831: If (G_PrevTaskId = P_TaskIdTab(j) and G_PrevSysLink = P_SysLinkTab(j)) Then
832:

Line 865: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.110: If current project id is not the same as the previous project id join to projects table to get org_id');

861: -- org id also.
862: --
863:
864: IF P_DEBUG_MODE THEN
865: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.110: If current project id is not the same as the previous project id join to projects table to get org_id');
866: END IF;
867:
868: BEGIN -- 2650361
869:

Line 888: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.115: Setting the rejection code to INV_DATA when no data found');

884: /* Adding exception handling for 2650361 */
885: EXCEPTION
886: WHEN NO_DATA_FOUND THEN
887: IF P_DEBUG_MODE THEN
888: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.115: Setting the rejection code to INV_DATA when no data found');
889: END IF;
890: UPDATE pa_expenditure_items_all
891: SET cost_dist_rejection_code = 'INV_DATA'
892: WHERE task_id = P_TaskIdTab(j)

Line 919: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.120: Determine the cross charge process codes in implementations');

915: -- The Operating Unit in which the Expenditure is charged. In this case it is the
916: -- same as p_expenditure_org_id.
917:
918: IF P_DEBUG_MODE THEN
919: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.120: Determine the cross charge process codes in implementations');
920: END IF;
921: X_Error_Stage := 'Determine the cross charge process codes in implementations';
922:
923: --

Line 939: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.130: If expenditure OUs are not changed use previous values');

935: -- unit then we can use the same implementation options as that of the
936: -- previous one
937: --
938: IF P_DEBUG_MODE THEN
939: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.130: If expenditure OUs are not changed use previous values');
940: END IF;
941:
942: l_cc_process_io_code := l_PrevCCProcessIOCode ;
943: l_cc_process_iu_code := l_PrevCCProcessIUCode ;

Line 958: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.140: Expenditure OU is the same as current OU ');

954: -- procedure.
955: --
956:
957: IF P_DEBUG_MODE THEN
958: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.140: Expenditure OU is the same as current OU ');
959: END IF;
960: l_cc_process_io_code := l_current_process_io_code ;
961: l_cc_process_iu_code := l_current_process_iu_code ;
962:

Line 965: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.150: Determine cross charge codes of current Expenditure OU');

961: l_cc_process_iu_code := l_current_process_iu_code ;
962:
963: ELSE
964: IF P_DEBUG_MODE THEN
965: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.150: Determine cross charge codes of current Expenditure OU');
966: END IF;
967:
968: SELECT nvl(imp.cc_process_io_code,'N'),
969: nvl(imp.cc_process_iu_code,'N')

Line 994: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.160: Determine Receiver Operating Unit');

990: --
991: --
992:
993: IF P_DEBUG_MODE THEN
994: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.160: Determine Receiver Operating Unit');
995: END IF;
996:
997: X_Error_Stage := 'Assigning the project OU as provider OU';
998: X_PrvdrOrganizationIdTab(j) := l_Prvdr_Organization_Id ;

Line 1006: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.170: Calling the client extension PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR');

1002: X_RecvrOrgIdTab(j) := NVL( P_PrjOrgIdTab(j), l_project_org_id);
1003: X_CCPrjFlagTab(j) := l_cc_prj_process_flag;
1004:
1005: IF P_DEBUG_MODE THEN
1006: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.170: Calling the client extension PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR');
1007: END IF;
1008:
1009: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR (
1010: P_PrvdrOrganizationId => X_PrvdrOrganizationIdTab(j),

Line 1028: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.180: After determining the orgs for this transaction');

1024:
1025: END IF;
1026:
1027: IF P_DEBUG_MODE THEN
1028: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.180: After determining the orgs for this transaction');
1029: print_message('Exiting..l_cc_process_io_code=' ||l_cc_process_io_code);
1030: print_message('l_cc_process_iu_code=' ||l_cc_process_iu_code);
1031: END IF;
1032:

Line 1038: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.180: After determining the orgs for the bulk of transactions');

1034: -- CLOSE GetAdjExpid; /* Bug 12955494 */
1035: END LOOP;
1036:
1037: IF P_DEBUG_MODE THEN
1038: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.180: After determining the orgs for the bulk of transactions');
1039: END IF;
1040:
1041: pa_cc_utils.reset_curr_function;
1042:

Line 1041: pa_cc_utils.reset_curr_function;

1037: IF P_DEBUG_MODE THEN
1038: pa_cc_utils.log_message('PA_CC_GET_PRVDR_RECVR_ORGS: ' || '20.10.180: After determining the orgs for the bulk of transactions');
1039: END IF;
1040:
1041: pa_cc_utils.reset_curr_function;
1042:
1043: EXCEPTION
1044:
1045: WHEN OTHERS THEN

Line 1149: pa_cc_utils.set_curr_function('PA_CC_GET_CROSS_CHARGE_TYPE');

1145: Else
1146: l_calling_module := P_calling_mode;
1147: End if;
1148:
1149: pa_cc_utils.set_curr_function('PA_CC_GET_CROSS_CHARGE_TYPE');
1150:
1151: l_MinRecs := P_SysLinkTab.FIRST;
1152: l_MaxRecs := P_SysLinkTab.LAST;
1153:

Line 1160: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.10: Determine cross charge code and type');

1156: l_UnmatchedNegativeTxnFlagTab(j) := NVL(G_unmatched_neg_txn_flag, 'N');
1157: END LOOP;
1158:
1159: IF P_DEBUG_MODE THEN
1160: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.10: Determine cross charge code and type');
1161: END IF;
1162:
1163: FOR j IN l_MinRecs..l_MaxRecs
1164: LOOP

Line 1177: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');

1173: CLOSE GetAdjExpid; /* Bug 12955494 */
1174: END IF;
1175:
1176: IF P_DEBUG_MODE THEN -- begin bug 14173646
1177: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
1178: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646

Line 1178: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));

1174: END IF;
1175:
1176: IF P_DEBUG_MODE THEN -- begin bug 14173646
1177: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
1178: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646
1182:

Line 1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));

1175:
1176: IF P_DEBUG_MODE THEN -- begin bug 14173646
1177: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
1178: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646
1182:
1183: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);

Line 1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);

1176: IF P_DEBUG_MODE THEN -- begin bug 14173646
1177: pa_cc_utils.log_message('Parameters passed in GetAdjExpid.');
1178: pa_cc_utils.log_message('P_ExpItemIdTab : ' || P_ExpItemIdTab(j));
1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646
1182:
1183: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
1184: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');

Line 1183: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);

1179: pa_cc_utils.log_message('P_TransSourceTab : ' || P_TransSourceTab(j));
1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646
1182:
1183: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
1184: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');
1185:
1186: IF l_adj_exp_id IS NULL OR (l_adj_exp_id IS NOT NULL AND l_period_accrual_flag='Y')
1187: OR P_calling_mode ='TRANSACTION_IMPORT' /*Bug 14230879*/ THEN /* end of changes bug 12589016 ,added l_period_accrual_flag condition : 12974801 */

Line 1184: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');

1180: pa_cc_utils.log_message('G_unmatched_neg_Txn_Flag : ' || G_unmatched_neg_txn_flag);
1181: END IF; -- end bug 14173646
1182:
1183: pa_cc_utils.log_message('Adjusted from expenditure item id : ' || l_adj_exp_id);
1184: pa_cc_utils.log_message('Skipping re-derivation of provider and receiver org ids');
1185:
1186: IF l_adj_exp_id IS NULL OR (l_adj_exp_id IS NOT NULL AND l_period_accrual_flag='Y')
1187: OR P_calling_mode ='TRANSACTION_IMPORT' /*Bug 14230879*/ THEN /* end of changes bug 12589016 ,added l_period_accrual_flag condition : 12974801 */
1188:

Line 1195: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.20: Since expenditure item is already erroneous no CC identification is necessary');

1191: -- by this PL/SQL able then do not process CC identification for that
1192: -- expenditure item
1193:
1194: IF P_DEBUG_MODE THEN
1195: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.20: Since expenditure item is already erroneous no CC identification is necessary');
1196: END IF;
1197: NULL ;
1198:
1199: ELSE

Line 1207: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.30: Check for never cross charged');

1203: -- organizations check if the transaction requires cc processing.
1204: --
1205:
1206: IF P_DEBUG_MODE THEN
1207: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.30: Check for never cross charged');
1208: END IF;
1209:
1210: IF ( ( P_PrvdrOrganizationIdTab(j) = P_RecvrOrganizationIdTab(j) AND
1211: nvl(P_RecvrOrgIdTab(j), -99) = nvl(P_PrvdrOrgIdTab(j), -99)) OR

Line 1215: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.40: Same provider and receiver org and same provider and receiver OU or a BTC');

1211: nvl(P_RecvrOrgIdTab(j), -99) = nvl(P_PrvdrOrgIdTab(j), -99)) OR
1212: P_SysLinkTab(j) = 'BTC' ) THEN
1213:
1214: IF P_DEBUG_MODE THEN
1215: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.40: Same provider and receiver org and same provider and receiver OU or a BTC');
1216: END IF;
1217: --
1218: -- If provider organization is the same as the receiver organization
1219: -- and provider OU is the same as the receiver OU then the transaction

Line 1233: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.50: Single org implementation, cross charge code is IO code at the implementation .');

1229:
1230: ELSIF P_RecvrOrgIdTab(j) IS NULL THEN
1231:
1232: IF P_DEBUG_MODE THEN
1233: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.50: Single org implementation, cross charge code is IO code at the implementation .');
1234: END IF;
1235:
1236: l_cross_charge_code := P_CCProcessIOCodeTab(j) ;
1237: l_cross_charge_type := 'NO' ;

Line 1248: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.60: Determine the cross charge type');

1244: -- Determine the cross charge type
1245: --
1246:
1247: IF P_DEBUG_MODE THEN
1248: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.60: Determine the cross charge type');
1249: END IF;
1250:
1251: IF P_PrvdrLEIdTab(j) = l_PrevPrvdrLEId AND
1252: P_RecvrLEIdTab(j) = l_PrevRecvrLEId AND

Line 1263: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.70: If parameters for determining cross charge type is same as previous ones, use the same cross charge type');

1259: -- entity is the same as the previous receiver legal entity then
1260: -- use the same cross charge code as that of the previous one
1261: --
1262: IF P_DEBUG_MODE THEN
1263: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.70: If parameters for determining cross charge type is same as previous ones, use the same cross charge type');
1264: END IF;
1265:
1266: l_cross_charge_type := l_PrevCrossChargeType;
1267:

Line 1273: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.80: Determining provider legal entity');

1269: --
1270: -- Get the value of the provider legal entity
1271: --
1272: IF P_DEBUG_MODE THEN
1273: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.80: Determining provider legal entity');
1274: END IF;
1275:
1276: IF P_PrvdrLEIdTab(j) IS NULL THEN
1277: --

Line 1326: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.90: Determining receiver legal entity');

1322: --
1323: -- Get the value of the receiver legal entity
1324: --
1325: IF P_DEBUG_MODE THEN
1326: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.90: Determining receiver legal entity');
1327: END IF;
1328:
1329: IF P_RecvrLEIdTab(j) IS NULL THEN
1330: --

Line 1393: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.100: Check if project is cross chargeable');

1389: --
1390:
1391:
1392: IF P_DEBUG_MODE THEN
1393: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.100: Check if project is cross chargeable');
1394: END IF;
1395:
1396: IF P_CCPrjFlagTab(j) = 'N' THEN
1397: --

Line 1410: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.110: Check if transaction source is cross chargeable');

1406:
1407: ELSE
1408:
1409: IF P_DEBUG_MODE THEN
1410: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.110: Check if transaction source is cross chargeable');
1411: END IF;
1412:
1413: IF P_TransSourceTab(j) IS NOT NULL THEN
1414: --

Line 1422: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.120: Check if transaction source is same as previous one');

1418: -- i.e. if the transaction source element is NULL.
1419: --
1420:
1421: IF P_DEBUG_MODE THEN
1422: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.120: Check if transaction source is same as previous one');
1423: END IF;
1424:
1425: IF P_TransSourceTab(j) = l_PrevTransSource THEN
1426: --

Line 1441: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.130: Get the cc process flag for current transaction source');

1437: -- If the transaction source is different then get the value of
1438: -- cross charge process flag for the current transaction source.
1439: --
1440: IF P_DEBUG_MODE THEN
1441: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.130: Get the cc process flag for current transaction source');
1442: END IF;
1443:
1444: SELECT t.cc_process_flag
1445: INTO l_cc_tr_src_process_flag

Line 1466: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.140: Setting l_cross_charge_code to N if transaction source is not CC');

1462: -- checks.
1463: --
1464:
1465: IF P_DEBUG_MODE THEN
1466: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.140: Setting l_cross_charge_code to N if transaction source is not CC');
1467: END IF;
1468: l_cross_charge_code := 'N' ;
1469:
1470: ELSE

Line 1473: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.150: Check if provider OU is same as receiver OU');

1469:
1470: ELSE
1471:
1472: IF P_DEBUG_MODE THEN
1473: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.150: Check if provider OU is same as receiver OU');
1474: END IF;
1475:
1476: IF P_PrvdrOrgIdTab(j) = P_RecvrOrgIdTab(j) THEN
1477: --

Line 1486: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.160: If provider OU is same as receiver OU assign cc code of implementation option');

1482: -- OU.
1483: --
1484:
1485: IF P_DEBUG_MODE THEN
1486: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.160: If provider OU is same as receiver OU assign cc code of implementation option');
1487: END IF;
1488:
1489: l_cross_charge_code := P_CCProcessIOCodeTab(j) ;
1490:

Line 1498: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.170: For different provider and receiver ous check if any controls exist');

1494: -- for that combination of provider ou and receiver OU. If there is
1495: -- any record then the cross charge code on that record is used.
1496:
1497: IF P_DEBUG_MODE THEN
1498: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.170: For different provider and receiver ous check if any controls exist');
1499: END IF;
1500: OPEN GetCCOrgRel(P_PrvdrOrgIdTab(j),
1501: P_RecvrOrgIdTab(j));
1502: FETCH GetCCOrgRel

Line 1524: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.180: If there are no controls, then check cross charge type');

1520: -- then the value then check in the implementations option of the
1521: -- provider operating unit.
1522: --
1523: IF P_DEBUG_MODE THEN
1524: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.180: If there are no controls, then check cross charge type');
1525: END IF;
1526:
1527: IF l_cross_charge_type = 'IU' THEN
1528: --

Line 1540: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.190: For IU CC type set the CC code as the IU code in the implementation options');

1536:
1537: l_cross_charge_code := P_CCProcessIUCodeTab(j) ;
1538:
1539: IF P_DEBUG_MODE THEN
1540: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.190: For IU CC type set the CC code as the IU code in the implementation options');
1541: END IF;
1542:
1543: ELSE
1544:

Line 1551: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.200: This scenario exists when CC type is IU and not controls exist');

1547: -- no processing method defined in cross charge org relationships entity.
1548: -- So we cannot process cross charge for this item.
1549:
1550: IF P_DEBUG_MODE THEN
1551: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.200: This scenario exists when CC type is IU and not controls exist');
1552: END IF;
1553: l_cross_charge_code := 'N' ;
1554:
1555: END IF; -- End Section : No entry in CC Org relationships entity.

Line 1581: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.210: Calling client extension');

1577:
1578: IF P_DEBUG_MODE THEN
1579: print_message('l_cross_charge_code=' ||l_cross_charge_code);
1580: print_message('l_cross_charge_type=' ||l_cross_charge_type);
1581: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.210: Calling client extension');
1582: END IF;
1583: --
1584: -- Call client extension
1585: --

Line 1612: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.220: Validating the overriden CC code');

1608: -- After Client extension
1609: --
1610:
1611: IF P_DEBUG_MODE THEN
1612: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.220: Validating the overriden CC code');
1613: END IF;
1614: IF l_OvrridCrossChargeCodeTab(j) = X_CrossChargeCodeTab(j) THEN
1615:
1616: NULL ;

Line 1621: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.230: If the overriden CC code is I the check for validity');

1617: ELSE
1618: IF l_OvrridCrossChargeCodeTab(j) = 'I' THEN
1619:
1620: IF P_DEBUG_MODE THEN
1621: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.230: If the overriden CC code is I the check for validity');
1622: END IF;
1623: IF X_CrossChargeTypeTab(j) = 'IO' THEN
1624:
1625: IF P_DEBUG_MODE THEN

Line 1626: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.240: If CC type is IO then the overriden code is invalid');

1622: END IF;
1623: IF X_CrossChargeTypeTab(j) = 'IO' THEN
1624:
1625: IF P_DEBUG_MODE THEN
1626: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.240: If CC type is IO then the overriden code is invalid');
1627: END IF;
1628:
1629: X_StatusTab(j) := 'PA_CC_CODE_TYPE_INVALID';
1630: X_CrossChargeCodeTab(j) := NULL;

Line 1633: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.250: If CC type is IU the check for valid controls ');

1629: X_StatusTab(j) := 'PA_CC_CODE_TYPE_INVALID';
1630: X_CrossChargeCodeTab(j) := NULL;
1631: ELSE
1632: IF P_DEBUG_MODE THEN
1633: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.250: If CC type is IU the check for valid controls ');
1634: END IF;
1635: OPEN GetCCOrgRel(P_PrvdrOrgIdTab(j), P_RecvrOrgIdTab(j));
1636: FETCH GetCCOrgRel
1637: INTO l_cross_charge_code,

Line 1655: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.260: If the overriden CC code is B the check for validity');

1651: END IF ;
1652: ELSIF l_OvrridCrossChargeCodeTab(j) = 'B' THEN
1653:
1654: IF P_DEBUG_MODE THEN
1655: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.260: If the overriden CC code is B the check for validity');
1656: END IF;
1657: IF X_CrossChargeTypeTab(j) = 'IC' THEN
1658:
1659: IF P_DEBUG_MODE THEN

Line 1660: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.240: If CC type is IC then the overriden code is invalid');

1656: END IF;
1657: IF X_CrossChargeTypeTab(j) = 'IC' THEN
1658:
1659: IF P_DEBUG_MODE THEN
1660: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.240: If CC type is IC then the overriden code is invalid');
1661: END IF;
1662: X_StatusTab(j) := 'PA_CC_CODE_TYPE_INVALID';
1663: X_CrossChargeCodeTab(j) := NULL;
1664: ELSE

Line 1678: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.250: End of determination of CC code and Type for this transaction');

1674: END IF;
1675: END IF;
1676:
1677: IF P_DEBUG_MODE THEN
1678: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.250: End of determination of CC code and Type for this transaction');
1679: END IF;
1680:
1681: END IF; /* Bug 12955494 */
1682: -- CLOSE GetAdjExpid; /* Bug 12955494 */

Line 1686: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.260: End of CC code and type determination for the bulk of transactions');

1682: -- CLOSE GetAdjExpid; /* Bug 12955494 */
1683: END LOOP ;
1684:
1685: IF P_DEBUG_MODE THEN
1686: pa_cc_utils.log_message('PA_CC_GET_CROSS_CHARGE_TYPE: ' || '20.20.260: End of CC code and type determination for the bulk of transactions');
1687: print_message('Exiting afetr checking client extn l_cross_charge_code=' ||l_cross_charge_code);
1688: print_message('l_cross_charge_type=' ||l_cross_charge_type);
1689: END IF;
1690:

Line 1691: pa_cc_utils.reset_curr_function;

1687: print_message('Exiting afetr checking client extn l_cross_charge_code=' ||l_cross_charge_code);
1688: print_message('l_cross_charge_type=' ||l_cross_charge_type);
1689: END IF;
1690:
1691: pa_cc_utils.reset_curr_function;
1692:
1693: EXCEPTION
1694: WHEN OTHERS THEN
1695: RAISE;