The following lines contain the word 'select', 'insert', 'update' or 'delete':
/* Delete existing block and record definitions for the MWS Report */
hr_utility.trace('Insert definition for ' || l_report_format);
delete from PAY_MAGNETIC_RECORDS
where 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 */
hr_utility.trace('Inserting the report qualifier : '||
l_report_qualifier);
insert into PAY_REPORT_FORMAT_MAPPINGS_F
( REPORT_TYPE,
REPORT_QUALIFIER,
REPORT_CATEGORY,
REPORT_FORMAT,
EFFECTIVE_START_DATE,
EFFECTIVE_END_DATE )
values ( l_report_type,
l_report_qualifier,
'RT',
l_report_format,
c_start_date,
c_end_date );
/* Insert blocks into PAY_MAGNETIC_BLOCKS and get the magnetic block id
for each of the block in lt_B_mag_block_id */
for l_block_count IN 1..l_block_total loop
hr_utility.trace('Inserting block ' || lt_B_block_name(l_block_count));
l_message := 'Error inserting block ' || lt_B_block_name(l_block_count);
/* Insert Formulas into PAY_MAGNETIC_RECORDS */
for l_formula_count in 1..l_record_total loop
hr_utility.trace('Inserting record def. for formula '
|| lt_F_formula_name(l_formula_count));
l_message:='Error inserting record def. for formula '
|| lt_F_formula_name(l_formula_count);