The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_LEASE_MILESTONE_ID IN OUT NOCOPY NUMBER,
X_LEASE_CHANGE_ID IN NUMBER,
X_MILESTONE_TYPE_CODE IN VARCHAR2,
X_OPTION_ID IN NUMBER,
X_INSURANCE_REQUIREMENT_ID IN NUMBER,
X_PAYMENT_TERM_ID IN NUMBER,
X_LEAD_DAYS IN NUMBER,
X_EVERY_DAYS IN NUMBER,
X_ACTION_TAKEN IN VARCHAR2,
X_ACTION_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_MILESTONE_DATE IN DATE,
X_USER_ID IN NUMBER,
X_LEASE_ID IN NUMBER,
X_CREATION_DATE IN DATE,
X_CREATED_BY IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
x_org_id IN NUMBER
)
IS
CURSOR c IS
SELECT ROWID
FROM pn_lease_milestones_all
WHERE lease_milestone_id = x_lease_milestone_id;
SELECT org_id
FROM pn_leases_all
WHERE lease_id = x_lease_id;
SELECT pn_lease_milestones_s.NEXTVAL
INTO x_lease_milestone_id
FROM DUAL;
INSERT INTO pn_lease_milestones_all
(
LEASE_CHANGE_ID,
MILESTONE_TYPE_CODE,
OPTION_ID,
INSURANCE_REQUIREMENT_ID,
PAYMENT_TERM_ID,
LEAD_DAYS,
EVERY_DAYS,
ACTION_TAKEN,
ACTION_DATE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
LEASE_MILESTONE_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
MILESTONE_DATE,
USER_ID,
LEASE_ID,
org_id
)
VALUES (
X_LEASE_CHANGE_ID,
X_MILESTONE_TYPE_CODE,
X_OPTION_ID,
X_INSURANCE_REQUIREMENT_ID,
X_PAYMENT_TERM_ID,
X_LEAD_DAYS,
X_EVERY_DAYS,
X_ACTION_TAKEN,
X_ACTION_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_LEASE_MILESTONE_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_MILESTONE_DATE,
X_USER_ID,
X_LEASE_ID ,
l_org_id
);
END Insert_Row;
SELECT *
FROM pn_lease_milestones_all
WHERE lease_milestone_id = x_lease_milestone_id
FOR UPDATE OF lease_milestone_id NOWAIT;
PROCEDURE Update_Row
(
X_LEASE_MILESTONE_ID IN NUMBER,
X_LEASE_CHANGE_ID IN NUMBER,
X_MILESTONE_TYPE_CODE IN VARCHAR2,
X_OPTION_ID IN NUMBER,
X_INSURANCE_REQUIREMENT_ID IN NUMBER,
X_PAYMENT_TERM_ID IN NUMBER,
X_LEAD_DAYS IN NUMBER,
X_EVERY_DAYS IN NUMBER,
X_ACTION_TAKEN IN VARCHAR2,
X_ACTION_DATE IN DATE,
X_ATTRIBUTE_CATEGORY IN VARCHAR2,
X_ATTRIBUTE1 IN VARCHAR2,
X_ATTRIBUTE2 IN VARCHAR2,
X_ATTRIBUTE3 IN VARCHAR2,
X_ATTRIBUTE4 IN VARCHAR2,
X_ATTRIBUTE5 IN VARCHAR2,
X_ATTRIBUTE6 IN VARCHAR2,
X_ATTRIBUTE7 IN VARCHAR2,
X_ATTRIBUTE8 IN VARCHAR2,
X_ATTRIBUTE9 IN VARCHAR2,
X_ATTRIBUTE10 IN VARCHAR2,
X_ATTRIBUTE11 IN VARCHAR2,
X_ATTRIBUTE12 IN VARCHAR2,
X_ATTRIBUTE13 IN VARCHAR2,
X_ATTRIBUTE14 IN VARCHAR2,
X_ATTRIBUTE15 IN VARCHAR2,
X_MILESTONE_DATE IN DATE,
X_USER_ID IN NUMBER,
X_LEASE_ID IN NUMBER,
X_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER
)
IS
BEGIN
UPDATE pn_lease_milestones_all
SET LEASE_CHANGE_ID = X_LEASE_CHANGE_ID,
MILESTONE_TYPE_CODE = X_MILESTONE_TYPE_CODE,
OPTION_ID = X_OPTION_ID,
INSURANCE_REQUIREMENT_ID = X_INSURANCE_REQUIREMENT_ID,
PAYMENT_TERM_ID = X_PAYMENT_TERM_ID,
LEAD_DAYS = X_LEAD_DAYS,
EVERY_DAYS = X_EVERY_DAYS,
ACTION_TAKEN = X_ACTION_TAKEN,
ACTION_DATE = X_ACTION_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,
MILESTONE_DATE = X_MILESTONE_DATE,
USER_ID = X_USER_ID,
LEASE_ID = X_LEASE_ID,
LEASE_MILESTONE_ID = X_LEASE_MILESTONE_ID,
LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
LAST_UPDATED_BY = X_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN
WHERE LEASE_MILESTONE_ID = X_LEASE_MILESTONE_ID;
END Update_Row;
PROCEDURE Delete_Row
(
X_LEASE_MILESTONE_ID in NUMBER
)
IS
BEGIN
DELETE FROM pn_lease_milestones_all
WHERE lease_milestone_id = x_lease_milestone_id;
END Delete_Row;