DBA Data[Home] [Help]

APPS.PA_CC_IDENT dependencies on PA_CC_IDENT

Line 1: PACKAGE BODY PA_CC_IDENT

1: PACKAGE BODY PA_CC_IDENT
2: -- $Header: PACCINTB.pls 120.7.12020000.6 2013/03/06 09:23:10 admarath ship $
3: AS
4:
5: G_PrevPrvdrOrgId NUMBER;

Line 36: PROCEDURE PA_CC_IDENTIFY_TXN_FI(

32: -- This wrapper API is created over the main identify procedure.
33: -- This API derives the provider,receiver orgs and assumes that
34: -- to process the records in plsql tables the param x_statusTab should be null
35: -- other wise it will be treated as a error records.
36: PROCEDURE PA_CC_IDENTIFY_TXN_FI(
37: P_ExpOrganizationIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
38: P_ExpOrgidTab IN PA_PLSQL_DATATYPES.IdTabTyp,
39: P_ProjectIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
40: P_TaskIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,

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 196: ('PA_CC_IDENTIFY_TXN_FI: ' || '20.05.07: Calling Client Extension to override the PRVDR_RECVR orgs');

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.
200: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR (

Line 200: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR (

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.
200: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR (
201: P_PrvdrOrganizationId => X_PrvdrOrganizationIdTab(j),
202: P_PrvdrOrgId => P_ExpOrgidTab(j),
203: P_RecvrOrganizationId => X_RecvrOrganizationIdTab(j),
204: P_RecvrOrgId => X_RecvrOrgIdTab(j),

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 231: PA_CC_IDENT.PA_CC_GET_CROSS_CHARGE_TYPE (

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 (
232: P_PrvdrOrganizationIdTab => X_PrvdrOrganizationIdTab
233: ,P_RecvrOrganizationIdTab => X_RecvrOrganizationIdTab
234: ,P_ProjectIdTab => P_ProjectIdTab
235: ,P_TaskIdTab => P_TaskIdTab

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 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 268: END PA_CC_IDENTIFY_TXN_FI;

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;
269:
270: PROCEDURE PA_CC_IDENTIFY_TXN_ADJ (
271: P_ExpOrganizationId IN NUMBER,
272: P_ExpOrgid IN NUMBER,

Line 270: PROCEDURE PA_CC_IDENTIFY_TXN_ADJ (

266: RAISE ;
267:
268: END PA_CC_IDENTIFY_TXN_FI;
269:
270: PROCEDURE PA_CC_IDENTIFY_TXN_ADJ (
271: P_ExpOrganizationId IN NUMBER,
272: P_ExpOrgid IN NUMBER,
273: P_ProjectId IN NUMBER,
274: P_TaskId IN NUMBER,

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 371: PA_CC_IDENT.PA_CC_IDENTIFY_TXN(

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,
373: P_ExpOrgidTab => l_ExpOrgidTab,
374: P_ProjectIdTab => l_ProjectIdTab,
375: P_TaskIdTab => l_TaskIdTab,

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 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 429: END PA_CC_IDENTIFY_TXN_ADJ;

425: x_error_stage := l_error_stage;
426: x_error_code := l_error_code;
427: RAISE ;
428:
429: END PA_CC_IDENTIFY_TXN_ADJ;
430:
431: PROCEDURE PA_CC_IDENTIFY_TXN(
432: P_ExpOrganizationIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
433: P_ExpOrgidTab IN PA_PLSQL_DATATYPES.IdTabTyp,

Line 431: PROCEDURE PA_CC_IDENTIFY_TXN(

427: RAISE ;
428:
429: END PA_CC_IDENTIFY_TXN_ADJ;
430:
431: PROCEDURE PA_CC_IDENTIFY_TXN(
432: P_ExpOrganizationIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
433: P_ExpOrgidTab IN PA_PLSQL_DATATYPES.IdTabTyp,
434: P_ProjectIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
435: P_TaskIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,

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 486: PA_CC_IDENT.PA_CC_GET_PRVDR_RECVR_ORGS (

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,
488: P_ExpOrgidTab => P_ExpOrgidTab,
489: P_TaskIdTab => P_TaskIdTab,
490: P_ExpItemIdTab => P_ExpItemIdTab,

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 519: PA_CC_IDENT.PA_CC_GET_CROSS_CHARGE_TYPE (

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,
521: P_RecvrOrganizationIdTab => X_RecvrOrganizationIdTab,
522: P_ProjectIdTab => P_ProjectIdTab,
523: P_TaskIdTab => P_TaskIdTab,

Line 551: END PA_CC_IDENTIFY_TXN;

547:
548: WHEN OTHERS THEN
549: RAISE ;
550:
551: END PA_CC_IDENTIFY_TXN;
552:
553: PROCEDURE PA_CC_GET_PRVDR_RECVR_ORGS (
554: P_ExpOrganizationIdTab IN PA_PLSQL_DATATYPES.IdTabTyp,
555: P_ExpOrgidTab IN PA_PLSQL_DATATYPES.IdTabTyp,

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 1009: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_PRVDR_RECVR (

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),
1011: P_PrvdrOrgId => P_ExpOrgidTab(j),
1012: P_RecvrOrganizationId => X_RecvrOrganizationIdTab(j),
1013: P_RecvrOrgId => X_RecvrOrgIdTab(j),

Line 1586: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_CC_PROCESSING_METHOD (

1582: END IF;
1583: --
1584: -- Call client extension
1585: --
1586: PA_CC_IDENT_CLIENT_EXTN.OVERRIDE_CC_PROCESSING_METHOD (
1587: P_PrvdrOrganizationId => P_PrvdrOrganizationIdTab(j),
1588: P_RecvrOrganizationId => P_RecvrOrganizationIdTab(j),
1589: P_PrvdrOrgId => P_PrvdrOrgIdTab(j),
1590: P_RecvrOrgId => P_RecvrOrgIdTab(j),

Line 1760: END PA_CC_IDENT;

1756:
1757: RETURN l_legal_entity_id;
1758: END GET_ORG_LEGAL_ENTITY;
1759:
1760: END PA_CC_IDENT;