The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
FCURR.CURRENCY_CODE,
FCURR.PRECISION
INTO BASE_CURR,PREC
FROM
AR_SYSTEM_PARAMETERS ASP,
FND_CURRENCIES_VL FCURR,
GL_SETS_OF_BOOKS GSBKS
WHERE ASP.SET_OF_BOOKS_ID = GSBKS.SET_OF_BOOKS_ID
AND GSBKS.CURRENCY_CODE = FCURR.CURRENCY_CODE;
SELECT
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,RACTL.EXTENDED_AMOUNT
,0)),
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,NVL(RACTL.TAX_RATE
,0)
,0)),
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,FND_NUMBER.CANONICAL_TO_NUMBER(RACTL.GLOBAL_ATTRIBUTE11)
,0))
INTO X_ICMS_TAX_AMOUNT,X_ICMS_TAX_RATE,X_ICMS_TAX_BASE_AMOUNT
FROM
RA_CUSTOMER_TRX_LINES RACTL,
AR_VAT_TAX ARVT
WHERE RACTL.LINE_TYPE = 'TAX'
AND RACTL.LINK_TO_CUST_TRX_LINE_ID = C_DTL_TRX_LINE_ID
AND ARVT.VAT_TAX_ID = RACTL.VAT_TAX_ID
AND TO_NUMBER(ARVT.GLOBAL_ATTRIBUTE1) = 2;
SELECT
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,RACTL.EXTENDED_AMOUNT
,0))
INTO X_ISS_TAX_AMOUNT
FROM
RA_CUSTOMER_TRX_LINES RACTL,
AR_VAT_TAX ARVT
WHERE RACTL.LINE_TYPE = 'TAX'
AND RACTL.LINK_TO_CUST_TRX_LINE_ID = C_DTL_TRX_LINE_ID
AND ARVT.VAT_TAX_ID = RACTL.VAT_TAX_ID
AND TO_NUMBER(ARVT.GLOBAL_ATTRIBUTE1) = 5;
SELECT
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,RACTL.EXTENDED_AMOUNT
,0))
INTO X_IRJ_TAX_AMOUNT
FROM
RA_CUSTOMER_TRX_LINES RACTL,
AR_VAT_TAX ARVT
WHERE RACTL.LINE_TYPE = 'TAX'
AND RACTL.LINK_TO_CUST_TRX_LINE_ID = C_DTL_TRX_LINE_ID
AND ARVT.VAT_TAX_ID = RACTL.VAT_TAX_ID
AND TO_NUMBER(ARVT.GLOBAL_ATTRIBUTE1) = 4;
SELECT
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,RACTL.EXTENDED_AMOUNT
,0)),
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,FND_NUMBER.CANONICAL_TO_NUMBER(RACTL.GLOBAL_ATTRIBUTE11)
,0))
INTO X_ICMSST_TAX_AMOUNT,X_ICMSST_TAX_BASE_AMOUNT
FROM
RA_CUSTOMER_TRX_LINES RACTL,
AR_VAT_TAX ARVT
WHERE RACTL.LINE_TYPE = 'TAX'
AND RACTL.LINK_TO_CUST_TRX_LINE_ID = C_DTL_TRX_LINE_ID
AND ARVT.VAT_TAX_ID = RACTL.VAT_TAX_ID
AND TO_NUMBER(ARVT.GLOBAL_ATTRIBUTE1) = 3;
SELECT
MTL_SYSTEM_ITEMS.SEGMENT1
INTO X_ITEM_CODE
FROM
MTL_SYSTEM_ITEMS
WHERE MTL_SYSTEM_ITEMS.INVENTORY_ITEM_ID = C_INVENTORY_ID
AND MTL_SYSTEM_ITEMS.ORGANIZATION_ID = H_SO_ORGANIZATION;
SELECT
PRINTING_PENDING,
NVL(PRINTING_COUNT
,0)
INTO FLAG_PRINT,P_COUNT
FROM
RA_CUSTOMER_TRX
WHERE TRX_NUMBER = X_TRX_NUMBER
AND CUSTOMER_TRX_ID = CUST_TRX_ID;
ARP_CT_PKG.UPDATE_P_PRINT(L_TRX_REC
,CUST_TRX_ID);
ARP_CT_PKG.UPDATE_P_PRINT(L_TRX_REC
,CUST_TRX_ID);
SELECT
LOC.TRIB_SUBST_INSCRIPTION
INTO X_TRIB_SUBST_INSCRIPTION
FROM
JL_ZZ_AR_TX_LOCN LOC,
AR_SYSTEM_PARAMETERS ARSP,
HZ_CUST_ACCT_SITES AD,
HZ_LOCATIONS LOCN,
HZ_PARTY_SITES PST,
HZ_CUST_SITE_USES SU,
HZ_GEOGRAPHIES GEO,
HR_LOCATIONS HRL,
HR_ORGANIZATION_UNITS ORG
WHERE ORG.ORGANIZATION_ID = H_OPERATION_UNIT
AND HRL.LOCATION_ID = ORG.LOCATION_ID
AND LOC.SHIP_FROM_CODE = HRL.REGION_2
AND SU.SITE_USE_ID = C_SHIP_TO_SITE_USE_ID
AND SU.CUST_ACCT_SITE_ID = AD.CUST_ACCT_SITE_ID
AND AD.PARTY_SITE_ID = PST.PARTY_SITE_ID
AND PST.LOCATION_ID = LOCN.LOCATION_ID
AND LOC.SHIP_TO_SEGMENT_ID = GEO.GEOGRAPHY_ID
AND UPPER(GEO.GEOGRAPHY_NAME) = UPPER(DECODE(ARSP.GLOBAL_ATTRIBUTE9
,'STATE'
,LOCN.STATE
,LOCN.PROVINCE))
AND GEO.GEOGRAPHY_TYPE = ARSP.GLOBAL_ATTRIBUTE9
AND LOC.TAX_CATEGORY_ID = 1
AND LOC.END_DATE_ACTIVE >= C_TRX_DATE
AND NVL(LOC.START_DATE_ACTIVE
,C_TRX_DATE) <= C_TRX_DATE;
SELECT
HRL.GLOBAL_ATTRIBUTE5
INTO X_BRAND
FROM
HR_LOCATIONS HRL,
HR_ORGANIZATION_UNITS ORG
WHERE ORG.ORGANIZATION_ID = H_OPERATION_UNIT
AND HRL.LOCATION_ID = ORG.LOCATION_ID;
SELECT
SUBSTR(NVL(GLOBAL_ATTRIBUTE12
,'N')
,1
,1)
INTO X_PRINT_FLAG
FROM
AR_SYSTEM_PARAMETERS;
SELECT
ROWNUM CURRENT_ROW,
DECODE(PRODUCT_CATEGORY
,NULL
,PRODUCT_FISC_CLASSIFICATION
,PRODUCT_CATEGORY) FISCAL_CLASS_CODE
FROM
RA_CUSTOMER_TRX_LINES RACTL,
ZX_LINES_DET_FACTORS ZLD
WHERE RACTL.CUSTOMER_TRX_ID = C_CUSTOMER_TRX_ID
AND ZLD.APPLICATION_ID = 222
AND ZLD.ENTITY_CODE = 'TRANSACTIONS'
AND ZLD.EVENT_CLASS_CODE in ( 'INVOICE' , 'CREDIT_MEMO' , 'DEBIT_MEMO' )
AND ZLD.TRX_ID = C_CUSTOMER_TRX_ID
AND ZLD.TRX_LINE_ID = RACTL.CUSTOMER_TRX_LINE_ID
AND RACTL.LINE_TYPE = 'LINE'
ORDER BY
RACTL.CUSTOMER_TRX_ID ASC;
SELECT
ARL.MEANING
INTO X_MEANING
FROM
AR_LOOKUPS ARL,
RA_CUSTOMER_TRX RACT
WHERE RACT.STATUS_TRX = 'VD'
AND ARL.LOOKUP_TYPE = 'INVOICE_TRX_STATUS'
AND ARL.LOOKUP_CODE = C_STATUS_TRX;
SELECT
DESCRIPTION,
GLOBAL_ATTRIBUTE5 || DECODE(GLOBAL_ATTRIBUTE4
,2
,'/' || GLOBAL_ATTRIBUTE6
,3
,'/' || GLOBAL_ATTRIBUTE6) || '-' || GLOBAL_ATTRIBUTE7,
GLOBAL_ATTRIBUTE1,
SUBSTR(GLOBAL_ATTRIBUTE2
,1
,12),
GLOBAL_ATTRIBUTE3,
GLOBAL_ATTRIBUTE8
INTO L_F_NAME,L_JOIN_1,L_F_ADDRESS,L_F_CITY,L_F_STATE,L_F_STATE_INS_NUMBER
FROM
ORG_FREIGHT
WHERE FREIGHT_CODE = SHIP_VIA
AND ORGANIZATION_ID = H_SO_ORGANIZATION;
SELECT
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,RACTL.EXTENDED_AMOUNT
,0)),
SUM(DECODE(ARVT.GLOBAL_ATTRIBUTE2
,'Y'
,NVL(RACTL.TAX_RATE
,0)
,0))
INTO X_IPI_TAX_AMOUNT,X_IPI_TAX_RATE
FROM
RA_CUSTOMER_TRX_LINES RACTL,
AR_VAT_TAX ARVT
WHERE RACTL.LINE_TYPE = 'TAX'
AND RACTL.LINK_TO_CUST_TRX_LINE_ID = C_DTL_TRX_LINE_ID
AND ARVT.VAT_TAX_ID = RACTL.VAT_TAX_ID
AND TO_NUMBER(ARVT.GLOBAL_ATTRIBUTE1) = 6;