The following lines contain the word 'select', 'insert', 'update' or 'delete':
SELECT
' ' || LC1.MEANING || ' ',
' ' || LC2.MEANING || ' ',
' ' || LC3.MEANING || ' '
INTO C_PL_CENT_E,C_PL_CENT_Y,C_PL_CENT
FROM
FND_LOOKUPS LC1,
FND_LOOKUPS LC2,
FND_LOOKUPS LC3
WHERE LC1.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC1.LOOKUP_CODE = 'PL_CENT_E'
AND LC2.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC2.LOOKUP_CODE = 'PL_CENT_Y'
AND LC3.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC3.LOOKUP_CODE = 'PL_CENT';
PRINT_STATUS_UPDATE;
PROCEDURE PRINT_STATUS_UPDATE IS
PC RA_CUSTOMER_TRX.PRINTING_COUNT%TYPE;
SELECT
PRINTING_COUNT,
PRINTING_LAST_PRINTED,
PRINTING_ORIGINAL_DATE,
CUSTOMER_TRX_ID
FROM
RA_CUSTOMER_TRX
WHERE SET_OF_BOOKS_ID = P_SET_OF_BOOKS_ID
AND COMPLETE_FLAG = 'Y'
AND CUST_TRX_TYPE_ID = DECODE(P_DOCUMENT_TYPE
,NULL
,CUST_TRX_TYPE_ID
,P_DOCUMENT_TYPE)
AND TRX_NUMBER between DECODE(P_INVOICE_NUMBER_LOW
,NULL
,TRX_NUMBER_LOW
,P_INVOICE_NUMBER_LOW)
AND DECODE(P_INVOICE_NUMBER_HIGH
,NULL
,TRX_NUMBER_HIGH
,P_INVOICE_NUMBER_HIGH)
AND TRX_DATE between NVL(P_INVOICE_DATE_LOW
,TRX_DATE)
AND NVL(P_INVOICE_DATE_HIGH
,TRX_DATE)
AND DECODE(P_BATCH_ID
,NULL
,1
,P_BATCH_ID) = DECODE(P_BATCH_ID
,NULL
,1
,BATCH_ID)
AND BILL_TO_CUSTOMER_ID = DECODE(P_CUST_ID
,NULL
,BILL_TO_CUSTOMER_ID
,P_CUST_ID);
UPDATE
RA_CUSTOMER_TRX
SET
PRINTING_COUNT = DECODE(PC
,NULL
,0
,PC) + 1
,PRINTING_LAST_PRINTED = SYSDATE
,PRINTING_ORIGINAL_DATE = DECODE(PC
,NULL
,SYSDATE)
WHERE CUSTOMER_TRX_ID = CTI
AND NVL(PRINTING_COUNT
,0) = 0;
UPDATE
RA_CUSTOMER_TRX
SET
PRINTING_COUNT = DECODE(PC
,NULL
,0
,PC) + 1
,PRINTING_LAST_PRINTED = SYSDATE
,PRINTING_ORIGINAL_DATE = DECODE(PC
,NULL
,SYSDATE)
WHERE CUSTOMER_TRX_ID = CTI
AND NVL(PRINTING_COUNT
,0) <> 0;
END PRINT_STATUS_UPDATE;
SELECT
SUBSTR(USERENV('LANGUAGE')
,1
,INSTR(USERENV('LANGUAGE')
,'_') - 1)
INTO P_SESSION_LANGUAGE
FROM
DUAL;
SELECT
PRECISION
INTO PRECISION
FROM
FND_CURRENCIES
WHERE CURRENCY_CODE = FUNCTCURR;
SELECT
REP_REGISTRATION_NUMBER
INTO VAT_REG
FROM
ZX_PARTY_TAX_PROFILE PTP
WHERE PARTY_TYPE_CODE = 'LEGAL_ESTABLISHMENT'
AND PARTY_ID = (
SELECT
PARTY_ID
FROM
XLE_ETB_PROFILES XEP
WHERE XEP.LEGAL_ENTITY_ID = P_ORG_ID
AND MAIN_ESTABLISHMENT_FLAG = 'Y' );
SELECT
MIN(TRX_NUMBER)
INTO TRX_LOW
FROM
RA_CUSTOMER_TRX;
SELECT
MAX(TRX_NUMBER)
INTO TRX_HIGH
FROM
RA_CUSTOMER_TRX;
SELECT
MAX(REGISTRATION_NUMBER)
INTO COMP_NO
FROM
XLE_FIRSTPARTY_INFORMATION_V
WHERE LEGAL_ENTITY_ID = P_ORG_ID;
SELECT
' ' || DISPLAYED_FIELD || ' '
INTO C_ZERO
FROM
AP_LOOKUP_CODES
WHERE LOOKUP_CODE = 'ZERO';
SELECT
' ' || LC1.DISPLAYED_FIELD || ' ',
' ' || LC2.DISPLAYED_FIELD || ' ',
' ' || LC3.DISPLAYED_FIELD || ' ',
' ' || LC4.DISPLAYED_FIELD,
LC5.DESCRIPTION,
LC6.DESCRIPTION,
LC7.DESCRIPTION,
LC8.DESCRIPTION
INTO C_BILLION,C_MILLION,C_THOUSAND,C_ZERO,BILLION_LOOKUP,MILLION_LOOKUP,THOUSAND_LOOKUP,UNITS_LOOKUP
FROM
AP_LOOKUP_CODES LC1,
AP_LOOKUP_CODES LC2,
AP_LOOKUP_CODES LC3,
AP_LOOKUP_CODES LC4,
AP_LOOKUP_CODES LC5,
AP_LOOKUP_CODES LC6,
AP_LOOKUP_CODES LC7,
AP_LOOKUP_CODES LC8
WHERE LC1.LOOKUP_CODE = 'BILLION'
AND LC1.LOOKUP_TYPE = 'NLS TRANSLATION'
AND LC2.LOOKUP_CODE = 'MILLION'
AND LC2.LOOKUP_TYPE = 'NLS TRANSLATION'
AND LC3.LOOKUP_CODE = 'THOUSAND'
AND LC3.LOOKUP_TYPE = 'NLS TRANSLATION'
AND LC4.LOOKUP_CODE = 'ZERO'
AND LC4.LOOKUP_TYPE = 'NLS TRANSLATION'
AND LC5.LOOKUP_CODE = BILLION_SEG
AND LC5.LOOKUP_TYPE = 'NUMBERS'
AND LC6.LOOKUP_CODE = MILLION_SEG
AND LC6.LOOKUP_TYPE = 'NUMBERS'
AND LC7.LOOKUP_CODE = THOUSAND_SEG
AND LC7.LOOKUP_TYPE = 'NUMBERS'
AND LC8.LOOKUP_CODE = UNITS_SEG
AND LC8.LOOKUP_TYPE = 'NUMBERS';
SELECT
' ' || LC10.MEANING || ' ',
' ' || LC11.MEANING || ' ',
' ' || LC12.MEANING || ' ',
' ' || LC20.MEANING || ' ',
' ' || LC21.MEANING || ' ',
' ' || LC22.MEANING || ' ',
' ' || LC30.MEANING || ' ',
' ' || LC31.MEANING || ' ',
' ' || LC32.MEANING || ' ',
' ' || LC40.MEANING || ' ',
' ' || LC41.MEANING || ' ',
' ' || LC42.MEANING || ' '
INTO C_PL_BILLION,C_PL_BILLION_Y,C_PL_BILLION_OW,C_PL_MILLION,C_PL_MILLION_Y,C_PL_MILLION_OW,C_PL_THOUSAND,C_PL_THOUSAND_Y,C_PL_THOUSAND_E,C_PL_CURRENCY,C_PL_CURRENCY_E,C_PL_CURRENCY_YCH
FROM
FND_LOOKUPS LC10,
FND_LOOKUPS LC11,
FND_LOOKUPS LC12,
FND_LOOKUPS LC20,
FND_LOOKUPS LC21,
FND_LOOKUPS LC22,
FND_LOOKUPS LC30,
FND_LOOKUPS LC31,
FND_LOOKUPS LC32,
FND_LOOKUPS LC40,
FND_LOOKUPS LC41,
FND_LOOKUPS LC42
WHERE LC10.LOOKUP_CODE = 'PL_BILLION'
AND LC10.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC11.LOOKUP_CODE = 'PL_BILLION_Y'
AND LC11.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC12.LOOKUP_CODE = 'PL_BILLION_OW'
AND LC12.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC20.LOOKUP_CODE = 'PL_MILLION'
AND LC20.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC21.LOOKUP_CODE = 'PL_MILLION_Y'
AND LC21.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC22.LOOKUP_CODE = 'PL_MILLION_OW'
AND LC22.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC30.LOOKUP_CODE = 'PL_THOUSAND'
AND LC30.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC31.LOOKUP_CODE = 'PL_THOUSAND_Y'
AND LC31.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC32.LOOKUP_CODE = 'PL_THOUSAND_E'
AND LC32.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC40.LOOKUP_CODE = 'PL_CURRENCY'
AND LC40.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC41.LOOKUP_CODE = 'PL_CURRENCY_E'
AND LC41.LOOKUP_TYPE = 'JE_NLS_TRANSLATION'
AND LC42.LOOKUP_CODE = 'PL_CURRENCY_YCH'
AND LC42.LOOKUP_TYPE = 'JE_NLS_TRANSLATION';
FUNCTION SELECT_ALL_P RETURN VARCHAR2 IS
BEGIN
RETURN SELECT_ALL;
END SELECT_ALL_P;