The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT NVL(pay_when_paid, 'N'),
type_lookup_code
INTO x_pay_when_paid,
l_type_lookup_code
FROM po_headers_all
WHERE po_header_id = p_po_header_id;
SELECT NVL(pay_when_paid, 'N'),
revision_num,
type_lookup_code
INTO l_pay_when_paid,
l_rev_num,
l_type_lookup_code
FROM po_headers_all
WHERE po_header_id = p_po_header_id;