DBA Data[Home] [Help]

APPS.PA_INVOICE_DETAIL_PROCESS dependencies on PA_IC_INV_UTILS

Line 123: PA_IC_INV_UTILS.log_message('Initializing Package Global variable......');

119: --Procedure to initialize global counter
120: PROCEDURE init
121: IS
122: BEGIN
123: PA_IC_INV_UTILS.log_message('Initializing Package Global variable......');
124: PA_INVOICE_DETAIL_PKG.G_Ins_count := 0;
125: PA_INVOICE_DETAIL_PKG.G_Del_count := 0;
126: PA_INVOICE_DETAIL_PKG.G_Upd_count := 0;
127: I_EI_count := 0;

Line 134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID

130: PA_CC_BL_PROCESS.g_icnt := 0;
131:
132: /* Initialize the BL Package for Provider Reclass */
133: PA_CC_BL_process.initialization(
134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID
135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID
136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID
137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY
138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN

Line 135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID

131:
132: /* Initialize the BL Package for Provider Reclass */
133: PA_CC_BL_process.initialization(
134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID
135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID
136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID
137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY
138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN
139: ,p_prvdr_org_id => PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID

Line 136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID

132: /* Initialize the BL Package for Provider Reclass */
133: PA_CC_BL_process.initialization(
134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID
135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID
136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID
137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY
138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN
139: ,p_prvdr_org_id => PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID
140: ,p_primary_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB);

Line 137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY

133: PA_CC_BL_process.initialization(
134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID
135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID
136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID
137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY
138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN
139: ,p_prvdr_org_id => PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID
140: ,p_primary_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB);
141:

Line 138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN

134: p_request_id =>PA_IC_INV_UTILS.G_REQUEST_ID
135: ,p_program_application_id =>PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID
136: ,p_program_id => PA_IC_INV_UTILS.G_PROGRAM_ID
137: ,p_user_id => PA_IC_INV_UTILS.G_LAST_UPDATED_BY
138: ,p_login_id => PA_IC_INV_UTILS.G_LAST_UPDATE_LOGIN
139: ,p_prvdr_org_id => PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID
140: ,p_primary_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB);
141:
142: END init;

Line 174: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_all_cc_dist ...');

170: from pa_cc_dist_lines
171: where reference_1 = to_char(P_Draft_Inv_Id);
172: BEGIN
173: IF g1_debug_mode = 'Y' THEN
174: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_all_cc_dist ...');
175: END IF;
176: for cc_get_cc_del_lines in get_cc_del_lines
177: loop
178: --Increase the delete counter

Line 201: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_cc_dist ...');

197: P_index IN number)
198: IS
199: BEGIN
200: IF g1_debug_mode = 'Y' THEN
201: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_cc_dist ...');
202: END IF;
203: --Increase the delete counter
204: PA_CC_BL_PROCESS.g_dcnt := PA_CC_BL_PROCESS.g_dcnt + 1;
205: --Load the delete record

Line 230: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.reverse_cc_dist ...');

226: IS
227: l_pa_date date; /* Added for Bug2276729 */
228: BEGIN
229: IF g1_debug_mode = 'Y' THEN
230: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.reverse_cc_dist ...');
231: END IF;
232: If ((P_CC_REC.TRANSFER_STATUS_CODE = 'P')
233: and (P_CC_REC.LINE_NUM_REVERSED IS NULL ))
234: Then

Line 293: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);

289: l_pa_date := pa_utils2.get_pa_date(P_EI_DATE,SYSDATE, PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID);
290: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
291: := l_pa_date;
292: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
293: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);
294:
295: ** Bug 2276729 - End ** Commented for 3857986 - End */
296:
297: /* Added for 3857986 */

Line 407: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_cc_dist ...');

403: BEGIN
404:
405: /* Initialize the global record table */
406: IF g1_debug_mode = 'Y' THEN
407: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_cc_dist ...');
408: PA_IC_INV_UTILS.log_message('build_cc_dist: ' || 'Line Num...'||to_char(P_Line_num));
409: END IF;
410: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
411: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id

Line 408: PA_IC_INV_UTILS.log_message('build_cc_dist: ' || 'Line Num...'||to_char(P_Line_num));

404:
405: /* Initialize the global record table */
406: IF g1_debug_mode = 'Y' THEN
407: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_cc_dist ...');
408: PA_IC_INV_UTILS.log_message('build_cc_dist: ' || 'Line Num...'||to_char(P_Line_num));
409: END IF;
410: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
411: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
412: := P_Cdl_rec.expenditure_item_id;

