The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
CONCURRENT_PROGRAM_ID,
NVL(ENABLE_TRACE
,'N')
FROM
FND_CONCURRENT_REQUESTS
WHERE REQUEST_ID = P_REQUEST_ID;
FOR ORG_REC IN (SELECT
ORGANIZATION_NAME
FROM
ORG_ORGANIZATION_DEFINITIONS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID) LOOP
P_ORGANIZATION_NAME := ORG_REC.ORGANIZATION_NAME;
FOR EC_REC IN (SELECT
EC_CODE,
EXCISE_DUTY_COMM,
EXCISE_DUTY_RANGE,
EXCISE_DUTY_DIVISION,
EXCISE_DUTY_CIRCLE
FROM
JAI_CMN_INVENTORY_ORGS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID) LOOP
P_EC_CODE := (EC_REC.EC_CODE);
FOR LOC_REC IN (SELECT
DESCRIPTION,
ADDRESS_LINE_1,
ADDRESS_LINE_2,
ADDRESS_LINE_3
FROM
HR_LOCATIONS
WHERE LOCATION_ID = P_LOCATION_ID) LOOP
P_DESCRIPTION := LOC_REC.DESCRIPTION;
FOR SLNO_REC IN (SELECT
MIN(REGISTER_ID) LO
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'A') LOOP
FOR VAL_REC IN (SELECT
BASIC_OPENING_BALANCE BASICOB,
ADDITIONAL_OPENING_BALANCE ADLOB,
OTHER_OPENING_BALANCE OTHOB
FROM
JAI_CMN_RG_COMP_DTLS
WHERE REGISTER_ID = SLNO_REC.LO) LOOP
P_CENOBRG23A := NVL(VAL_REC.BASICOB
,0);
FOR CR_REC IN (SELECT
NVL(SUM(CR_BASIC_ED)
,0) CENCT,
NVL(SUM(CR_OTHER_ED)
,0) SEDCT,
NVL(SUM(CR_ADDITIONAL_ED)
,0) ADLCT
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'A') LOOP
P_CENCTRG23A := ROUND(NVL(CR_REC.CENCT
,0)
,2);
FOR DR_REC IN (SELECT
NVL(SUM(DR_BASIC_ED)
,0) CENCU,
NVL(SUM(DR_OTHER_ED)
,0) SEDCU,
NVL(SUM(DR_ADDITIONAL_ED)
,0) ADLCU
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'A') LOOP
P_CENCURG23A := ROUND(NVL(DR_REC.CENCU
,0)
,2);
FOR SLNO_REC IN (SELECT
MIN(REGISTER_ID) LO
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'C') LOOP
FOR VAL_REC IN (SELECT
BASIC_OPENING_BALANCE BASICOB,
ADDITIONAL_OPENING_BALANCE ADLOB,
OTHER_OPENING_BALANCE OTHOB
FROM
JAI_CMN_RG_COMP_DTLS
WHERE REGISTER_ID = SLNO_REC.LO) LOOP
P_CENOBRG23C := NVL(VAL_REC.BASICOB
,0);
FOR CR_REC IN (SELECT
NVL(SUM(CR_BASIC_ED)
,0) CENCT,
NVL(SUM(CR_OTHER_ED)
,0) SEDCT,
NVL(SUM(CR_ADDITIONAL_ED)
,0) ADLCT
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'C') LOOP
P_CENCTRG23C := ROUND(NVL(CR_REC.CENCT
,0)
,2);
FOR DR_REC IN (SELECT
NVL(SUM(DR_BASIC_ED)
,0) CENCU,
NVL(SUM(DR_OTHER_ED)
,0) SEDCU,
NVL(SUM(DR_ADDITIONAL_ED)
,0) ADLCU
FROM
JAI_CMN_RG_COMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))
AND REGISTER_TYPE = 'C') LOOP
P_CENCURG23C := ROUND(NVL(DR_REC.CENCU
,0)
,2);
FOR SLNO_REC IN (SELECT
MIN(REGISTER_ID) LO
FROM
JAI_CMN_RG_PLA_CMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))) LOOP
FOR VAL_REC IN (SELECT
BASIC_OPENING_BALANCE BASICOB,
ADDITIONAL_OPENING_BALANCE ADLOB,
OTHER_OPENING_BALANCE OTHOB
FROM
JAI_CMN_RG_PLA_CMP_DTLS
WHERE REGISTER_ID = SLNO_REC.LO) LOOP
P_CENOBPLA := NVL(VAL_REC.BASICOB
,0);
FOR CR_REC IN (SELECT
NVL(SUM(CR_BASIC_ED)
,0) CENCT,
NVL(SUM(CR_OTHER_ED)
,0) SEDCT,
NVL(SUM(CR_ADDITIONAL_ED)
,0) ADLCT
FROM
JAI_CMN_RG_PLA_CMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))) LOOP
P_CENCTPLA := ROUND(NVL(CR_REC.CENCT
,0)
,2);
FOR DR_REC IN (SELECT
NVL(SUM(DR_BASIC_ED)
,0) CENCU,
NVL(SUM(DR_OTHER_ED)
,0) SEDCU,
NVL(SUM(DR_ADDITIONAL_ED)
,0) ADLCU
FROM
JAI_CMN_RG_PLA_CMP_DTLS
WHERE ORGANIZATION_ID = P_ORGANIZATION_ID
AND LOCATION_ID = P_LOCATION_ID
AND TRUNC(TRANSACTION_DATE) BETWEEN NVL(TRUNC(P_TRN_FROM_DATE)
,TRUNC(TRANSACTION_DATE))
AND NVL(TRUNC(P_TRN_TO_DATE)
,TRUNC(TRANSACTION_DATE))) LOOP
P_CENCUPLA := ROUND(NVL(DR_REC.CENCU
,0)
,2);