The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
P.BASE_CURRENCY_CODE,
C.PRECISION,
C.MINIMUM_ACCOUNTABLE_UNIT,
C.DESCRIPTION
INTO BASE_CURR,PREC,MIN_AU,DESCR
FROM
AP_SYSTEM_PARAMETERS P,
FND_CURRENCIES_VL C
WHERE P.BASE_CURRENCY_CODE = C.CURRENCY_CODE;
SELECT
LY.MEANING,
LN.MEANING,
L1.DISPLAYED_FIELD,
L2.DISPLAYED_FIELD,
L3.DISPLAYED_FIELD
INTO NLS_YES,NLS_NO,NLS_ALL,NLS_VOID,NLS_NA
FROM
FND_LOOKUPS LY,
FND_LOOKUPS LN,
AP_LOOKUP_CODES L1,
AP_LOOKUP_CODES L2,
AP_LOOKUP_CODES L3
WHERE LY.LOOKUP_TYPE = 'YES_NO'
AND LY.LOOKUP_CODE = 'Y'
AND LN.LOOKUP_TYPE = 'YES_NO'
AND LN.LOOKUP_CODE = 'N'
AND L1.LOOKUP_TYPE = 'NLS REPORT PARAMETER'
AND L1.LOOKUP_CODE = 'ALL'
AND L2.LOOKUP_TYPE = 'NLS TRANSLATION'
AND L2.LOOKUP_CODE = 'VOID'
AND L3.LOOKUP_TYPE = 'NLS REPORT PARAMETER'
AND L3.LOOKUP_CODE = 'NA';
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
NUMBER_OF_DOCUMENTS,
TOTAL_REPORTED,
TOTAL_WITHHELD
INTO C_NUMBER_OF_DOCS,C_TOTAL_REPORTED,C_TOTAL_WITHHELD
FROM
AP_1096_DATA
WHERE TAX_ENTITY_ID = P_TAX_ENTITY_ID;
SELECT
DECODE(P_ADDRESS_CHOICE
,'ADDRESS1'
,HR.ADDRESS_LINE_1
,'LOCATION'
,HR.LOCATION_CODE
,'REP_ENTITY'
,RE.ENTITY_NAME
,HR.ADDRESS_LINE_1),
DECODE(P_ADDRESS_CHOICE
,'ADDRESS1'
,HR.ADDRESS_LINE_2
,'LOCATION'
,HR.ADDRESS_LINE_1
,'REP_ENTITY'
,HR.ADDRESS_LINE_1
,HR.ADDRESS_LINE_2),
DECODE(P_ADDRESS_CHOICE
,'ADDRESS1'
,HR.ADDRESS_LINE_3
,'LOCATION'
,HR.ADDRESS_LINE_2
,'REP_ENTITY'
,HR.ADDRESS_LINE_2
,HR.ADDRESS_LINE_3),
HR.TOWN_OR_CITY,
NVL(HR.REGION_3
,HR.REGION_2),
REPLACE(REPLACE(HR.POSTAL_CODE
,' '
,'')
,'-'
,''),
RE.TAX_IDENTIFICATION_NUM
INTO C_COMPANY_NAME,C_US_LINE2,C_US_LINE3,C_US_CITY,C_US_STATE,C_US_ZIP,C_TIN
FROM
HR_LOCATIONS HR,
AP_REPORTING_ENTITIES RE
WHERE RE.TAX_ENTITY_ID = P_TAX_ENTITY_ID
AND RE.LOCATION_ID = HR.LOCATION_ID;