78:
79: PROCEDURE WRITE_TO_MAGTAPE_LOB(p_blob BLOB) IS
80: BEGIN
81: IF dbms_lob.getLength (p_blob) IS NOT NULL THEN
82: pay_core_files.write_to_magtape_lob (p_blob);
83: END IF;
84: END WRITE_TO_MAGTAPE_LOB;
85:
86: /****************************************************************************
90: *****************************************************************************/
91:
92: PROCEDURE WRITE_TO_MAGTAPE_LOB(p_data varchar2) IS
93: BEGIN
94: pay_core_files.write_to_magtape_lob (p_data);
95: END WRITE_TO_MAGTAPE_LOB;
96:
97: /****************************************************************************
98: Name : LOAD_XML
846: lv_arch_cheque_custom_xml:= get_custom_xml('ARCHIVE_CHEQUE_WRITER',lv_legislation_code); -- Bug 13969852, 13969858
847:
848: hr_utility.trace('The Custom XML code for Archive Cheque Writer is: '||lv_arch_cheque_custom_xml);
849:
850: pay_core_files.write_to_magtape_lob('');
851: pay_core_files.write_to_magtape_lob('
852:
853: -- Printing Global Variable Values
854: --hr_utility.trace('g_chq_asg_action_id := '||pay_archive_chequewriter.g_chq_asg_action_id);
847:
848: hr_utility.trace('The Custom XML code for Archive Cheque Writer is: '||lv_arch_cheque_custom_xml);
849:
850: pay_core_files.write_to_magtape_lob('');
851: pay_core_files.write_to_magtape_lob('
853: -- Printing Global Variable Values
854: --hr_utility.trace('g_chq_asg_action_id := '||pay_archive_chequewriter.g_chq_asg_action_id);
855: --hr_utility.trace('g_arch_asg_action_id := '||pay_archive_chequewriter.g_arch_asg_action_id);
863: write_to_magtape_lob(l_xml);
864:
865: print_blob(pay_mag_tape.g_blob_value);
866:
867: pay_core_files.write_to_magtape_lob('');
868: else
869:
870: lv_thpty_che_custom_xml:= get_custom_xml('THIRD_PARTY_CHEQUE_WRITER',lv_legislation_code); -- Bug 13969852, 13969858
871:
870: lv_thpty_che_custom_xml:= get_custom_xml('THIRD_PARTY_CHEQUE_WRITER',lv_legislation_code); -- Bug 13969852, 13969858
871:
872: hr_utility.trace('The Custom XML code for Third Party Cheque Writer is: '||lv_thpty_che_custom_xml);
873:
874: pay_core_files.write_to_magtape_lob('');
875: pay_core_files.write_to_magtape_lob('
876:
877: -- Printing Global Variable Values
878: --hr_utility.trace('g_chq_asg_action_id := '||pay_archive_chequewriter.g_chq_asg_action_id);
871:
872: hr_utility.trace('The Custom XML code for Third Party Cheque Writer is: '||lv_thpty_che_custom_xml);
873:
874: pay_core_files.write_to_magtape_lob('');
875: pay_core_files.write_to_magtape_lob('
877: -- Printing Global Variable Values
878: --hr_utility.trace('g_chq_asg_action_id := '||pay_archive_chequewriter.g_chq_asg_action_id);
879: --hr_utility.trace('g_arch_asg_action_id := '||pay_archive_chequewriter.g_arch_asg_action_id);
890: write_to_magtape_lob(l_xml);
891:
892: print_blob(pay_mag_tape.g_blob_value);
893:
894: pay_core_files.write_to_magtape_lob('');
895:
896: end if;
897:
898: ELSE
972: end if;
973:
974: hr_utility.trace('Before Archive Cheque');
975:
976: pay_core_files.write_to_magtape_lob('');
977: pay_core_files.write_to_magtape_lob('
978:
979: hr_utility.trace('Calling generate_xml_dummy');
980:
973:
974: hr_utility.trace('Before Archive Cheque');
975:
976: pay_core_files.write_to_magtape_lob('');
977: pay_core_files.write_to_magtape_lob('
979: hr_utility.trace('Calling generate_xml_dummy');
980:
981: generate_xml_dummy(l_cheque_no
1008:
1009: dummy_xml := l_xml_dummy;
1010:
1011: hr_utility.trace('Successful LOB Creation.');
1012: pay_core_files.write_to_magtape_lob(dummy_xml);
1013:
1014: pay_core_files.write_to_magtape_lob('');
1015:
1016: BEGIN
1010:
1011: hr_utility.trace('Successful LOB Creation.');
1012: pay_core_files.write_to_magtape_lob(dummy_xml);
1013:
1014: pay_core_files.write_to_magtape_lob('');
1015:
1016: BEGIN
1017: UPDATE pay_assignment_actions
1018: SET action_status = 'S'