365: EOL VARCHAR2(5);
366: BEGIN
367: --
368: Fnd_file.put_line(FND_FILE.LOG,'######## IN Header');
369: -- pay_core_files.write_to_magtape_lob('');
370: -- pay_core_files.write_to_magtape_lob('
371: --
372: l_final_xml_string := NULL ;
373: --
366: BEGIN
367: --
368: Fnd_file.put_line(FND_FILE.LOG,'######## IN Header');
369: -- pay_core_files.write_to_magtape_lob('');
370: -- pay_core_files.write_to_magtape_lob('
372: l_final_xml_string := NULL ;
373: --
374: SELECT fnd_global.local_chr(13) || fnd_global.local_chr(10)
376: FROM DUAL ;
377: --
378: l_final_xml_string := '
379: --
380: pay_core_files.write_to_magtape_lob(l_final_xml_string);
381: --
382: Fnd_file.put_line(FND_FILE.LOG,'######## IN Header End');
383: END xml_header;
384: --------------------------------------------------------------------------------
388: l_final_xml_string VARCHAR2(32000) := NULL;
389: BEGIN
390: --
391: Fnd_file.put_line(FND_FILE.LOG,'######## IN Footer');
392: -- pay_core_files.write_to_magtape_lob('');
393: l_final_xml_string := NULL ;
394: --
395: l_final_xml_string := '' ;
396: --
393: l_final_xml_string := NULL ;
394: --
395: l_final_xml_string := '' ;
396: --
397: pay_core_files.write_to_magtape_lob(l_final_xml_string);
398: --
399: Fnd_file.put_line(FND_FILE.LOG,'######## IN Footer End');
400: --
401: END xml_footer;
475: --
476: l_start_dt := TO_DATE(l_start_date,'YYYY/MM/DD');
477: l_end_dt := TO_DATE(l_end_date,'YYYY/MM/DD');
478: --
479: --pay_core_files.write_to_magtape_lob('');
480: --pay_core_files.write_to_magtape_lob('
481: Fnd_file.put_line(FND_FILE.LOG,'######## Out of the Loop');
482: --
483: FOR csr_archive_act_rec in csr_archive_act(l_payroll_id
476: l_start_dt := TO_DATE(l_start_date,'YYYY/MM/DD');
477: l_end_dt := TO_DATE(l_end_date,'YYYY/MM/DD');
478: --
479: --pay_core_files.write_to_magtape_lob('');
480: --pay_core_files.write_to_magtape_lob('
482: --
483: FOR csr_archive_act_rec in csr_archive_act(l_payroll_id
484: ,l_consolidation_set_id
498: ,P_ROOT_TAG => 'PAYSLIP'
499: ,P_DOCUMENT_TYPE => 'PAYSLIP'
500: ,P_XML => l_xml);
501: --
502: pay_core_files.write_to_magtape_lob(l_xml);
503: --
504: END LOOP;
505: --
506: --pay_core_files.write_to_magtape_lob('');
502: pay_core_files.write_to_magtape_lob(l_xml);
503: --
504: END LOOP;
505: --
506: --pay_core_files.write_to_magtape_lob('');
507: --
508: END xml_asg;
509: --
510: END pay_no_payslip_report;