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
HR.GLOBAL_ATTRIBUTE8 COMPANY_NAME
INTO L_NAME
FROM
HR_LOCATIONS HR
WHERE HR.LOCATION_ID = P_LOCATION_ID;
SELECT
LPAD(SUBSTR(JGEA_C.ID_NUMBER
,1
,13)
,13
,' ')
INTO L_COMPANY_NUM_AGENT_RET
FROM
JG_ZZ_ENTITY_ASSOC JGEA_C
WHERE JGEA_C.PRIMARY_ID_NUMBER = COMP_PRIMARY_ID_NUMBER
AND JGEA_C.ASSOCIATED_ENTITY_ID = COMP_TAX_AUTHORITY_ID
AND JGEA_C.ID_TYPE = COMP_TAX_AUTHORITY_TYPE;
SELECT
LPAD(SUBSTR(JGEA_S.ID_NUMBER
,1
,13)
,13
,' ') SUPPLIER_PROVINCE_NUMBER
INTO L_SUPPLIER_PROVINCE_NUMBER
FROM
JG_ZZ_ENTITY_ASSOC JGEA_S
WHERE JGEA_S.PRIMARY_ID_NUMBER = SUPP_PRIMARY_ID_NUMBER
AND JGEA_S.ASSOCIATED_ENTITY_ID = SUPP_TAX_AUTHORITY_ID
AND JGEA_S.ID_TYPE = SUPP_TAX_AUTHORITY_TYPE;
SELECT
LPAD('0.00'
,11
,' ')
INTO L_EXCESS_AMT
FROM
DUAL;