The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row( X_Rowid IN OUT NOCOPY VARCHAR2,
X_Signatory_Id IN OUT NOCOPY NUMBER,
X_Bank_Account_Id NUMBER,
X_Person_Id NUMBER,
X_Single_limit_amount NUMBER,
X_Joint_limit_amount NUMBER,
X_Signer_group VARCHAR2,
X_Other_limits VARCHAR2,
X_Start_date DATE,
X_End_date DATE,
X_Status VARCHAR2,
X_Approval_type VARCHAR2,
X_requester_id NUMBER,
X_deleted_flag 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_Attribute_category VARCHAR2,
X_Attribute1 VARCHAR2,
X_Attribute2 VARCHAR2,
X_Attribute3 VARCHAR2,
X_Attribute4 VARCHAR2,
X_Attribute5 VARCHAR2,
X_Attribute6 VARCHAR2,
X_Attribute7 VARCHAR2,
X_Attribute8 VARCHAR2,
X_Attribute9 VARCHAR2,
X_Attribute10 VARCHAR2,
X_Attribute11 VARCHAR2,
X_Attribute12 VARCHAR2,
X_Attribute13 VARCHAR2,
X_Attribute14 VARCHAR2,
X_Attribute15 VARCHAR2
) IS
CURSOR C IS SELECT rowid FROM CE_BA_SIGNATORIES
WHERE signatory_id = X_signatory_id;
CURSOR C2 IS SELECT ce_ba_signatories_s.nextval FROM sys.dual;
INSERT INTO CE_BA_SIGNATORIES(
signatory_id,
bank_account_id,
person_id,
single_limit_amount,
joint_limit_amount,
signer_group,
other_limits,
start_date,
end_date,
status,
approval_type_flag,
requester_id,
deleted_flag,
Last_Updated_By,
Last_Update_Date,
Last_Update_Login,
Created_By,
Creation_Date,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15
) VALUES (
X_Signatory_Id,
X_Bank_Account_id,
X_Person_Id,
X_Single_limit_amount,
X_Joint_limit_amount,
X_Signer_group,
X_Other_limits,
X_Start_date,
X_End_date,
X_Status,
X_Approval_type,
X_requester_id,
X_deleted_flag,
X_Last_Updated_By ,
X_Last_Update_Date,
X_Last_Update_Login,
X_Created_By ,
X_Creation_Date,
X_Attribute_category,
X_Attribute1,
X_Attribute2,
X_Attribute3,
X_Attribute4,
X_Attribute5,
X_Attribute6,
X_Attribute7,
X_Attribute8,
X_Attribute9,
X_Attribute10,
X_Attribute11,
X_Attribute12,
X_Attribute13,
X_Attribute14,
X_Attribute15
);
END Insert_Row;
SELECT *
FROM CE_BA_SIGNATORIES
WHERE rowid = X_Rowid
FOR UPDATE of Signatory_id NOWAIT;
FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
PROCEDURE Update_Row( X_Rowid IN OUT NOCOPY VARCHAR2,
X_Signatory_Id IN OUT NOCOPY NUMBER,
X_Bank_Account_Id NUMBER,
X_Person_Id NUMBER,
X_Single_limit_amount NUMBER,
X_Joint_limit_amount NUMBER,
X_Signer_group VARCHAR2,
X_Other_limits VARCHAR2,
X_Start_date DATE,
X_End_date DATE,
X_Status VARCHAR2,
X_Approval_type VARCHAR2,
X_requester_id NUMBER,
X_Last_Updated_By NUMBER,
X_Last_Update_Date DATE,
X_Last_Update_Login NUMBER,
X_Attribute_category VARCHAR2,
X_Attribute1 VARCHAR2,
X_Attribute2 VARCHAR2,
X_Attribute3 VARCHAR2,
X_Attribute4 VARCHAR2,
X_Attribute5 VARCHAR2,
X_Attribute6 VARCHAR2,
X_Attribute7 VARCHAR2,
X_Attribute8 VARCHAR2,
X_Attribute9 VARCHAR2,
X_Attribute10 VARCHAR2,
X_Attribute11 VARCHAR2,
X_Attribute12 VARCHAR2,
X_Attribute13 VARCHAR2,
X_Attribute14 VARCHAR2,
X_Attribute15 VARCHAR2
) IS
BEGIN
UPDATE CE_BA_SIGNATORIES
SET
signatory_id = X_signatory_id,
bank_account_id = X_Bank_Account_Id,
person_id = X_person_id,
single_limit_amount = X_single_limit_amount,
joint_limit_amount = X_joint_limit_amount,
signer_group = X_signer_group,
other_limits = X_other_limits,
start_date = X_start_date,
end_date = X_end_date,
status = X_status,
approval_type_flag = X_approval_type,
requester_id = X_requester_id,
last_updated_by = X_Last_Updated_By,
last_update_date = X_Last_Update_Date,
last_update_login = X_Last_Update_Login,
attribute_category = X_attribute_category,
attribute1 = X_attribute1,
attribute2 = X_attribute2,
attribute3 = X_attribute3,
attribute4 = X_attribute4,
attribute5 = X_attribute5,
attribute6 = X_attribute6,
attribute7 = X_attribute7,
attribute8 = X_attribute8,
attribute9 = X_attribute9,
attribute10 = X_attribute10,
attribute11 = X_attribute11,
attribute12 = X_attribute12,
attribute13 = X_attribute13,
attribute14 = X_attribute14,
attribute15 = X_attribute15
WHERE rowid = X_Rowid;
END Update_Row;
PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
BEGIN
-- Do not delete the record from the table.
-- rather mark it for delete.
UPDATE ce_ba_signatories
SET deleted_flag = 'Y'
WHERE rowid=X_Rowid;
END Delete_Row;