The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row(X_Rowid IN OUT NOCOPY VARCHAR2,
X_Approval_List_Id NUMBER,
X_Employee_Id NUMBER,
X_Sequence1 NUMBER,
X_Sequence2 NUMBER DEFAULT NULL,
X_Description VARCHAR2 DEFAULT NULL,
X_Disable_Date DATE DEFAULT NULL,
X_Attribute_Category VARCHAR2 DEFAULT NULL,
X_Attribute1 VARCHAR2 DEFAULT NULL,
X_Attribute2 VARCHAR2 DEFAULT NULL,
X_Attribute3 VARCHAR2 DEFAULT NULL,
X_Attribute4 VARCHAR2 DEFAULT NULL,
X_Attribute5 VARCHAR2 DEFAULT NULL,
X_Attribute6 VARCHAR2 DEFAULT NULL,
X_Attribute7 VARCHAR2 DEFAULT NULL,
X_Attribute8 VARCHAR2 DEFAULT NULL,
X_Attribute9 VARCHAR2 DEFAULT NULL,
X_Attribute10 VARCHAR2 DEFAULT NULL,
X_Attribute11 VARCHAR2 DEFAULT NULL,
X_Attribute12 VARCHAR2 DEFAULT NULL,
X_Attribute13 VARCHAR2 DEFAULT NULL,
X_Attribute14 VARCHAR2 DEFAULT NULL,
X_Attribute15 VARCHAR2 DEFAULT NULL,
X_Creation_Date DATE,
X_Created_By NUMBER,
X_Last_Update_Login NUMBER DEFAULT NULL,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER
) IS
CURSOR C IS SELECT rowid FROM eng_ecn_approvers
WHERE approval_list_id = X_Approval_List_Id;
INSERT INTO eng_ecn_approvers
(
approval_list_id,
employee_id,
sequence1,
sequence2,
description,
disable_date,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
creation_date,
created_by,
last_update_login,
last_update_date,
last_updated_by
)
VALUES (
X_Approval_List_Id,
X_Employee_Id,
X_Sequence1,
X_Sequence2,
X_Description,
X_Disable_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,
X_Creation_Date,
X_Created_By,
X_Last_Update_Login,
X_Last_Update_Date,
X_Last_Updated_By
);
END Insert_Row;
SELECT *
FROM eng_ecn_approvers
WHERE rowid = X_Rowid
FOR UPDATE of Approval_List_Id NOWAIT;
PROCEDURE Update_Row(X_Rowid VARCHAR2,
X_Approval_List_Id NUMBER,
X_Employee_Id NUMBER,
X_Sequence1 NUMBER,
X_Sequence2 NUMBER DEFAULT NULL,
X_Description VARCHAR2 DEFAULT NULL ,
X_Disable_Date DATE DEFAULT NULL,
X_Attribute_Category VARCHAR2 DEFAULT NULL ,
X_Attribute1 VARCHAR2 DEFAULT NULL ,
X_Attribute2 VARCHAR2 DEFAULT NULL ,
X_Attribute3 VARCHAR2 DEFAULT NULL ,
X_Attribute4 VARCHAR2 DEFAULT NULL ,
X_Attribute5 VARCHAR2 DEFAULT NULL ,
X_Attribute6 VARCHAR2 DEFAULT NULL ,
X_Attribute7 VARCHAR2 DEFAULT NULL ,
X_Attribute8 VARCHAR2 DEFAULT NULL ,
X_Attribute9 VARCHAR2 DEFAULT NULL ,
X_Attribute10 VARCHAR2 DEFAULT NULL ,
X_Attribute11 VARCHAR2 DEFAULT NULL ,
X_Attribute12 VARCHAR2 DEFAULT NULL ,
X_Attribute13 VARCHAR2 DEFAULT NULL ,
X_Attribute14 VARCHAR2 DEFAULT NULL ,
X_Attribute15 VARCHAR2 DEFAULT NULL ,
X_Last_Update_Login NUMBER DEFAULT NULL,
X_Last_Update_Date DATE,
X_Last_Updated_By NUMBER
) IS
l_old_employee_id NUMBER; -- Bug 3817690
SELECT Employee_Id
INTO l_old_employee_id
FROM eng_ecn_approvers
WHERE rowid = X_rowid;
UPDATE eng_ecn_approvers
SET
approval_list_id = X_Approval_List_Id,
employee_id = X_Employee_Id,
sequence1 = X_Sequence1,
sequence2 = X_Sequence2,
description = X_Description,
disable_date = X_Disable_Date,
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,
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
l_employee_id number;
select employee_id, approval_list_id
into l_employee_id, l_approval_list_id
from eng_ecn_approvers
where rowid = X_Rowid ;
DELETE FROM eng_ecn_approvers
WHERE rowid = X_Rowid;
select name into l_rolename
from wf_roles
where orig_system = 'ENG_LIST'
and orig_system_id = l_approval_list_id;
select name into l_username
from wf_roles
where orig_system = 'PER'
and orig_system_id = l_employee_id;
SELECT user_name, employee_id, 'PER'
INTO l_userName, l_origSystemID, l_origSystem
FROM FND_USER
WHERE USER_ID =l_employee_id;
END Delete_Row;
SELECT 1 INTO DUMMY FROM DUAL WHERE NOT EXISTS
(SELECT 1 FROM ENG_ECN_APPROVERS
WHERE
(Approval_List_Id = X_Approval_List_Id)
AND (Sequence1 = X_Sequence1)
AND ((X_Rowid is NULL) or (ROWID <> X_Rowid))
);