110: errbuf OUT NOCOPY VARCHAR2,
111: retcode OUT NOCOPY NUMBER,
112: p_batch_id IN VARCHAR2 ) IS
113:
114: l_qryCtx DBMS_XMLGEN.ctxHandle;
115: l_result_clob CLOB;
116: l_current_calling_sequence varchar2(2000);
117: l_debug_info varchar2(200);
118:
140:
141: put_starttag('?xml version="1.0" encoding="'||l_encoding||'"?');
142: put_starttag('NETTING_REPORT');
143:
144: l_qryCtx := DBMS_XMLGEN.newContext(
145: 'SELECT HOU.NAME AS OPERATING_UNIT,
146: FNA.AGREEMENT_NAME,
147: FNA.AGREEMENT_START_DATE,
148: FNA.AGREEMENT_END_DATE,
183: AND FLC3.LOOKUP_CODE = FNA.NET_CURRENCY_RULE_CODE
184: AND FNB.BATCH_ID = :BATCH_ID');
185:
186:
187: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
188: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
189: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
184: AND FNB.BATCH_ID = :BATCH_ID');
185:
186:
187: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
188: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
189: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
192:
185:
186:
187: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
188: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
189: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
192:
193: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
186:
187: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
188: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
189: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
192:
193: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
194: DBMS_XMLGEN.closeContext(l_qryCtx);
189: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
192:
193: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
194: DBMS_XMLGEN.closeContext(l_qryCtx);
195: clob_to_file(l_result_clob);
196:
197:
190: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
191: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
192:
193: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
194: DBMS_XMLGEN.closeContext(l_qryCtx);
195: clob_to_file(l_result_clob);
196:
197:
198: l_debug_info := 'Select AP invoices...';
235: put_element('SUPPLIER_TAXPAYER_ID',rec.SUPPLIER_TAXPAYER_ID);
236: put_element('SUPPLIER_TAX_REGN_NUM',rec.SUPPLIER_TAX_REGN_NUM);
237:
238:
239: l_qryCtx := DBMS_XMLGEN.newContext(
240: 'SELECT
241: API.INVOICE_NUM,
242: ALC.DISPLAYED_FIELD AS INVOICE_TYPE,
243: API.INVOICE_DATE AS INVOICE_DATE,
293: ORDER BY
294: API.INVOICE_NUM');
295:
296:
297: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
294: API.INVOICE_NUM');
295:
296:
297: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
295:
296:
297: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
296:
297: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
304: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
297: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
304: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
305: l_invoice_count := l_invoice_count + l_temp_invoice_count;
298: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
299: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
304: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
305: l_invoice_count := l_invoice_count + l_temp_invoice_count;
306: DBMS_XMLGEN.closeContext(l_qryCtx);
300: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.supplier_id);
301: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.site_id);
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
304: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
305: l_invoice_count := l_invoice_count + l_temp_invoice_count;
306: DBMS_XMLGEN.closeContext(l_qryCtx);
307: clob_to_file(l_result_clob);
308:
302: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
303: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
304: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
305: l_invoice_count := l_invoice_count + l_temp_invoice_count;
306: DBMS_XMLGEN.closeContext(l_qryCtx);
307: clob_to_file(l_result_clob);
308:
309: put_endtag('SUPPLIER_RECORD');
310:
355: put_element('LOCATION',rec.LOCATION);
356: put_element('CUST_TAXPAYER_ID',rec.CUST_TAXPAYER_ID);
357: put_element('CUST_TAX_REGN_NUM',rec.CUST_TAX_REGN_NUM);
358:
359: l_qryCtx := DBMS_XMLGEN.newContext(
360: 'SELECT
361: RCT.TRX_NUMBER,
362: RCTT.NAME AS TRX_TYPE,
363: RCT.TRX_DATE,
417: FNAR.OPEN_AMT
418: ORDER BY
419: RCT.TRX_NUMBER');
420:
421: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
418: ORDER BY
419: RCT.TRX_NUMBER');
420:
421: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
419: RCT.TRX_NUMBER');
420:
421: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
420:
421: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
428: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
421: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
428: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
429: l_trx_count := l_trx_count + l_temp_trx_count;
422: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
423: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
428: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
429: l_trx_count := l_trx_count + l_temp_trx_count;
430: DBMS_XMLGEN.closeContext(l_qryCtx);
424: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
425: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
428: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
429: l_trx_count := l_trx_count + l_temp_trx_count;
430: DBMS_XMLGEN.closeContext(l_qryCtx);
431: clob_to_file(l_result_clob);
432:
426: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
427: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
428: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
429: l_trx_count := l_trx_count + l_temp_trx_count;
430: DBMS_XMLGEN.closeContext(l_qryCtx);
431: clob_to_file(l_result_clob);
432:
433: put_endtag('CUSTOMER_RECORD');
434:
463: errbuf OUT NOCOPY VARCHAR2,
464: retcode OUT NOCOPY NUMBER,
465: p_batch_id IN VARCHAR2 ) IS
466:
467: l_qryCtx DBMS_XMLGEN.ctxHandle;
468: l_result_clob CLOB;
469: l_current_calling_sequence varchar2(2000);
470: l_debug_info varchar2(200);
471:
494:
495: put_starttag('?xml version="1.0" encoding="'||l_encoding||'"?');
496: put_starttag('NETTING_REPORT');
497:
498: l_qryCtx := DBMS_XMLGEN.newContext(
499: 'SELECT HOU.NAME AS OPERATING_UNIT,
500: FNA.AGREEMENT_NAME,
501: FNA.AGREEMENT_START_DATE,
502: FNA.AGREEMENT_END_DATE,
538: AND FLC3.LOOKUP_CODE = FNA.NET_CURRENCY_RULE_CODE
539: AND FNB.BATCH_ID = :BATCH_ID');
540:
541:
542: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
543: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
544: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
539: AND FNB.BATCH_ID = :BATCH_ID');
540:
541:
542: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
543: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
544: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
547:
540:
541:
542: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
543: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
544: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
547:
548: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
541:
542: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'BATCH_DETAILS_SET');
543: DBMS_XMLGEN.setRowTag(l_qryCtx, 'BATCH_DETAILS');
544: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
547:
548: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
549: DBMS_XMLGEN.closeContext(l_qryCtx);
544: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
547:
548: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
549: DBMS_XMLGEN.closeContext(l_qryCtx);
550: clob_to_file(l_result_clob);
551:
552:
545: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
546: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
547:
548: l_batch_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
549: DBMS_XMLGEN.closeContext(l_qryCtx);
550: clob_to_file(l_result_clob);
551:
552:
553: l_debug_info := 'Select AP invoices...';
589: put_element('SITE',rec.SITE);
590: put_element('SUPPLIER_TAXPAYER_ID',rec.SUPPLIER_TAXPAYER_ID);
591: put_element('SUPPLIER_TAX_REGN_NUM',rec.SUPPLIER_TAX_REGN_NUM);
592:
593: l_qryCtx := DBMS_XMLGEN.newContext(
594: 'SELECT
595: API.INVOICE_NUM,
596: ALC.DISPLAYED_FIELD AS INVOICE_TYPE,
597: API.INVOICE_DATE AS INVOICE_DATE,
647: ORDER BY
648: API.INVOICE_NUM');
649:
650:
651: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
648: API.INVOICE_NUM');
649:
650:
651: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
649:
650:
651: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
650:
651: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
658: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
651: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'INVOICE_SET');
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
658: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
659: l_invoice_count := l_invoice_count + l_temp_invoice_count;
652: DBMS_XMLGEN.setRowTag(l_qryCtx, 'INVOICE_RECORD');
653: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
658: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
659: l_invoice_count := l_invoice_count + l_temp_invoice_count;
660: DBMS_XMLGEN.closeContext(l_qryCtx);
654: DBMS_XMLGEN.setBindValue(l_qryCtx,'SUPPLIER_ID', rec.SUPPLIER_ID);
655: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_ID', rec.SITE_ID);
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
658: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
659: l_invoice_count := l_invoice_count + l_temp_invoice_count;
660: DBMS_XMLGEN.closeContext(l_qryCtx);
661: clob_to_file(l_result_clob);
662:
656: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
657: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
658: l_temp_invoice_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
659: l_invoice_count := l_invoice_count + l_temp_invoice_count;
660: DBMS_XMLGEN.closeContext(l_qryCtx);
661: clob_to_file(l_result_clob);
662:
663: put_endtag('SUPPLIER_RECORD');
664:
713: put_element('LOCATION',rec.LOCATION);
714: put_element('CUST_TAXPAYER_ID',rec.CUST_TAXPAYER_ID);
715: put_element('CUST_TAX_REGN_NUM',rec.CUST_TAX_REGN_NUM);
716:
717: l_qryCtx := DBMS_XMLGEN.newContext(
718: 'SELECT
719: RCT.TRX_NUMBER,
720: RCTT.NAME AS TRX_TYPE,
721: RCT.TRX_DATE,
779: ORDER BY
780: RCT.TRX_NUMBER');
781:
782:
783: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
780: RCT.TRX_NUMBER');
781:
782:
783: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
781:
782:
783: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
782:
783: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
790: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
783: DBMS_XMLGEN.setRowSetTag(l_qryCtx,'TRANSACTION_SET');
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
790: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
791: l_trx_count := l_trx_count + l_temp_trx_count;
784: DBMS_XMLGEN.setRowTag(l_qryCtx, 'TRANSACTION_RECORD');
785: DBMS_XMLGEN.setBindValue(l_qryCtx,'BATCH_ID', p_batch_id);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
790: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
791: l_trx_count := l_trx_count + l_temp_trx_count;
792: DBMS_XMLGEN.closeContext(l_qryCtx);
786: DBMS_XMLGEN.setBindValue(l_qryCtx,'CUST_ACCOUNT_ID', rec.CUST_ACCOUNT_ID);
787: DBMS_XMLGEN.setBindValue(l_qryCtx,'SITE_USE_ID', rec.SITE_USE_ID);
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
790: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
791: l_trx_count := l_trx_count + l_temp_trx_count;
792: DBMS_XMLGEN.closeContext(l_qryCtx);
793: clob_to_file(l_result_clob);
794:
788: l_result_clob :=DBMS_XMLGEN.GETXML(l_qryCtx);
789: l_result_clob := substr(l_result_clob,instr(l_result_clob,'>')+1);
790: l_temp_trx_count := DBMS_XMLGEN.getNumRowsProcessed(l_qryCtx);
791: l_trx_count := l_trx_count + l_temp_trx_count;
792: DBMS_XMLGEN.closeContext(l_qryCtx);
793: clob_to_file(l_result_clob);
794:
795: put_endtag('CUSTOMER_RECORD');
796: