The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
X_ROWID IN OUT NOCOPY VARCHAR2,
X_OPTION_ID IN OUT NOCOPY NUMBER,
X_OPTION_NUM IN OUT NOCOPY VARCHAR2,
X_LEASE_ID IN NUMBER,
X_LEASE_CHANGE_ID IN NUMBER,
X_OPTION_TYPE_CODE IN VARCHAR2,
X_START_DATE IN DATE,
X_EXPIRATION_DATE IN DATE,
X_OPTION_SIZE IN NUMBER,
X_UOM_CODE IN VARCHAR2,
X_OPTION_STATUS_LOOKUP_CODE IN VARCHAR2,
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_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_OPTION_EXER_START_DATE IN DATE,
X_OPTION_EXER_END_DATE IN DATE,
X_OPTION_ACTION_DATE IN DATE,
X_OPTION_COST IN VARCHAR2,
X_OPTION_AREA_CHANGE IN NUMBER,
X_OPTION_REFERENCE IN VARCHAR2,
X_OPTION_NOTICE_REQD IN VARCHAR2,
X_OPTION_COMMENTS IN VARCHAR2,
x_org_id IN NUMBER
)
IS
CURSOR c IS
SELECT ROWID
FROM pn_options_all
WHERE option_id = x_option_id ;
SELECT org_id
FROM pn_leases_all
WHERE lease_id = x_lease_id ;
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.INSERT_ROW (+)');
SELECT NVL(MAX(TO_NUMBER(pno.option_num)), 0)+1
INTO x_option_num
FROM pn_options_all PNO
WHERE pno.lease_id = x_lease_id;
SELECT pn_options_s.NEXTVAL
INTO x_option_id
FROM DUAL;
INSERT INTO pn_options_all
(
OPTION_ID,
LAST_UPDATE_DATE,
LAST_UPDATED_BY,
CREATION_DATE,
CREATED_BY,
LAST_UPDATE_LOGIN,
LEASE_ID,
LEASE_CHANGE_ID,
OPTION_NUM,
OPTION_TYPE_CODE,
START_DATE,
EXPIRATION_DATE,
OPTION_SIZE,
UOM_CODE,
OPTION_STATUS_LOOKUP_CODE,
ATTRIBUTE_CATEGORY,
ATTRIBUTE1,
ATTRIBUTE2,
ATTRIBUTE3,
ATTRIBUTE4,
ATTRIBUTE5,
ATTRIBUTE6,
ATTRIBUTE7,
ATTRIBUTE8,
ATTRIBUTE9,
ATTRIBUTE10,
ATTRIBUTE11,
ATTRIBUTE12,
ATTRIBUTE13,
ATTRIBUTE14,
ATTRIBUTE15,
OPTION_EXER_START_DATE,
OPTION_EXER_END_DATE,
OPTION_ACTION_DATE,
OPTION_COST,
OPTION_AREA_CHANGE,
OPTION_REFERENCE,
OPTION_NOTICE_REQD,
OPTION_COMMENTS,
org_id
)
VALUES
(
X_OPTION_ID,
X_LAST_UPDATE_DATE,
X_LAST_UPDATED_BY,
X_CREATION_DATE,
X_CREATED_BY,
X_LAST_UPDATE_LOGIN,
X_LEASE_ID,
X_LEASE_CHANGE_ID,
X_OPTION_NUM,
X_OPTION_TYPE_CODE,
X_START_DATE,
X_EXPIRATION_DATE,
X_OPTION_SIZE,
X_UOM_CODE,
X_OPTION_STATUS_LOOKUP_CODE,
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_OPTION_EXER_START_DATE,
X_OPTION_EXER_END_DATE,
X_OPTION_ACTION_DATE,
X_OPTION_COST,
X_OPTION_AREA_CHANGE,
X_OPTION_REFERENCE,
X_OPTION_NOTICE_REQD,
X_OPTION_COMMENTS,
l_org_id
);
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.INSERT_ROW (-)');
END Insert_Row;
SELECT *
FROM pn_options_all
WHERE option_id = x_option_id
FOR UPDATE OF option_id NOWAIT;
PROCEDURE Update_Row (
X_OPTION_ID IN NUMBER,
X_LEASE_ID IN NUMBER,
X_LEASE_CHANGE_ID IN NUMBER,
X_OPTION_NUM IN VARCHAR2,
X_OPTION_TYPE_CODE IN VARCHAR2,
X_START_DATE IN DATE,
X_EXPIRATION_DATE IN DATE,
X_OPTION_SIZE IN NUMBER,
X_UOM_CODE IN VARCHAR2,
X_OPTION_STATUS_LOOKUP_CODE IN VARCHAR2,
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_LAST_UPDATE_DATE IN DATE,
X_LAST_UPDATED_BY IN NUMBER,
X_LAST_UPDATE_LOGIN IN NUMBER,
X_OPTION_EXER_START_DATE IN DATE,
X_OPTION_EXER_END_DATE IN DATE,
X_OPTION_ACTION_DATE IN DATE,
X_OPTION_COST IN VARCHAR2,
X_OPTION_AREA_CHANGE IN NUMBER,
X_OPTION_REFERENCE IN VARCHAR2,
X_OPTION_NOTICE_REQD IN VARCHAR2,
X_OPTION_COMMENTS IN VARCHAR2
)
IS
CURSOR c2 IS
SELECT *
FROM pn_options_all
WHERE option_id = x_option_id;
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.UPDATE_ROW (+)');
SELECT pn_options_history_s.NEXTVAL
INTO l_optionHistoryId
FROM DUAL;
INSERT INTO pn_options_history
(
option_history_id,
option_id,
last_update_date,
last_updated_by,
creation_date,
created_by,
last_update_login,
lease_id,
lease_change_id,
new_lease_change_id,
option_num,
option_type_code,
start_date,
expiration_date,
option_size,
uom_code,
option_status_lookup_code,
attribute_category,
attribute1,
attribute2,
attribute3,
attribute4,
attribute5,
attribute6,
attribute7,
attribute8,
attribute9,
attribute10,
attribute11,
attribute12,
attribute13,
attribute14,
attribute15,
option_exer_start_date,
option_exer_end_date,
option_action_date,
option_cost,
option_area_change,
option_reference,
option_notice_reqd,
option_comments
)
VALUES
(
l_optionHistoryId,
recInfoForHist.option_id,
recInfoForHist.last_update_date,
recInfoForHist.last_updated_by,
recInfoForHist.creation_date,
recInfoForHist.created_by,
recInfoForHist.last_update_login,
recInfoForHist.lease_id,
recInfoForHist.lease_change_id,
x_lease_change_id,
recInfoForHist.option_num,
recInfoForHist.option_type_code,
recInfoForHist.start_date,
recInfoForHist.expiration_date,
recInfoForHist.option_size,
recInfoForHist.uom_code,
recInfoForHist.option_status_lookup_code,
recInfoForHist.attribute_category,
recInfoForHist.attribute1,
recInfoForHist.attribute2,
recInfoForHist.attribute3,
recInfoForHist.attribute4,
recInfoForHist.attribute5,
recInfoForHist.attribute6,
recInfoForHist.attribute7,
recInfoForHist.attribute8,
recInfoForHist.attribute9,
recInfoForHist.attribute10,
recInfoForHist.attribute11,
recInfoForHist.attribute12,
recInfoForHist.attribute13,
recInfoForHist.attribute14,
recInfoForHist.attribute15,
recInfoForHist.option_exer_start_date,
recInfoForHist.option_exer_end_date,
recInfoForHist.option_action_date,
recInfoForHist.option_cost,
recInfoForHist.option_area_change,
recInfoForHist.option_reference,
recInfoForHist.option_notice_reqd,
recInfoForHist.option_comments
);
UPDATE pn_options_all
SET lease_id = x_lease_id,
lease_change_id = x_lease_change_id,
option_num = x_option_num,
option_type_code = x_option_type_code,
start_date = x_start_date,
expiration_date = x_expiration_date,
option_size = x_option_size,
uom_code = x_uom_code,
option_status_lookup_code = x_option_status_lookup_code,
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,
option_id = x_option_id,
last_update_date = x_last_update_date,
last_updated_by = x_last_updated_by,
last_update_login = x_last_update_login,
option_exer_start_date = x_option_exer_start_date,
option_exer_end_date = x_option_exer_end_date,
option_action_date = x_option_action_date,
option_cost = x_option_cost,
option_area_change = x_option_area_change,
option_reference = x_option_reference,
option_notice_reqd = x_option_notice_reqd,
option_comments = x_option_comments
WHERE option_id = x_option_id ;
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.UPDATE_ROW (-)');
END Update_Row;
PROCEDURE Delete_Row
(
x_option_id IN NUMBER
)
IS
BEGIN
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.DELETE_ROW (+)');
DELETE FROM pn_options_all
WHERE option_id = x_option_id;
pnp_debug_pkg.debug ('PN_OPTIONS_PKG.DELETE_ROW (-)');
END Delete_Row;