The following lines contain the word 'select', 'insert', 'update' or 'delete':
g_inp_tbl.DELETE;
PROCEDURE UpdateInputLine (
p_transaction_quantity IN NUMBER
,p_secondary_quantity IN NUMBER DEFAULT NULL
) IS
BEGIN
g_inp_tbl(g_inp_pointer).transaction_quantity := p_transaction_quantity;
END UpdateInputLine;
PROCEDURE DeleteInputLine IS
BEGIN
-- delete first record
IF g_inp_pointer = g_inp_first THEN
g_inp_first := g_inp_next;
END DeleteInputLine;
g_rule_tbl.delete;