The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
C.PRECISION,
C.MINIMUM_ACCOUNTABLE_UNIT,
C.DESCRIPTION
INTO PREC,MIN_AU,DESCR
FROM
FND_CURRENCIES_VL C
WHERE CURRENCY_CODE = BASE_CURR;
SELECT
ALC1.MEANING,
ALC2.MEANING,
ALC3.MEANING
INTO L_NLS_REPORT_BASIS,L_NLS_INV_STATUS,L_NLS_ORDERBY
FROM
FND_LOOKUPS ALC1,
FND_LOOKUPS ALC2,
FND_LOOKUPS ALC3
WHERE ALC1.LOOKUP_TYPE = 'ZX_TRL_TAX_USE_DATE_BASIS'
AND ALC1.LOOKUP_CODE = P_REPORT_BASIS
AND ALC2.LOOKUP_TYPE = 'ZX_TRL_INVOICE_STATUS'
AND ALC2.LOOKUP_CODE = P_INV_STATUS_D
AND ALC3.LOOKUP_TYPE = 'ZX_TRL_VENDOR_OR_INVOICE'
AND ALC3.LOOKUP_CODE = P_ORDERBY;
SELECT
LY.MEANING,
LN.MEANING,
LA.DISPLAYED_FIELD
INTO NLS_YES,NLS_NO,NLS_ALL
FROM
FND_LOOKUPS LY,
FND_LOOKUPS LN,
AP_LOOKUP_CODES LA
WHERE LY.LOOKUP_TYPE = 'YES_NO'
AND LY.LOOKUP_CODE = 'Y'
AND LN.LOOKUP_TYPE = 'YES_NO'
AND LN.LOOKUP_CODE = 'N'
AND LA.LOOKUP_TYPE = 'NLS REPORT PARAMETER'
AND LA.LOOKUP_CODE = 'ALL';
SELECT
NAME,
CHART_OF_ACCOUNTS_ID
INTO L_NAME,L_CHART_OF_ACCOUNTS_ID
FROM
GL_SETS_OF_BOOKS
WHERE SET_OF_BOOKS_ID = L_SOB_ID;
SELECT
SUM(AMOUNT)
INTO L_ITEM_AMOUNT
FROM
AP_INVOICE_DISTRIBUTIONS_ALL D
WHERE D.INVOICE_ID = C_INVOICE_ID
AND D.LINE_TYPE_LOOKUP_CODE not in ( 'NONREC_TAX' , 'REC_TAX' , 'TERV' , 'TIPV' , 'AWT' )
AND D.TAX_CODE_ID = C_INVOICE_TAX_ID
AND ( P_REPORT_BASIS <> 'GL'
OR D.ACCOUNTING_DATE between P_START_DATE
AND P_END_DATE )
AND NVL(D.ORG_ID
,-99) in (
SELECT
- 99
FROM
DUAL
UNION ALL
SELECT
ORGANIZATION_ID
FROM
HR_ORGANIZATION_INFORMATION,
FND_PRODUCT_GROUPS
WHERE NVL(MULTI_ORG_FLAG
,'N') = 'Y'
AND ORG_INFORMATION_CONTEXT = 'Operating Unit Information'
AND DECODE(P_REPORTING_LEVEL
,'1000'
,TO_NUMBER(ORG_INFORMATION3)
,'2000'
,TO_NUMBER(ORG_INFORMATION2)
,'3000'
,ORGANIZATION_ID) = P_REPORTING_ENTITY_ID );
SELECT
DECODE(C_BASE_MIN_ACCT_UNIT
,''
,ROUND(C_TAXABLE_AMOUNT * (C_TAX_RATE / 100)
,C_BASE_PRECISION)
,ROUND(C_TAXABLE_AMOUNT * (C_TAX_RATE / 100) / C_BASE_MIN_ACCT_UNIT) * C_BASE_MIN_ACCT_UNIT)
INTO L_TAX_AMOUNT
FROM
SYS.DUAL;