Line 458: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);

454:
455: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
456: := l_pa_date;
457: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
458: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);
459:
460: ** Bug 2276729 - End ** Commented for 3857986 End*/
461:
462: /* Added for 3857986 */

Line 567: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_cc_dist ...');

563: l_pa_date date;
564: BEGIN
565:
566: IF g1_debug_mode = 'Y' THEN
567: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_cc_dist ...');
568: END IF;
569: -- Check if any attribute is changed or not
570: If not (( P_Cdl_rec.DR_CODE_COMBINATION_ID = P_CC_rec.DR_CODE_COMBINATION_ID)
571: and ( P_Cdl_rec.CR_CODE_COMBINATION_ID = P_CC_rec.CR_CODE_COMBINATION_ID)

Line 621: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);

617: l_pa_date:= pa_utils2.get_pa_date(P_Cdl_rec.EXPENDITURE_ITEM_DATE,SYSDATE, PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID);
618: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).pa_date
619: := l_pa_date;
620: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
621: := pa_utils2.get_prvdr_gl_date(l_pa_date,PA_IC_INV_UTILS.G_PROGRAM_APPLICATION_ID, PA_MC_INVOICE_DETAIL_PKG.G_SOB);
622: ** Bug 2276729 - End ** Commented for 3857986 */
623:
624: /* Added for 3857986 */
625: BEGIN

Line 698: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.insert_row ...');

694: IS
695: BEGIN
696:
697: IF g1_debug_mode = 'Y' THEN
698: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.insert_row ...');
699: END IF;
700: --Increase the Insert counter
701: PA_INVOICE_DETAIL_PKG.G_Ins_count := PA_INVOICE_DETAIL_PKG.G_Ins_count + 1;
702: --Assign Invoice detail Id from sequence

Line 715: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_row ...');

711: IS
712: BEGIN
713:
714: IF g1_debug_mode = 'Y' THEN
715: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.delete_row ...');
716: END IF;
717: --Increase the Delete counter
718: PA_INVOICE_DETAIL_PKG.G_Del_count := PA_INVOICE_DETAIL_PKG.G_Del_count + 1;
719: --Add record to delete buffer

Line 731: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_row ...');

727: IS
728: BEGIN
729:
730: IF g1_debug_mode = 'Y' THEN
731: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_row ...');
732: END IF;
733: --Increase the Update counter
734: PA_INVOICE_DETAIL_PKG.G_Upd_count := PA_INVOICE_DETAIL_PKG.G_Upd_count + 1;
735: --Add record to update buffer

Line 745: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_ei ...');

741: -- Procedure to Update EI status as IC Processed.
742: PROCEDURE update_ei
743: IS
744: BEGIN
745: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_ei ...');
746: /* For bug 2877649 Setting the Transfer_price amounts and TP rates to NULL for EIs marked as Never Processed */
747: forall i in 1..I_EI_count
748: Update PA_EXPENDITURE_ITEMS
749: Set CC_IC_PROCESSED_CODE = 'X',

Line 785: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.reverse_row ...');

781: t_line_num NUMBER:=0;
782: BEGIN
783:
784: IF g1_debug_mode = 'Y' THEN
785: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.reverse_row ...');
786: END IF;
787:
788: IF (p_inv_rec.LINE_NUM IS NOT NULL)
789: THEN

Line 839: PA_IC_INV_UTILS.log_message('Value of t_line_num '||t_line_num);

835:
836: IF SQL%NOTFOUND THEN
837: t_line_num :=0;
838: END IF;
839: PA_IC_INV_UTILS.log_message('Value of t_line_num '||t_line_num);
840: IF NVL(t_line_num,0) <> 0 THEN
841:
842: I_line_num := t_line_num;
843: ELSE

Line 874: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_row1...');

870: P_Inv_rec IN OUT NOCOPY pa_draft_invoice_details%rowtype)
871: IS
872: BEGIN
873: IF g1_debug_mode = 'Y' THEN
874: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_row1...');
875: END IF;
876: P_Inv_rec.INVOICED_FLAG := 'N';
877: P_Inv_rec.DENOM_CURRENCY_CODE := I_DENOM_CURRENCY_CODE(P_Arr_position);
878: P_Inv_rec.DENOM_BILL_AMOUNT := I_DENOM_BILL_AMOUNT(P_Arr_position);

Line 956: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_row2...');

