The following lines contain the word 'select', 'insert', 'update' or 'delete':
delete from gl_bc_packets bp
where bp.packet_id in (p_packetid, p_packetid_ursvd);
delete from gl_bc_packet_arrival_order ao
where ao.packet_id in (p_packetid, p_packetid_ursvd);
update gl_bc_packets bp
set bp.status_code = 'T'
where bp.packet_id = g_packet_id;
'Updated Status for ' || SQL%ROWCOUNT || ' Trans to Fatal' ||
g_delim;
update gl_bc_packet_arrival_order ao
set ao.affect_funds_flag = 'N'
where ao.packet_id = g_packet_id;