14: l_cnt NUMBER;
15: BEGIN
16: IF pg_debug = 'Y'
17: THEN
18: ar_invoice_utils.debug ('generate_default_salescredit (+)');
19: END IF;
20: x_return_status := FND_API.G_RET_STS_SUCCESS;
21: -- check whether user has passed any sales credit for this line
22: BEGIN
68: l_copy_doc_number_flag varchar2(1):='N';
69: BEGIN
70: IF pg_debug = 'Y'
71: THEN
72: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_HEADER(+)' );
73: END IF;
74:
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
76: /* 5921925 - removed trx_number sequence from here. Moved it to
73: END IF;
74:
75: x_return_status := FND_API.G_RET_STS_SUCCESS;
76: /* 5921925 - removed trx_number sequence from here. Moved it to
77: ar_invoice_utils.populate_doc_sequence */
78:
79: -- call table handler to insert into ra_customer_trx
80: IF pg_debug = 'Y'
81: THEN
78:
79: -- call table handler to insert into ra_customer_trx
80: IF pg_debug = 'Y'
81: THEN
82: ar_invoice_utils.debug ('Before calling AR_TRX_BULK_PROCESS_HEADER.insert_row (+)' );
83: END IF;
84:
85: AR_TRX_BULK_PROCESS_HEADER.insert_row(
86: p_trx_header_id => ar_trx_header_rec.trx_header_id,
95: ar_invoice_api_pub.g_api_outputs.batch_id := p_batch_id;
96:
97: IF pg_debug = 'Y'
98: THEN
99: ar_invoice_utils.debug ('Before calling AR_TRX_BULK_PROCESS_HEADER.insert_row (-)' );
100: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_HEADER(-)' );
101: END IF;
102: EXCEPTION
103: WHEN OTHERS THEN
96:
97: IF pg_debug = 'Y'
98: THEN
99: ar_invoice_utils.debug ('Before calling AR_TRX_BULK_PROCESS_HEADER.insert_row (-)' );
100: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_HEADER(-)' );
101: END IF;
102: EXCEPTION
103: WHEN OTHERS THEN
104: x_errmsg := 'Error in AR_INVOICE_TABLE_HANDLER.INSERT_TRX_HEADER '||sqlerrm;
115:
116: BEGIN
117: IF pg_debug = 'Y'
118: THEN
119: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_LINES(+)' );
120: END IF;
121:
122: x_return_status := FND_API.G_RET_STS_SUCCESS;
123:
132: return;
133: END IF;
134: IF pg_debug = 'Y'
135: THEN
136: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_LINES(-)' );
137: END IF;
138: EXCEPTION
139: WHEN OTHERS THEN
140: x_errmsg := 'Error in AR_INVOICE_TABLE_HANDLER.INSERT_TRX_LINES '||sqlerrm;
151:
152: BEGIN
153: IF pg_debug = 'Y'
154: THEN
155: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_DIST(+)' );
156: END IF;
157: x_return_status := FND_API.G_RET_STS_SUCCESS;
158:
159: AR_TRX_BULK_PROCESS_DIST.INSERT_ROW (
166: return;
167: END IF;
168: IF pg_debug = 'Y'
169: THEN
170: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_TRX_DIST(-)' );
171: END IF;
172:
173: EXCEPTION
174: WHEN OTHERS THEN
186:
187: BEGIN
188: IF pg_debug = 'Y'
189: THEN
190: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_SALESCR(+)' );
191: END IF;
192:
193: x_return_status := FND_API.G_RET_STS_SUCCESS;
194:
205: return;
206: END IF;
207: IF pg_debug = 'Y'
208: THEN
209: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_SALESCR(-)' );
210: END IF;
211:
212: EXCEPTION
213: WHEN OTHERS THEN
228: l_cnt NUMBER;
229: BEGIN
230: IF pg_debug = 'Y'
231: THEN
232: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(+)' );
233: END IF;
234:
235: x_return_status := FND_API.G_RET_STS_SUCCESS;
236:
278: g_request_id := -1 * p_batch_id;
279:
280: IF pg_debug = 'Y'
281: THEN
282: ar_invoice_utils.debug ('Batch Id :'|| p_batch_id );
283: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(-)' );
284: END IF;
285: EXCEPTION
286: WHEN OTHERS THEN
279:
280: IF pg_debug = 'Y'
281: THEN
282: ar_invoice_utils.debug ('Batch Id :'|| p_batch_id );
283: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(-)' );
284: END IF;
285: EXCEPTION
286: WHEN OTHERS THEN
287: x_errmsg := 'Error in AR_INVOICE_TABLE_HANDLER.CREATE_BATCH '||sqlerrm;
306: l_amt_incl_tax_override ar_vat_tax.amount_includes_tax_override%type;
307: BEGIN
308: IF pg_debug = 'Y'
309: THEN
310: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.GET_DEFAULT_TAX_CODE(+)' );
311: END IF;
312:
313: x_return_status := FND_API.G_RET_STS_SUCCESS;
314: IF pg_debug = 'Y'
312:
313: x_return_status := FND_API.G_RET_STS_SUCCESS;
314: IF pg_debug = 'Y'
315: THEN
316: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
313: x_return_status := FND_API.G_RET_STS_SUCCESS;
314: IF pg_debug = 'Y'
315: THEN
316: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
314: IF pg_debug = 'Y'
315: THEN
316: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
315: THEN
316: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
316: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
324: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
317: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
324: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
325: END IF;
318: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
324: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
325: END IF;
326:
319: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
324: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
325: END IF;
326:
327: /* 4188835 - defaulting code removed */
320: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
321: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
322: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
323: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
324: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
325: END IF;
326:
327: /* 4188835 - defaulting code removed */
328:
327: /* 4188835 - defaulting code removed */
328:
329: IF pg_debug = 'Y'
330: THEN
331: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.GET_DEFAULT_TAX_CODE(-)' );
332: END IF;
333: EXCEPTION
334: WHEN OTHERS THEN
335: x_errmsg := 'Error during default Tax Code';
526:
527: BEGIN
528: IF pg_debug = 'Y'
529: THEN
530: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.insert_row(+)' );
531: END IF;
532:
533: x_return_status := FND_API.G_RET_STS_SUCCESS;
534:
535: l_batch_id := g_batch_id;
536:
537: IF pg_debug = 'Y'
538: THEN
539: ar_invoice_utils.debug ('Batch Id '|| l_batch_id );
540: END IF;
541: -- This is for mrc call. which takes varchar2.
542: lc_request_id := g_request_id;
543: -- Also assign the global variable in auto_accounting package so that it does
556: AR_INVOICE_API_PUB.g_customer_trx_id := ar_trx_header_rec.customer_trx_id;
557:
558: IF pg_debug = 'Y'
559: THEN
560: ar_invoice_utils.debug ('In Header Loop' );
561: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
562: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
563: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
564: END IF;
557:
558: IF pg_debug = 'Y'
559: THEN
560: ar_invoice_utils.debug ('In Header Loop' );
561: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
562: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
563: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
564: END IF;
565:
558: IF pg_debug = 'Y'
559: THEN
560: ar_invoice_utils.debug ('In Header Loop' );
561: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
562: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
563: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
564: END IF;
565:
566: insert_trx_header ( ar_trx_header_rec => ar_trx_header_rec,
559: THEN
560: ar_invoice_utils.debug ('In Header Loop' );
561: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
562: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
563: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
564: END IF;
565:
566: insert_trx_header ( ar_trx_header_rec => ar_trx_header_rec,
567: p_batch_id => l_batch_id,
574: END IF;
575:
576: IF pg_debug = 'Y'
577: THEN
578: ar_invoice_utils.debug ('calling insert_trx_header (-)' );
579: ar_invoice_utils.debug ('calling auto accounting (+)' );
580: END IF;
581:
582: /* 5921925 - Do not call insert unless there were dists rows */
575:
576: IF pg_debug = 'Y'
577: THEN
578: ar_invoice_utils.debug ('calling insert_trx_header (-)' );
579: ar_invoice_utils.debug ('calling auto accounting (+)' );
580: END IF;
581:
582: /* 5921925 - Do not call insert unless there were dists rows */
583: IF ar_invoice_api_pub.g_dist_exist
599: FOR ar_trx_lines_rec IN ar_trx_lines_c
600: LOOP
601: IF pg_debug = 'Y'
602: THEN
603: ar_invoice_utils.debug ('In Lines Loop (+)' );
604: END IF;
605:
606: IF ar_trx_lines_rec.line_type in ('LINE','FREIGHT')
607: THEN
608: l_customer_trx_line_id := ar_trx_lines_rec.customer_trx_line_id;
609:
610: IF pg_debug = 'Y'
611: THEN
612: ar_invoice_utils.debug ('Line Type = LINE ' );
613: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
614: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
615: END IF;
616:
609:
610: IF pg_debug = 'Y'
611: THEN
612: ar_invoice_utils.debug ('Line Type = LINE ' );
613: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
614: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
615: END IF;
616:
617: /* 4188835 - removed tax code defaulting logic */
610: IF pg_debug = 'Y'
611: THEN
612: ar_invoice_utils.debug ('Line Type = LINE ' );
613: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
614: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
615: END IF;
616:
617: /* 4188835 - removed tax code defaulting logic */
618:
627: return;
628: END IF;
629: IF pg_debug = 'Y'
630: THEN
631: ar_invoice_utils.debug ('Calling insert_trx_lines (-)' );
632: END IF;
633:
634: -- derive the GL and trx date if trx_class is not CM
635: IF ( ( ar_trx_header_rec.trx_class <> 'CM' )
650: THEN
651: -- Create Sales Credit
652: IF pg_debug = 'Y'
653: THEN
654: ar_invoice_utils.debug ('Calling sales credit (+)' );
655: END IF;
656: -- before defaulting check whether user has passed
657: -- sales credit or not. If user has passed sales credit
658: -- then don't default the sales credit.
672: return;
673: END IF;
674: IF pg_debug = 'Y'
675: THEN
676: ar_invoice_utils.debug ('Calling sales credit (-)' );
677: END IF;
678: END IF;
679:
680: /* 4188835 - removed line-level call to
710: EXCEPTION
711: WHEN OTHERS THEN
712: IF pg_debug = 'Y'
713: THEN
714: ar_invoice_utils.debug ('Error fetching ship_vi, ship_actual_date : ' ||sqlerrm );
715: END IF;
716: END;
717: /* Changes for Bug 5398561 ends. */
718:
740:
741: END IF;
742: IF pg_debug = 'Y'
743: THEN
744: ar_invoice_utils.debug ('CC id '|| l_ccid);
745: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
746: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
747: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
748: END IF;
741: END IF;
742: IF pg_debug = 'Y'
743: THEN
744: ar_invoice_utils.debug ('CC id '|| l_ccid);
745: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
746: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
747: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
748: END IF;
749:
742: IF pg_debug = 'Y'
743: THEN
744: ar_invoice_utils.debug ('CC id '|| l_ccid);
745: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
746: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
747: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
748: END IF;
749:
750: ELSIF ar_trx_lines_rec.line_type = 'TAX'
743: THEN
744: ar_invoice_utils.debug ('CC id '|| l_ccid);
745: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
746: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
747: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
748: END IF;
749:
750: ELSIF ar_trx_lines_rec.line_type = 'TAX'
751: THEN
750: ELSIF ar_trx_lines_rec.line_type = 'TAX'
751: THEN
752: IF pg_debug = 'Y'
753: THEN
754: ar_invoice_utils.debug ('Line Type = TAX (+)' );
755: END IF;
756:
757: /* 4188835 - Removed entire manual tax block. This behavior
758: is now handled in arp_etax_invapi_util.calculate_tax */
759:
760: END IF; -- end of if line_type = 'LINE'
761: IF pg_debug = 'Y'
762: THEN
763: ar_invoice_utils.debug ('Line Type = LINE (-)' );
764: END IF;
765: END LOOP;
766:
767: IF l_tax_error_flag = 'Y'
803:
804: /* call autoaccounting for REC first -- needed by etax call below */
805: IF pg_debug = 'Y'
806: THEN
807: ar_invoice_utils.debug('calling autoaccounting for REC');
808: END IF;
809:
810: arp_auto_accounting.do_autoaccounting(
811: 'I',
828: l_num_failed_dist_rows);
829:
830: IF pg_debug = 'Y'
831: THEN
832: ar_invoice_utils.debug('calling etax for entire API batch');
833: END IF;
834:
835: arp_etax_invapi_util.calculate_tax(g_request_id, l_etax_error_count,
836: l_return_status);
846: END IF;
847:
848: IF (nvl(l_etax_error_count, 0) > 0)
849: THEN
850: ar_invoice_utils.debug('EXCEPTION: etax error count = ' || l_etax_error_count);
851: END IF;
852:
853:
854: IF pg_debug = 'Y'
852:
853:
854: IF pg_debug = 'Y'
855: THEN
856: ar_invoice_utils.debug ('calling autoaccounting for ALL (except REC)' );
857: END IF;
858:
859: arp_auto_accounting.do_autoaccounting(
860: 'I',
877: l_num_failed_dist_rows);
878:
879: IF pg_debug = 'Y'
880: THEN
881: ar_invoice_utils.debug ('No. of Rows failed ' || l_num_failed_dist_rows);
882: ar_invoice_utils.debug ('returning from arp_auto_accounting.do_autoaccounting(-)' );
883: END IF;
884:
885: IF l_num_failed_dist_rows > 0
878:
879: IF pg_debug = 'Y'
880: THEN
881: ar_invoice_utils.debug ('No. of Rows failed ' || l_num_failed_dist_rows);
882: ar_invoice_utils.debug ('returning from arp_auto_accounting.do_autoaccounting(-)' );
883: END IF;
884:
885: IF l_num_failed_dist_rows > 0
886: OR l_etax_error_count > 0
893:
894: -- call mrc engine
895: IF pg_debug = 'Y'
896: THEN
897: ar_invoice_utils.debug ('Calling MRC Engine (+)' );
898: ar_invoice_utils.debug ('Request Id '|| to_char(g_request_id) );
899: END IF;
900: /*---------------------------------+
901: | Calling central MRC library |
894: -- call mrc engine
895: IF pg_debug = 'Y'
896: THEN
897: ar_invoice_utils.debug ('Calling MRC Engine (+)' );
898: ar_invoice_utils.debug ('Request Id '|| to_char(g_request_id) );
899: END IF;
900: /*---------------------------------+
901: | Calling central MRC library |
902: | for MRC Integration |
905: p_request_id => g_request_id,
906: p_table_name => 'RAXTRX');
907: IF pg_debug = 'Y'
908: THEN
909: ar_invoice_utils.debug ('Calling MRC Engine (-)' );
910: ar_invoice_utils.debug ('callling post commit process with complete flag = Y(+)' );
911: END IF;
912:
913: /* Second loop to do final completion tasks */
906: p_table_name => 'RAXTRX');
907: IF pg_debug = 'Y'
908: THEN
909: ar_invoice_utils.debug ('Calling MRC Engine (-)' );
910: ar_invoice_utils.debug ('callling post commit process with complete flag = Y(+)' );
911: END IF;
912:
913: /* Second loop to do final completion tasks */
914: FOR ar_trx_header_rec IN ar_trx_header_c
915: LOOP
916:
917: IF pg_debug = 'Y'
918: THEN
919: ar_invoice_utils.debug ('set Term in use (+)' );
920: ar_invoice_utils.debug ('Term Id '|| ar_trx_header_rec.term_id );
921: END IF;
922:
923: arp_trx_util.set_term_in_use_flag(
916:
917: IF pg_debug = 'Y'
918: THEN
919: ar_invoice_utils.debug ('set Term in use (+)' );
920: ar_invoice_utils.debug ('Term Id '|| ar_trx_header_rec.term_id );
921: END IF;
922:
923: arp_trx_util.set_term_in_use_flag(
924: p_form_name => 'AR_INVOICE_API',
926: p_term_id => ar_trx_header_rec.term_id,
927: p_term_in_use_flag => null);
928: IF pg_debug = 'Y'
929: THEN
930: ar_invoice_utils.debug ('set Term in use (-)' );
931: ar_invoice_utils.debug ('arp_global.request_id BEFORE CHANGES'||arp_global.request_id );
932: END IF;
933:
934: /* 5921925 - Streamlined completion logic */
927: p_term_in_use_flag => null);
928: IF pg_debug = 'Y'
929: THEN
930: ar_invoice_utils.debug ('set Term in use (-)' );
931: ar_invoice_utils.debug ('arp_global.request_id BEFORE CHANGES'||arp_global.request_id );
932: END IF;
933:
934: /* 5921925 - Streamlined completion logic */
935: BEGIN
941: IF((arp_global.request_id IS NULL) AND (g_request_id IS NOT NULL)) THEN
942: arp_global.request_id := g_request_id;
943: END IF;
944:
945: ar_invoice_utils.debug ('arp_global.request_id AFTER CHANGES'||arp_global.request_id );
946:
947: IF (arp_rounding.correct_dist_rounding_errors
948: (null, -- request_id
949: ar_trx_header_rec.customer_trx_id,
1063: END LOOP; /* End of completion loop */
1064:
1065: IF pg_debug = 'Y'
1066: THEN
1067: ar_invoice_utils.debug ('Insert_row(-)' );
1068: END IF;
1069: EXCEPTION
1070: WHEN OTHERS THEN
1071: cleanup(p_customer_trx_id => l_cust_trx_id);