The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_FILE_CONTROL VARCHAR2,
X_ENTRY_SEQUENTIAL_NUMBER NUMBER,
X_COMPANY_CODE NUMBER,
X_COMPANY_NAME VARCHAR2,
X_GENERATION_DATE DATE,
X_REMITTANCE_CODE NUMBER,
--X_BANK_NUMBER VARCHAR2,
X_BANK_PARTY_ID NUMBER ,
X_BANK_OCCURRENCE_CODE NUMBER,
X_OCCURRENCE_DATE DATE,
X_PROCESSING_DATE DATE,
X_LAST_VALIDATION_DATE DATE,
X_INSCRIPTION_NUMBER NUMBER,
X_COMPANY_USE NUMBER,
X_OUR_NUMBER VARCHAR2,
X_PORTFOLIO_CODE NUMBER,
X_YOUR_NUMBER VARCHAR2,
X_DUE_DATE DATE,
X_TRADE_NOTE_AMOUNT NUMBER,
X_COLLECTOR_BANK_PARTY_ID NUMBER,
X_COLLECTOR_BRANCH_PARTY_ID NUMBER,
X_TRADE_NOTE_TYPE VARCHAR2,
X_BANK_CHARGE_AMOUNT NUMBER,
X_ABATEMENT_AMOUNT NUMBER,
X_DISCOUNT_AMOUNT NUMBER,
X_CREDIT_AMOUNT NUMBER,
X_INTEREST_AMOUNT_RECEIVED NUMBER,
X_CUSTOMER_NAME VARCHAR2,
X_RETURN_INFO VARCHAR2,
X_BANK_USE VARCHAR2,
X_ERROR_CODE VARCHAR2,
X_CANCELLATION_CODE VARCHAR2,
X_ORG_ID NUMBER,
X_LAST_UPDATE_DATE DATE,
X_LAST_UPDATED_BY NUMBER,
X_CREATION_DATE DATE,
X_CREATED_BY NUMBER,
X_LAST_UPDATE_LOGIN NUMBER,
X_CALLING_SEQUENCE IN VARCHAR2) IS
CURRENT_CALLING_SEQUENCE VARCHAR2(2000);
CURRENT_CALLING_SEQUENCE := 'JL_BR_AR_RET_INTERFACE_EXT_PKG.UPDATE_ROW <-'||X_CALLING_SEQUENCE;
DEBUG_INFO := 'UPDATE JL_BR_AR_RET_INTERFACE_EXT';
UPDATE JL_BR_AR_RET_INTERFACE_EXT
SET
FILE_CONTROL = X_FILE_CONTROL,
ENTRY_SEQUENTIAL_NUMBER = X_ENTRY_SEQUENTIAL_NUMBER,
COMPANY_CODE = X_COMPANY_CODE,
COMPANY_NAME = X_COMPANY_NAME,
GENERATION_DATE = X_GENERATION_DATE,
REMITTANCE_CODE = X_REMITTANCE_CODE,
--BANK_NUMBER = X_BANK_NUMBER,
BANK_PARTY_ID = X_BANK_PARTY_ID,
BANK_OCCURRENCE_CODE = X_BANK_OCCURRENCE_CODE,
OCCURRENCE_DATE = X_OCCURRENCE_DATE,
PROCESSING_DATE = X_PROCESSING_DATE,
LAST_VALIDATION_DATE = X_LAST_VALIDATION_DATE,
INSCRIPTION_NUMBER = X_INSCRIPTION_NUMBER,
COMPANY_USE = X_COMPANY_USE,
OUR_NUMBER = X_OUR_NUMBER,
PORTFOLIO_CODE = X_PORTFOLIO_CODE,
YOUR_NUMBER = X_YOUR_NUMBER,
DUE_DATE = X_DUE_DATE,
TRADE_NOTE_AMOUNT = X_TRADE_NOTE_AMOUNT,
COLLECTOR_BANK_PARTY_ID = X_COLLECTOR_BANK_PARTY_ID,
COLLECTOR_BRANCH_PARTY_ID = X_COLLECTOR_BRANCH_PARTY_ID,
TRADE_NOTE_TYPE = X_TRADE_NOTE_TYPE,
BANK_CHARGE_AMOUNT = X_BANK_CHARGE_AMOUNT,
ABATEMENT_AMOUNT = X_ABATEMENT_AMOUNT,
DISCOUNT_AMOUNT = X_DISCOUNT_AMOUNT,
CREDIT_AMOUNT = X_CREDIT_AMOUNT,
INTEREST_AMOUNT_RECEIVED = X_INTEREST_AMOUNT_RECEIVED,
CUSTOMER_NAME = X_CUSTOMER_NAME,
RETURN_INFO = X_RETURN_INFO,
BANK_USE = X_BANK_USE,
ERROR_CODE = X_ERROR_CODE,
CANCELLATION_CODE = X_CANCELLATION_CODE,
ORG_ID = X_ORG_ID,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
CREATION_DATE = X_CREATION_DATE,
CREATED_BY = X_CREATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2,
X_CALLING_SEQUENCE IN VARCHAR2) IS
CURRENT_CALLING_SEQUENCE VARCHAR2(2000);
CURRENT_CALLING_SEQUENCE := 'JL_BR_AR_RET_INTERFACE_EXT_PKG.DELETE_ROW<-'||X_CALLING_SEQUENCE;
DEBUG_INFO := 'DELETE FROM JL_BR_AR_RET_INTERFACE_EXT';
DELETE FROM JL_BR_AR_RET_INTERFACE_EXT
WHERE rowid = X_Rowid;
END Delete_Row;
X_LAST_UPDATE_DATE DATE,
X_LAST_UPDATED_BY NUMBER,
X_CREATION_DATE DATE DEFAULT NULL,
X_CREATED_BY NUMBER DEFAULT NULL,
X_LAST_UPDATE_LOGIN NUMBER DEFAULT NULL,
X_CALLING_SEQUENCE VARCHAR2) IS
--
CURSOR C IS
SELECT *
FROM JL_BR_AR_RET_INTERFACE_EXT
WHERE rowid = X_Rowid
FOR UPDATE of File_Control NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');