The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_It_Header_Id NUMBER,
X_It_Line_Num NUMBER,
X_Set_Of_Books_Id NUMBER,
X_Code_Combination_Id NUMBER,
X_Charge_Center_Id NUMBER,
X_Effective_Date DATE,
X_Entered_Dr NUMBER,
X_Entered_Cr NUMBER,
X_Description VARCHAR2,
X_Status_Flag VARCHAR2,
X_Posting_Flag VARCHAR2,
X_Submit_Date DATE,
X_Suggested_Amount NUMBER,
X_Rejection_Note VARCHAR2,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Login NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER
) IS
CURSOR C IS SELECT rowid FROM IGI_ITR_CHARGE_LINES
WHERE it_header_id = X_It_Header_Id
AND it_line_num = X_It_Line_Num
AND set_of_books_id = X_Set_Of_Books_Id;
INSERT INTO IGI_ITR_CHARGE_LINES(
it_header_id,
it_line_num,
set_of_books_id,
code_combination_id,
charge_center_id,
effective_date,
entered_dr,
entered_cr,
description,
status_flag,
posting_flag,
submit_date,
suggested_amount,
rejection_note,
creation_date,
created_by,
last_update_login,
last_update_date,
last_updated_by
) VALUES (
X_It_Header_Id,
X_It_Line_Num,
X_Set_Of_Books_Id,
X_Code_Combination_Id,
X_Charge_Center_Id,
X_Effective_Date,
X_Entered_Dr,
X_Entered_Cr,
X_Description,
X_Status_Flag,
X_Posting_Flag,
X_Submit_Date,
X_Suggested_Amount,
X_Rejection_Note,
X_Creation_Date,
X_Created_By,
X_Last_Update_Login,
X_Last_Update_Date,
X_Last_Updated_By
);
END Insert_Row;
SELECT *
FROM IGI_ITR_CHARGE_LINES
WHERE rowid = X_Rowid
FOR UPDATE of It_Header_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_It_Header_Id NUMBER,
X_It_Line_Num NUMBER,
X_Set_Of_Books_Id NUMBER,
X_Code_Combination_Id NUMBER,
X_Charge_Center_Id NUMBER,
X_Entered_Dr NUMBER,
X_Entered_Cr NUMBER,
X_Description VARCHAR2,
X_Status_Flag VARCHAR2,
X_Posting_Flag VARCHAR2,
X_Suggested_Amount NUMBER,
X_Rejection_Note VARCHAR2,
X_Last_Update_Login NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER
) IS
BEGIN
UPDATE IGI_ITR_CHARGE_LINES
SET
it_header_id = X_It_Header_Id,
it_line_num = X_It_Line_Num,
set_of_books_id = X_Set_Of_Books_Id,
code_combination_id = X_Code_Combination_Id,
charge_center_id = X_Charge_Center_Id,
entered_dr = X_Entered_Dr,
entered_cr = X_Entered_Cr,
description = X_Description,
status_flag = X_Status_Flag,
posting_flag = X_Posting_Flag,
suggested_amount = X_Suggested_Amount,
rejection_note = X_Rejection_Note,
last_update_login = X_Last_Update_Login,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM IGI_ITR_CHARGE_LINES
WHERE rowid = X_Rowid;
END Delete_Row;