The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT 'UPDATE'
INTO l_action
FROM fte_lanes
WHERE lane_number like p_zone_name||'%'
AND editable_flag = 'N'
AND rownum = 1;
SELECT 'DELETE'
INTO l_action
FROM fte_lanes
WHERE lane_number like p_zone_name||'%'
AND editable_flag = 'N'
AND nvl(effective_date, SYSDATE) > l_expiry_date
AND rownum = 1;
UPDATE fte_lanes
SET expiry_date = l_expiry_date,
lane_number = lane_id||'-PARCEL',
last_update_date = SYSDATE
WHERE lane_number like p_zone_name||'%'
AND editable_flag = 'N';
UPDATE wsh_regions_tl t
SET t.zone = t.region_id||'-PARCEL'
WHERE t.zone like p_zone_name||'%'
AND t.region_id IN (SELECT region_id FROM wsh_regions
WHERE region_id=t.region_id AND region_type=11);
UPDATE fte_lanes
SET editable_flag = 'D',
lane_number = lane_id||'-PARCEL',
last_update_date = SYSDATE
WHERE lane_number like p_zone_name||'%'
AND editable_flag = 'N';
DELETE wsh_zone_regions
WHERE parent_region_id in (SELECT region_id FROM wsh_regions_v
WHERE zone like p_zone_name||'%' AND region_type = 11);