The following lines contain the word 'select', 'insert', 'update' or 'delete':
PROCEDURE Insert_Row (
x_rowid IN OUT NOCOPY VARCHAR2
,x_lease_detail_id IN OUT NOCOPY NUMBER
,x_lease_change_id IN NUMBER
,x_lease_id IN NUMBER
,x_responsible_user IN NUMBER
,x_expense_account_id IN NUMBER
,x_lease_commencement_date IN DATE
,x_lease_termination_date IN DATE
,x_lease_execution_date IN DATE
,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_accrual_account_id IN NUMBER
,x_receivable_account_id IN NUMBER
,x_term_template_id IN NUMBER
,x_grouping_rule_id IN NUMBER
,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_org_id IN NUMBER
)
IS
CURSOR c IS
SELECT ROWID
FROM pn_lease_details_all
WHERE lease_detail_id = x_lease_detail_id;
SELECT org_id
FROM pn_leases_all
WHERE lease_id = x_lease_id;
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Insert_Row (+)');
INSERT INTO pn_lease_details_all
(
lease_detail_id
,lease_change_id
,lease_id
,responsible_user
,expense_account_id
,lease_commencement_date
,lease_termination_date
,lease_execution_date
,creation_date
,created_by
,last_update_date
,last_updated_by
,last_update_login
,accrual_account_id
,receivable_account_id
,term_template_id
,grouping_rule_id
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,org_id
)
VALUES
(
NVL(x_lease_detail_id, pn_lease_details_s.NEXTVAL)
,x_lease_change_id
,x_lease_id
,x_responsible_user
,x_expense_account_id
,x_lease_commencement_date
,x_lease_termination_date
,x_lease_execution_date
,x_creation_date
,x_created_by
,x_last_update_date
,x_last_updated_by
,x_last_update_login
,x_accrual_account_id
,x_receivable_account_id
,x_term_template_id
,x_grouping_rule_id
,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
,l_org_id)
RETURNING lease_detail_id INTO x_lease_detail_id;
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Insert_Row (-)');
END Insert_Row;
SELECT pld.*,
pll.name,
pll.lease_num,
pll.lease_status
FROM pn_lease_details_all pld,
pn_leases_all pll
WHERE pld.lease_detail_id = x_lease_detail_id
AND pld.lease_id = pll.lease_id
FOR UPDATE OF pld.lease_detail_id NOWAIT;
PROCEDURE Update_Row
(
x_lease_detail_id IN NUMBER
,x_lease_change_id IN NUMBER
,x_lease_id IN NUMBER
,x_responsible_user IN NUMBER
,x_expense_account_id IN NUMBER
,x_lease_commencement_date IN DATE
,x_lease_termination_date IN DATE
,x_lease_execution_date IN DATE
,x_last_update_date IN DATE
,x_last_updated_by IN NUMBER
,x_last_update_login IN NUMBER
,x_accrual_account_id IN NUMBER
,x_receivable_account_id IN NUMBER
,x_term_template_id IN NUMBER
,x_grouping_rule_id IN NUMBER
,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_lease_extension_end_date IN DATE
)
IS
CURSOR c2 IS
SELECT ldt.*, pnl.name, pnl.lease_num, pnl.lease_status
FROM pn_lease_details_all ldt,
pn_leases_all pnl
WHERE lease_detail_id = x_lease_detail_id
AND ldt.lease_id = pnl.lease_id;
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Update_Row (+)');
INSERT INTO pn_lease_details_history
(
detail_history_id
,lease_detail_id
,lease_change_id
,new_lease_change_id
,lease_id
,responsible_user
,expense_account_id
,lease_commencement_date
,lease_termination_date
,lease_execution_date
,creation_date
,created_by
,last_update_date
,last_updated_by
,last_update_login
,attribute_category
,attribute1
,attribute2
,attribute3
,attribute4
,attribute5
,attribute6
,attribute7
,attribute8
,attribute9
,attribute10
,attribute11
,attribute12
,attribute13
,attribute14
,attribute15
,name
,lease_num
,lease_status
,lease_extension_end_date
)
VALUES
(
pn_lease_details_history_s.NEXTVAL
,recInfoForHist.lease_detail_id
,recInfoForHist.lease_change_id
,x_lease_change_id
,recInfoForHist.lease_id
,recInfoForHist.responsible_user
,recInfoForHist.expense_account_id
,recInfoForHist.lease_commencement_date
,recInfoForHist.lease_termination_date
,recInfoForHist.lease_execution_date
,recInfoForHist.creation_date
,recInfoForHist.created_by
,recInfoForHist.last_update_date
,recInfoForHist.last_updated_by
,recInfoForHist.last_update_login
,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.name
,recInfoForHist.lease_num
,recInfoForHist.lease_status
,recInfoForHist.lease_extension_end_date
);
UPDATE pn_lease_details_all
SET lease_change_id = x_lease_change_id
,responsible_user = x_responsible_user
,expense_account_id = x_expense_account_id
,lease_commencement_date = x_lease_commencement_date
,lease_termination_date = x_lease_termination_date
,lease_execution_date = x_lease_execution_date
,last_update_date = x_last_update_date
,last_updated_by = x_last_updated_by
,last_update_login = x_last_update_login
,accrual_account_id = x_accrual_account_id
,receivable_account_id = x_receivable_account_id
,term_template_id = x_term_template_id
,grouping_rule_id = x_grouping_rule_id
,lease_extension_end_date = x_lease_extension_end_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
WHERE lease_detail_id = x_lease_detail_id;
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Update_Row (-)');
END Update_Row;
PROCEDURE Delete_Row
(
x_lease_detail_id IN NUMBER
)
IS
BEGIN
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Delete_Row (+)');
DELETE FROM pn_lease_details_all
WHERE lease_detail_id = x_lease_detail_id;
pnp_debug_pkg.debug('PN_LEASE_DETAILS_PKG.Delete_Row (-)');
END Delete_Row;