The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT max(new_supplier_order_number), max(document_header_id),
max(document_revision_num), max(po_release_id),
max(decode(request_level,'HEADER',request_status,null)), min(request_status),
max(decode(request_level,'HEADER',response_reason,null)),max(document_num)
INTO l_so_number, l_header_id,
l_revision_num, l_release_id,
l_header_status, l_consolidated_line_status,
l_header_response_reason,l_document_num
FROM po_change_requests
WHERE change_request_group_id = l_change_request_group_id;
select revision_num into l_revision_num from po_releases_all where po_release_id = l_release_id;
select revision_num into l_revision_num from po_headers_all where po_header_id = l_header_id;
SELECT VENDOR_ID, VENDOR_SITE_ID
INTO l_party_id, l_party_site_id
FROM PO_HEADERS_ALL
WHERE PO_HEADER_ID = l_header_id;
SELECT cln_generic_s.nextval INTO l_xmlg_document_id FROM dual;
SELECT cln_generic_s.nextval INTO l_event_key FROM dual;
SELECT max(msg_cont_num)
INTO l_xmlg_int_control_num
FROM po_change_requests
WHERE change_request_group_id = l_change_request_group_id;
SELECT max(ch.collaboration_id)
INTO l_coll_id
FROM cln_coll_hist_hdr ch, cln_coll_hist_dtl cd
WHERE ch.collaboration_id = cd.collaboration_id
AND cd.xmlg_internal_control_number = l_xmlg_int_control_num
AND ch.collaboration_type = 'SUPP_CHANGE_ORDER';
SELECT max(SUPPLIER_DOC_REF) -- to compile this code in 11.5.9 env use RESPONSE_REASON
INTO X_DATA1
FROM PO_CHANGE_REQUESTS
WHERE CHANGE_REQUEST_GROUP_ID = to_number(P_CHANGE_REQUEST_GROUP_ID);