The following lines contain the word 'select', 'insert', 'update' or 'delete':
select me.schedule_id
from fa_maint_events me,
fa_additions ad
where ad.asset_number >= nvl(h_from_asset_number,ad.asset_number) and
ad.asset_number <= nvl(h_to_asset_number,ad.asset_number) and
ad.category_id = nvl(h_category_id,ad.category_id) and
ad.asset_id = me.asset_id and
me.schedule_id = nvl(h_schedule_id,me.schedule_id) and
me.maintenance_date between nvl(h_from_date,me.maintenance_date) and
nvl(h_to_date,me.maintenance_date) and
me.status = nvl(h_status,me.status); */
SELECT category_flex_structure
INTO h_cat_struct_id
FROM fa_system_controls;
h_mesg_name := 'FA_SHARED_DELETE_FAILED';
delete from fa_maint_events me
where me.book_type_code = nvl(h_book_type_code,me.book_type_code) and
me.status = nvl(h_status, me.status) and
me.maintenance_date between nvl(h_from_date,me.maintenance_date) and
nvl(h_to_date,me.maintenance_date) and
me.asset_id = (select ad.asset_id
from fa_additions ad
where ad.asset_number >= nvl(h_from_asset_number,ad.asset_number)
and ad.asset_number <= nvl(h_to_asset_number,ad.asset_number)
and ad.asset_category_id = nvl(h_category_id,ad.asset_category_id)
and ad.asset_id = me.asset_id);