The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
PRL.source_type_code
, nvl(PRD.encumbered_amount, 0)
INTO
l_document_subtype
, l_encumbered_amount
FROM PO_REQUISITION_LINES_ALL PRL
, PO_REQ_DISTRIBUTIONS_ALL PRD
WHERE PRD.distribution_id = p_distribution_id
AND PRD.requisition_line_id = PRL.requisition_line_id
;
SELECT nvl(POD.encumbered_amount, 0)
INTO x_active_enc_amount
FROM PO_DISTRIBUTIONS_ALL POD
WHERE POD.po_distribution_id = p_distribution_id
;
SELECT
nvl(POD.encumbered_amount, 0)
, nvl(POD.accrue_on_receipt_flag, 'N')
, POLL.shipment_type
INTO
l_encumbered_amount
, l_accrue_on_receipt_flag
, l_document_subtype
FROM PO_DISTRIBUTIONS_ALL POD
, PO_LINE_LOCATIONS_ALL POLL
WHERE POD.po_distribution_id = p_distribution_id
AND POD.line_location_id = POLL.line_location_id
;