DBA Data[Home] [Help]

APPS.PA_IC_INV_CNL dependencies on PA_IC_INV_UTILS

Line 73: pa_ic_inv_utils.log_message('Entered pa_ic_inv_cancel.cancel_invoice');

69:
70: BEGIN
71:
72: IF g1_debug_mode = 'Y' THEN
73: pa_ic_inv_utils.log_message('Entered pa_ic_inv_cancel.cancel_invoice');
74: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Project Id :'||P_PROJECT_ID);
75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);
76: END IF;
77:

Line 74: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Project Id :'||P_PROJECT_ID);

70: BEGIN
71:
72: IF g1_debug_mode = 'Y' THEN
73: pa_ic_inv_utils.log_message('Entered pa_ic_inv_cancel.cancel_invoice');
74: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Project Id :'||P_PROJECT_ID);
75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);
76: END IF;
77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;

Line 75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);

71:
72: IF g1_debug_mode = 'Y' THEN
73: pa_ic_inv_utils.log_message('Entered pa_ic_inv_cancel.cancel_invoice');
74: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Project Id :'||P_PROJECT_ID);
75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);
76: END IF;
77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;
79: l_program_id := pa_ic_inv_utils.g_program_id;

Line 78: l_user_id := pa_ic_inv_utils.g_last_update_login;

74: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Project Id :'||P_PROJECT_ID);
75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);
76: END IF;
77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;
79: l_program_id := pa_ic_inv_utils.g_program_id;
80: l_program_application_id := pa_ic_inv_utils.g_program_application_id;
81: l_request_id := pa_ic_inv_utils.g_request_id;
82:

Line 79: l_program_id := pa_ic_inv_utils.g_program_id;

75: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Num :'||P_DRAFT_INV_NUM);
76: END IF;
77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;
79: l_program_id := pa_ic_inv_utils.g_program_id;
80: l_program_application_id := pa_ic_inv_utils.g_program_application_id;
81: l_request_id := pa_ic_inv_utils.g_request_id;
82:
83: /*

Line 80: l_program_application_id := pa_ic_inv_utils.g_program_application_id;

76: END IF;
77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;
79: l_program_id := pa_ic_inv_utils.g_program_id;
80: l_program_application_id := pa_ic_inv_utils.g_program_application_id;
81: l_request_id := pa_ic_inv_utils.g_request_id;
82:
83: /*
84: Obtain the User Lock with name as provider project _id ,

Line 81: l_request_id := pa_ic_inv_utils.g_request_id;

77:
78: l_user_id := pa_ic_inv_utils.g_last_update_login;
79: l_program_id := pa_ic_inv_utils.g_program_id;
80: l_program_application_id := pa_ic_inv_utils.g_program_application_id;
81: l_request_id := pa_ic_inv_utils.g_request_id;
82:
83: /*
84: Obtain the User Lock with name as provider project _id ,
85: this lock will solve the concurrency issues with similar

Line 89: IF (pa_ic_inv_utils.Set_User_Lock (P_Project_Id) <> 0) THEN

85: this lock will solve the concurrency issues with similar
86: Invoice generation process and other processes that update invoice details.
87: */
88:
89: IF (pa_ic_inv_utils.Set_User_Lock (P_Project_Id) <> 0) THEN
90: IF g1_debug_mode = 'Y' THEN
91: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'unable to acquire lock');
92: END IF;
93: raise CANNOT_ACQUIRE_LOCK;

Line 91: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'unable to acquire lock');

87: */
88:
89: IF (pa_ic_inv_utils.Set_User_Lock (P_Project_Id) <> 0) THEN
90: IF g1_debug_mode = 'Y' THEN
91: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'unable to acquire lock');
92: END IF;
93: raise CANNOT_ACQUIRE_LOCK;
94: END IF;
95:

Line 142: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'raising error');

138: */
139:
140: if SQL%ROWCOUNT = 0 then
141: IF g1_debug_mode = 'Y' THEN
142: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'raising error');
143: END IF;
144: RAISE INV_CANCELED_OR_CREDIT_MEMO ;
145: end if;
146:

Line 148: pa_ic_inv_utils.log_message('Updating pa_draft_invoices rows = '||

144: RAISE INV_CANCELED_OR_CREDIT_MEMO ;
145: end if;
146:
147: IF g1_debug_mode = 'Y' THEN
148: pa_ic_inv_utils.log_message('Updating pa_draft_invoices rows = '||
149: SQL%ROWCOUNT);
150: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Agreement id returned = '||
151: l_agreement_id);
152: END IF;

Line 150: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Agreement id returned = '||

146:
147: IF g1_debug_mode = 'Y' THEN
148: pa_ic_inv_utils.log_message('Updating pa_draft_invoices rows = '||
149: SQL%ROWCOUNT);
150: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Agreement id returned = '||
151: l_agreement_id);
152: END IF;
153: -- Get the new Invoice number to be used for the crediting Invoice
154:

