The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
PSEH.TRANSACTION_HEADER_ID,
PSEH.BASE_TRANSACTION_HEADER_ID,
PSEH.PP_TRANSACTION_TYPE,
DTH.ORG_ID,
DTH.VENDOR_ID,
DTH.VENDOR_SITE_ID,
TO_NUMBER(hou.default_legal_context_id) legal_entity, --Bug#7280169
TO_NUMBER(hou.set_of_books_id) ledger_id, --Bug#7280169
DTH.TRANSACTION_NUMBER,
PSEH.CREATION_DATE,
DXE.ENTITY_CODE,
DXE.EVENT_CLASS_CODE,
DXE.EVENT_TYPE_CODE
FROM
DPP_XLA_HEADERS PSEH,
DPP_TRANSACTION_HEADERS_ALL DTH,
hr_operating_units hou,
DPP_XLA_EVENT_MAP DXE
WHERE NVL(PSEH.PROCESSED_FLAG,'N') IN ('N','E')
AND PSEH.TRANSACTION_HEADER_ID=DTH.TRANSACTION_HEADER_ID
AND DTH.org_id =to_char(hou.organization_id) --Bug#7280169
AND hou.organization_id=p_org_id --Bug#7280169
AND DXE.PP_TRANSACTION_TYPE=PSEH.PP_TRANSACTION_TYPE;
IF rec_get_eligible_headers.PP_TRANSACTION_TYPE='COST_UPDATE' THEN
l_transactions_not_costed_flag:=0;
SELECT COUNT(*)
INTO l_transactions_not_costed_flag
FROM DPP_XLA_LINES DXL
WHERE DXL.TRANSACTION_HEADER_ID=rec_get_eligible_headers.transaction_header_id
AND DXL.BASE_TRANSACTION_HEADER_ID=rec_get_eligible_headers.base_transaction_header_id
AND NOT EXISTS
(
SELECT 'X'
FROM MTL_TRANSACTION_ACCOUNTS MTA
WHERE MTA.TRANSACTION_ID=DXL.BASE_TRANSACTION_LINE_ID
);
UPDATE DPP_XLA_HEADERS PSEH
SET PROCESSED_FLAG='E',
ERROR_DESCRIPTION='One or more items in Price Protection transaction ID= '||rec_get_eligible_headers.transaction_header_id
||'and execution detail ID= '|| rec_get_eligible_headers.base_transaction_header_id||' has not been accounted in Oracle costing'
WHERE TRANSACTION_HEADER_ID= rec_get_eligible_headers.transaction_header_id
AND BASE_TRANSACTION_HEADER_ID=rec_get_eligible_headers.base_transaction_header_id
AND PROCESSED_FLAG IN ('N','E');
(rec_get_eligible_headers.ENTITY_CODE='COST_UPDATE' AND l_transactions_not_costed_flag=0) OR
(rec_get_eligible_headers.ENTITY_CODE<>'COST_UPDATE')
)
THEN
l_event_date:=rec_get_eligible_headers.creation_date;
UPDATE DPP_XLA_HEADERS PSEH
SET PROCESSED_FLAG='P',
ERROR_DESCRIPTION=NULL
WHERE TRANSACTION_HEADER_ID= rec_get_eligible_headers.transaction_header_id
AND BASE_TRANSACTION_HEADER_ID=rec_get_eligible_headers.base_transaction_header_id
AND PROCESSED_FLAG IN ('N','E');
SELECT gl_pp_accrual_acct
INTO x_pp_accrual_ccid
FROM ozf_sys_parameters_all
where org_id=p_org_id;
SELECT NVL(gl_cost_adjustment_acct,-1)
INTO x_cost_adj_ccid
FROM ozf_supp_trd_prfls_all
WHERE supplier_id=p_vendor_id
AND supplier_site_id=p_vendor_site_id
AND org_id=p_org_id;
SELECT NVL(gl_cost_adjustment_acct,-1)
INTO x_cost_adj_ccid
FROM ozf_sys_parameters_all
where org_id=p_org_id;
SELECT gl_cost_adjustment_acct
INTO x_cost_adj_ccid
FROM ozf_sys_parameters_all
where org_id=p_org_id;
SELECT NVL(GL_ID_DED_CLEARING,-1)
INTO x_ap_clearing_ccid
FROM ozf_claims_all oca,
ozf_claim_types_all_b oct
where oca.org_id=p_org_id
and oct.org_id=p_org_id
and oca.claim_id=p_claim_id
and oca.claim_type_id=oct.claim_type_id;
SELECT GL_ID_DED_CLEARING
INTO x_ap_clearing_ccid
FROM ozf_sys_parameters_all osp
where osp.org_id=p_org_id;
SELECT GL_ID_DED_CLEARING
INTO x_ap_clearing_ccid
FROM ozf_sys_parameters_all osp
where osp.org_id=p_org_id;
SELECT NVL(GL_ID_DED_ADJ_CLEARING,-1)
INTO x_ar_clearing_ccid
FROM ozf_claims_all oca,
ozf_claim_types_all_b oct
where oca.org_id=p_org_id
and oct.org_id=p_org_id
and oca.claim_id=p_claim_id
and oca.claim_type_id=oct.claim_type_id;
SELECT NVL(GL_ID_DED_ADJ_CLEARING,-1)
INTO x_ar_clearing_ccid
FROM ozf_sys_parameters_all osp
where osp.org_id=p_org_id;
SELECT GL_ID_DED_ADJ_CLEARING
INTO x_ar_clearing_ccid
FROM ozf_sys_parameters_all osp
where osp.org_id=p_org_id;
SELECT NVL(gl_contra_liability_acct,-1)
INTO x_contra_liab_ccid
FROM ozf_supp_trd_prfls_all
WHERE supplier_id=p_vendor_id
AND supplier_site_id=p_vendor_site_id
AND org_id=p_org_id;
SELECT gl_contra_liability_acct
INTO x_contra_liab_ccid
FROM ozf_sys_parameters_all
where org_id=p_org_id;
SELECT gl_contra_liability_acct
INTO x_contra_liab_ccid
FROM ozf_sys_parameters_all
where org_id=p_org_id;