The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Gl_Set_Of_Books_Id NUMBER,
X_Level_1 NUMBER,
X_Level_2 NUMBER,
X_Level_3 NUMBER,
X_Level_4 NUMBER,
X_Level_5 NUMBER,
X_Level_6 NUMBER,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER
) IS
CURSOR C IS SELECT rowid FROM IGI_EER_SETUP
WHERE gl_set_of_books_id = X_Gl_Set_Of_Books_Id;
INSERT INTO IGI_EER_SETUP(
gl_set_of_books_id,
level_1,
level_2,
level_3,
level_4,
level_5,
level_6,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login
) VALUES (
X_Gl_Set_Of_Books_Id,
X_Level_1,
X_Level_2,
X_Level_3,
X_Level_4,
X_Level_5,
X_Level_6,
X_Creation_Date,
X_Created_By,
X_Last_Update_Date,
X_Last_Updated_By,
X_Last_Update_Login
);
END Insert_Row;
SELECT *
FROM IGI_EER_SETUP
WHERE rowid = X_Rowid
FOR UPDATE of Gl_Set_Of_Books_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Gl_Set_Of_Books_Id NUMBER,
X_Level_1 NUMBER,
X_Level_2 NUMBER,
X_Level_3 NUMBER,
X_Level_4 NUMBER,
X_Level_5 NUMBER,
X_Level_6 NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER
) IS
BEGIN
UPDATE IGI_EER_SETUP
SET
gl_set_of_books_id = X_Gl_Set_Of_Books_Id,
level_1 = X_Level_1,
level_2 = X_Level_2,
level_3 = X_Level_3,
level_4 = X_Level_4,
level_5 = X_Level_5,
level_6 = X_Level_6,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login
WHERE rowid = X_Rowid;
END Update_Row;