The following lines contain the word 'select', 'insert', 'update' or 'delete':
Procedure Create_delete_Wrkhst
( p_api_version IN NUMBER,
p_init_msg_list IN VARCHAR2,
p_commit IN VARCHAR2,
p_validation_level IN NUMBER,
x_return_status OUT NOCOPY VARCHAR2,
x_msg_count OUT NOCOPY NUMBER,
x_msg_data OUT NOCOPY VARCHAR2,
p_salesrep_id IN NUMBER,
p_srp_pmt_asgn_id IN NUMBER,
p_payrun_id IN NUMBER,
x_status OUT NOCOPY VARCHAR2,
x_loading_status OUT NOCOPY VARCHAR2
) IS
l_api_name CONSTANT VARCHAR2(30) := 'Create_delete_Wrkhst';
SELECT pw.payment_worksheet_id,
pw.salesrep_id
FROM cn_payment_worksheets pw,
cn_payruns p,
cn_srp_pmt_plans_v ppa
WHERE ppa.salesrep_id = p_salesrep_id
and ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
and p.payrun_id = p_payrun_id
and p.pay_period_id = ppa.period_id
and pw.salesrep_id = ppa.salesrep_id
and pw.payrun_id = p.payrun_id
and pw.quota_id IS NULL
and p.status = 'UNPAID' ;
SELECT pw.payment_worksheet_id,
pw.salesrep_id
FROM cn_payment_worksheets pw, cn_payruns p, cn_period_statuses ps
WHERE pw.salesrep_id = p_salesrep_id
AND p.payrun_id = p_payrun_id
AND p.org_id = ps.org_id
AND ps.period_id = p.pay_period_id
AND pw.payrun_id = p.payrun_id
AND pw.quota_id IS NULL
AND p.status = 'UNPAID'
AND EXISTS (SELECT 1 FROM cn_srp_pmt_plans ppa
WHERE ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
AND ppa.salesrep_id = pw.salesrep_id
AND ppa.start_date <= ps.end_date
AND Nvl(ppa.end_date,ps.end_date) >= ps.start_date);
SAVEPOINT Create_delete_Wrkhst;
CN_Payment_Worksheet_PVT.Update_Worksheet
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_worksheet_id => wksht_recs.payment_worksheet_id,
p_operation => 'REFRESH',
x_status => x_status,
x_loading_status => x_loading_status,
x_ovn => l_ovn
);
ROLLBACK TO Create_delete_Wrkhst;
ROLLBACK TO Create_delete_Wrkhst;
ROLLBACK TO Create_delete_Wrkhst;
END Create_delete_Wrkhst ;
SELECT pw.payment_worksheet_id,
pw.salesrep_id,
p.object_version_number
FROM cn_payment_worksheets pw, cn_payruns p, cn_period_statuses ps
WHERE pw.salesrep_id = p_salesrep_id
AND p.payrun_id = p_payrun_id
AND ps.period_id = p.pay_period_id
AND pw.payrun_id = p.payrun_id
AND ps.org_id = p.org_id
AND pw.quota_id IS NULL
AND p.status = 'UNPAID'
AND EXISTS (SELECT 1 FROM cn_srp_pmt_plans ppa
WHERE ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
AND ppa.salesrep_id = pw.salesrep_id
AND ppa.start_date <= ps.end_date
AND Nvl(ppa.end_date,ps.end_date) >= ps.start_date);
x_loading_status := 'CN_UPDATED';
CN_SRP_PMT_PLANS_PUB.Update_Srp_Pmt_Plan
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_old_srp_pmt_plans_rec => oldrec,
p_srp_pmt_plans_rec => newrec,
x_loading_status => x_loading_status );
if x_loading_status <> 'CN_UPDATED' then
RAISE fnd_api.g_exc_error;
CN_Payment_Worksheet_PVT.Update_Worksheet
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_worksheet_id => wksht_recs.payment_worksheet_id,
p_operation => 'REFRESH',
x_status => x_status,
x_loading_status => x_loading_status,
x_ovn => wksht_recs.object_version_number
);
SELECT pw.payment_worksheet_id,
pw.salesrep_id,
p.object_version_number
FROM cn_payment_worksheets pw, cn_payruns p, cn_period_statuses ps
WHERE pw.salesrep_id = p_salesrep_id
AND p.payrun_id = p_payrun_id
AND ps.period_id = p.pay_period_id
AND ps.org_id = p.org_id
AND pw.payrun_id = p.payrun_id
AND pw.quota_id IS NULL
AND p.status = 'UNPAID'
AND EXISTS (SELECT 1 FROM cn_srp_pmt_plans ppa
WHERE ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
AND ppa.salesrep_id = pw.salesrep_id
AND ppa.start_date <= ps.end_date
AND Nvl(ppa.end_date,ps.end_date) >= ps.start_date);
x_loading_status := 'CN_DELETED';
x_loading_status := 'CN_DELETED';
CN_Payment_Worksheet_PVT.Delete_Worksheet
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_worksheet_id => wksht_recs.payment_worksheet_id,
x_status => x_status,
x_loading_status => x_loading_status,
p_validation_only => 'N',
p_ovn => wksht_recs.object_version_number);
if x_loading_status <> 'CN_DELETED' then
RAISE fnd_api.g_exc_error;
x_loading_status := 'CN_DELETED';
CN_SRP_PMT_PLANS_PUB.Delete_Srp_Pmt_Plan
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_srp_pmt_plans_rec => newrec,
x_loading_status => x_loading_status );
if x_loading_status <> 'CN_DELETED' then
RAISE fnd_api.g_exc_error;
x_loading_status := 'CN_INSERTED';
if x_loading_status <> 'CN_INSERTED' then
RAISE fnd_api.g_exc_error;
SELECT pw.payment_worksheet_id,
pw.salesrep_id
FROM cn_payment_worksheets pw,
cn_payruns p,
cn_srp_pmt_plans_v ppa
WHERE ppa.salesrep_id = p_salesrep_id
and ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
and p.payrun_id = p_payrun_id
and p.pay_period_id = ppa.period_id
and pw.salesrep_id = ppa.salesrep_id
and pw.payrun_id = p.payrun_id
AND pw.quota_id is null
and p.status = 'UNPAID' ;
SELECT pw.payment_worksheet_id,
pw.salesrep_id,
p.object_version_number
FROM cn_payment_worksheets pw, cn_payruns p, cn_period_statuses ps
WHERE pw.salesrep_id = p_salesrep_id
AND p.payrun_id = p_payrun_id
AND ps.period_id = p.pay_period_id
AND ps.org_id = p.org_id
AND pw.payrun_id = p.payrun_id
AND pw.quota_id IS NULL
AND p.status = 'UNPAID'
AND EXISTS (SELECT 1 FROM cn_srp_pmt_plans ppa
WHERE ppa.srp_pmt_plan_id = p_srp_pmt_asgn_id
AND ppa.salesrep_id = pw.salesrep_id
AND ppa.start_date <= ps.end_date
AND Nvl(ppa.end_date,ps.end_date) >= ps.start_date);
x_loading_status := 'CN_DELETED';
x_loading_status := 'CN_DELETED';
CN_Payment_Worksheet_PVT.Delete_Worksheet
( p_api_version => p_api_version,
p_init_msg_list => p_init_msg_list,
p_commit => p_commit,
p_validation_level=> p_validation_level,
x_return_status => x_return_status,
x_msg_count => x_msg_count,
x_msg_data => x_msg_data,
p_worksheet_id => wksht_recs.payment_worksheet_id,
x_status => x_status,
x_loading_status => x_loading_status,
p_validation_only => 'N',
p_ovn => wksht_recs.object_version_number);
if x_loading_status <> 'CN_DELETED' then
RAISE fnd_api.g_exc_error;
x_loading_status := 'CN_INSERTED';
if x_loading_status <> 'CN_INSERTED' then
RAISE fnd_api.g_exc_error;
x_loading_status := 'CN_INSERTED';
if x_loading_status <> 'CN_INSERTED' then
RAISE fnd_api.g_exc_error;