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;
128: PA_CC_BL_PROCESS.g_dcnt := 0;
129: PA_CC_BL_PROCESS.g_ucnt := 0;
130: PA_CC_BL_PROCESS.g_icnt := 0;
131:
132: /* Initialize the BL Package for Provider Reclass */
125: PA_INVOICE_DETAIL_PKG.G_Del_count := 0;
126: PA_INVOICE_DETAIL_PKG.G_Upd_count := 0;
127: I_EI_count := 0;
128: PA_CC_BL_PROCESS.g_dcnt := 0;
129: PA_CC_BL_PROCESS.g_ucnt := 0;
130: PA_CC_BL_PROCESS.g_icnt := 0;
131:
132: /* Initialize the BL Package for Provider Reclass */
133: PA_CC_BL_process.initialization(
126: PA_INVOICE_DETAIL_PKG.G_Upd_count := 0;
127: I_EI_count := 0;
128: PA_CC_BL_PROCESS.g_dcnt := 0;
129: PA_CC_BL_PROCESS.g_ucnt := 0;
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
129: PA_CC_BL_PROCESS.g_ucnt := 0;
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
175: END IF;
176: for cc_get_cc_del_lines in get_cc_del_lines
177: loop
178: --Increase the delete counter
179: PA_CC_BL_PROCESS.g_dcnt := PA_CC_BL_PROCESS.g_dcnt + 1;
180: --Load the delete record
181: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
182: := cc_get_cc_del_lines.rowid;
183: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
177: loop
178: --Increase the delete counter
179: PA_CC_BL_PROCESS.g_dcnt := PA_CC_BL_PROCESS.g_dcnt + 1;
180: --Load the delete record
181: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
182: := cc_get_cc_del_lines.rowid;
183: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
184: := cc_get_cc_del_lines.cc_dist_line_id;
185: end loop;
179: PA_CC_BL_PROCESS.g_dcnt := PA_CC_BL_PROCESS.g_dcnt + 1;
180: --Load the delete record
181: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
182: := cc_get_cc_del_lines.rowid;
183: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
184: := cc_get_cc_del_lines.cc_dist_line_id;
185: end loop;
186: --Set the expenditure Item as Used
187: I_EXP_ITEM_USED(P_index) := 'Y';
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
206: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
207: := P_CC_REC.rowid;
208: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
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
206: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
207: := P_CC_REC.rowid;
208: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
209: := P_CC_REC.cc_dist_line_id;
210: --Set the expenditure Item as Used
204: PA_CC_BL_PROCESS.g_dcnt := PA_CC_BL_PROCESS.g_dcnt + 1;
205: --Load the delete record
206: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).CcdRowId
207: := P_CC_REC.rowid;
208: PA_CC_BL_PROCESS.g_del_rec(PA_CC_BL_PROCESS.g_dcnt).cc_dist_line_id
209: := P_CC_REC.cc_dist_line_id;
210: --Set the expenditure Item as Used
211: I_EXP_ITEM_USED(P_index) := 'Y';
212:
236: P_CC_REC.line_num := P_CC_REC.line_num - 1;
237: Elsif (P_CC_REC.LINE_NUM_REVERSED IS NULL )
238: Then
239: /* This part will reverse the existing CC Dist */
240: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
241: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'R';
242: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowId :=
243: P_CC_REC.rowid;
244: /* This part will create reversing CC Distribution */
237: Elsif (P_CC_REC.LINE_NUM_REVERSED IS NULL )
238: Then
239: /* This part will reverse the existing CC Dist */
240: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
241: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'R';
242: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowId :=
243: P_CC_REC.rowid;
244: /* This part will create reversing CC Distribution */
245: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
238: Then
239: /* This part will reverse the existing CC Dist */
240: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
241: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'R';
242: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowId :=
243: P_CC_REC.rowid;
244: /* This part will create reversing CC Distribution */
245: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
246: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
241: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'R';
242: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowId :=
243: P_CC_REC.rowid;
244: /* This part will create reversing CC Distribution */
245: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
246: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
247: := P_CC_REC.expenditure_item_id;
248: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
249: := P_CC_REC.acct_currency_code;
242: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowId :=
243: P_CC_REC.rowid;
244: /* This part will create reversing CC Distribution */
245: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
246: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
247: := P_CC_REC.expenditure_item_id;
248: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
249: := P_CC_REC.acct_currency_code;
250: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
244: /* This part will create reversing CC Distribution */
245: PA_CC_BL_PROCESS.g_icnt := PA_CC_BL_PROCESS.g_icnt + 1;
246: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
247: := P_CC_REC.expenditure_item_id;
248: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
249: := P_CC_REC.acct_currency_code;
250: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
251: := P_CC_REC.acct_tp_exchange_rate;
252: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
246: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
247: := P_CC_REC.expenditure_item_id;
248: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
249: := P_CC_REC.acct_currency_code;
250: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
251: := P_CC_REC.acct_tp_exchange_rate;
252: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
253: := P_CC_REC.acct_tp_rate_date;
254: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
248: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
249: := P_CC_REC.acct_currency_code;
250: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
251: := P_CC_REC.acct_tp_exchange_rate;
252: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
253: := P_CC_REC.acct_tp_rate_date;
254: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
255: := P_CC_REC.acct_tp_rate_type;
256: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
250: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
251: := P_CC_REC.acct_tp_exchange_rate;
252: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
253: := P_CC_REC.acct_tp_rate_date;
254: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
255: := P_CC_REC.acct_tp_rate_type;
256: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
257: := (-1)* P_CC_REC.amount;
258: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
252: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
253: := P_CC_REC.acct_tp_rate_date;
254: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
255: := P_CC_REC.acct_tp_rate_type;
256: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
257: := (-1)* P_CC_REC.amount;
258: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
259: := P_CC_REC.bill_markup_percentage;
260: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
254: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
255: := P_CC_REC.acct_tp_rate_type;
256: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
257: := (-1)* P_CC_REC.amount;
258: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
259: := P_CC_REC.bill_markup_percentage;
260: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
261: := P_CC_REC.bill_rate;
262: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
256: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
257: := (-1)* P_CC_REC.amount;
258: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
259: := P_CC_REC.bill_markup_percentage;
260: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
261: := P_CC_REC.bill_rate;
262: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
263: := NULL;
264: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
258: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
259: := P_CC_REC.bill_markup_percentage;
260: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
261: := P_CC_REC.bill_rate;
262: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
263: := NULL;
264: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
265: := P_CC_REC.cr_code_combination_id;
266: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
260: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
261: := P_CC_REC.bill_rate;
262: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
263: := NULL;
264: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
265: := P_CC_REC.cr_code_combination_id;
266: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
267: := P_CC_REC.cross_charge_code;
268: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
262: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
263: := NULL;
264: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
265: := P_CC_REC.cr_code_combination_id;
266: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
267: := P_CC_REC.cross_charge_code;
268: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
269: := P_CC_REC.denom_tp_currency_code;
270: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
264: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
265: := P_CC_REC.cr_code_combination_id;
266: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
267: := P_CC_REC.cross_charge_code;
268: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
269: := P_CC_REC.denom_tp_currency_code;
270: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
271: := (-1)*P_CC_REC.denom_transfer_price;
272: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
266: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
267: := P_CC_REC.cross_charge_code;
268: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
269: := P_CC_REC.denom_tp_currency_code;
270: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
271: := (-1)*P_CC_REC.denom_transfer_price;
272: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
273: := P_CC_REC.cc_dist_line_id;
274: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
268: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
269: := P_CC_REC.denom_tp_currency_code;
270: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
271: := (-1)*P_CC_REC.denom_transfer_price;
272: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
273: := P_CC_REC.cc_dist_line_id;
274: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
275: := P_CC_REC.dr_code_combination_id;
276: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
270: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
271: := (-1)*P_CC_REC.denom_transfer_price;
272: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
273: := P_CC_REC.cc_dist_line_id;
274: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
275: := P_CC_REC.dr_code_combination_id;
276: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
277: := P_CC_REC.ind_compiled_set_id;
278: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
272: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
273: := P_CC_REC.cc_dist_line_id;
274: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
275: := P_CC_REC.dr_code_combination_id;
276: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
277: := P_CC_REC.ind_compiled_set_id;
278: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
279: := P_CC_REC.line_num + 1;
280: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
274: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
275: := P_CC_REC.dr_code_combination_id;
276: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
277: := P_CC_REC.ind_compiled_set_id;
278: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
279: := P_CC_REC.line_num + 1;
280: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
281: := P_CC_REC.line_num ;
282: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type
276: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
277: := P_CC_REC.ind_compiled_set_id;
278: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
279: := P_CC_REC.line_num + 1;
280: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
281: := P_CC_REC.line_num ;
282: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type
283: := 'PC';
284: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
278: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
279: := P_CC_REC.line_num + 1;
280: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
281: := P_CC_REC.line_num ;
282: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type
283: := 'PC';
284: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
285: := P_CC_REC.markup_calc_base_code;
286:
280: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
281: := P_CC_REC.line_num ;
282: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type
283: := 'PC';
284: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
285: := P_CC_REC.markup_calc_base_code;
286:
287: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for bug 3857986
288: ***CBGA - Added new parameter org_id to get_pa_date***
286:
287: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for bug 3857986
288: ***CBGA - Added new parameter org_id to get_pa_date***
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:
288: ***CBGA - Added new parameter org_id to get_pa_date***
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:
309: ,p_recvr_org_id => NULL
310: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
311: ,p_recvr_sob_id => NULL
312: ,p_calling_module => 'CCDL'
313: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
314: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
315: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
316: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
317: ,x_recvr_pa_date => l_dummy
310: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
311: ,p_recvr_sob_id => NULL
312: ,p_calling_module => 'CCDL'
313: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
314: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
315: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
316: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
317: ,x_recvr_pa_date => l_dummy
318: ,x_recvr_pa_period_name => l_dummy1
311: ,p_recvr_sob_id => NULL
312: ,p_calling_module => 'CCDL'
313: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
314: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
315: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
316: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
317: ,x_recvr_pa_date => l_dummy
318: ,x_recvr_pa_period_name => l_dummy1
319: ,x_recvr_gl_date => l_dummy2
312: ,p_calling_module => 'CCDL'
313: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
314: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
315: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
316: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
317: ,x_recvr_pa_date => l_dummy
318: ,x_recvr_pa_period_name => l_dummy1
319: ,x_recvr_gl_date => l_dummy2
320: ,x_recvr_gl_period_name => l_dummy3
330: END;
331:
332: /* Added for 3857986 End */
333:
334: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
335: := P_CC_REC.project_id;
336: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
337: := 'N';
338: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
332: /* Added for 3857986 End */
333:
334: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
335: := P_CC_REC.project_id;
336: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
337: := 'N';
338: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
339: := P_CC_REC.rule_percentage;
340: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
334: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
335: := P_CC_REC.project_id;
336: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
337: := 'N';
338: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
339: := P_CC_REC.rule_percentage;
340: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
341: := P_CC_REC.schedule_line_percentage;
342: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
336: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
337: := 'N';
338: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
339: := P_CC_REC.rule_percentage;
340: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
341: := P_CC_REC.schedule_line_percentage;
342: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
343: := P_CC_REC.task_id;
344: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
338: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
339: := P_CC_REC.rule_percentage;
340: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
341: := P_CC_REC.schedule_line_percentage;
342: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
343: := P_CC_REC.task_id;
344: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
345: := P_CC_REC.tp_base_amount;
346: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
340: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
341: := P_CC_REC.schedule_line_percentage;
342: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
343: := P_CC_REC.task_id;
344: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
345: := P_CC_REC.tp_base_amount;
346: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
347: := to_char(P_INV_DET_ID);
348: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
342: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
343: := P_CC_REC.task_id;
344: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
345: := P_CC_REC.tp_base_amount;
346: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
347: := to_char(P_INV_DET_ID);
348: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
349: := P_CC_REC.reference_2;
350: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
344: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
345: := P_CC_REC.tp_base_amount;
346: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
347: := to_char(P_INV_DET_ID);
348: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
349: := P_CC_REC.reference_2;
350: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
351: := P_EI_DATE;
352:
346: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
347: := to_char(P_INV_DET_ID);
348: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
349: := P_CC_REC.reference_2;
350: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
351: := P_EI_DATE;
352:
353: /* Added for cross proj*/
354: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
350: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
351: := P_EI_DATE;
352:
353: /* Added for cross proj*/
354: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
355: :=P_CC_REC.tp_amt_type_code;
356: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
357: :=P_CC_REC.project_tp_rate_type;
358: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
352:
353: /* Added for cross proj*/
354: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
355: :=P_CC_REC.tp_amt_type_code;
356: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
357: :=P_CC_REC.project_tp_rate_type;
358: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
359: :=P_CC_REC.project_tp_rate_date;
360: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
354: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
355: :=P_CC_REC.tp_amt_type_code;
356: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
357: :=P_CC_REC.project_tp_rate_type;
358: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
359: :=P_CC_REC.project_tp_rate_date;
360: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
361: :=P_CC_REC.project_tp_exchange_rate;
362: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
356: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
357: :=P_CC_REC.project_tp_rate_type;
358: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
359: :=P_CC_REC.project_tp_rate_date;
360: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
361: :=P_CC_REC.project_tp_exchange_rate;
362: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
363: :=(-1)*P_CC_REC.project_transfer_price;
364: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
358: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
359: :=P_CC_REC.project_tp_rate_date;
360: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
361: :=P_CC_REC.project_tp_exchange_rate;
362: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
363: :=(-1)*P_CC_REC.project_transfer_price;
364: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
365: :=P_CC_REC.projfunc_tp_rate_type;
366: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
360: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
361: :=P_CC_REC.project_tp_exchange_rate;
362: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
363: :=(-1)*P_CC_REC.project_transfer_price;
364: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
365: :=P_CC_REC.projfunc_tp_rate_type;
366: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
367: :=P_CC_REC.projfunc_tp_rate_date;
368: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
362: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
363: :=(-1)*P_CC_REC.project_transfer_price;
364: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
365: :=P_CC_REC.projfunc_tp_rate_type;
366: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
367: :=P_CC_REC.projfunc_tp_rate_date;
368: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
369: :=P_CC_REC.projfunc_tp_exchange_rate;
370: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
364: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
365: :=P_CC_REC.projfunc_tp_rate_type;
366: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
367: :=P_CC_REC.projfunc_tp_rate_date;
368: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
369: :=P_CC_REC.projfunc_tp_exchange_rate;
370: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
371: :=(-1)*P_CC_REC.projfunc_transfer_price;
372:
366: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
367: :=P_CC_REC.projfunc_tp_rate_date;
368: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
369: :=P_CC_REC.projfunc_tp_exchange_rate;
370: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
371: :=(-1)*P_CC_REC.projfunc_transfer_price;
372:
373: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
374: :=P_CC_REC.project_tp_currency_code;
369: :=P_CC_REC.projfunc_tp_exchange_rate;
370: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
371: :=(-1)*P_CC_REC.projfunc_transfer_price;
372:
373: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
374: :=P_CC_REC.project_tp_currency_code;
375: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_currency_code
376: :=P_CC_REC.projfunc_tp_currency_code;
377: /* End for cross proj*/
371: :=(-1)*P_CC_REC.projfunc_transfer_price;
372:
373: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
374: :=P_CC_REC.project_tp_currency_code;
375: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_currency_code
376: :=P_CC_REC.projfunc_tp_currency_code;
377: /* End for cross proj*/
378: /* CBGA and project Jobs */
379:
376: :=P_CC_REC.projfunc_tp_currency_code;
377: /* End for cross proj*/
378: /* CBGA and project Jobs */
379:
380: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_job_id
381: := P_CC_REC.tp_job_id;
382: /* PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).prov_proj_bill_job_id
383: := P_CC_REC.prov_proj_bill_job_id; */
384:
378: /* CBGA and project Jobs */
379:
380: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_job_id
381: := P_CC_REC.tp_job_id;
382: /* PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).prov_proj_bill_job_id
383: := P_CC_REC.prov_proj_bill_job_id; */
384:
385: P_CC_REC.line_num := P_CC_REC.line_num + 1;
386: --Set the expenditure Item as Used
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;
413: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
414: := P_Cdl_rec.ACCT_CURRENCY_CODE;
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;
413: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
414: := P_Cdl_rec.ACCT_CURRENCY_CODE;
415: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
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;
413: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
414: := P_Cdl_rec.ACCT_CURRENCY_CODE;
415: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
416: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
417: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
411: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_id
412: := P_Cdl_rec.expenditure_item_id;
413: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
414: := P_Cdl_rec.ACCT_CURRENCY_CODE;
415: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
416: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
417: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
418: := P_Cdl_rec.ACCT_TP_RATE_DATE;
419: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
413: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_currency_code
414: := P_Cdl_rec.ACCT_CURRENCY_CODE;
415: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
416: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
417: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
418: := P_Cdl_rec.ACCT_TP_RATE_DATE;
419: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
420: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
421: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
415: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_exchange_rate
416: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
417: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
418: := P_Cdl_rec.ACCT_TP_RATE_DATE;
419: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
420: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
421: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
422: := P_Cdl_rec.AMOUNT;
423: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
417: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_date
418: := P_Cdl_rec.ACCT_TP_RATE_DATE;
419: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
420: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
421: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
422: := P_Cdl_rec.AMOUNT;
423: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
424: := NULL;
425: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
419: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).acct_tp_rate_type
420: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
421: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
422: := P_Cdl_rec.AMOUNT;
423: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
424: := NULL;
425: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
426: := NULL;
427: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
421: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).amount
422: := P_Cdl_rec.AMOUNT;
423: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
424: := NULL;
425: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
426: := NULL;
427: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
428: := NULL;
429: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
423: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_markup_percentage
424: := NULL;
425: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
426: := NULL;
427: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
428: := NULL;
429: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
430: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
431: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
425: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).bill_rate
426: := NULL;
427: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
428: := NULL;
429: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
430: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
431: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
432: := P_Cdl_rec.CROSS_CHARGE_CODE;
433: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
427: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cc_rejection_code
428: := NULL;
429: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
430: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
431: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
432: := P_Cdl_rec.CROSS_CHARGE_CODE;
433: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
434: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
435: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
429: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cr_code_combination_id
430: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
431: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
432: := P_Cdl_rec.CROSS_CHARGE_CODE;
433: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
434: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
435: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
436: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
437: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
431: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).cross_charge_code
432: := P_Cdl_rec.CROSS_CHARGE_CODE;
433: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
434: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
435: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
436: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
437: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
438: := NULL;
439: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
433: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_tp_currency_code
434: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
435: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
436: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
437: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
438: := NULL;
439: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
440: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
441: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
435: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).denom_transfer_price
436: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
437: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
438: := NULL;
439: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
440: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
441: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
442: := NULL;
443: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
437: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dist_line_id_reversed
438: := NULL;
439: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
440: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
441: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
442: := NULL;
443: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
444: := nvl(P_line_num,0) + 1;
445: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
439: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).dr_code_combination_id
440: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
441: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
442: := NULL;
443: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
444: := nvl(P_line_num,0) + 1;
445: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
446: := NULL;
447: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type := 'PC';
441: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).ind_compiled_set_id
442: := NULL;
443: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
444: := nvl(P_line_num,0) + 1;
445: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
446: := NULL;
447: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type := 'PC';
448: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
449: := NULL;
443: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num
444: := nvl(P_line_num,0) + 1;
445: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
446: := NULL;
447: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type := 'PC';
448: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
449: := NULL;
450:
451: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
444: := nvl(P_line_num,0) + 1;
445: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_num_reversed
446: := NULL;
447: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).line_type := 'PC';
448: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).markup_calc_base_code
449: := NULL;
450:
451: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
452: ***CBGA - Added new parameter org_id to get_pa_date***
451: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
452: ***CBGA - Added new parameter org_id to get_pa_date***
453: l_pa_date:= pa_utils2.get_pa_date(P_Cdl_rec.EXPENDITURE_ITEM_DATE,SYSDATE, PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID);
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:
453: l_pa_date:= pa_utils2.get_pa_date(P_Cdl_rec.EXPENDITURE_ITEM_DATE,SYSDATE, PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID);
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:
474: ,p_recvr_org_id => NULL
475: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
476: ,p_recvr_sob_id => NULL
477: ,p_calling_module => 'CCDL'
478: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
479: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
480: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
481: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
482: ,x_recvr_pa_date => l_dummy
475: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
476: ,p_recvr_sob_id => NULL
477: ,p_calling_module => 'CCDL'
478: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
479: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
480: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
481: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
482: ,x_recvr_pa_date => l_dummy
483: ,x_recvr_pa_period_name => l_dummy1
476: ,p_recvr_sob_id => NULL
477: ,p_calling_module => 'CCDL'
478: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
479: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
480: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
481: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
482: ,x_recvr_pa_date => l_dummy
483: ,x_recvr_pa_period_name => l_dummy1
484: ,x_recvr_gl_date => l_dummy2
477: ,p_calling_module => 'CCDL'
478: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
479: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
480: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
481: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
482: ,x_recvr_pa_date => l_dummy
483: ,x_recvr_pa_period_name => l_dummy1
484: ,x_recvr_gl_date => l_dummy2
485: ,x_recvr_gl_period_name => l_dummy3
495: END;
496:
497: /* Added for 3857986 End */
498:
499: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
500: := P_Cdl_rec.project_id;
501: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
502: := NULL;
503: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
497: /* Added for 3857986 End */
498:
499: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
500: := P_Cdl_rec.project_id;
501: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
502: := NULL;
503: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
504: := NULL;
505: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
499: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_id
500: := P_Cdl_rec.project_id;
501: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
502: := NULL;
503: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
504: := NULL;
505: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
506: := NULL;
507: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
501: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reversed_flag
502: := NULL;
503: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
504: := NULL;
505: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
506: := NULL;
507: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
508: := P_Cdl_rec.task_id;
509: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
503: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).rule_percentage
504: := NULL;
505: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
506: := NULL;
507: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
508: := P_Cdl_rec.task_id;
509: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
510: := NULL;
511: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
505: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).schedule_line_percentage
506: := NULL;
507: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
508: := P_Cdl_rec.task_id;
509: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
510: := NULL;
511: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
512: := P_Cdl_rec.expenditure_item_date;
513: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
507: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).task_id
508: := P_Cdl_rec.task_id;
509: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
510: := NULL;
511: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
512: := P_Cdl_rec.expenditure_item_date;
513: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
514: := P_Cdl_rec.REFERENCE_1;
515: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
509: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_base_amount
510: := NULL;
511: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
512: := P_Cdl_rec.expenditure_item_date;
513: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
514: := P_Cdl_rec.REFERENCE_1;
515: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
516: := P_Cdl_rec.REFERENCE_2;
517: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_3
511: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).expenditure_item_date
512: := P_Cdl_rec.expenditure_item_date;
513: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
514: := P_Cdl_rec.REFERENCE_1;
515: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
516: := P_Cdl_rec.REFERENCE_2;
517: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_3
518: := P_Cdl_rec.CDL_LINE_NUM;
519: /* Added for cross proj*/
513: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_1
514: := P_Cdl_rec.REFERENCE_1;
515: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_2
516: := P_Cdl_rec.REFERENCE_2;
517: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_3
518: := P_Cdl_rec.CDL_LINE_NUM;
519: /* Added for cross proj*/
520: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
521: :=P_Cdl_rec.tp_amt_type_code;
516: := P_Cdl_rec.REFERENCE_2;
517: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).reference_3
518: := P_Cdl_rec.CDL_LINE_NUM;
519: /* Added for cross proj*/
520: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
521: :=P_Cdl_rec.tp_amt_type_code;
522: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
523: :=P_Cdl_rec.project_tp_rate_type;
524: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
518: := P_Cdl_rec.CDL_LINE_NUM;
519: /* Added for cross proj*/
520: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
521: :=P_Cdl_rec.tp_amt_type_code;
522: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
523: :=P_Cdl_rec.project_tp_rate_type;
524: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
525: :=to_date(P_Cdl_rec.project_tp_rate_date,'YYYY/MM/DD');/*FIle.Date.5*/
526: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
520: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_amt_type_code
521: :=P_Cdl_rec.tp_amt_type_code;
522: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
523: :=P_Cdl_rec.project_tp_rate_type;
524: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
525: :=to_date(P_Cdl_rec.project_tp_rate_date,'YYYY/MM/DD');/*FIle.Date.5*/
526: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
527: :=P_Cdl_rec.project_tp_exchange_rate;
528: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
522: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_type
523: :=P_Cdl_rec.project_tp_rate_type;
524: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
525: :=to_date(P_Cdl_rec.project_tp_rate_date,'YYYY/MM/DD');/*FIle.Date.5*/
526: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
527: :=P_Cdl_rec.project_tp_exchange_rate;
528: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
529: :=P_Cdl_rec.project_transfer_price;
530: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
524: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_rate_date
525: :=to_date(P_Cdl_rec.project_tp_rate_date,'YYYY/MM/DD');/*FIle.Date.5*/
526: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
527: :=P_Cdl_rec.project_tp_exchange_rate;
528: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
529: :=P_Cdl_rec.project_transfer_price;
530: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
531: :=P_Cdl_rec.projfunc_tp_rate_type;
532: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
526: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_exchange_rate
527: :=P_Cdl_rec.project_tp_exchange_rate;
528: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
529: :=P_Cdl_rec.project_transfer_price;
530: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
531: :=P_Cdl_rec.projfunc_tp_rate_type;
532: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
533: :=to_date(P_Cdl_rec.projfunc_tp_rate_date,'YYYY/MM/DD');/*File.Date.5*/
534: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
528: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_transfer_price
529: :=P_Cdl_rec.project_transfer_price;
530: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
531: :=P_Cdl_rec.projfunc_tp_rate_type;
532: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
533: :=to_date(P_Cdl_rec.projfunc_tp_rate_date,'YYYY/MM/DD');/*File.Date.5*/
534: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
535: :=P_Cdl_rec.projfunc_tp_exchange_rate;
536: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
530: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_type
531: :=P_Cdl_rec.projfunc_tp_rate_type;
532: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
533: :=to_date(P_Cdl_rec.projfunc_tp_rate_date,'YYYY/MM/DD');/*File.Date.5*/
534: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
535: :=P_Cdl_rec.projfunc_tp_exchange_rate;
536: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
537: :=P_Cdl_rec.projfunc_transfer_price;
538:
532: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_rate_date
533: :=to_date(P_Cdl_rec.projfunc_tp_rate_date,'YYYY/MM/DD');/*File.Date.5*/
534: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_exchange_rate
535: :=P_Cdl_rec.projfunc_tp_exchange_rate;
536: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
537: :=P_Cdl_rec.projfunc_transfer_price;
538:
539: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
540: :=P_Cdl_rec.project_tp_currency_code;
535: :=P_Cdl_rec.projfunc_tp_exchange_rate;
536: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_transfer_price
537: :=P_Cdl_rec.projfunc_transfer_price;
538:
539: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
540: :=P_Cdl_rec.project_tp_currency_code;
541: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_currency_code
542: :=P_Cdl_rec.projfunc_tp_currency_code;
543: /* End for cross proj*/
537: :=P_Cdl_rec.projfunc_transfer_price;
538:
539: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).project_tp_currency_code
540: :=P_Cdl_rec.project_tp_currency_code;
541: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).projfunc_tp_currency_code
542: :=P_Cdl_rec.projfunc_tp_currency_code;
543: /* End for cross proj*/
544:
545:
544:
545:
546: /* CBGA and project Jobs */
547:
548: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_job_id
549: := NULL;
550: /* PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).prov_proj_bill_job_id
551: := NULL;
552: */
546: /* CBGA and project Jobs */
547:
548: PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).tp_job_id
549: := NULL;
550: /* PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).prov_proj_bill_job_id
551: := NULL;
552: */
553:
554: --Set the expenditure Item as Used
581: and ( P_Cdl_rec.reference_2 = P_CC_rec.reference_2)
582: and ( P_Cdl_rec.cdl_line_num = P_CC_rec.reference_3))
583: then
584:
585: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
586: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'U';
587: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowid
588: := P_CC_REC.rowid;
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
582: and ( P_Cdl_rec.cdl_line_num = P_CC_rec.reference_3))
583: then
584:
585: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
586: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'U';
587: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowid
588: := P_CC_REC.rowid;
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
590: := P_Cdl_rec.expenditure_item_id;
583: then
584:
585: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
586: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'U';
587: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowid
588: := P_CC_REC.rowid;
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
590: := P_Cdl_rec.expenditure_item_id;
591: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_date
585: PA_CC_BL_PROCESS.g_ucnt := PA_CC_BL_PROCESS.g_ucnt + 1;
586: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).upd_type := 'U';
587: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowid
588: := P_CC_REC.rowid;
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
590: := P_Cdl_rec.expenditure_item_id;
591: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_date
592: := P_Cdl_rec.expenditure_item_date;
593: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_currency_code
587: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).CcdRowid
588: := P_CC_REC.rowid;
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
590: := P_Cdl_rec.expenditure_item_id;
591: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_date
592: := P_Cdl_rec.expenditure_item_date;
593: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_currency_code
594: := P_Cdl_rec.ACCT_CURRENCY_CODE;
595: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_exchange_rate
589: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_id
590: := P_Cdl_rec.expenditure_item_id;
591: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_date
592: := P_Cdl_rec.expenditure_item_date;
593: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_currency_code
594: := P_Cdl_rec.ACCT_CURRENCY_CODE;
595: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_exchange_rate
596: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
597: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_date
591: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).expenditure_item_date
592: := P_Cdl_rec.expenditure_item_date;
593: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_currency_code
594: := P_Cdl_rec.ACCT_CURRENCY_CODE;
595: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_exchange_rate
596: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
597: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_date
598: := P_Cdl_rec.ACCT_TP_RATE_DATE;
599: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_type
593: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_currency_code
594: := P_Cdl_rec.ACCT_CURRENCY_CODE;
595: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_exchange_rate
596: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
597: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_date
598: := P_Cdl_rec.ACCT_TP_RATE_DATE;
599: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_type
600: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
601: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).amount
595: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_exchange_rate
596: := P_Cdl_rec.ACCT_TP_EXCHANGE_RATE;
597: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_date
598: := P_Cdl_rec.ACCT_TP_RATE_DATE;
599: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_type
600: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
601: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).amount
602: := P_Cdl_rec.AMOUNT;
603: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cr_code_combination_id
597: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_date
598: := P_Cdl_rec.ACCT_TP_RATE_DATE;
599: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_type
600: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
601: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).amount
602: := P_Cdl_rec.AMOUNT;
603: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cr_code_combination_id
604: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
605: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cross_charge_code
599: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).acct_tp_rate_type
600: := P_Cdl_rec.ACCT_TP_RATE_TYPE;
601: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).amount
602: := P_Cdl_rec.AMOUNT;
603: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cr_code_combination_id
604: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
605: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cross_charge_code
606: := P_Cdl_rec.CROSS_CHARGE_CODE;
607: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_tp_currency_code
601: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).amount
602: := P_Cdl_rec.AMOUNT;
603: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cr_code_combination_id
604: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
605: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cross_charge_code
606: := P_Cdl_rec.CROSS_CHARGE_CODE;
607: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_tp_currency_code
608: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
609: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_transfer_price
603: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cr_code_combination_id
604: := P_Cdl_rec.CR_CODE_COMBINATION_ID;
605: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cross_charge_code
606: := P_Cdl_rec.CROSS_CHARGE_CODE;
607: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_tp_currency_code
608: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
609: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_transfer_price
610: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
611: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).dr_code_combination_id
605: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).cross_charge_code
606: := P_Cdl_rec.CROSS_CHARGE_CODE;
607: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_tp_currency_code
608: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
609: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_transfer_price
610: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
611: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).dr_code_combination_id
612: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
613: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).line_type := 'PC' ;/* Added for Bug 5704206 */
607: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_tp_currency_code
608: := P_Cdl_rec.DENOM_TP_CURRENCY_CODE;
609: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_transfer_price
610: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
611: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).dr_code_combination_id
612: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
613: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).line_type := 'PC' ;/* Added for Bug 5704206 */
614:
615: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
609: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).denom_transfer_price
610: := P_Cdl_rec.DENOM_TRANSFER_PRICE;
611: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).dr_code_combination_id
612: := P_Cdl_rec.DR_CODE_COMBINATION_ID;
613: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).line_type := 'PC' ;/* Added for Bug 5704206 */
614:
615: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
616: ***CBGA - Added new parameter org_id to get_pa_date***
617: l_pa_date:= pa_utils2.get_pa_date(P_Cdl_rec.EXPENDITURE_ITEM_DATE,SYSDATE, PA_MC_INVOICE_DETAIL_PKG.G_ORG_ID);
614:
615: /* Bug 2276729 - Begin populating the gl_date also. ** Commented for 3857986
616: ***CBGA - Added new parameter org_id to get_pa_date***
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 */
616: ***CBGA - Added new parameter org_id to get_pa_date***
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 */
636: ,p_recvr_org_id => NULL
637: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
638: ,p_recvr_sob_id => NULL
639: ,p_calling_module => 'CCDL'
640: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
641: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
642: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
643: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
644: ,x_recvr_pa_date => l_dummy
637: ,p_prvdr_sob_id => PA_MC_INVOICE_DETAIL_PKG.G_SOB
638: ,p_recvr_sob_id => NULL
639: ,p_calling_module => 'CCDL'
640: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
641: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
642: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
643: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
644: ,x_recvr_pa_date => l_dummy
645: ,x_recvr_pa_period_name => l_dummy1
638: ,p_recvr_sob_id => NULL
639: ,p_calling_module => 'CCDL'
640: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
641: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
642: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
643: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
644: ,x_recvr_pa_date => l_dummy
645: ,x_recvr_pa_period_name => l_dummy1
646: ,x_recvr_gl_date => l_dummy2
639: ,p_calling_module => 'CCDL'
640: ,x_prvdr_pa_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_date
641: ,x_prvdr_pa_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).pa_period_name
642: ,x_prvdr_gl_date => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_date
643: ,x_prvdr_gl_period_name => PA_CC_BL_PROCESS.g_ins_rec(PA_CC_BL_PROCESS.g_icnt).gl_period_name
644: ,x_recvr_pa_date => l_dummy
645: ,x_recvr_pa_period_name => l_dummy1
646: ,x_recvr_gl_date => l_dummy2
647: ,x_recvr_gl_period_name => l_dummy3
657: END;
658:
659: /* Added for 3857986 End */
660:
661: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).project_id
662: := P_Cdl_rec.project_id;
663: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).task_id
664: := P_Cdl_rec.task_id;
665: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_1
659: /* Added for 3857986 End */
660:
661: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).project_id
662: := P_Cdl_rec.project_id;
663: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).task_id
664: := P_Cdl_rec.task_id;
665: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_1
666: := P_CC_rec.reference_1;
667: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_2
661: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).project_id
662: := P_Cdl_rec.project_id;
663: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).task_id
664: := P_Cdl_rec.task_id;
665: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_1
666: := P_CC_rec.reference_1;
667: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_2
668: := P_Cdl_rec.reference_2;
669: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_3
663: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).task_id
664: := P_Cdl_rec.task_id;
665: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_1
666: := P_CC_rec.reference_1;
667: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_2
668: := P_Cdl_rec.reference_2;
669: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_3
670: := P_Cdl_rec.cdl_line_num;
671:
665: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_1
666: := P_CC_rec.reference_1;
667: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_2
668: := P_Cdl_rec.reference_2;
669: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).reference_3
670: := P_Cdl_rec.cdl_line_num;
671:
672: /* CBGA and project Jobs */
673:
670: := P_Cdl_rec.cdl_line_num;
671:
672: /* CBGA and project Jobs */
673:
674: /* PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).tp_job_id
675: := P_Cdl_rec.tp_job_id;
676:
677: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).prov_proj_bill_job_id
678: := P_Cdl_rec.prov_proj_bill_job_id;
673:
674: /* PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).tp_job_id
675: := P_Cdl_rec.tp_job_id;
676:
677: PA_CC_BL_PROCESS.g_upd_rec(PA_CC_BL_PROCESS.g_ucnt).prov_proj_bill_job_id
678: := P_Cdl_rec.prov_proj_bill_job_id;
679:
680: */
681:
1166: update_ei;
1167: update_rejection_reason( P_Error_code, P_Exp_Id, P_no_of_records );
1168:
1169: /* Apply changes for Provider Reclass */
1170: if (PA_CC_BL_PROCESS.g_dcnt > 0 )
1171: then
1172: PA_CC_BL_PROCESS.mass_delete;
1173: end if;
1174: if (PA_CC_BL_PROCESS.g_ucnt > 0 )
1168:
1169: /* Apply changes for Provider Reclass */
1170: if (PA_CC_BL_PROCESS.g_dcnt > 0 )
1171: then
1172: PA_CC_BL_PROCESS.mass_delete;
1173: end if;
1174: if (PA_CC_BL_PROCESS.g_ucnt > 0 )
1175: then
1176: PA_CC_BL_PROCESS.mass_update;
1170: if (PA_CC_BL_PROCESS.g_dcnt > 0 )
1171: then
1172: PA_CC_BL_PROCESS.mass_delete;
1173: end if;
1174: if (PA_CC_BL_PROCESS.g_ucnt > 0 )
1175: then
1176: PA_CC_BL_PROCESS.mass_update;
1177: end if;
1178: if (PA_CC_BL_PROCESS.g_icnt > 0 )
1172: PA_CC_BL_PROCESS.mass_delete;
1173: end if;
1174: if (PA_CC_BL_PROCESS.g_ucnt > 0 )
1175: then
1176: PA_CC_BL_PROCESS.mass_update;
1177: end if;
1178: if (PA_CC_BL_PROCESS.g_icnt > 0 )
1179: then
1180: PA_CC_BL_PROCESS.mass_insert;
1174: if (PA_CC_BL_PROCESS.g_ucnt > 0 )
1175: then
1176: PA_CC_BL_PROCESS.mass_update;
1177: end if;
1178: if (PA_CC_BL_PROCESS.g_icnt > 0 )
1179: then
1180: PA_CC_BL_PROCESS.mass_insert;
1181: end if;
1182: /* Commit the data */
1176: PA_CC_BL_PROCESS.mass_update;
1177: end if;
1178: if (PA_CC_BL_PROCESS.g_icnt > 0 )
1179: then
1180: PA_CC_BL_PROCESS.mass_insert;
1181: end if;
1182: /* Commit the data */
1183: Commit;
1184:
2491: PROCEDURE apply_ins_changes IS
2492: BEGIN
2493: PA_INVOICE_DETAIL_PKG.insert_rows(P_Insert_tab);
2494:
2495: if (PA_CC_BL_PROCESS.g_icnt > 0 )
2496: then
2497: PA_CC_BL_PROCESS.mass_insert;
2498: end if;
2499: END apply_ins_changes;
2493: PA_INVOICE_DETAIL_PKG.insert_rows(P_Insert_tab);
2494:
2495: if (PA_CC_BL_PROCESS.g_icnt > 0 )
2496: then
2497: PA_CC_BL_PROCESS.mass_insert;
2498: end if;
2499: END apply_ins_changes;
2500:
2501: -- Procedure to reverse provider reclass entries from