299: BEGIN
300:
301: IF FND_GLOBAL.CONC_REQUEST_ID is not null THEN
302:
303: fnd_file.put_line(FND_FILE.LOG,p_message);
304:
305: END IF;
306:
307: IF PG_DEBUG in ('Y', 'C') THEN
416: l_batch_id RA_BATCHES.batch_id%TYPE;
417:
418: BEGIN
419:
420: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.auto_create_br_program (+)');
421:
422: --------------------------------------------------------------
423: -- Date Conversions
424: --------------------------------------------------------------
535: IF (g_num_br_failed > 0)
536: THEN
537: IF errorinv.EXISTS(g_ctr-1)
538: THEN
539: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
540: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
541:
542: FND_MESSAGE.SET_NAME('AR','AR_BR_INVALID_TRX_WARNING');
543: l_error_mesg := FND_MESSAGE.GET;
536: THEN
537: IF errorinv.EXISTS(g_ctr-1)
538: THEN
539: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
540: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
541:
542: FND_MESSAGE.SET_NAME('AR','AR_BR_INVALID_TRX_WARNING');
543: l_error_mesg := FND_MESSAGE.GET;
544: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_mesg);
540: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
541:
542: FND_MESSAGE.SET_NAME('AR','AR_BR_INVALID_TRX_WARNING');
543: l_error_mesg := FND_MESSAGE.GET;
544: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_mesg);
545:
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
542: FND_MESSAGE.SET_NAME('AR','AR_BR_INVALID_TRX_WARNING');
543: l_error_mesg := FND_MESSAGE.GET;
544: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_mesg);
545:
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
543: l_error_mesg := FND_MESSAGE.GET;
544: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_mesg);
545:
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
551:
544: FND_FILE.PUT_LINE(FND_FILE.LOG, l_error_mesg);
545:
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
551:
552: FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction Number'||rpad(' ',8)||'Payment
545:
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
551:
552: FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction Number'||rpad(' ',8)||'Payment
553: Schedule Id'||rpad(' ',7)||'Customer Trx Id'||rpad(' ',11));
546: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
547: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
551:
552: FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction Number'||rpad(' ',8)||'Payment
553: Schedule Id'||rpad(' ',7)||'Customer Trx Id'||rpad(' ',11));
554:
548: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
549: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
550: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
551:
552: FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction Number'||rpad(' ',8)||'Payment
553: Schedule Id'||rpad(' ',7)||'Customer Trx Id'||rpad(' ',11));
554:
555: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------'||rpad(' ',8)||'-------------------'||rpad(' ',7)||'---------------'||rpad(' ',11));
556:
551:
552: FND_FILE.PUT_LINE(FND_FILE.LOG,'Transaction Number'||rpad(' ',8)||'Payment
553: Schedule Id'||rpad(' ',7)||'Customer Trx Id'||rpad(' ',11));
554:
555: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------'||rpad(' ',8)||'-------------------'||rpad(' ',7)||'---------------'||rpad(' ',11));
556:
557: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
558:
559: FOR l_ctr IN errorinv.FIRST .. errorinv.LAST LOOP
553: Schedule Id'||rpad(' ',7)||'Customer Trx Id'||rpad(' ',11));
554:
555: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------'||rpad(' ',8)||'-------------------'||rpad(' ',7)||'---------------'||rpad(' ',11));
556:
557: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
558:
559: FOR l_ctr IN errorinv.FIRST .. errorinv.LAST LOOP
560: FND_FILE.PUT_LINE(FND_FILE.LOG,' ' || rpad(errorinv(l_ctr).trx_number,26)|| rpad(errorinv(l_ctr).payment_schedule_id,26) || rpad(errorinv(l_ctr).customer_trx_id,26));
561: END LOOP;
556:
557: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
558:
559: FOR l_ctr IN errorinv.FIRST .. errorinv.LAST LOOP
560: FND_FILE.PUT_LINE(FND_FILE.LOG,' ' || rpad(errorinv(l_ctr).trx_number,26)|| rpad(errorinv(l_ctr).payment_schedule_id,26) || rpad(errorinv(l_ctr).customer_trx_id,26));
561: END LOOP;
562: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
563:
564: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
558:
559: FOR l_ctr IN errorinv.FIRST .. errorinv.LAST LOOP
560: FND_FILE.PUT_LINE(FND_FILE.LOG,' ' || rpad(errorinv(l_ctr).trx_number,26)|| rpad(errorinv(l_ctr).payment_schedule_id,26) || rpad(errorinv(l_ctr).customer_trx_id,26));
561: END LOOP;
562: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
563:
564: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
565: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
566: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
560: FND_FILE.PUT_LINE(FND_FILE.LOG,' ' || rpad(errorinv(l_ctr).trx_number,26)|| rpad(errorinv(l_ctr).payment_schedule_id,26) || rpad(errorinv(l_ctr).customer_trx_id,26));
561: END LOOP;
562: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
563:
564: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
565: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
566: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
567:
568: END IF;
561: END LOOP;
562: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
563:
564: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
565: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
566: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
567:
568: END IF;
569: END IF ;
562: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
563:
564: FND_FILE.PUT_LINE(FND_FILE.LOG,'*******************************************************************');
565: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
566: FND_FILE.PUT_LINE(FND_FILE.LOG,' ');
567:
568: END IF;
569: END IF ;
570:
572: ARP_PROGRAM_GENERATE_BR.drop_tmp_table;
573:
574: COMMIT;
575:
576: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.auto_create_br_program (-)');
577:
578: EXCEPTION
579: WHEN OTHERS THEN
580: --Temporary table Drop
578: EXCEPTION
579: WHEN OTHERS THEN
580: --Temporary table Drop
581: ARP_PROGRAM_GENERATE_BR.drop_tmp_table;
582: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.auto_create_br_program');
583: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
584: RAISE;
585:
586: END auto_create_br_program;
579: WHEN OTHERS THEN
580: --Temporary table Drop
581: ARP_PROGRAM_GENERATE_BR.drop_tmp_table;
582: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.auto_create_br_program');
583: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
584: RAISE;
585:
586: END auto_create_br_program;
587:
628: l_request_id NUMBER;
629:
630: BEGIN
631:
632: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_automatic_batch_window (+)');
633:
634: -- Temporary table Creation
635: ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table;
636:
671: print_BR_pvt(p_batch_id,1,l_request_id);
672: END IF;
673: END IF;
674:
675: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_automatic_batch_window (-)');
676:
677: EXCEPTION
678: WHEN OTHERS THEN
679: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.from_automatic_batch_window');
675: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_automatic_batch_window (-)');
676:
677: EXCEPTION
678: WHEN OTHERS THEN
679: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.from_automatic_batch_window');
680: RAISE;
681:
682: END from_automatic_batch_window;
683:
749: l_request_id NUMBER;
750:
751: BEGIN
752:
753: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_conc_request_window (+)');
754:
755: -- Temporary table Creation
756: ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table;
757:
837: print_BR_pvt(l_batch_id,2,l_request_id);
838: END IF;
839: END IF;
840:
841: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_conc_request_window (-)');
842:
843: EXCEPTION
844: WHEN OTHERS THEN
845: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.from_conc_request_window');
841: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.from_conc_request_window (-)');
842:
843: EXCEPTION
844: WHEN OTHERS THEN
845: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.from_conc_request_window');
846: RAISE;
847:
848: END from_conc_request_window;
849:
920: l_name RA_BATCHES.name%TYPE;
921:
922: BEGIN
923:
924: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.create_batch_header (+)');
925:
926: l_issue_date := p_issue_date;
927:
928: --------------------------------------------------------------
999: l_selection_criteria_id,
1000: l_batch_id,
1001: l_name);
1002:
1003: FND_FILE.PUT_LINE(FND_FILE.LOG,'Insert the BR Creation Batch name:'||l_name);
1004:
1005: p_selection_criteria_id := l_selection_criteria_id;
1006: p_batch_id := l_batch_id;
1007:
1006: p_batch_id := l_batch_id;
1007:
1008: COMMIT;
1009:
1010: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.create_batch_header (-)');
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.create_batch_header');
1010: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.create_batch_header (-)');
1011:
1012: EXCEPTION
1013: WHEN OTHERS THEN
1014: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.create_batch_header');
1015: RAISE;
1016:
1017: END create_batch_header;
1018:
1050:
1051:
1052: BEGIN
1053:
1054: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.update_batch_status (+)');
1055:
1056: -- fetch the batch
1057: arp_tbat_pkg.lock_fetch_p(l_batch_rec,p_batch_id);
1058:
1120: l_selection_criteria_id);
1121:
1122: COMMIT;
1123:
1124: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.update_batch_status (-)');
1125:
1126: EXCEPTION
1127: WHEN OTHERS THEN
1128: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.update_batch_status');
1124: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.update_batch_status (-)');
1125:
1126: EXCEPTION
1127: WHEN OTHERS THEN
1128: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.update_batch_status');
1129: RAISE;
1130:
1131: END update_batch_status;
1132:
1318:
1319: BEGIN
1320:
1321: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1322: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (+)');
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1319: BEGIN
1320:
1321: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1322: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (+)');
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1320:
1321: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1322: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (+)');
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1321: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1322: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (+)');
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1322: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (+)');
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1323: FND_FILE.PUT_LINE(FND_FILE.LOG,'Dump of Parameters');
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1324: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1325: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1326: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1327: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1328: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1336: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
1329: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1336: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
1337: END IF;
1330: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1336: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
1337: END IF;
1338:
1331: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1336: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
1337: END IF;
1338:
1339: --------------------------------------------------------------------------
1332: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
1333: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
1334: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
1335: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
1336: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
1337: END IF;
1338:
1339: --------------------------------------------------------------------------
1340: ---- FIRST LOOP
1358: l_customer_bank_account_id := -999;
1359: EXIT WHEN c_receipt_method%NOTFOUND;
1360:
1361: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1362: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1359: EXIT WHEN c_receipt_method%NOTFOUND;
1360:
1361: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1362: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1360:
1361: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1362: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1361: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1362: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1362: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1363: FND_FILE.PUT_LINE(FND_FILE.LOG,'Receipt Method Details');
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1364: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_method_id :'||l_receipt_method_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1365: FND_FILE.PUT_LINE(FND_FILE.LOG,'receipt_creation_rule_code:'||l_receipt_creation_rule_code);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1373: FND_FILE.PUT_LINE(FND_FILE.LOG,'customer_bank_account_id :'||l_customer_bank_account_id);
1366: FND_FILE.PUT_LINE(FND_FILE.LOG,'lead days :'||l_lead_days);
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1373: FND_FILE.PUT_LINE(FND_FILE.LOG,'customer_bank_account_id :'||l_customer_bank_account_id);
1374: END IF;
1367: FND_FILE.PUT_LINE(FND_FILE.LOG,'maturity_date_rule_code :'||l_maturity_date_rule_code);
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1373: FND_FILE.PUT_LINE(FND_FILE.LOG,'customer_bank_account_id :'||l_customer_bank_account_id);
1374: END IF;
1375:
1368: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_min_acctd_amount :'||l_br_min_acctd_amount);
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1373: FND_FILE.PUT_LINE(FND_FILE.LOG,'customer_bank_account_id :'||l_customer_bank_account_id);
1374: END IF;
1375:
1376: -- Setup of the next cursor according to the handled receipt method
1369: FND_FILE.PUT_LINE(FND_FILE.LOG,'br_max_acctd_amount :'||l_br_max_acctd_amount);
1370: FND_FILE.PUT_LINE(FND_FILE.LOG,'invoice_currency_code :'||l_invoice_currency_code);
1371: FND_FILE.PUT_LINE(FND_FILE.LOG,'exchange_rate :'||l_exchange_rate);
1372: FND_FILE.PUT_LINE(FND_FILE.LOG,'legal_entity_id :'||l_le_id);
1373: FND_FILE.PUT_LINE(FND_FILE.LOG,'customer_bank_account_id :'||l_customer_bank_account_id);
1374: END IF;
1375:
1376: -- Setup of the next cursor according to the handled receipt method
1377: -- Bug 3922691 : pass additional parameters to construct_suffixe_select,
1420: ' ORDER BY ps.customer_id ';
1421:
1422: if l_print1 AND (p_call <> 3 OR PG_DEBUG in ('Y', 'C')) THEN
1423: l_print1 := FALSE;
1424: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1425: FND_FILE.PUT_LINE(FND_FILE.LOG,'This select will get all distinct customer_ids');
1426: FND_FILE.PUT_LINE(FND_FILE.LOG,l_trx_select_statement);
1427: end if;
1428:
1421:
1422: if l_print1 AND (p_call <> 3 OR PG_DEBUG in ('Y', 'C')) THEN
1423: l_print1 := FALSE;
1424: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1425: FND_FILE.PUT_LINE(FND_FILE.LOG,'This select will get all distinct customer_ids');
1426: FND_FILE.PUT_LINE(FND_FILE.LOG,l_trx_select_statement);
1427: end if;
1428:
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1422: if l_print1 AND (p_call <> 3 OR PG_DEBUG in ('Y', 'C')) THEN
1423: l_print1 := FALSE;
1424: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1425: FND_FILE.PUT_LINE(FND_FILE.LOG,'This select will get all distinct customer_ids');
1426: FND_FILE.PUT_LINE(FND_FILE.LOG,l_trx_select_statement);
1427: end if;
1428:
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1426: FND_FILE.PUT_LINE(FND_FILE.LOG,l_trx_select_statement);
1427: end if;
1428:
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1427: end if;
1428:
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1428:
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1429: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1437: fnd_file.put_line(fnd_file.log,'l_trx_st:'||l_trx_select_statement);
1430: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1437: fnd_file.put_line(fnd_file.log,'l_trx_st:'||l_trx_select_statement);
1438:
1431: FND_FILE.PUT_LINE(FND_FILE.LOG,'Opening c_customer with the following parameters :');
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1437: fnd_file.put_line(fnd_file.log,'l_trx_st:'||l_trx_select_statement);
1438:
1439: END IF;
1432: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_receipt_method_id : ' || to_char(l_receipt_method_id));
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1437: fnd_file.put_line(fnd_file.log,'l_trx_st:'||l_trx_select_statement);
1438:
1439: END IF;
1440:
1433: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_invoice_currency_code : ' || l_invoice_currency_code);
1434: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_exchange_rate : ' || to_char(l_exchange_rate));
1435: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_customer_bank_account_id : ' || to_char(l_customer_bank_account_id));
1436: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_le_id : ' || to_char(l_le_id));
1437: fnd_file.put_line(fnd_file.log,'l_trx_st:'||l_trx_select_statement);
1438:
1439: END IF;
1440:
1441: OPEN c_customer FOR l_trx_select_statement
1467:
1468: EXIT WHEN c_customer%NOTFOUND;
1469:
1470: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1471: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------------------------------------');
1472: FND_FILE.PUT_LINE(FND_FILE.LOG,'...Processing c_customer, customer_id :'||l_customer_id);
1473: END IF;
1474:
1475: -- 4109513 : Now that we have customer_id, rebuild l_trx_select_statement
1468: EXIT WHEN c_customer%NOTFOUND;
1469:
1470: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1471: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------------------------------------');
1472: FND_FILE.PUT_LINE(FND_FILE.LOG,'...Processing c_customer, customer_id :'||l_customer_id);
1473: END IF;
1474:
1475: -- 4109513 : Now that we have customer_id, rebuild l_trx_select_statement
1476: -- to make it more selective on ps.customer_id
1539:
1540: -- bug 3888842
1541: if l_print AND (p_call <> 3 OR PG_DEBUG in ('Y', 'C')) THEN
1542: l_print := FALSE;
1543: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1544: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_trx_select_statement = ' || l_trx_select_statement);
1545: end if;
1546:
1547: -- process receipt method id Banks
1540: -- bug 3888842
1541: if l_print AND (p_call <> 3 OR PG_DEBUG in ('Y', 'C')) THEN
1542: l_print := FALSE;
1543: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------') ;
1544: FND_FILE.PUT_LINE(FND_FILE.LOG,'l_trx_select_statement = ' || l_trx_select_statement);
1545: end if;
1546:
1547: -- process receipt method id Banks
1548: OPEN c_rm_bank(l_receipt_method_id,l_customer_id);
1554:
1555: EXIT WHEN c_rm_bank%NOTFOUND;
1556:
1557: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1558: FND_FILE.PUT_LINE(FND_FILE.LOG,'......Processing c_rm_bank, customer_id : ' ||
1559: to_char(l_customer_id) || ' ' ||
1560: ' bank_account : ' || to_char(l_customer_bank_account_id2));
1561: END IF;
1562:
1614: EXIT WHEN c_grouping%NOTFOUND;
1615:
1616: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1617: IF (l_receipt_creation_rule_code = 'PER_CUSTOMER') THEN
1618: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_id :'||l_customer_id2);
1619: ELSIF (l_receipt_creation_rule_code = 'PER_CUSTOMER_DUE_DATE') THEN
1620: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_id :'||
1621: l_customer_id2||' due date :'||l_due_date);
1622: ELSIF (l_receipt_creation_rule_code = 'PER_SITE') THEN
1616: IF p_call <> 3 OR PG_DEBUG in ('Y', 'C') THEN
1617: IF (l_receipt_creation_rule_code = 'PER_CUSTOMER') THEN
1618: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_id :'||l_customer_id2);
1619: ELSIF (l_receipt_creation_rule_code = 'PER_CUSTOMER_DUE_DATE') THEN
1620: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_id :'||
1621: l_customer_id2||' due date :'||l_due_date);
1622: ELSIF (l_receipt_creation_rule_code = 'PER_SITE') THEN
1623: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id);
1624: ELSIF (l_receipt_creation_rule_code = 'PER_SITE_DUE_DATE') THEN
1619: ELSIF (l_receipt_creation_rule_code = 'PER_CUSTOMER_DUE_DATE') THEN
1620: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_id :'||
1621: l_customer_id2||' due date :'||l_due_date);
1622: ELSIF (l_receipt_creation_rule_code = 'PER_SITE') THEN
1623: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id);
1624: ELSIF (l_receipt_creation_rule_code = 'PER_SITE_DUE_DATE') THEN
1625: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id||
1626: ' due date :'||l_due_date);
1627: ELSIF (l_receipt_creation_rule_code = 'PER_INVOICE') THEN
1621: l_customer_id2||' due date :'||l_due_date);
1622: ELSIF (l_receipt_creation_rule_code = 'PER_SITE') THEN
1623: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id);
1624: ELSIF (l_receipt_creation_rule_code = 'PER_SITE_DUE_DATE') THEN
1625: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id||
1626: ' due date :'||l_due_date);
1627: ELSIF (l_receipt_creation_rule_code = 'PER_INVOICE') THEN
1628: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_trx_id :'||l_customer_trx_id);
1629: ELSE
1624: ELSIF (l_receipt_creation_rule_code = 'PER_SITE_DUE_DATE') THEN
1625: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, site_use_id :'||l_site_use_id||
1626: ' due date :'||l_due_date);
1627: ELSIF (l_receipt_creation_rule_code = 'PER_INVOICE') THEN
1628: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_trx_id :'||l_customer_trx_id);
1629: ELSE
1630: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, payment_schedule_id :'||
1631: l_payment_schedule_id);
1632: END IF;
1626: ' due date :'||l_due_date);
1627: ELSIF (l_receipt_creation_rule_code = 'PER_INVOICE') THEN
1628: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, customer_trx_id :'||l_customer_trx_id);
1629: ELSE
1630: FND_FILE.PUT_LINE(FND_FILE.LOG,'.........Processing c_grouping, payment_schedule_id :'||
1631: l_payment_schedule_id);
1632: END IF;
1633: END IF;
1634:
1723: after printing messages in the log file.*/
1724:
1725: EXCEPTION
1726: WHEN OTHERS THEN
1727: FND_FILE.PUT_LINE(FND_FILE.LOG,'Creation error for this BR ');
1728: g_num_br_failed := g_num_br_failed + 1;
1729:
1730: BEGIN
1731:
1750: CLOSE c2;
1751:
1752: EXCEPTION
1753: WHEN OTHERS THEN
1754: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception : While Inserting into the table errorinv');
1755: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
1756: END ;
1757:
1758: END ;
1751:
1752: EXCEPTION
1753: WHEN OTHERS THEN
1754: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception : While Inserting into the table errorinv');
1755: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
1756: END ;
1757:
1758: END ;
1759:
1829: l_request_id);
1830:
1831: EXCEPTION
1832: WHEN OTHERS THEN
1833: FND_FILE.PUT_LINE(FND_FILE.LOG,'Creation error for this BR ');
1834: g_num_br_failed := g_num_br_failed + 1;
1835:
1836: BEGIN
1837:
1856: CLOSE c2;
1857:
1858: EXCEPTION
1859: WHEN OTHERS THEN
1860: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception : While Inserting into the table errorinv');
1861: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
1862: END ;
1863:
1864: END ;
1857:
1858: EXCEPTION
1859: WHEN OTHERS THEN
1860: FND_FILE.PUT_LINE(FND_FILE.LOG,'Exception : While Inserting into the table errorinv');
1861: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
1862: END ;
1863:
1864: END ;
1865:
1874: END LOOP;
1875: CLOSE c_receipt_method;
1876:
1877:
1878: FND_FILE.PUT_LINE(FND_FILE.LOG,'The process has generated '||g_num_br_created||' Bills receivable');
1879: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (-)');
1880:
1881: EXCEPTION
1882: WHEN OTHERS THEN
1875: CLOSE c_receipt_method;
1876:
1877:
1878: FND_FILE.PUT_LINE(FND_FILE.LOG,'The process has generated '||g_num_br_created||' Bills receivable');
1879: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (-)');
1880:
1881: EXCEPTION
1882: WHEN OTHERS THEN
1883: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR');
1879: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR (-)');
1880:
1881: EXCEPTION
1882: WHEN OTHERS THEN
1883: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_trx_and_create_BR');
1884:
1885: IF c_grouping%ISOPEN THEN
1886: CLOSE c_grouping;
1887: END IF;
1919: l_trx_select_statement VARCHAR2(4000) := NULL;
1920:
1921: BEGIN
1922:
1923: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'construct_hz (+)');
1924:
1925: /*
1926: Bug 1710187 :
1927:
1969:
1970:
1971: p_suffix_hz := l_trx_select_statement;
1972:
1973: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'construct_hz (-)');
1974:
1975: EXCEPTION
1976: WHEN OTHERS THEN
1977: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.construct_hz');
1973: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'construct_hz (-)');
1974:
1975: EXCEPTION
1976: WHEN OTHERS THEN
1977: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.construct_hz');
1978: RAISE;
1979: END;
1980:
1981:
2034: l_trx_select_statement VARCHAR2(4000) := NULL;
2035:
2036: BEGIN
2037:
2038: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.construct_suffixe_select (+)');
2039:
2040: /* modified for tca uptake */
2041:
2042: /* Bug 1744783 : for transactions with multiple payment schedule records,
2204: END IF;
2205:
2206: p_suffixe_select_statement := l_trx_select_statement;
2207:
2208: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.construct_suffixe_select (-)');
2209:
2210: EXCEPTION
2211: WHEN OTHERS THEN
2212: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.construct_suffixe_select');
2208: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.construct_suffixe_select (-)');
2209:
2210: EXCEPTION
2211: WHEN OTHERS THEN
2212: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.construct_suffixe_select');
2213: RAISE;
2214:
2215: END construct_suffixe_select;
2216:
2289: l_org_id AR_PAYMENT_SCHEDULES.org_id%TYPE;
2290:
2291: BEGIN
2292:
2293: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM (+)');
2294:
2295: l_delete_statement := 'DELETE FROM '|| g_tmp_table_imm;
2296: execute immediate l_delete_statement;
2297:
2295: l_delete_statement := 'DELETE FROM '|| g_tmp_table_imm;
2296: execute immediate l_delete_statement;
2297:
2298: IF p_receipt_creation_rule_code = 'PER_INVOICE' THEN
2299: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'grouping rule PER INVOICE -> no DM/CM Immediate');
2300: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM (-)');
2301: RETURN;
2302: END IF;
2303:
2296: execute immediate l_delete_statement;
2297:
2298: IF p_receipt_creation_rule_code = 'PER_INVOICE' THEN
2299: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'grouping rule PER INVOICE -> no DM/CM Immediate');
2300: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM (-)');
2301: RETURN;
2302: END IF;
2303:
2304: -- If a Credit/Debit Note has been created with a payment term of immediate,
2346: ps.customer_id,ps.customer_site_use_id,ps.trx_number,ps.due_date,
2347: ps.amount_due_remaining, ps.org_id '||l_trx_select_statement;
2348:
2349: /*
2350: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3IMM');
2351: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2347: ps.amount_due_remaining, ps.org_id '||l_trx_select_statement;
2348:
2349: /*
2350: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3IMM');
2351: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2348:
2349: /*
2350: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3IMM');
2351: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2350: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3IMM');
2351: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2351: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2352: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2353:
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2354: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2355: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2356: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2357: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2358: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2359: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2360: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2361: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2369: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2362: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2369: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2370: */
2363: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2369: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2370: */
2371:
2364: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2369: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2370: */
2371:
2372: OPEN c_trx FOR l_trx_select_statement
2365: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2366: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2367: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2368: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2369: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2370: */
2371:
2372: OPEN c_trx FOR l_trx_select_statement
2373: using p_due_date_low,
2425: l_due_date,
2426: l_amount_due_remaining,
2427: l_org_id;
2428: /*
2429: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_DM_and_CM_IMM:'||l_payment_schedule_id||' '||
2430: l_customer_trx_id||' '||l_trx_number|| ' '||l_customer_site_use_id||' '||
2431: l_due_date||' '||l_amount_due_remaining);
2432: */
2433:
2447: execute immediate l_delete_statement;
2448:
2449: END IF;
2450:
2451: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM (-)');
2452:
2453: EXCEPTION
2454: WHEN OTHERS THEN
2455: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM');
2451: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM (-)');
2452:
2453: EXCEPTION
2454: WHEN OTHERS THEN
2455: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_DM_and_CM_IMM');
2456:
2457: IF c_trx%ISOPEN THEN
2458: CLOSE c_trx;
2459: END IF;
2535: l_org_id AR_PAYMENT_SCHEDULES.org_id%TYPE;
2536:
2537: BEGIN
2538:
2539: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_NIMM (+)');
2540:
2541: l_delete_statement := 'DELETE FROM '|| g_tmp_table_nimm;
2542: execute immediate l_delete_statement;
2543:
2600: ps.customer_id,ps.customer_site_use_id,ps.trx_number,ps.due_date,
2601: ps.amount_due_remaining, ps.org_id '||l_trx_select_statement;
2602:
2603: /*
2604: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3');
2605: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2601: ps.amount_due_remaining, ps.org_id '||l_trx_select_statement;
2602:
2603: /*
2604: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3');
2605: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2602:
2603: /*
2604: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3');
2605: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2604: FND_FILE.PUT_LINE(FND_FILE.LOG,'DEBUG TOOL 3');
2605: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2605: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------------------------------------------------');
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2606: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_nimm: l_trx_select_statement = ' || l_trx_select_statement);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2607:
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2608: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_low = ' || p_due_date_low);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2609: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_due_date_high = ' || p_due_date_high);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2610: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_low = ' || p_trx_date_low);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2611: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_date_high = ' || p_trx_date_high);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2612: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_type_id = ' || p_trx_type_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2613: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_low = ' || p_trx_number_low);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2614: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_trx_number_high = ' || p_trx_number_high);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2615: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_class = ' || p_cust_class);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2616: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_cust_category = ' || p_cust_category);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2617: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_id = ' || p_customer_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2625: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_trx_id = ' || p_customer_trx_id);
2618: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_site_use_id = ' || p_site_use_id);
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2625: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_trx_id = ' || p_customer_trx_id);
2626: */
2619: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_method_id = ' || p_receipt_method_id);
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2625: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_trx_id = ' || p_customer_trx_id);
2626: */
2627:
2620: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_batch_id = ' || p_batch_id);
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2625: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_trx_id = ' || p_customer_trx_id);
2626: */
2627:
2628: OPEN c_trx FOR l_trx_select_statement
2621: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_invoice_currency_code = ' || p_invoice_currency_code);
2622: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_exchange_rate = ' || p_exchange_rate);
2623: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_bank_account_id = ' || p_customer_bank_account_id);
2624: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_payment_schedule_id = ' || p_payment_schedule_id);
2625: FND_FILE.PUT_LINE(FND_FILE.LOG,'p_customer_trx_id = ' || p_customer_trx_id);
2626: */
2627:
2628: OPEN c_trx FOR l_trx_select_statement
2629: using p_due_date_low,
2681: l_due_date,
2682: l_amount_due_remaining,
2683: l_org_id;
2684: /*
2685: FND_FILE.PUT_LINE(FND_FILE.LOG,'select_trx_NIMM:'||l_payment_schedule_id||' '||l_customer_trx_id||' '||l_trx_number||
2686: ' '||l_customer_site_use_id||' '||l_due_date||' '||l_amount_due_remaining);
2687: */
2688:
2689: END LOOP;
2688:
2689: END LOOP;
2690: CLOSE c_trx;
2691:
2692: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_NIMM (-)');
2693:
2694: EXCEPTION
2695: WHEN OTHERS THEN
2696: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_trx_NIMM');
2692: --FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.select_trx_NIMM (-)');
2693:
2694: EXCEPTION
2695: WHEN OTHERS THEN
2696: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.select_trx_NIMM');
2697:
2698: IF c_trx%ISOPEN THEN
2699: CLOSE c_trx;
2700: END IF;
2914: execute immediate l_sum_nimm_statement INTO l_tot_nimm;
2915: execute immediate l_sum_imm_statement INTO l_tot_imm;
2916: l_br_amount:= NVL(l_tot_nimm,0) + NVL(l_tot_imm,0);
2917:
2918: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'l_br_amount = ' || to_char(l_br_amount));
2919: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_creation_rule_code = ' || p_receipt_creation_rule_code);
2920:
2921: IF (p_receipt_creation_rule_code <> 'PER_INVOICE') THEN
2922:
2915: execute immediate l_sum_imm_statement INTO l_tot_imm;
2916: l_br_amount:= NVL(l_tot_nimm,0) + NVL(l_tot_imm,0);
2917:
2918: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'l_br_amount = ' || to_char(l_br_amount));
2919: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'p_receipt_creation_rule_code = ' || p_receipt_creation_rule_code);
2920:
2921: IF (p_receipt_creation_rule_code <> 'PER_INVOICE') THEN
2922:
2923:
2967: ' payment_schedule_id = :c_psid';
2968: EXECUTE IMMEDIATE l_update_statement USING c_psid;
2969: l_br_amount := l_br_amount - c_adr;
2970:
2971: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'excluding psid = ' || to_char(c_psid) ||
2972: -- ' amount = ' || to_char(c_adr) || ' l_br_amount now = ' || to_char(l_br_amount));
2973: END IF;
2974: */
2975: IF l_br_amount > p_br_max_acctd_amount THEN
2981: ' payment_schedule_id = :c_psid';
2982: EXECUTE IMMEDIATE l_update_statement USING c_psid;
2983: l_br_amount := l_br_amount - c_adr;
2984:
2985: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'excluding psid = ' || to_char(c_psid) ||
2986: -- ' amount = ' || to_char(c_adr) || ' l_br_amount now = ' || to_char(l_br_amount));
2987:
2988: END IF;
2989: END IF;
3987:
3988: g_num_br_created := g_num_br_created + 1;
3989:
3990: IF (p_call <> 3) THEN
3991: FND_FILE.PUT_LINE(FND_FILE.LOG,'the bill receivable '||l_bill_number||
3992: ' is created (amount='||l_br_amount||')');
3993:
3994: ELSIF (p_call = 3) THEN
3995: /* Action PRINT BR if the program is run from the transaction workbench and
4279: l_lead_days);
4280:
4281:
4282: EXCEPTION WHEN OTHERS THEN
4283: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION OTHERS: ARP_PROGRAM_GENERATE_BR.AR_BR_INSERT_INTO_REPORT_TABLE ');
4284: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4285: IF c_get_receipt_method%ISOPEN THEN
4286: CLOSE c_get_receipt_method;
4287: END IF;
4280:
4281:
4282: EXCEPTION WHEN OTHERS THEN
4283: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION OTHERS: ARP_PROGRAM_GENERATE_BR.AR_BR_INSERT_INTO_REPORT_TABLE ');
4284: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4285: IF c_get_receipt_method%ISOPEN THEN
4286: CLOSE c_get_receipt_method;
4287: END IF;
4288:
4347: l_user_schema VARCHAR2(30) := USER;
4348:
4349: BEGIN
4350:
4351: --FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table (+)');
4352:
4353: LOOP
4354:
4355:
4360: table_name_imm := l_prefixe_imm ||l_suffixe||to_char((compteur-1)*10);
4361: table_name_aimm := l_prefixe_aimm ||l_suffixe||to_char((compteur-1)*10);
4362:
4363: /*
4364: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_nimm = ' || table_name_nimm);
4365: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_imm = ' || table_name_imm);
4366: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_aimm = ' || table_name_aimm);
4367: */
4368:
4361: table_name_aimm := l_prefixe_aimm ||l_suffixe||to_char((compteur-1)*10);
4362:
4363: /*
4364: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_nimm = ' || table_name_nimm);
4365: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_imm = ' || table_name_imm);
4366: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_aimm = ' || table_name_aimm);
4367: */
4368:
4369: /* Bug 3441913/3432134 - suffix dba_ views with owner */
4362:
4363: /*
4364: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_nimm = ' || table_name_nimm);
4365: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_imm = ' || table_name_imm);
4366: FND_FILE.PUT_LINE(FND_FILE.LOG,'table_name_aimm = ' || table_name_aimm);
4367: */
4368:
4369: /* Bug 3441913/3432134 - suffix dba_ views with owner */
4370: /* Added owner predicate which ensure that comply with GSCC Standard - File.Sql.47 */
4431: amount_assigned NUMBER,
4432: exclude_flag VARCHAR2(1),
4433: org_id NUMBER(15))';
4434:
4435: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Creation of the temporary table '||table_name_nimm);
4436: execute immediate query_create;
4437:
4438: query_create := 'CREATE INDEX ' || 'ARBR_IND_NIMM' || l_suffixe || to_char((compteur-1)*10) || ' ON '
4439: || table_name_nimm || ' (customer_trx_id,amount_due_remaining)';
4456: amount_assigned NUMBER,
4457: exclude_flag VARCHAR2(1),
4458: org_id NUMBER(15))';
4459:
4460: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Creation of the temporary table '||table_name_imm);
4461: execute immediate query_create;
4462:
4463: query_create := 'CREATE INDEX ' || 'ARBR_IND_IMM' || l_suffixe || to_char((compteur-1)*10) || ' ON ' ||
4464: table_name_imm || ' (customer_trx_id,amount_due_remaining)';
4472:
4473: query_create := 'CREATE TABLE '|| table_name_aimm ||
4474: ' (payment_schedule_id NUMBER(15))';
4475:
4476: FND_FILE.PUT_LINE(FND_FILE.LOG,'Creation of the temporary table '||table_name_aimm);
4477: execute immediate query_create;
4478:
4479: query_create := 'CREATE INDEX ' || 'ARBR_IND_AIMM' || l_suffixe || to_char((compteur-1)*10) || ' ON ' ||
4480: table_name_aimm || ' (payment_schedule_id)';
4486: END IF;
4487:
4488: END LOOP;
4489:
4490: --FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table (-)');
4491:
4492: EXCEPTION
4493: WHEN OTHERS THEN
4494: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table');
4490: --FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table (-)');
4491:
4492: EXCEPTION
4493: WHEN OTHERS THEN
4494: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.arbr_cr_tmp_table');
4495: RAISE;
4496:
4497: END arbr_cr_tmp_table;
4498:
4528:
4529:
4530: BEGIN
4531:
4532: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.drop_tmp_table (+)');
4533:
4534: ----------------------------------------------------------------------------------------
4535: -- Drop of the temporary table for Transactions with a payment term of non immediate
4536: ----------------------------------------------------------------------------------------
4553: END;
4554:
4555:
4556: IF (nb_obj > 0) THEN
4557: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Drop of the temporary table '||g_tmp_table_nimm);
4558: query_drop := 'DROP table '||g_tmp_table_nimm;
4559: execute immediate query_drop;
4560: END IF;
4561:
4580:
4581: END;
4582:
4583: IF (nb_obj > 0) THEN
4584: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Drop of the temporary table '||g_tmp_table_imm);
4585: query_drop := 'DROP table '||g_tmp_table_imm;
4586: execute immediate query_drop;
4587: END IF;
4588:
4603:
4604: END;
4605:
4606: IF (nb_obj > 0) THEN
4607: -- FND_FILE.PUT_LINE(FND_FILE.LOG,'Drop of the temporary table '||g_tmp_table_aimm);
4608: query_drop := 'DROP table '||g_tmp_table_aimm;
4609: execute immediate query_drop;
4610: END IF;
4611:
4609: execute immediate query_drop;
4610: END IF;
4611:
4612:
4613: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.drop_tmp_table (-)');
4614:
4615: EXCEPTION
4616: WHEN OTHERS THEN
4617: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.drop_tmp_table');
4613: FND_FILE.PUT_LINE(FND_FILE.LOG,'ARP_PROGRAM_GENERATE_BR.drop_tmp_table (-)');
4614:
4615: EXCEPTION
4616: WHEN OTHERS THEN
4617: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.drop_tmp_table');
4618: RAISE;
4619:
4620: END drop_tmp_table;
4621:
4653: l_meaning VARCHAR2(30);
4654:
4655: BEGIN
4656:
4657: --FND_FILE.PUT_LINE(FND_FILE.LOG,'run_report_pvt (+)');
4658:
4659: SAVEPOINT run_report_SVP;
4660:
4661: -- parameter p_batch_id mustn't be NULL
4673: FROM AR_LOOKUPS
4674: WHERE LOOKUP_TYPE = 'ARBRATBR_REPORT_TYPE'
4675: AND LOOKUP_CODE = 'D';
4676:
4677: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------- Automatic Transactions Batch Report Parameters ---------------');
4678:
4679: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH ID :'||p_batch_id);
4680: FND_FILE.PUT_LINE(FND_FILE.LOG,'VERSION :'||l_meaning);
4681: FND_FILE.PUT_LINE(FND_FILE.LOG,'API Request ID :'||arp_global.request_id);
4675: AND LOOKUP_CODE = 'D';
4676:
4677: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------- Automatic Transactions Batch Report Parameters ---------------');
4678:
4679: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH ID :'||p_batch_id);
4680: FND_FILE.PUT_LINE(FND_FILE.LOG,'VERSION :'||l_meaning);
4681: FND_FILE.PUT_LINE(FND_FILE.LOG,'API Request ID :'||arp_global.request_id);
4682:
4683: -- SSA - R12 : set org id prior to calling submit_request
4676:
4677: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------- Automatic Transactions Batch Report Parameters ---------------');
4678:
4679: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH ID :'||p_batch_id);
4680: FND_FILE.PUT_LINE(FND_FILE.LOG,'VERSION :'||l_meaning);
4681: FND_FILE.PUT_LINE(FND_FILE.LOG,'API Request ID :'||arp_global.request_id);
4682:
4683: -- SSA - R12 : set org id prior to calling submit_request
4684: FND_REQUEST.set_org_id(g_org_id);
4677: FND_FILE.PUT_LINE(FND_FILE.LOG,'------------- Automatic Transactions Batch Report Parameters ---------------');
4678:
4679: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH ID :'||p_batch_id);
4680: FND_FILE.PUT_LINE(FND_FILE.LOG,'VERSION :'||l_meaning);
4681: FND_FILE.PUT_LINE(FND_FILE.LOG,'API Request ID :'||arp_global.request_id);
4682:
4683: -- SSA - R12 : set org id prior to calling submit_request
4684: FND_REQUEST.set_org_id(g_org_id);
4685: l_request_id := FND_REQUEST.submit_request('AR'
4695: FND_MESSAGE.set_name('AR','AR_BR_BATCH_SUBMIT_FAILED');
4696: FND_MESSAGE.set_token('PROCEDURE','ARP_PROGRAM_BR_REMIT.run_report_pvt');
4697: APP_EXCEPTION.raise_exception;
4698: ELSE
4699: FND_FILE.PUT_LINE(FND_FILE.LOG,'Submitted Request : '||to_char(l_request_id));
4700: END IF;
4701:
4702: commit;
4703:
4700: END IF;
4701:
4702: commit;
4703:
4704: FND_FILE.PUT_LINE(FND_FILE.LOG,'----------------------------------------------------------------------------');
4705:
4706: --FND_FILE.PUT_LINE(FND_FILE.LOG,'run_report_pvt (-)');
4707:
4708: EXCEPTION
4702: commit;
4703:
4704: FND_FILE.PUT_LINE(FND_FILE.LOG,'----------------------------------------------------------------------------');
4705:
4706: --FND_FILE.PUT_LINE(FND_FILE.LOG,'run_report_pvt (-)');
4707:
4708: EXCEPTION
4709: WHEN OTHERS THEN
4710: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.run_report_pvt - ROLLBACK');
4706: --FND_FILE.PUT_LINE(FND_FILE.LOG,'run_report_pvt (-)');
4707:
4708: EXCEPTION
4709: WHEN OTHERS THEN
4710: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.run_report_pvt - ROLLBACK');
4711: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4712: ROLLBACK TO run_report_SVP;
4713:
4714: END run_report_pvt;
4707:
4708: EXCEPTION
4709: WHEN OTHERS THEN
4710: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.run_report_pvt - ROLLBACK');
4711: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4712: ROLLBACK TO run_report_SVP;
4713:
4714: END run_report_pvt;
4715:
4748: l_format VARCHAR2(30);
4749:
4750: BEGIN
4751:
4752: --FND_FILE.PUT_LINE(FND_FILE.LOG,'print_BR_pvt (+)');
4753:
4754: SAVEPOINT print_BR_SVP;
4755:
4756: -- parameter p_object_id mustn't be NULL
4771: l_format := 'IND';
4772: END IF;
4773:
4774:
4775: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------- ACTION Print Bills -----------------------------');
4776: FND_FILE.PUT_LINE(FND_FILE.LOG,'Program ARBRFMTW parameters');
4777: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH OR TRX ID :'||p_object_id);
4778: FND_FILE.PUT_LINE(FND_FILE.LOG,'SOB ID :'||arp_global.set_of_books_id);
4779:
4772: END IF;
4773:
4774:
4775: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------- ACTION Print Bills -----------------------------');
4776: FND_FILE.PUT_LINE(FND_FILE.LOG,'Program ARBRFMTW parameters');
4777: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH OR TRX ID :'||p_object_id);
4778: FND_FILE.PUT_LINE(FND_FILE.LOG,'SOB ID :'||arp_global.set_of_books_id);
4779:
4780: -- SSA - R12 : set org id prior to calling submit_request
4773:
4774:
4775: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------- ACTION Print Bills -----------------------------');
4776: FND_FILE.PUT_LINE(FND_FILE.LOG,'Program ARBRFMTW parameters');
4777: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH OR TRX ID :'||p_object_id);
4778: FND_FILE.PUT_LINE(FND_FILE.LOG,'SOB ID :'||arp_global.set_of_books_id);
4779:
4780: -- SSA - R12 : set org id prior to calling submit_request
4781: FND_REQUEST.set_org_id(g_org_id);
4774:
4775: FND_FILE.PUT_LINE(FND_FILE.LOG,'--------------------------- ACTION Print Bills -----------------------------');
4776: FND_FILE.PUT_LINE(FND_FILE.LOG,'Program ARBRFMTW parameters');
4777: FND_FILE.PUT_LINE(FND_FILE.LOG,'BATCH OR TRX ID :'||p_object_id);
4778: FND_FILE.PUT_LINE(FND_FILE.LOG,'SOB ID :'||arp_global.set_of_books_id);
4779:
4780: -- SSA - R12 : set org id prior to calling submit_request
4781: FND_REQUEST.set_org_id(g_org_id);
4782: l_request_id := FND_REQUEST.submit_request('AR'
4794: FND_MESSAGE.set_name('AR','AR_BR_BATCH_SUBMIT_FAILED');
4795: FND_MESSAGE.set_token('PROCEDURE','ARP_PROGRAM_BR_REMIT.print_BR_pvt');
4796: APP_EXCEPTION.raise_exception;
4797: ELSE
4798: FND_FILE.PUT_LINE(FND_FILE.LOG,'Submitted Request : '||to_char(l_request_id));
4799: END IF;
4800:
4801: p_request_id := l_request_id;
4802:
4801: p_request_id := l_request_id;
4802:
4803: --commit;
4804:
4805: FND_FILE.PUT_LINE(FND_FILE.LOG,'----------------------------------------------------------------------------');
4806:
4807: --FND_FILE.PUT_LINE(FND_FILE.LOG,'print_BR_pvt (-)');
4808:
4809: EXCEPTION
4803: --commit;
4804:
4805: FND_FILE.PUT_LINE(FND_FILE.LOG,'----------------------------------------------------------------------------');
4806:
4807: --FND_FILE.PUT_LINE(FND_FILE.LOG,'print_BR_pvt (-)');
4808:
4809: EXCEPTION
4810: WHEN OTHERS THEN
4811: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.print_BR_pvt - ROLLBACK');
4807: --FND_FILE.PUT_LINE(FND_FILE.LOG,'print_BR_pvt (-)');
4808:
4809: EXCEPTION
4810: WHEN OTHERS THEN
4811: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.print_BR_pvt - ROLLBACK');
4812: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4813: ROLLBACK TO print_BR_SVP;
4814:
4815: END print_BR_pvt;
4808:
4809: EXCEPTION
4810: WHEN OTHERS THEN
4811: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXCEPTION : ARP_PROGRAM_GENERATE_BR.print_BR_pvt - ROLLBACK');
4812: FND_FILE.PUT_LINE(FND_FILE.LOG,SQLERRM);
4813: ROLLBACK TO print_BR_SVP;
4814:
4815: END print_BR_pvt;
4816: