The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_JE_Mapping_Id IN OUT NOCOPY NUMBER,
X_Bank_Account_Id NUMBER,
X_Trx_Code_Id NUMBER,
X_Search_String_txt VARCHAR2,
X_GL_Account_CCID NUMBER,
X_Reference_txt VARCHAR2,
X_Last_Updated_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Update_Login NUMBER,
X_Created_By NUMBER,
X_Creation_Date DATE,
X_trxn_subtype_code_id NUMBER
) IS
CURSOR C IS SELECT rowid FROM CE_JE_MAPPINGS
WHERE je_mapping_id = X_JE_Mapping_Id;
CURSOR C2 IS SELECT ce_je_mappings_s.nextval FROM sys.dual;
INSERT INTO CE_JE_MAPPINGS(
je_mapping_id,
bank_account_id,
trx_code_id,
search_string_txt,
GL_account_ccid,
reference_txt,
Last_Updated_By,
Last_Update_Date,
Last_Update_Login,
Created_By,
Creation_Date,
trxn_subtype_code_id
) VALUES (
X_JE_Mapping_Id,
X_Bank_Account_Id,
X_Trx_Code_Id,
X_Search_String_txt,
X_GL_Account_CCID,
X_Reference_txt,
X_Last_Updated_By,
X_Last_Update_Date,
X_Last_Update_Login,
X_Created_By,
X_Creation_Date,
X_trxn_subtype_code_id
);
END Insert_Row;
SELECT *
FROM CE_JE_MAPPINGS
WHERE rowid = X_Rowid
FOR UPDATE of JE_Mapping_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_JE_Mapping_Id NUMBER,
X_Bank_Account_Id NUMBER,
X_Trx_Code_Id NUMBER,
X_GL_Account_CCID NUMBER,
X_Search_String_txt VARCHAR2,
X_Reference_txt VARCHAR2,
X_Last_Updated_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Update_Login NUMBER,
X_trxn_subtype_code_id NUMBER
) IS
BEGIN
UPDATE CE_JE_MAPPINGS
SET
je_mapping_id = X_JE_Mapping_Id,
bank_account_id = X_Bank_Account_Id,
trx_code_id = X_Trx_Code_Id,
gl_account_ccid = X_GL_Account_CCID,
search_string_txt = X_Search_String_txt,
reference_txt = X_Reference_txt,
last_updated_by = X_Last_Updated_By,
last_update_date = X_Last_Update_Date,
last_update_login = X_Last_Update_Login,
trxn_subtype_code_id = X_trxn_subtype_code_id
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM CE_JE_MAPPINGS
WHERE rowid = X_Rowid;
END Delete_Row;
SELECT 'Duplicate'
FROM ce_je_mappings jem
WHERE bank_account_id = X_bank_account_id
AND trx_code_id = X_trx_code_id
AND ((search_string_txt is null and X_Search_string_txt is null) or
(search_string_txt = X_Search_string_txt))
AND ( X_Row_id is null
OR jem.rowid <> chartorowid( X_Row_id ) );