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:
206: return;
207: END IF;
208: IF pg_debug = 'Y'
209: THEN
210: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.INSERT_SALESCR(-)' );
211: END IF;
212:
213: EXCEPTION
214: WHEN OTHERS THEN
229: l_cnt NUMBER;
230: BEGIN
231: IF pg_debug = 'Y'
232: THEN
233: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(+)' );
234: END IF;
235:
236: x_return_status := FND_API.G_RET_STS_SUCCESS;
237:
279: g_request_id := -1 * p_batch_id;
280:
281: IF pg_debug = 'Y'
282: THEN
283: ar_invoice_utils.debug ('Batch Id :'|| p_batch_id );
284: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(-)' );
285: END IF;
286: EXCEPTION
287: WHEN OTHERS THEN
280:
281: IF pg_debug = 'Y'
282: THEN
283: ar_invoice_utils.debug ('Batch Id :'|| p_batch_id );
284: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.create_batch(-)' );
285: END IF;
286: EXCEPTION
287: WHEN OTHERS THEN
288: x_errmsg := 'Error in AR_INVOICE_TABLE_HANDLER.CREATE_BATCH '||sqlerrm;
307: l_amt_incl_tax_override ar_vat_tax.amount_includes_tax_override%type;
308: BEGIN
309: IF pg_debug = 'Y'
310: THEN
311: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.GET_DEFAULT_TAX_CODE(+)' );
312: END IF;
313:
314: x_return_status := FND_API.G_RET_STS_SUCCESS;
315: IF pg_debug = 'Y'
313:
314: x_return_status := FND_API.G_RET_STS_SUCCESS;
315: IF pg_debug = 'Y'
316: THEN
317: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
314: x_return_status := FND_API.G_RET_STS_SUCCESS;
315: IF pg_debug = 'Y'
316: THEN
317: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
315: IF pg_debug = 'Y'
316: THEN
317: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
316: THEN
317: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
317: ar_invoice_utils.debug ('Ship to site use Id :' || ar_trx_header_rec.ship_to_site_use_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
325: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
318: ar_invoice_utils.debug ('Bill to site use Id :' || ar_trx_header_rec.bill_to_site_use_id);
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
325: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
326: END IF;
319: ar_invoice_utils.debug ('Inventory Item Id :' || ar_trx_lines_rec.inventory_item_id);
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
325: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
326: END IF;
327:
320: ar_invoice_utils.debug ('Org Id :' || ar_trx_header_rec.org_id);
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
325: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
326: END IF;
327:
328: /* 4188835 - defaulting code removed */
321: ar_invoice_utils.debug ('SOB Id :' || ar_trx_header_rec.set_of_books_id);
322: ar_invoice_utils.debug ('Ware House Id :' || ar_trx_lines_rec.warehouse_id);
323: ar_invoice_utils.debug ('trx date :' || ar_trx_header_rec.trx_date);
324: ar_invoice_utils.debug ('trx type id :' || ar_trx_header_rec.cust_trx_type_id);
325: ar_invoice_utils.debug ('memo line id :' || ar_trx_lines_rec.memo_line_id);
326: END IF;
327:
328: /* 4188835 - defaulting code removed */
329:
328: /* 4188835 - defaulting code removed */
329:
330: IF pg_debug = 'Y'
331: THEN
332: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.GET_DEFAULT_TAX_CODE(-)' );
333: END IF;
334: EXCEPTION
335: WHEN OTHERS THEN
336: x_errmsg := 'Error during default Tax Code';
534:
535: BEGIN
536: IF pg_debug = 'Y'
537: THEN
538: ar_invoice_utils.debug ('AR_INVOICE_TABLE_HANDLER.insert_row(+)' );
539: END IF;
540:
541: x_return_status := FND_API.G_RET_STS_SUCCESS;
542:
543: l_batch_id := g_batch_id;
544:
545: IF pg_debug = 'Y'
546: THEN
547: ar_invoice_utils.debug ('Batch Id '|| l_batch_id );
548: END IF;
549: -- This is for mrc call. which takes varchar2.
550: lc_request_id := g_request_id;
551: -- Also assign the global variable in auto_accounting package so that it does
565: AR_INVOICE_API_PUB.g_customer_trx_id := ar_trx_header_rec.customer_trx_id;
566:
567: IF pg_debug = 'Y'
568: THEN
569: ar_invoice_utils.debug ('In Header Loop' );
570: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
571: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
572: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
573: END IF;
566:
567: IF pg_debug = 'Y'
568: THEN
569: ar_invoice_utils.debug ('In Header Loop' );
570: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
571: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
572: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
573: END IF;
574:
567: IF pg_debug = 'Y'
568: THEN
569: ar_invoice_utils.debug ('In Header Loop' );
570: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
571: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
572: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
573: END IF;
574:
575: insert_trx_header ( ar_trx_header_rec => ar_trx_header_rec,
568: THEN
569: ar_invoice_utils.debug ('In Header Loop' );
570: ar_invoice_utils.debug ('Trx Header Id ' || l_trx_header_id );
571: ar_invoice_utils.debug ('Cust Trx Id ' || l_cust_trx_id );
572: ar_invoice_utils.debug ('calling insert_trx_header (+)' );
573: END IF;
574:
575: insert_trx_header ( ar_trx_header_rec => ar_trx_header_rec,
576: p_batch_id => l_batch_id,
583: END IF;
584:
585: IF pg_debug = 'Y'
586: THEN
587: ar_invoice_utils.debug ('calling insert_trx_header (-)' );
588: ar_invoice_utils.debug ('calling auto accounting (+)' );
589: END IF;
590:
591: /* 5921925 - Do not call insert unless there were dists rows */
584:
585: IF pg_debug = 'Y'
586: THEN
587: ar_invoice_utils.debug ('calling insert_trx_header (-)' );
588: ar_invoice_utils.debug ('calling auto accounting (+)' );
589: END IF;
590:
591: /* 5921925 - Do not call insert unless there were dists rows */
592: IF ar_invoice_api_pub.g_dist_exist
608: FOR ar_trx_lines_rec IN ar_trx_lines_c
609: LOOP
610: IF pg_debug = 'Y'
611: THEN
612: ar_invoice_utils.debug ('In Lines Loop (+)' );
613: END IF;
614:
615: IF ar_trx_lines_rec.line_type in ('LINE','FREIGHT')
616: THEN
617: l_customer_trx_line_id := ar_trx_lines_rec.customer_trx_line_id;
618:
619: IF pg_debug = 'Y'
620: THEN
621: ar_invoice_utils.debug ('Line Type = LINE ' );
622: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
623: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
624: END IF;
625:
618:
619: IF pg_debug = 'Y'
620: THEN
621: ar_invoice_utils.debug ('Line Type = LINE ' );
622: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
623: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
624: END IF;
625:
626: /* 4188835 - removed tax code defaulting logic */
619: IF pg_debug = 'Y'
620: THEN
621: ar_invoice_utils.debug ('Line Type = LINE ' );
622: ar_invoice_utils.debug ('Cust. Trx Line Id '|| l_customer_trx_line_id );
623: ar_invoice_utils.debug ('Calling insert_trx_lines (+)' );
624: END IF;
625:
626: /* 4188835 - removed tax code defaulting logic */
627:
636: return;
637: END IF;
638: IF pg_debug = 'Y'
639: THEN
640: ar_invoice_utils.debug ('Calling insert_trx_lines (-)' );
641: END IF;
642:
643: -- derive the GL and trx date if trx_class is not CM
644: IF ( ( ar_trx_header_rec.trx_class <> 'CM' )
664: THEN
665: -- Create Sales Credit
666: IF pg_debug = 'Y'
667: THEN
668: ar_invoice_utils.debug ('Calling sales credit (+)' );
669: END IF;
670: -- before defaulting check whether user has passed
671: -- sales credit or not. If user has passed sales credit
672: -- then don't default the sales credit.
686: return;
687: END IF;
688: IF pg_debug = 'Y'
689: THEN
690: ar_invoice_utils.debug ('Calling sales credit (-)' );
691: END IF;
692: END IF;
693:
694: /* 4188835 - removed line-level call to
724: EXCEPTION
725: WHEN OTHERS THEN
726: IF pg_debug = 'Y'
727: THEN
728: ar_invoice_utils.debug ('Error fetching ship_vi, ship_actual_date : ' ||sqlerrm );
729: END IF;
730: END;
731: /* Changes for Bug 5398561 ends. */
732:
754:
755: END IF;
756: IF pg_debug = 'Y'
757: THEN
758: ar_invoice_utils.debug ('CC id '|| l_ccid);
759: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
760: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
761: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
762: END IF;
755: END IF;
756: IF pg_debug = 'Y'
757: THEN
758: ar_invoice_utils.debug ('CC id '|| l_ccid);
759: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
760: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
761: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
762: END IF;
763:
756: IF pg_debug = 'Y'
757: THEN
758: ar_invoice_utils.debug ('CC id '|| l_ccid);
759: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
760: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
761: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
762: END IF;
763:
764: ELSIF ar_trx_lines_rec.line_type = 'TAX'
757: THEN
758: ar_invoice_utils.debug ('CC id '|| l_ccid);
759: ar_invoice_utils.debug ('Con cat segments '|| l_concat_segments);
760: ar_invoice_utils.debug ('No. of rows failed '|| l_num_failed_dist_rows);
761: ar_invoice_utils.debug ('Calling auto accounting for line (-)' );
762: END IF;
763:
764: ELSIF ar_trx_lines_rec.line_type = 'TAX'
765: THEN
764: ELSIF ar_trx_lines_rec.line_type = 'TAX'
765: THEN
766: IF pg_debug = 'Y'
767: THEN
768: ar_invoice_utils.debug ('Line Type = TAX (+)' );
769: END IF;
770:
771: /* 4188835 - Removed entire manual tax block. This behavior
772: is now handled in arp_etax_invapi_util.calculate_tax */
773:
774: END IF; -- end of if line_type = 'LINE'
775: IF pg_debug = 'Y'
776: THEN
777: ar_invoice_utils.debug ('Line Type = LINE (-)' );
778: END IF;
779: END LOOP;
780:
781: IF l_tax_error_flag = 'Y'
817:
818: /* call autoaccounting for REC first -- needed by etax call below */
819: IF pg_debug = 'Y'
820: THEN
821: ar_invoice_utils.debug('calling autoaccounting for REC');
822: END IF;
823:
824: arp_auto_accounting.do_autoaccounting(
825: 'I',
842: l_num_failed_dist_rows);
843:
844: IF pg_debug = 'Y'
845: THEN
846: ar_invoice_utils.debug('calling etax for entire API batch');
847: END IF;
848:
849: arp_etax_invapi_util.calculate_tax(g_request_id, l_etax_error_count,
850: l_return_status);
860: END IF;
861:
862: IF (nvl(l_etax_error_count, 0) > 0)
863: THEN
864: ar_invoice_utils.debug('EXCEPTION: etax error count = ' || l_etax_error_count);
865: END IF;
866:
867: FOR ar_trx_header_rec IN ar_trx_header_c
868: LOOP
869: l_creation_sign :=ar_trx_header_rec.CREATION_SIGN;
870: select sum(extended_amount) into l_amount
871: from ra_customer_trx_lines
872: where customer_trx_id=ar_trx_header_rec.CUSTOMER_TRX_ID;
873: ar_invoice_utils.debug('l_creation_sign:'||l_creation_sign);
874: ar_invoice_utils.debug('l_amount:'||l_amount);
875: ar_invoice_utils.debug('CUSTOMER_TRX_ID:'||ar_trx_header_rec.CUSTOMER_TRX_ID);
876:
877: IF ( l_creation_sign = 'A' ) THEN
870: select sum(extended_amount) into l_amount
871: from ra_customer_trx_lines
872: where customer_trx_id=ar_trx_header_rec.CUSTOMER_TRX_ID;
873: ar_invoice_utils.debug('l_creation_sign:'||l_creation_sign);
874: ar_invoice_utils.debug('l_amount:'||l_amount);
875: ar_invoice_utils.debug('CUSTOMER_TRX_ID:'||ar_trx_header_rec.CUSTOMER_TRX_ID);
876:
877: IF ( l_creation_sign = 'A' ) THEN
878: NULL;
871: from ra_customer_trx_lines
872: where customer_trx_id=ar_trx_header_rec.CUSTOMER_TRX_ID;
873: ar_invoice_utils.debug('l_creation_sign:'||l_creation_sign);
874: ar_invoice_utils.debug('l_amount:'||l_amount);
875: ar_invoice_utils.debug('CUSTOMER_TRX_ID:'||ar_trx_header_rec.CUSTOMER_TRX_ID);
876:
877: IF ( l_creation_sign = 'A' ) THEN
878: NULL;
879: ELSIF ( l_creation_sign = 'P' ) THEN
900: end loop;
901:
902: IF pg_debug = 'Y'
903: THEN
904: ar_invoice_utils.debug ('calling autoaccounting for ALL (except REC)' );
905: END IF;
906:
907: arp_auto_accounting.do_autoaccounting(
908: 'I',
925: l_num_failed_dist_rows);
926:
927: IF pg_debug = 'Y'
928: THEN
929: ar_invoice_utils.debug ('No. of Rows failed ' || l_num_failed_dist_rows);
930: ar_invoice_utils.debug ('returning from arp_auto_accounting.do_autoaccounting(-)' );
931: END IF;
932:
933: IF l_num_failed_dist_rows > 0
926:
927: IF pg_debug = 'Y'
928: THEN
929: ar_invoice_utils.debug ('No. of Rows failed ' || l_num_failed_dist_rows);
930: ar_invoice_utils.debug ('returning from arp_auto_accounting.do_autoaccounting(-)' );
931: END IF;
932:
933: IF l_num_failed_dist_rows > 0
934: OR l_etax_error_count > 0
941:
942: -- call mrc engine
943: IF pg_debug = 'Y'
944: THEN
945: ar_invoice_utils.debug ('Calling MRC Engine (+)' );
946: ar_invoice_utils.debug ('Request Id '|| to_char(g_request_id) );
947: END IF;
948: /*---------------------------------+
949: | Calling central MRC library |
942: -- call mrc engine
943: IF pg_debug = 'Y'
944: THEN
945: ar_invoice_utils.debug ('Calling MRC Engine (+)' );
946: ar_invoice_utils.debug ('Request Id '|| to_char(g_request_id) );
947: END IF;
948: /*---------------------------------+
949: | Calling central MRC library |
950: | for MRC Integration |
953: p_request_id => g_request_id,
954: p_table_name => 'RAXTRX');
955: IF pg_debug = 'Y'
956: THEN
957: ar_invoice_utils.debug ('Calling MRC Engine (-)' );
958: ar_invoice_utils.debug ('callling post commit process with complete flag = Y(+)' );
959: END IF;
960:
961: /* Second loop to do final completion tasks */
954: p_table_name => 'RAXTRX');
955: IF pg_debug = 'Y'
956: THEN
957: ar_invoice_utils.debug ('Calling MRC Engine (-)' );
958: ar_invoice_utils.debug ('callling post commit process with complete flag = Y(+)' );
959: END IF;
960:
961: /* Second loop to do final completion tasks */
962: FOR ar_trx_header_rec IN ar_trx_header_c
963: LOOP
964:
965: IF pg_debug = 'Y'
966: THEN
967: ar_invoice_utils.debug ('set Term in use (+)' );
968: ar_invoice_utils.debug ('Term Id '|| ar_trx_header_rec.term_id );
969: END IF;
970:
971: arp_trx_util.set_term_in_use_flag(
964:
965: IF pg_debug = 'Y'
966: THEN
967: ar_invoice_utils.debug ('set Term in use (+)' );
968: ar_invoice_utils.debug ('Term Id '|| ar_trx_header_rec.term_id );
969: END IF;
970:
971: arp_trx_util.set_term_in_use_flag(
972: p_form_name => 'AR_INVOICE_API',
974: p_term_id => ar_trx_header_rec.term_id,
975: p_term_in_use_flag => null);
976: IF pg_debug = 'Y'
977: THEN
978: ar_invoice_utils.debug ('set Term in use (-)' );
979: ar_invoice_utils.debug ('arp_global.request_id BEFORE CHANGES'||arp_global.request_id );
980: END IF;
981:
982: /* 5921925 - Streamlined completion logic */
975: p_term_in_use_flag => null);
976: IF pg_debug = 'Y'
977: THEN
978: ar_invoice_utils.debug ('set Term in use (-)' );
979: ar_invoice_utils.debug ('arp_global.request_id BEFORE CHANGES'||arp_global.request_id );
980: END IF;
981:
982: /* 5921925 - Streamlined completion logic */
983: BEGIN
991: IF(g_request_id IS NOT NULL) THEN
992: arp_global.request_id := g_request_id;
993: END IF;
994:
995: ar_invoice_utils.debug ('arp_global.request_id AFTER CHANGES'||arp_global.request_id );
996:
997: IF (arp_rounding.correct_dist_rounding_errors
998: (null, -- request_id
999: ar_trx_header_rec.customer_trx_id,
1114: END LOOP; /* End of completion loop */
1115:
1116: IF pg_debug = 'Y'
1117: THEN
1118: ar_invoice_utils.debug ('Insert_row(-)' );
1119: END IF;
1120: EXCEPTION
1121: WHEN OTHERS THEN
1122: cleanup(p_customer_trx_id => l_cust_trx_id);