952: l_inv_rec pa_draft_invoice_details%rowtype;
953: c number :=0;
954: BEGIN
955: IF g1_debug_mode = 'Y' THEN
956: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.build_row2...');
957: END IF;
958: I_Line_num := I_Line_num + 1;
959: /** Initialize all field of the structure **/
960: l_inv_rec.EXPENDITURE_ITEM_ID := P_Expenditure_item_id;

Line 1049: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.add_ei...');

1045: IS
1046: BEGIN
1047:
1048: IF g1_debug_mode = 'Y' THEN
1049: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.add_ei...');
1050: END IF;
1051: --Increase the EI counter
1052: I_Ei_count := I_Ei_count + 1;
1053: --Add record to Expenditure Buffer buffer

Line 1066: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.is_new_details...');

1062: Return Boolean
1063: IS
1064: Begin
1065: IF g1_debug_mode = 'Y' THEN
1066: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.is_new_details...');
1067: END IF;
1068: Return( not
1069: (
1070: P_IND_REC.DENOM_CURRENCY_CODE = I_DENOM_CURRENCY_CODE(P_Index)

Line 1116: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.read_orig...');

1112: OUT NOCOPY pa_draft_invoice_details%rowtype)
1113: IS
1114: BEGIN
1115: IF g1_debug_mode = 'Y' THEN
1116: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.read_orig...');
1117: END IF;
1118: Select *
1119: INTO X_IND_REC
1120: FROM PA_DRAFT_INVOICE_DETAILS

Line 1137: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_rejection_reason...');

1133: P_No_of_records IN number )
1134: IS
1135: BEGIN
1136: IF g1_debug_mode = 'Y' THEN
1137: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.update_rejection_reason...');
1138: END IF;
1139: FORALL I IN 1..P_No_of_records
1140: Update PA_EXPENDITURE_ITEMS
1141: Set CC_REJECTION_CODE = P_Error_code(I)

Line 1158: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.apply_db_changes...');

1154: IS
1155: BEGIN
1156:
1157: IF g1_debug_mode = 'Y' THEN
1158: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.apply_db_changes...');
1159: END IF;
1160: /* Apply Pending Delete/Update/Insert in PA_DRAFT_INVOICE Details */
1161: PA_INVOICE_DETAIL_PKG.delete_rows(P_Delete_tab);
1162: PA_INVOICE_DETAIL_PKG.update_rows(P_Update_tab,I_MRC_REQD_FLAG);

Line 1534: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.process_invoice_details...');

1530:
1531:
1532: BEGIN
1533: IF g1_debug_mode = 'Y' THEN
1534: PA_IC_INV_UTILS.log_message('Enter pa_invoice_detail_process.process_invoice_details...');
1535: END IF;
1536: /* Checking Provider Reclass Enabled or not...*/
1537: If (P_ca_prov_code = 'N' and P_nca_prov_code = 'N')
1538: Then

Line 1553: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Setting Compute Flag ...');

1549:
1550:
1551:
1552: IF g1_debug_mode = 'Y' THEN
1553: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Setting Compute Flag ...');
1554: END IF;
1555: For I in 1..P_No_of_records
1556: Loop
1557: If (P_Cross_charge_code(I) in ('X','N','B')

Line 1749: P_DEBUG_MODE => PA_IC_INV_UTILS.G_DEBUG_MODE,

1745: P_JOB_ID => P_Job_id,
1746: P_NON_LABOR_RESOURCE => P_Non_labor_resource,
1747: P_NL_RESOURCE_ORGANIZATION_ID => P_NL_resource_organization,
1748: P_ARRAY_SIZE => P_No_of_records,
1749: P_DEBUG_MODE => PA_IC_INV_UTILS.G_DEBUG_MODE,
1750: X_DENOM_TP_CURRENCY_CODE => I_DENOM_CURRENCY_CODE,
1751: X_DENOM_TRANSFER_PRICE => I_DENOM_BILL_AMOUNT,
1752: X_ACCT_TP_RATE_TYPE => I_ACCT_RATE_TYPE,
1753: X_ACCT_TP_RATE_DATE => I_ACCT_RATE_DATE,

Line 1835: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));

1831:
1832: I_prov_proj_bill_job_id(I) := PA_Cross_Business_grp.IsMappedToJob(p_job_id(I), l_job_group_id);
1833:
1834: /* Added for bug 5251471 */
1835: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));
1836: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));
1837:
1838: IF I_prov_proj_bill_job_id(I) IS NULL THEN
1839: I_prov_proj_bill_job_id(I):= p_job_id(I);

Line 1836: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));

