18: p_partial_factor IN NUMBER,
19: p_impl_txn_rev_amt IN NUMBER,
20: p_impl_pc_rev_amt IN NUMBER,
21: p_impl_pfc_rev_amt IN NUMBER) IS
22: l_agreement_id pa_agreements_all.agreement_id%TYPE;
23: l_budget_version_id pa_budget_versions.budget_version_id%TYPE;
24: l_total_proj_revenue pa_budget_versions.total_project_revenue%TYPE;
25: l_total_projfunc_revenue pa_budget_versions.revenue%TYPE;
26: l_bv_id pa_budget_versions.budget_version_id%TYPE;
35: l_upd_agr_allowed VARCHAR2(30);
36: l_valid_funding_amt_flag VARCHAR2(30);
37: l_add_funding_ok_flag VARCHAR2(30);
38:
39: l_customer_id pa_agreements_all.customer_id%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
36: l_valid_funding_amt_flag VARCHAR2(30);
37: l_add_funding_ok_flag VARCHAR2(30);
38:
39: l_customer_id pa_agreements_all.customer_id%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
37: l_add_funding_ok_flag VARCHAR2(30);
38:
39: l_customer_id pa_agreements_all.customer_id%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
38:
39: l_customer_id pa_agreements_all.customer_id%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
39: l_customer_id pa_agreements_all.customer_id%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
40: l_agreement_type pa_agreements_all.agreement_type%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
41: l_term_id pa_agreements_all.term_id%TYPE;
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
42: l_template_flag pa_agreements_all.template_Flag%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
43: l_revenue_limit_flag pa_agreements_all.revenue_limit_flag%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
44: l_owned_by_person_id pa_agreements_all.owned_by_person_id%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
45: l_owning_org_id pa_agreements_all.owning_organization_id%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
46: l_agr_curr_code pa_agreements_all.agreement_currency_Code%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
47: l_invoice_limit_flag pa_agreements_all.invoice_limit_flag%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
48: l_agreement_num pa_agreements_all.agreement_num%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
49: l_description pa_agreements_all.description%TYPE; --Bug#14536605
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
50: l_expiration_Date pa_agreements_all.expiration_date%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
51: l_Attribute_Category pa_agreements_all.Attribute_Category%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
52: l_Attribute1 pa_agreements_all.Attribute1%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
53: l_Attribute2 pa_agreements_all.Attribute2%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
54: l_Attribute3 pa_agreements_all.Attribute3%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
62: l_agr_amount pa_agreements_all.Amount%TYPE;
55: l_Attribute4 pa_agreements_all.Attribute4%TYPE;
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
62: l_agr_amount pa_agreements_all.Amount%TYPE;
63:
56: l_Attribute5 pa_agreements_all.Attribute5%TYPE;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
62: l_agr_amount pa_agreements_all.Amount%TYPE;
63:
64: l_new_agr_amount NUMBER;
57: l_Attribute6 pa_agreements_all.Attribute6%TYPE;
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
62: l_agr_amount pa_agreements_all.Amount%TYPE;
63:
64: l_new_agr_amount NUMBER;
65:
58: l_Attribute7 pa_agreements_all.Attribute7%TYPE;
59: l_Attribute8 pa_agreements_all.Attribute8%TYPE;
60: l_Attribute9 pa_agreements_all.Attribute9%TYPE;
61: l_Attribute10 pa_agreements_all.Attribute10%TYPE;
62: l_agr_amount pa_agreements_all.Amount%TYPE;
63:
64: l_new_agr_amount NUMBER;
65:
66: l_last_updated_by NUMBER := FND_GLOBAL.USER_ID;
246: l_Attribute8,
247: l_Attribute9,
248: l_Attribute10,
249: l_agr_amount
250: FROM pa_agreements_all WHERE
251: agreement_id = l_agreement_id;
252:
253: IF l_debug_mode = 'Y' THEN
254: PA_DEBUG.write_log (x_module =>
421:
422: /* the following is only for testing a bug */
423: BEGIN
424: SELECT amount into l_tmp_amount
425: FROM pa_agreements_all WHERE
426: agreement_id = l_agreement_id;
427: EXCEPTION
428: WHEN OTHERS THEN
429: l_tmp_amount := 0;