Line 155: pa_ic_inv_utils.Get_Next_Draft_Inv_Num(P_PROJECT_ID,

151: l_agreement_id);
152: END IF;
153: -- Get the new Invoice number to be used for the crediting Invoice
154:
155: pa_ic_inv_utils.Get_Next_Draft_Inv_Num(P_PROJECT_ID,
156: l_request_id,
157: l_new_draft_inv_num );
158:
159: /* Create the new invoice header for the crediting invoice ,

Line 163: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'New invoice num = '||l_new_draft_inv_num);

159: /* Create the new invoice header for the crediting invoice ,
160: most of the information is obtained from the original Invoice.
161: */
162: IF g1_debug_mode = 'Y' THEN
163: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'New invoice num = '||l_new_draft_inv_num);
164: END IF;
165:
166: /* Bug#5137884 : INTERCOMP INVOICES ERRORING OUT WITH ORA-06512:
167: Issue: As part of the MOAC changes, the org_id insertion is missing

Line 268: pa_ic_inv_utils.log_message('Inserting pa_draft_invoices rows = '||

264: AND I2.PROJECT_ID = P_PROJECT_ID
265: AND P.PROJECT_ID = P_PROJECT_ID;
266:
267: IF g1_debug_mode = 'Y' THEN
268: pa_ic_inv_utils.log_message('Inserting pa_draft_invoices rows = '||
269: SQL%ROWCOUNT);
270: END IF;
271:
272: /* A new line will be created in the canceling Invoice for every line

Line 361: pa_ic_inv_utils.log_message('Inserting pa_draft_invoice_items rows = '||

357: WHERE I2.PROJECT_ID = P_PROJECT_ID
358: AND I2.DRAFT_INVOICE_NUM = P_DRAFT_INV_NUM;
359:
360: IF g1_debug_mode = 'Y' THEN
361: pa_ic_inv_utils.log_message('Inserting pa_draft_invoice_items rows = '||
362: SQL%ROWCOUNT);
363: END IF;
364:
365: /* For each reversing invoice line create new Invoice details ,

Line 397: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing row number '|| l_EI_upd_cnt);

393:
394: l_EI_upd_cnt := l_EI_upd_cnt + 1;
395:
396: IF g1_debug_mode = 'Y' THEN
397: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing row number '|| l_EI_upd_cnt);
398: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing EI id , line num '||
399: l_inv_detail_rec.expenditure_item_id ||','
400: ||l_inv_detail_rec.line_num);
401: END IF;

Line 398: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing EI id , line num '||

394: l_EI_upd_cnt := l_EI_upd_cnt + 1;
395:
396: IF g1_debug_mode = 'Y' THEN
397: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing row number '|| l_EI_upd_cnt);
398: pa_ic_inv_utils.log_message ('cancel_invoice: ' || 'Reversing EI id , line num '||
399: l_inv_detail_rec.expenditure_item_id ||','
400: ||l_inv_detail_rec.line_num);
401: END IF;
402:

Line 466: pa_ic_inv_utils.log_message('Updating invoice details rows = '

462: AND INVOICED_FLAG = 'N'
463: AND PROJECT_ID = P_PROJECT_ID;
464:
465: IF g1_debug_mode = 'Y' THEN
466: pa_ic_inv_utils.log_message('Updating invoice details rows = '
467: || SQL%rowcount);
468: END IF;
469:
470:

Line 473: pa_ic_inv_utils.update_SPF(l_new_draft_inv_num,

469:
470:
471: /* Update the project summary fundings to reflect the cancellation */
472:
473: pa_ic_inv_utils.update_SPF(l_new_draft_inv_num,
474: l_agreement_id,
475: P_DRAFT_INV_NUM,
476: 'CANCEL');
477:

Line 515: pa_ic_inv_utils.log_message('Updating EI rows = ' || SQL%rowcount);

511: RETURNING expenditure_item_date , system_linkage_function
512: BULK COLLECT INTO l_ei_date, l_sys_linkage;
513:
514: IF g1_debug_mode = 'Y' THEN
515: pa_ic_inv_utils.log_message('Updating EI rows = ' || SQL%rowcount);
516: END IF;
517:
518: /** do provider reclass for reversed rows **/
519:

Line 531: PA_IC_INV_UTILS.Commit_Invoice ();

527: );
528:
529: /** To trigger MRC for draft invoice items **/
530:
531: PA_IC_INV_UTILS.Commit_Invoice ();
532:
533: -- Release the user lock once the cancellation for the Invoice is complete.
534: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);
535:

Line 534: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);

530:
531: PA_IC_INV_UTILS.Commit_Invoice ();
532:
533: -- Release the user lock once the cancellation for the Invoice is complete.
534: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);
535:
536: EXCEPTION
537:
538: WHEN INV_CANCELED_OR_CREDIT_MEMO THEN

Line 540: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Cancelled or Credit memo exists');

536: EXCEPTION
537:
538: WHEN INV_CANCELED_OR_CREDIT_MEMO THEN
539: IF g1_debug_mode = 'Y' THEN
540: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Cancelled or Credit memo exists');
541: END IF;
542: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);
543: -- raise;
544: WHEN CANNOT_ACQUIRE_LOCK THEN

Line 542: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);

538: WHEN INV_CANCELED_OR_CREDIT_MEMO THEN
539: IF g1_debug_mode = 'Y' THEN
540: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Invoice Cancelled or Credit memo exists');
541: END IF;
542: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);
543: -- raise;
544: WHEN CANNOT_ACQUIRE_LOCK THEN
545: IF g1_debug_mode = 'Y' THEN
546: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Cannot acquire lock for project ' ||

Line 546: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Cannot acquire lock for project ' ||

542: l_lock_status := PA_IC_INV_UTILS.Release_User_Lock (P_Project_Id);
543: -- raise;
544: WHEN CANNOT_ACQUIRE_LOCK THEN
545: IF g1_debug_mode = 'Y' THEN
546: pa_ic_inv_utils.log_message('cancel_invoice: ' || 'Cannot acquire lock for project ' ||
547: P_project_id);
548: END IF;
549: WHEN OTHERS THEN
550: raise;