[Home] [Help]
585: WHERE SUCCEEDED = 'W'
586: OR SUCCEEDED = 'Y';
587:
588: -- generate validate xml string
589: SELECT xmlelement("ReportFailed", 'N') INTO l_Reportfailed FROM dual;
590:
591: SELECT xmlelement("FailedWithParameters", 'N')
592: INTO l_FailedWithParameters
593: FROM dual;
589: SELECT xmlelement("ReportFailed", 'N') INTO l_Reportfailed FROM dual;
590:
591: SELECT xmlelement("FailedWithParameters", 'N')
592: INTO l_FailedWithParameters
593: FROM dual;
594:
595: -- generate xmlsring of parameters of transfer program
596: SELECT xmlelement("Parameters",
597: xmlforest(l_operation_unit AS "OperationUnit",
611: l_trx_date_to AS "TransactionDateTo",
612: l_doc_num_from AS "DocNumberFrom",
613: l_doc_num_to AS "DocNumberTo"))
614: INTO l_parameter
615: FROM dual;
616:
617: --generate summary section
618: SELECT xmlelement("Summary",
619: xmlforest(l_succ_rows AS "NumOfSucc",
623: l_succ_amount AS "AmountSucc",
624: l_failed_amount AS "AmountWarning",
625: l_warning_amount AS "AmountFail"))
626: INTO l_summary
627: FROM dual;
628:
629: -- generate the xmltype for failed inv
630: SELECT XMLElement("Invoices",
631: xmlagg(xmlelement("Invoice",
696: l_failed AS "FailedInvoices",
697: l_warning AS "WarningInvoices",
698: l_succeeded AS "SuccInvoices"))
699: INTO l_report_XML
700: FROM dual;
701:
702: -- concurrent output
703: JMF_GTA_TRX_UTIL.output_conc(l_report_XML.Getclobval);
704:
2643:
2644: -- begin insert value into l_trx_header
2645: SELECT jmf_gta_trx_headers_all_s.NEXTVAL
2646: INTO l_trx_header.gta_trx_header_id
2647: FROM dual;
2648:
2649: --29/06/2006 Added by Shujuan Yan for bug 5263131
2650: IF l_origin_trx_id IS NOT NULL THEN
2651: -- call util procedure to get bank info for 'CM',
2998: l_error_string,
2999: NULL,
3000: l_tp_registration_number--added by Yao Zhang for bug 7644235
3001: -- to distinguish different tax reg number on trx lines.
3002: FROM dual;
3003:
3004: END IF; -- IF (l_cm_warn = true)
3005:
3006: IF (l_gt_inv_excep = true or l_ar_inv_excep = true) THEN
3840: l_rac_bill_to_customer_name,
3841: NULL,
3842: l_error_string,
3843: NULL
3844: FROM dual;
3845: WHEN l_repeat_exception THEN
3846: IF (FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3847: FND_LOG.string(FND_LOG.LEVEL_UNEXPECTED,
3848: G_MODULE_PREFIX || l_procedure_name,