590: l_final_xml_string := '';
591: HR_UTILITY_TRACE('end_of_file l_final_xml_string = '
592: || l_final_xml_string);
593: WRITE_TO_MAGTAPE_LOB(l_final_xml_string);
594: -- pay_core_files.write_to_magtape_lob(l_final_xml_string);
595: END;
596:
597: --
598: -- Follwing Procedure is used for Employer Record
647: l_final_xml_string := '';
648: HR_UTILITY_TRACE('end_of_file l_final_xml_string = '
649: || l_final_xml_string);
650: WRITE_TO_MAGTAPE_LOB(l_final_xml_string);
651: -- pay_core_files.write_to_magtape_lob(l_final_xml_string);
652: END local_w2_xml_employer_end;
653:
654: --
655: -- Follwing Procedure is used for Employer Record
816:
817: PROCEDURE WRITE_TO_MAGTAPE_LOB(p_blob BLOB) IS
818: BEGIN
819: IF dbms_lob.getLength (p_blob) IS NOT NULL THEN
820: pay_core_files.write_to_magtape_lob (p_blob);
821: END IF;
822: END WRITE_TO_MAGTAPE_LOB;
823:
824:
829: *****************************************************************************/
830:
831: PROCEDURE WRITE_TO_MAGTAPE_LOB(p_data varchar2) IS
832: BEGIN
833: pay_core_files.write_to_magtape_lob (p_data);
834: END WRITE_TO_MAGTAPE_LOB;
835:
836:
837: ------------------------------ get_parameter -------------------------------