1832: I_prov_proj_bill_job_id(I) := PA_Cross_Business_grp.IsMappedToJob(p_job_id(I), l_job_group_id);
1833:
1834: /* Added for bug 5251471 */
1835: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));
1836: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));
1837:
1838: IF I_prov_proj_bill_job_id(I) IS NULL THEN
1839: I_prov_proj_bill_job_id(I):= p_job_id(I);
1840: END IF;

Line 1842: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));

1838: IF I_prov_proj_bill_job_id(I) IS NULL THEN
1839: I_prov_proj_bill_job_id(I):= p_job_id(I);
1840: END IF;
1841:
1842: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));
1843: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));
1844: /* End of bug 5251471 */
1845:
1846: END;

Line 1843: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));

1839: I_prov_proj_bill_job_id(I):= p_job_id(I);
1840: END IF;
1841:
1842: PA_IC_INV_UTILS.log_message('process_invoice_details: job_id: ' || to_char(p_job_id(I)));
1843: PA_IC_INV_UTILS.log_message('process_invoice_details: prov_proj_bill_job_id: ' || to_char(I_prov_proj_bill_job_id(I)));
1844: /* End of bug 5251471 */
1845:
1846: END;
1847:

Line 1854: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Calling Tax API.....');

1850:
1851:
1852: /** Call Tax API **/
1853: IF g1_debug_mode = 'Y' THEN
1854: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Calling Tax API.....');
1855: END IF;
1856: /*Last two parameters added for customer account relation 2760630 */
1857: PA_OUTPUT_TAX.GET_DEFAULT_TAX_INFO_ARR
1858: ( P_Project_Id => P_Project_Id,

Line 1888: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Existing Invoice details for EI'||to_char(P_EI_ID(I)));

1884:
1885: L_IND_REC := L_IND_REC_NULL; /*Bug 2296735 */
1886:
1887: IF g1_debug_mode = 'Y' THEN
1888: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Existing Invoice details for EI'||to_char(P_EI_ID(I)));
1889: END IF;
1890: SELECT DET.*
1891: INTO L_IND_REC
1892: FROM PA_DRAFT_INVOICE_DETAILS DET

Line 1925: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Existing Cross Charge Distribution.....');

1921: -- Check whether any cc distribution exists for that invoice details.
1922: BEGIN
1923:
1924: IF g1_debug_mode = 'Y' THEN
1925: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Existing Cross Charge Distribution.....');
1926: END IF;
1927:
1928: open get_cc_dist(L_IND_REC.EXPENDITURE_ITEM_ID);
1929: fetch get_cc_dist INTO L_CC_REC;

Line 1933: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Cross charge distribution - not Found');

1929: fetch get_cc_dist INTO L_CC_REC;
1930: if get_cc_dist%notfound
1931: then
1932: IF g1_debug_mode = 'Y' THEN
1933: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Cross charge distribution - not Found');
1934: END IF;
1935: CC_RECORD_FOUND := FALSE;
1936: else
1937: IF g1_debug_mode = 'Y' THEN

Line 1938: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Cross charge distribution - Found');

1934: END IF;
1935: CC_RECORD_FOUND := FALSE;
1936: else
1937: IF g1_debug_mode = 'Y' THEN
1938: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Cross charge distribution - Found');
1939: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Line - Found'||to_char(L_CC_REC.line_num));
1940: END IF;
1941: CC_RECORD_FOUND := TRUE;
1942: end if;

Line 1939: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Line - Found'||to_char(L_CC_REC.line_num));

1935: CC_RECORD_FOUND := FALSE;
1936: else
1937: IF g1_debug_mode = 'Y' THEN
1938: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Fetching Cross charge distribution - Found');
1939: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Line - Found'||to_char(L_CC_REC.line_num));
1940: END IF;
1941: CC_RECORD_FOUND := TRUE;
1942: end if;
1943:

Line 1950: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Error in Fetching Cross charge distribution.....');

1946: EXCEPTION
1947: When others
1948: Then
1949: IF g1_debug_mode = 'Y' THEN
1950: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Error in Fetching Cross charge distribution.....');
1951: END IF;
1952: raise;
1953: END;
1954:

Line 1963: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || ' Fetching Cost Distribution Lines for EI :'||to_char(P_EI_id(I)));

