The following lines contain the word 'select', 'insert', 'update' or 'delete':
delete all the report formats and then insert.
--
08-MAR-99 MREID 110.8 845184 Changed dbms_output calls to use
hr_utility
/**/
----------------------------------------------------------------------------------------
-- Name
-- setup
-- Purpose
-- Sets up structure of 1099R Federal and State reports for the generic
-- magnetic tape harness.
-- Arguments
-- None
-- Notes:
-- This file contains the following report definitions:
-- 1099R_FED : Federal 1099R format
-- 1099R_STATE : Federal 1099R format with variations, omits k-records
-- 1099R_WV : Custom 1099R format for West Virginia
-- 1099R_IND : 1099R format for Indiana
-- 1099R_MI : 1099R format for Michigan
-- 1099R_NY : 1099R format for New York
-- 1099R_NC : 1099R format for North Carolina
----------------------------------------------------------------------------------------
/**/
--
PROCEDURE Setup IS
--
-- Define table structures to hold parameter details.
--
-- note: the parameter prefix 'lt' denotes a local table
-- 'li' denotes a local table index
--Report Definitions
lt_report_format char30_data_table;
hr_utility.trace('Insert definition for ' ||
lt_report_format(l_ccount));
DELETE FROM pay_magnetic_records
WHERE magnetic_block_id IN
(SELECT pmb.magnetic_block_id
FROM pay_magnetic_blocks pmb,
pay_report_format_mappings_f pfm
WHERE pmb.report_format = pfm.report_format
AND pmb.report_format = lt_report_format(l_ccount)
AND pfm.report_category = 'RT');
DELETE FROM pay_magnetic_blocks pmb
WHERE pmb.report_format in
(SELECT pfm.report_format
FROM pay_report_format_mappings_f pfm
WHERE pfm.report_format = lt_report_format(l_ccount)
AND pfm.report_category = 'RT');
DELETE FROM pay_report_format_mappings_f rfm
WHERE rfm.report_format = lt_report_format(l_ccount)
AND report_category = 'RT';
hr_utility.trace(' --Inserting '|| lt_report_qualifier(l_st_count)
|| ' report qualifier...');
INSERT INTO pay_report_format_mappings_f
( report_type,
report_qualifier,
report_format,
report_category,
range_code,
assignment_action_code,
initialization_code,
archive_code,
magnetic_code,
effective_start_date,
effective_end_date )
VALUES ( l_report_type,
lt_report_qualifier(l_st_count),
lt_report_format(l_ccount),
'RT',
'pay_us_1099r_mag_reporting.range_cursor',
'pay_us_1099r_mag_reporting.mag_1099r_action_creation',
null,
null,
'pay_magtape_generic.new_formula',
c_start_of_time,
c_end_of_time );
hr_utility.trace('Inserting block ' || lt_B_block_name(li_btab));
l_message := 'Error inserting block ' || lt_B_block_name(li_btab);
hr_utility.trace('Inserting record def with formula '
|| lt_F_formula_name(li_ftab));
l_message:='Error inserting record def with formula '
|| lt_F_formula_name(li_ftab);