The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Invoice_Flag(p_api_version IN NUMBER,
p_dist_ids IN DBMS_SQL.NUMBER_TABLE,
p_flags IN DBMS_SQL.VARCHAR2_TABLE,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2)
IS
l_api_name CONSTANT varchar2(30) := 'Update_Invoice_Flag';
UPDATE po_distributions_all
SET invoice_adjustment_flag = p_flags(i)
WHERE po_distribution_id = p_dist_ids(i);
END Update_Invoice_Flag;