110: print_opt_populated BOOLEAN;
111:
112: BEGIN
113:
114: l_options_ok := FND_REQUEST.SET_OPTIONS (
115: implicit => 'NO'
116: , protected => 'YES'
117: , language => p_nls_lang
118: , territory => p_nls_territory);
130: ELSE
131: save_output_bool := FALSE;
132: END IF;
133:
134: if (not FND_REQUEST.set_print_options(printer => printer,
135: style => print_style,
136: copies => number_of_copies,
137: save_output => save_output_bool)) then
138: print_opt_populated := false;
141: end if;
142:
143: End IF;
144:
145: m_request_id := FND_REQUEST.SUBMIT_REQUEST(
146: application => 'AR'
147: , program => 'ARBPIPCP'
148: , description => p_description
149: , start_time => ''
616: fnd_file.put_line( fnd_file.log, 'userenv_lang: ' || userenv_lang);
617: fnd_file.put_line( fnd_file.log, 'base_lang: ' || base_lang);
618:
619: /* Read in Parameter Values supplied by user */
620: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Operating Unit',parm_number);
621: IF retval = -1 THEN
622: p_org_id := NULL;
623: ELSE
624: p_org_id:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
620: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Operating Unit',parm_number);
621: IF retval = -1 THEN
622: p_org_id := NULL;
623: ELSE
624: p_org_id:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
625: END IF;
626: fnd_file.put_line( fnd_file.log, 'p_org_id: ' || p_org_id);
627:
628: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Job Size',parm_number);
624: p_org_id:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
625: END IF;
626: fnd_file.put_line( fnd_file.log, 'p_org_id: ' || p_org_id);
627:
628: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Job Size',parm_number);
629: IF retval = -1 THEN
630: p_job_size:= NULL;
631: ELSE
632: p_job_size:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
628: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Job Size',parm_number);
629: IF retval = -1 THEN
630: p_job_size:= NULL;
631: ELSE
632: p_job_size:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
633: END IF;
634: fnd_file.put_line( fnd_file.log, 'p_job_size: ' || p_job_size);
635:
636: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transactions to Print',parm_number);
632: p_job_size:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
633: END IF;
634: fnd_file.put_line( fnd_file.log, 'p_job_size: ' || p_job_size);
635:
636: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transactions to Print',parm_number);
637: IF retval = -1 THEN
638: p_choice:= NULL;
639: ELSE
640: p_choice:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
636: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transactions to Print',parm_number);
637: IF retval = -1 THEN
638: p_choice:= NULL;
639: ELSE
640: p_choice:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
641: END IF;
642: fnd_file.put_line( fnd_file.log, 'p_choice: ' || p_choice);
643:
644: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Order By',parm_number);
640: p_choice:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
641: END IF;
642: fnd_file.put_line( fnd_file.log, 'p_choice: ' || p_choice);
643:
644: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Order By',parm_number);
645: IF retval = -1 THEN
646: p_order_by:= NULL;
647: ELSE
648: p_order_by:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
644: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Order By',parm_number);
645: IF retval = -1 THEN
646: p_order_by:= NULL;
647: ELSE
648: p_order_by:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
649: END IF;
650: fnd_file.put_line( fnd_file.log, 'p_order_by: ' || p_order_by);
651:
652: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Batch',parm_number);
648: p_order_by:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
649: END IF;
650: fnd_file.put_line( fnd_file.log, 'p_order_by: ' || p_order_by);
651:
652: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Batch',parm_number);
653: IF retval = -1 THEN
654: p_BATCH_ID := NULL;
655: ELSE
656: p_BATCH_ID := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
652: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Batch',parm_number);
653: IF retval = -1 THEN
654: p_BATCH_ID := NULL;
655: ELSE
656: p_BATCH_ID := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
657: filter_exists := true;
658: END IF;
659: fnd_file.put_line( fnd_file.log, 'p_BATCH_ID: ' || p_BATCH_ID);
660:
657: filter_exists := true;
658: END IF;
659: fnd_file.put_line( fnd_file.log, 'p_BATCH_ID: ' || p_BATCH_ID);
660:
661: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transaction Class',parm_number);
662: IF retval = -1 THEN
663: p_cust_trx_class := NULL;
664: ELSE
665: p_cust_trx_class := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
661: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transaction Class',parm_number);
662: IF retval = -1 THEN
663: p_cust_trx_class := NULL;
664: ELSE
665: p_cust_trx_class := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
666: END IF;
667: fnd_file.put_line( fnd_file.log, 'p_cust_trx_class: ' || p_cust_trx_class);
668:
669: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transaction Type',parm_number);
665: p_cust_trx_class := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
666: END IF;
667: fnd_file.put_line( fnd_file.log, 'p_cust_trx_class: ' || p_cust_trx_class);
668:
669: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transaction Type',parm_number);
670: IF retval = -1 THEN
671: p_TRX_TYPE_ID := NULL;
672: ELSE
673: p_TRX_TYPE_ID := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
669: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Transaction Type',parm_number);
670: IF retval = -1 THEN
671: p_TRX_TYPE_ID := NULL;
672: ELSE
673: p_TRX_TYPE_ID := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
674: END IF;
675: fnd_file.put_line( fnd_file.log, 'p_TRX_TYPE_ID: ' || p_TRX_TYPE_ID);
676:
677: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Customer Class',parm_number);
673: p_TRX_TYPE_ID := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
674: END IF;
675: fnd_file.put_line( fnd_file.log, 'p_TRX_TYPE_ID: ' || p_TRX_TYPE_ID);
676:
677: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Customer Class',parm_number);
678: IF retval = -1 THEN
679: p_customer_class_code:= NULL;
680: ELSE
681: p_customer_class_code:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
677: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Customer Class',parm_number);
678: IF retval = -1 THEN
679: p_customer_class_code:= NULL;
680: ELSE
681: p_customer_class_code:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
682: END IF;
683: fnd_file.put_line( fnd_file.log, 'p_customer_class_code: ' || p_customer_class_code);
684:
685: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(From) Bill To Customer Name',parm_number);
681: p_customer_class_code:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
682: END IF;
683: fnd_file.put_line( fnd_file.log, 'p_customer_class_code: ' || p_customer_class_code);
684:
685: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(From) Bill To Customer Name',parm_number);
686: IF retval = -1 THEN
687: p_customer_name_low:= NULL;
688: ELSE
689: p_customer_name_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
685: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(From) Bill To Customer Name',parm_number);
686: IF retval = -1 THEN
687: p_customer_name_low:= NULL;
688: ELSE
689: p_customer_name_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
690: END IF;
691: fnd_file.put_line( fnd_file.log, 'p_customer_name_low: ' || p_customer_name_low);
692:
693: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(To) Bill To Customer Name',parm_number);
689: p_customer_name_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
690: END IF;
691: fnd_file.put_line( fnd_file.log, 'p_customer_name_low: ' || p_customer_name_low);
692:
693: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(To) Bill To Customer Name',parm_number);
694: IF retval = -1 THEN
695: p_CUSTOMER_NAME_HIGH := NULL;
696: ELSE
697: p_CUSTOMER_NAME_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
693: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(To) Bill To Customer Name',parm_number);
694: IF retval = -1 THEN
695: p_CUSTOMER_NAME_HIGH := NULL;
696: ELSE
697: p_CUSTOMER_NAME_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
698: END IF;
699: fnd_file.put_line( fnd_file.log, 'p_CUSTOMER_NAME_HIGH: ' || p_CUSTOMER_NAME_HIGH);
700:
701: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Bill To Customer Number',parm_number);
697: p_CUSTOMER_NAME_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
698: END IF;
699: fnd_file.put_line( fnd_file.log, 'p_CUSTOMER_NAME_HIGH: ' || p_CUSTOMER_NAME_HIGH);
700:
701: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Bill To Customer Number',parm_number);
702: IF retval = -1 THEN
703: p_customer_no_low:= NULL;
704: ELSE
705: p_customer_no_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
701: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Bill To Customer Number',parm_number);
702: IF retval = -1 THEN
703: p_customer_no_low:= NULL;
704: ELSE
705: p_customer_no_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
706: END IF;
707: fnd_file.put_line( fnd_file.log, 'p_customer_no_low: ' || p_customer_no_low);
708:
709: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Bill To Customer Number',parm_number);
705: p_customer_no_low:= FND_REQUEST_INFO.GET_PARAMETER(parm_number);
706: END IF;
707: fnd_file.put_line( fnd_file.log, 'p_customer_no_low: ' || p_customer_no_low);
708:
709: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Bill To Customer Number',parm_number);
710: IF retval = -1 THEN
711: p_customer_no_high := NULL;
712: ELSE
713: p_customer_no_high := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
709: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Bill To Customer Number',parm_number);
710: IF retval = -1 THEN
711: p_customer_no_high := NULL;
712: ELSE
713: p_customer_no_high := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
714: END IF;
715: fnd_file.put_line( fnd_file.log, 'p_customer_no_high: ' || p_customer_no_high);
716:
717: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Transaction Number',parm_number);
713: p_customer_no_high := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
714: END IF;
715: fnd_file.put_line( fnd_file.log, 'p_customer_no_high: ' || p_customer_no_high);
716:
717: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Transaction Number',parm_number);
718: IF retval = -1 THEN
719: p_TRX_NUMBER_LOW := NULL;
720: ELSE
721: p_TRX_NUMBER_LOW := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
717: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Transaction Number',parm_number);
718: IF retval = -1 THEN
719: p_TRX_NUMBER_LOW := NULL;
720: ELSE
721: p_TRX_NUMBER_LOW := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
722: END IF;
723: fnd_file.put_line( fnd_file.log, 'p_TRX_NUMBER_LOW: ' || p_TRX_NUMBER_LOW);
724:
725: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Transaction Number',parm_number);
721: p_TRX_NUMBER_LOW := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
722: END IF;
723: fnd_file.put_line( fnd_file.log, 'p_TRX_NUMBER_LOW: ' || p_TRX_NUMBER_LOW);
724:
725: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Transaction Number',parm_number);
726: IF retval = -1 THEN
727: p_TRX_NUMBER_HIGH := NULL;
728: ELSE
729: p_TRX_NUMBER_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
725: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Transaction Number',parm_number);
726: IF retval = -1 THEN
727: p_TRX_NUMBER_HIGH := NULL;
728: ELSE
729: p_TRX_NUMBER_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
730: END IF;
731: fnd_file.put_line( fnd_file.log, 'p_TRX_NUMBER_HIGH: ' || p_TRX_NUMBER_HIGH);
732:
733: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Installment Number',parm_number);
729: p_TRX_NUMBER_HIGH := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
730: END IF;
731: fnd_file.put_line( fnd_file.log, 'p_TRX_NUMBER_HIGH: ' || p_TRX_NUMBER_HIGH);
732:
733: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Installment Number',parm_number);
734: IF retval = -1 THEN
735: p_INSTALLMENT_NO := NULL;
736: ELSE
737: p_INSTALLMENT_NO := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
733: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Installment Number',parm_number);
734: IF retval = -1 THEN
735: p_INSTALLMENT_NO := NULL;
736: ELSE
737: p_INSTALLMENT_NO := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
738: END IF;
739: fnd_file.put_line( fnd_file.log, 'p_INSTALLMENT_NO: ' || p_INSTALLMENT_NO);
740:
741: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Print Date',parm_number);
737: p_INSTALLMENT_NO := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
738: END IF;
739: fnd_file.put_line( fnd_file.log, 'p_INSTALLMENT_NO: ' || p_INSTALLMENT_NO);
740:
741: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Print Date',parm_number);
742: IF retval = -1 THEN
743: p_PRINT_DATE_LOW := NULL;
744: ELSE
745: p_PRINT_DATE_LOW := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
741: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(Low) Print Date',parm_number);
742: IF retval = -1 THEN
743: p_PRINT_DATE_LOW := NULL;
744: ELSE
745: p_PRINT_DATE_LOW := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
746: END IF;
747: fnd_file.put_line( fnd_file.log, 'p_PRINT_DATE_LOW: ' || p_PRINT_DATE_LOW);
748:
749: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Print Date',parm_number);
745: p_PRINT_DATE_LOW := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
746: END IF;
747: fnd_file.put_line( fnd_file.log, 'p_PRINT_DATE_LOW: ' || p_PRINT_DATE_LOW);
748:
749: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Print Date',parm_number);
750: IF retval = -1 THEN
751: p_PRINT_DATE_HIGH := NULL;
752: ELSE
753: p_PRINT_DATE_HIGH := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
749: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('(High) Print Date',parm_number);
750: IF retval = -1 THEN
751: p_PRINT_DATE_HIGH := NULL;
752: ELSE
753: p_PRINT_DATE_HIGH := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
754: END IF;
755: fnd_file.put_line( fnd_file.log, 'p_PRINT_DATE_HIGH: ' || p_PRINT_DATE_HIGH);
756:
757: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Open Invoices Only',parm_number);
753: p_PRINT_DATE_HIGH := fnd_date.canonical_to_date(FND_REQUEST_INFO.GET_PARAMETER(parm_number));
754: END IF;
755: fnd_file.put_line( fnd_file.log, 'p_PRINT_DATE_HIGH: ' || p_PRINT_DATE_HIGH);
756:
757: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Open Invoices Only',parm_number);
758: IF retval = -1 THEN
759: p_OPEN_INVOICE_FLAG := NULL;
760: ELSE
761: p_OPEN_INVOICE_FLAG := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
757: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Open Invoices Only',parm_number);
758: IF retval = -1 THEN
759: p_OPEN_INVOICE_FLAG := NULL;
760: ELSE
761: p_OPEN_INVOICE_FLAG := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
762: END IF;
763: fnd_file.put_line( fnd_file.log, 'p_OPEN_INVOICE_FLAG: ' || p_OPEN_INVOICE_FLAG);
764:
765: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Invoice Trx Id List',parm_number);
761: p_OPEN_INVOICE_FLAG := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
762: END IF;
763: fnd_file.put_line( fnd_file.log, 'p_OPEN_INVOICE_FLAG: ' || p_OPEN_INVOICE_FLAG);
764:
765: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Invoice Trx Id List',parm_number);
766: IF retval = -1 THEN
767: p_INVOICE_LIST_STRING := NULL;
768: ELSE
769: p_INVOICE_LIST_STRING := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
765: retval := FND_REQUEST_INFO.GET_PARAM_NUMBER('Invoice Trx Id List',parm_number);
766: IF retval = -1 THEN
767: p_INVOICE_LIST_STRING := NULL;
768: ELSE
769: p_INVOICE_LIST_STRING := FND_REQUEST_INFO.GET_PARAMETER(parm_number);
770: END IF;
771: fnd_file.put_line( fnd_file.log, 'p_INVOICE_LIST_STRING: ' || p_INVOICE_LIST_STRING);
772:
773: