The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Charge_Orig_Id NUMBER,
X_Charge_Center_Id NUMBER,
X_Originator_Id NUMBER,
X_Start_Date DATE,
X_End_Date DATE,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Code_Combination_Id NUMBER,
X_Concatenated_Segments VARCHAR2,
X_Employee_Id NUMBER,
X_Segment1 VARCHAR2,
X_Segment2 VARCHAR2,
X_Segment3 VARCHAR2,
X_Segment4 VARCHAR2,
X_Segment5 VARCHAR2,
X_Segment6 VARCHAR2,
X_Segment7 VARCHAR2,
X_Segment8 VARCHAR2,
X_Segment9 VARCHAR2,
X_Segment10 VARCHAR2,
X_Segment11 VARCHAR2,
X_Segment12 VARCHAR2,
X_Segment13 VARCHAR2,
X_Segment14 VARCHAR2,
X_Segment15 VARCHAR2,
X_Segment16 VARCHAR2,
X_Segment17 VARCHAR2,
X_Segment18 VARCHAR2,
X_Segment19 VARCHAR2,
X_Segment20 VARCHAR2,
X_Segment21 VARCHAR2,
X_Segment22 VARCHAR2,
X_Segment23 VARCHAR2,
X_Segment24 VARCHAR2,
X_Segment25 VARCHAR2,
X_Segment26 VARCHAR2,
X_Segment27 VARCHAR2,
X_Segment28 VARCHAR2,
X_Segment29 VARCHAR2,
X_Segment30 VARCHAR2
) IS
CURSOR C IS SELECT rowid FROM IGI_ITR_CHARGE_ORIG
WHERE charge_orig_id = X_Charge_Orig_Id;
INSERT INTO IGI_ITR_CHARGE_ORIG(
charge_orig_id,
charge_center_id,
originator_id,
start_date,
end_date,
creation_date,
created_by,
last_update_date,
last_updated_by,
last_update_login,
code_combination_id,
concatenated_segments,
employee_id,
segment1,
segment2,
segment3,
segment4,
segment5,
segment6,
segment7,
segment8,
segment9,
segment10,
segment11,
segment12,
segment13,
segment14,
segment15,
segment16,
segment17,
segment18,
segment19,
segment20,
segment21,
segment22,
segment23,
segment24,
segment25,
segment26,
segment27,
segment28,
segment29,
segment30
) VALUES (
X_Charge_Orig_Id,
X_Charge_Center_Id,
X_Originator_Id,
X_Start_Date,
X_End_Date,
X_Creation_Date,
X_Created_By,
X_Last_Update_Date,
X_Last_Updated_By,
X_Last_Update_Login,
X_Code_Combination_Id,
X_Concatenated_Segments,
X_Employee_Id,
X_Segment1,
X_Segment2,
X_Segment3,
X_Segment4,
X_Segment5,
X_Segment6,
X_Segment7,
X_Segment8,
X_Segment9,
X_Segment10,
X_Segment11,
X_Segment12,
X_Segment13,
X_Segment14,
X_Segment15,
X_Segment16,
X_Segment17,
X_Segment18,
X_Segment19,
X_Segment20,
X_Segment21,
X_Segment22,
X_Segment23,
X_Segment24,
X_Segment25,
X_Segment26,
X_Segment27,
X_Segment28,
X_Segment29,
X_Segment30
);
END Insert_Row;
SELECT *
FROM IGI_ITR_CHARGE_ORIG
WHERE rowid = X_Rowid
FOR UPDATE of Charge_Orig_Id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Charge_Orig_Id NUMBER,
X_Charge_Center_Id NUMBER,
X_Originator_Id NUMBER,
X_Start_Date DATE,
X_End_Date DATE,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER,
X_Last_Update_Login NUMBER,
X_Code_Combination_Id NUMBER,
X_Concatenated_Segments VARCHAR2,
X_Employee_Id NUMBER,
X_Segment1 VARCHAR2,
X_Segment2 VARCHAR2,
X_Segment3 VARCHAR2,
X_Segment4 VARCHAR2,
X_Segment5 VARCHAR2,
X_Segment6 VARCHAR2,
X_Segment7 VARCHAR2,
X_Segment8 VARCHAR2,
X_Segment9 VARCHAR2,
X_Segment10 VARCHAR2,
X_Segment11 VARCHAR2,
X_Segment12 VARCHAR2,
X_Segment13 VARCHAR2,
X_Segment14 VARCHAR2,
X_Segment15 VARCHAR2,
X_Segment16 VARCHAR2,
X_Segment17 VARCHAR2,
X_Segment18 VARCHAR2,
X_Segment19 VARCHAR2,
X_Segment20 VARCHAR2,
X_Segment21 VARCHAR2,
X_Segment22 VARCHAR2,
X_Segment23 VARCHAR2,
X_Segment24 VARCHAR2,
X_Segment25 VARCHAR2,
X_Segment26 VARCHAR2,
X_Segment27 VARCHAR2,
X_Segment28 VARCHAR2,
X_Segment29 VARCHAR2,
X_Segment30 VARCHAR2
) IS
BEGIN
UPDATE IGI_ITR_CHARGE_ORIG
SET
charge_orig_id = X_Charge_Orig_Id,
charge_center_id = X_Charge_Center_Id,
originator_id = X_Originator_Id,
start_date = X_Start_Date,
end_date = X_End_Date,
last_update_date = X_Last_Update_Date,
last_updated_by = X_Last_Updated_By,
last_update_login = X_Last_Update_Login,
concatenated_segments = X_Concatenated_Segments,
employee_id = X_Employee_Id,
segment1 = X_Segment1,
segment2 = X_Segment2,
segment3 = X_Segment3,
segment4 = X_Segment4,
segment5 = X_Segment5,
segment6 = X_Segment6,
segment7 = X_Segment7,
segment8 = X_Segment8,
segment9 = X_Segment9,
segment10 = X_Segment10,
segment11 = X_Segment11,
segment12 = X_Segment12,
segment13 = X_Segment13,
segment14 = X_Segment14,
segment15 = X_Segment15,
segment16 = X_Segment16,
segment17 = X_Segment17,
segment18 = X_Segment18,
segment19 = X_Segment19,
segment20 = X_Segment20,
segment21 = X_Segment21,
segment22 = X_Segment22,
segment23 = X_Segment23,
segment24 = X_Segment24,
segment25 = X_Segment25,
segment26 = X_Segment26,
segment27 = X_Segment27,
segment28 = X_Segment28,
segment29 = X_Segment29,
segment30 = X_Segment30
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
DELETE FROM IGI_ITR_CHARGE_ORIG
WHERE rowid = X_Rowid;
END Delete_Row;