The following lines contain the word 'select', 'insert', 'update' or 'delete':
meshah contd. Inserted the formula definition for Iowa Tape(ICESA).
12-mar-1999 VMehta 40.4 Removed the Diskette formats for CA, FL, TX
ID, OK, NJ and MS. Will be provided at a
later date
Modified format for Connecticut.
16-mar-1999 VMehta 40.5(110.1) Added FTP format for Illinois
***************************************************************************
============================================================================*/
--
-- Date constants representing the start and end of time.sqlk
--
START_OF_TIME constant date := to_date('01/01/0001','DD/MM/YYYY');
select FM.formula_id
from ff_formulas_f FM
where FM.legislation_code = p_legislation_code
and FM.formula_name = upper(p_formula_name)
and p_session_date between FM.effective_start_date
and FM.effective_end_date;
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'AL', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'AZ', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'CA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'CO', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IL', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IN', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'KS', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'ME', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'KY', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MD', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MN', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MO', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MT', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NV', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NC', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'OK', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'PA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'SC', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'SD', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'TN', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'TX', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'VT', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WV', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'AR', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'DE', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'LA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NE', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NH', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'OR', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'UT', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'VA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WI', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'ND', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'AK', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'ID', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'DC', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'PR', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IN', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NJ', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'GA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NM', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NY', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'OH', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT); --
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'FL', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'RI', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WY', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MI', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'HI', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WA', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'CT', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MS', 'RT',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
(REPORT_TYPE,
REPORT_QUALIFIER,
REPORT_CATEGORY,
REPORT_FORMAT,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE)
values ('SQWL' , 'SD', 'PD', L_REPORT_FORMAT,
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MD', 'PD',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IL', 'PD',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'LA', 'RTLAQ',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'OR', 'FTP',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'ND', 'FTP',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'AL', 'FTP',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'IL', 'FTP',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'NC', 'FTP',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WV', 'PD',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'MS', 'PD',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);
delete from pay_magnetic_records MGR
where MGR.magnetic_block_id in (select MGB.magnetic_block_id
from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT);
delete from pay_magnetic_blocks MGB
where MGB.report_format = L_REPORT_FORMAT;
delete from pay_report_format_mappings_f RFM
where RFM.report_format = L_REPORT_FORMAT;
insert into pay_report_format_mappings_f
( REPORT_TYPE, REPORT_QUALIFIER, REPORT_CATEGORY,
RANGE_CODE,
ASSIGNMENT_ACTION_CODE,
INITIALIZATION_CODE,
ARCHIVE_CODE,
MAGNETIC_CODE,
REPORT_FORMAT, EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ('SQWL' , 'WY', 'PD',
'pay_us_archive.range_cursor',
'pay_us_archive.action_creation',
'pay_us_archive.archinit',
'pay_us_archive.archive_data',
'pay_magtape_generic.new_formula',
L_REPORT_FORMAT, START_OF_TIME, END_OF_TIME);