The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT PGT.NUM2 source_doc_id,
PGT.NUM3 line_type_id,
PGT.CHAR1 destination_type,
PGT.CHAR2 purchase_basis,
PH.style_id source_doc_style_id
FROM PO_SESSION_GT PGT,
PO_HEADERS_ALL PH
WHERE PGT.KEY = p_session_gt_key
AND PGT.NUM2 = PH.PO_HEADER_ID
AND PGT.NUM2 IS NOT NULL;
SELECT PGT.NUM3 line_type_id,
PGT.CHAR1 destination_type,
PGT.CHAR2 purchase_basis
FROM PO_SESSION_GT PGT
WHERE PGT.KEY = p_session_gt_key
AND PGT.NUM2 IS NULL;
select poh.style_id BULK COLLECT
into l_style_id_tbl
from po_session_gt pgt,
po_headers_all poh
where pgt.key = p_session_gt_key
and pgt.num2 = poh.po_header_id
group by poh.style_id;
SELECT purchase_basis
INTO l_purchase_basis
FROM po_line_types_b
WHERE line_type_id = p_line_type_id;
select displayed_field
into l_destination_type
from po_lookup_codes
where LOOKUP_TYPE = 'DESTINATION TYPE'
and LOOKUP_CODE = p_destination_type;
SELECT pdsh.line_type_allowed
INTO x_related_line_types
FROM po_doc_style_values pdsv,
po_doc_style_headers pdsh
WHERE pdsh.style_id = p_style_id
AND pdsv.style_id = pdsh.style_id
AND pdsv.style_attribute_name = 'PURCHASE_BASES'
AND pdsv.style_allowed_value = p_purchase_basis
AND nvl(pdsv.enabled_flag,
'N') = 'Y';
SELECT count(1)
INTO l_count
FROM dual
WHERE exists
(SELECT NULL
FROM PO_DOC_STYLE_VALUES pdv
WHERE pdv.style_id = p_style_id
AND pdv.style_attribute_name = 'LINE_TYPES'
AND pdv.style_allowed_value = to_char(p_line_type_id)
AND nvl(pdv.enabled_flag,
'N') = 'Y');
SELECT count(1)
INTO l_count
FROM dual
WHERE exists
(SELECT NULL
FROM po_line_types_b
WHERE purchase_basis = 'TEMP LABOR'
AND order_type_lookup_code = 'RATE'
AND line_type_id = p_line_type_id);
SELECT count(1)
INTO l_count
FROM dual
WHERE exists
(SELECT NULL
FROM po_line_types_b
WHERE purchase_basis = 'SERVICES'
AND order_type_lookup_code = 'AMOUNT'
AND line_type_id = p_line_type_id);
SELECT style_id
INTO l_style_id
FROM PO_HEADERS_MERGE_V
WHERE po_header_id = p_doc_id and draft_id = p_draft_id;
SELECT type_lookup_code
INTO l_type_lookup_code
FROM PO_HEADERS_ALL
WHERE po_header_id = p_doc_id;
select DISPLAY_NAME
into l_style_display_name
from PO_DOC_STYLE_LINES_TL TL,
PO_HEADERS_MERGE_V ph
where tl.LANGUAGE = nvl(p_language,
USERENV('LANG'))
and tl.style_id = ph.style_id
and ph.po_header_id = p_doc_id
and ph.draft_id = p_draft_id
and tl.DOCUMENT_SUBTYPE = PH.TYPE_LOOKUP_CODE;
SELECT TYPE_NAME
INTO l_style_display_name
FROM PO_DOCUMENT_TYPES_TL tl,
PO_HEADERS_MERGE_V ph
WHERE tl.language = NVL(p_language, USERENV('LANG'))
AND ph.po_header_id = p_doc_id
AND ph.draft_id = p_draft_id
AND tl.document_subtype = 'PLANNED';
SELECT progress_payment_flag
INTO l_result
FROM po_doc_style_headers
WHERE style_id = p_style_id;
SELECT PO_SESSION_GT_S.nextval INTO l_session_gt_key FROM dual;
PO_LOG.stmt(d_module, d_progress, 'inserting into po_session_gt');
insert into po_session_gt
(key,
num1,
num2,
num3,
char1,
char2)
values
(l_session_gt_key,
p_req_line_id_table(i),
p_source_doc_id_table(i),
p_line_type_id_table(i),
p_destination_type_table(i),
p_purchase_basis_table(i)
);
delete po_session_gt where key = l_session_gt_key;