1959: THEN
1960: BEGIN
1961:
1962: IF g1_debug_mode = 'Y' THEN
1963: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || ' Fetching Cost Distribution Lines for EI :'||to_char(P_EI_id(I)));
1964: END IF;
1965: /*changes done for burden schedule change enhancement */
1966: SELECT decode(I_PRV_ENABLED(I),'B',(cdl.DENOM_BURDENED_COST+NVL(CDL.DENOM_BURDENED_CHANGE,0)),
1967: 'R',cdl.DENOM_RAW_COST),

Line 1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');

1992: cdl.EXPENDITURE_ITEM_ID
1993: AND cdl.LINE_NUM_REVERSED IS NULL
1994: AND cdl1.line_type = 'R' );
1995: IF g1_debug_mode = 'Y' THEN
1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');
1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));

Line 1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));

1993: AND cdl.LINE_NUM_REVERSED IS NULL
1994: AND cdl1.line_type = 'R' );
1995: IF g1_debug_mode = 'Y' THEN
1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');
1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));

Line 1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));

1994: AND cdl1.line_type = 'R' );
1995: IF g1_debug_mode = 'Y' THEN
1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');
1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));

Line 1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));

1995: IF g1_debug_mode = 'Y' THEN
1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');
1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));

Line 2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));

1996: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'After Fetching Cost Distribution Lines.....');
1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));

Line 2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));

1997: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Display Method...'||P_burden_disp_method(I));
1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));
2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));

Line 2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));

1998: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge...'||P_Cross_Charge_code(I));
1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));
2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));
2006: END IF;

Line 2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));

1999: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Base Method...'||I_PRV_ENABLED(I));
2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));
2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));
2006: END IF;
2007:

Line 2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));

2000: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'date...'||P_EI_date(I));
2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));
2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));
2006: END IF;
2007:
2008: if ((P_burden_disp_method.exists(I))

Line 2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));

2001: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Expn Org...'||to_char(P_Expnd_Organization(I)));
2002: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp type ...'||P_Expend_type(I));
2003: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Exp Id ...'||to_char(P_EI_id(I)));
2004: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Task id ...'||to_char(P_Task_id(I)));
2005: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'TP Price ...'||to_char(l_denom_transfer_price));
2006: END IF;
2007:
2008: if ((P_burden_disp_method.exists(I))
2009: and (P_burden_disp_method(I) = 'D')

Line 2014: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Enter.....');

2010: and (I_PRV_ENABLED(I) = 'B')
2011: and (P_Cross_Charge_code(I) = 'I'))
2012: Then
2013: IF g1_debug_mode = 'Y' THEN
2014: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Enter.....');
2015: END IF;
2016: /* l_multiplier := PA_COST_PLUS.Get_Mltplr_For_Compiled_Set
2017: ( l_ind_compiled_set_id );
2018: l_amount := (1 + l_multiplier ) * l_amount;

Line 2040: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Inside Burden cost Calculation.....');

2036:
2037: BEGIN
2038:
2039: IF g1_debug_mode = 'Y' THEN
2040: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Inside Burden cost Calculation.....');
2041: END IF;
2042:
2043: PA_CLIENT_EXTN_BURDEN.Override_Rate_Rev_Id(
2044: 'ACTUAL',

Line 2183: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Error in Fetching Cost Distribution Lines.....');

2179: EXCEPTION
2180: WHEN others
2181: Then
2182: IF g1_debug_mode = 'Y' THEN
2183: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Error in Fetching Cost Distribution Lines.....');
2184: END IF;
2185: Raise;
2186: END;
2187: END IF;

Line 2194: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing Cross_charge_code <> I...');

2190:
2191: If P_Cross_charge_code(I) <> 'I'
2192: Then
2193: IF g1_debug_mode = 'Y' THEN
2194: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing Cross_charge_code <> I...');
2195: END IF;
2196: /** If invoice details exist and not invoiced **/
2197: If (RECORD_FOUND)
2198: Then

Line 2244: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'P Error code - ' || P_Error_Code(I));

2240: End if;
2241: End if;
2242:
2243: IF g1_debug_mode = 'Y' THEN
2244: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'P Error code - ' || P_Error_Code(I));
2245: END IF; /*Added for bug 2296735 */
2246: -- Process the CC_Cross_charge_code as 'I'
2247: If P_Cross_charge_code(I) = 'I'
2248: Then

Line 2250: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing Cross_charge_code = I...');

2246: -- Process the CC_Cross_charge_code as 'I'
2247: If P_Cross_charge_code(I) = 'I'
2248: Then
2249: IF g1_debug_mode = 'Y' THEN
2250: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing Cross_charge_code = I...');
2251: END IF;
2252: If P_Error_Code(I) Is NULL
2253: Then
2254: If (L_AdjEI_id(I) is null or L_AdjEI_id(I) = 0 )

