[Home] [Help]
1396: FUNCTION update_payment_schedule (p_total_tax NUMBER) RETURN boolean IS -- bug # 3218978
1397:
1398: v_total_tax_in_payment number;
1399: v_tax_installment number;
1400: v_payment_num ap_payment_schedules_all.payment_num%type;
1401: v_total_payment_amt number;
1402: v_diff_tax_amount number;
1403:
1404: cursor c_total_payment_amt is
1402: v_diff_tax_amount number;
1403:
1404: cursor c_total_payment_amt is
1405: select sum(gross_amount)
1406: from ap_payment_schedules_all
1407: where invoice_id = inv_id;
1408:
1409: begin
1410:
1427: for c_installments in
1428: (
1429: select gross_amount,
1430: payment_num
1431: from ap_payment_schedules_all
1432: where invoice_id = inv_id
1433: order by payment_num
1434: )
1435: loop
1440: v_tax_installment := p_total_tax * (c_installments.gross_amount / nvl(v_total_payment_amt,1));
1441:
1442: v_tax_installment := round(v_tax_installment, ln_precision);
1443:
1444: update ap_payment_schedules_all
1445: set gross_amount = gross_amount + v_tax_installment,
1446: amount_remaining = amount_remaining + v_tax_installment,
1447: inv_curr_gross_amount = inv_curr_gross_amount + v_tax_installment,
1448: payment_status_flag = decode(payment_status_flag, 'Y', 'P', payment_status_flag)
1458: if v_total_tax_in_payment <> p_total_tax then
1459:
1460: v_diff_tax_amount := round( p_total_tax - v_total_tax_in_payment,ln_precision);
1461:
1462: update ap_payment_schedules_all
1463: set gross_amount = gross_amount + v_diff_tax_amount,
1464: amount_remaining = amount_remaining + v_diff_tax_amount,
1465: inv_curr_gross_amount = inv_curr_gross_amount + v_diff_tax_amount
1466: where invoice_id = inv_id
1956:
1957: 39. 01/11/2003 ssumaith - bug# 3127834 - file version 115.4
1958:
1959: currency precision was not used for rounding the tax amounts when inserting / updating
1960: records into ap_invoices_all , ap_invoices_distributions_all , ap_payment_Schedules_all
1961: tables. As a result the invoice was going into automatic hold because the invoice amount
1962: does not equal sum of distributions amount.
1963:
1964: This has been resolved in the bug by getting the currency precision for the invoice
4023: END LOOP;
4024:
4025: /* Bug 5358788. Added by Lakshmi Gopalsami
4026: * Removed the update which is updating ap_invoices_all
4027: * and ap_payment_schedules_all
4028: */
4029:
4030: /* Bug 8866084 - Start
4031: * Added the update which is updating ap_invoices_all
4028: */
4029:
4030: /* Bug 8866084 - Start
4031: * Added the update which is updating ap_invoices_all
4032: * and ap_payment_schedules_all
4033: * Needs to be updated for Invoices created from iSupplier
4034: */
4035:
4036: open c_get_ap_invoice_src (inv_id);
7638: FUNCTION update_payment_schedule (p_total_tax NUMBER) RETURN boolean IS -- bug # 3218978
7639:
7640: v_total_tax_in_payment number;
7641: v_tax_installment number;
7642: v_payment_num ap_payment_schedules_all.payment_num%type;
7643: v_total_payment_amt number;
7644: v_diff_tax_amount number;
7645:
7646: cursor c_total_payment_amt is
7644: v_diff_tax_amount number;
7645:
7646: cursor c_total_payment_amt is
7647: select sum(gross_amount)
7648: from ap_payment_schedules_all
7649: where invoice_id = inv_id;
7650:
7651: begin
7652:
7669: for c_installments in
7670: (
7671: select gross_amount,
7672: payment_num
7673: from ap_payment_schedules_all
7674: where invoice_id = inv_id
7675: order by payment_num
7676: )
7677: loop
7682: v_tax_installment := p_total_tax * (c_installments.gross_amount / nvl(v_total_payment_amt,1));
7683:
7684: v_tax_installment := round(v_tax_installment, ln_precision);
7685:
7686: update ap_payment_schedules_all
7687: set gross_amount = gross_amount + v_tax_installment,
7688: amount_remaining = amount_remaining + v_tax_installment,
7689: inv_curr_gross_amount = inv_curr_gross_amount + v_tax_installment,
7690: payment_status_flag = decode(payment_status_flag, 'Y', 'P', payment_status_flag)
7702: v_diff_tax_amount := p_total_tax - v_total_tax_in_payment;
7703:
7704: v_diff_tax_amount := round(v_diff_tax_amount,ln_precision);
7705:
7706: update ap_payment_schedules_all
7707: set gross_amount = gross_amount + v_diff_tax_amount,
7708: amount_remaining = amount_remaining + v_diff_tax_amount,
7709: inv_curr_gross_amount = inv_curr_gross_amount + v_diff_tax_amount,
7710: payment_status_flag = decode(payment_status_flag, 'Y', 'P', payment_status_flag)
7845:
7846: 8. 16/12/2002 cbabu for bug# 2713601, FileVersion # 615.6
7847: AP_PAYMENTS_SCHEDULES_ALL is not getting updated with the tax amount
7848: as soon as AP_INVOICES_ALL isgetting updated. Update statement for
7849: ap_payment_schedules_all is written for scenario where rcv_transaction_id
7850: in ap_invoice_distributions_all is NULL. Thsi happens in PO matching
7851: setup for ERS invoices.
7852:
7853: 9. 20/12/2002 Aparajita for bug # 2689826 Version # 615.7
8053:
8054: 37. 01/11/2003 ssumaith - bug# 3127834 - file version 115.2
8055:
8056: currency precision was not used for rounding the tax amounts when inserting / updating
8057: records into ap_invoices_all , ap_invoices_distributions_all , ap_payment_Schedules_all
8058: tables. As a result the invoice was going into automatic hold because the invoice amount
8059: does not equal sum of distributions amount.
8060:
8061: This has been resolved in the bug by getting the currency precision for the invoice