Line 2344: PA_IC_INV_UTILS.log_message

2340: add_ei(P_AdjEI_id(I));
2341: Elsif (L_IND_REC.Draft_invoice_num IS not NULL
2342: AND L_IND_REC.Line_num_reversed IS NULL)
2343: Then
2344: PA_IC_INV_UTILS.log_message
2345: ('L_IND_REC.Draft_invoice_num IS not NULL, L_IND_REC.Line_num_reversed IS NULL');
2346: L_IND_REC.Expenditure_item_id := P_EI_id(I);
2347: L_IND_REC.Line_num := Null;
2348: /* Changed the call to reverse_row for bug 2770182 */

Line 2389: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only part...');

2385: and ( P_Net_zero_flag(I) = 'N' )
2386: and ( P_Error_code(I) IS NULL ))
2387: Then
2388: IF g1_debug_mode = 'Y' THEN
2389: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only part...');
2390: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Enabled...'||I_PRV_ENABLED(I));
2391: END IF;
2392: if CC_RECORD_FOUND
2393: then

Line 2390: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Enabled...'||I_PRV_ENABLED(I));

2386: and ( P_Error_code(I) IS NULL ))
2387: Then
2388: IF g1_debug_mode = 'Y' THEN
2389: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only part...');
2390: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Enabled...'||I_PRV_ENABLED(I));
2391: END IF;
2392: if CC_RECORD_FOUND
2393: then
2394: IF g1_debug_mode = 'Y' THEN

Line 2395: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Record...');

2391: END IF;
2392: if CC_RECORD_FOUND
2393: then
2394: IF g1_debug_mode = 'Y' THEN
2395: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Record...');
2396: END IF;
2397: end if;
2398: IF g1_debug_mode = 'Y' THEN
2399: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge Code...'||P_Cross_charge_code(I));

Line 2399: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge Code...'||P_Cross_charge_code(I));

2395: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Record...');
2396: END IF;
2397: end if;
2398: IF g1_debug_mode = 'Y' THEN
2399: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Cross Charge Code...'||P_Cross_charge_code(I));
2400: END IF;
2401: if (( I_PRV_ENABLED(I) = 'N') /* Step 2 */
2402: and (CC_RECORD_FOUND))
2403: Then

Line 2405: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only reversing/delete .2');

2401: if (( I_PRV_ENABLED(I) = 'N') /* Step 2 */
2402: and (CC_RECORD_FOUND))
2403: Then
2404: IF g1_debug_mode = 'Y' THEN
2405: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only reversing/delete .2');
2406: END IF;
2407: reverse_cc_dist(L_IND_REC.DRAFT_INVOICE_DETAIL_ID,
2408: to_Date(P_EI_date(I),'YYYY/MM/DD'),/*file.Date.5*/
2409: P_Sys_linkage(I), /* Added for 3857986 */

Line 2416: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only reversing/delete .3');

2412: Elsif ((I_PRV_ENABLED(I) <> 'N')
2413: and (P_Cross_charge_code(I) = 'I'))
2414: Then
2415: IF g1_debug_mode = 'Y' THEN
2416: PA_IC_INV_UTILS.log_message('process_invoice_details: ' || 'Processing provider reclass only reversing/delete .3');
2417: END IF;
2418: /* If existing line is not transferred to GL */
2419: If (( L_CC_REC.TRANSFER_STATUS_CODE = 'P')
2420: and( CC_RECORD_FOUND))

Line 2526: pa_ic_inv_utils.log_message('reverse_preclass: ' || 'Checking for reclasss for DID id = '

2522:
2523: */
2524:
2525: IF g1_debug_mode = 'Y' THEN
2526: pa_ic_inv_utils.log_message('reverse_preclass: ' || 'Checking for reclasss for DID id = '
2527: ||P_inv_detail_id(I)||' EI Id = '
2528: ||P_EI_id (I) );
2529: END IF;
2530: OPEN get_cc_dist( P_EI_id (I));

Line 2543: pa_ic_inv_utils.log_message('reverse_preclass: ' || 'Created CC Dist line Id = '

2539: l_cc_dist_rec,
2540: 1);
2541:
2542: IF g1_debug_mode = 'Y' THEN
2543: pa_ic_inv_utils.log_message('reverse_preclass: ' || 'Created CC Dist line Id = '
2544: ||l_cc_dist_rec.CC_DIST_LINE_ID);
2545: END IF;
2546:
2547: END IF;