23: -- prepay history table based on the exchange rates of prepayment transactions.
24: --
25: --------------------------------------------------------------------------------
26: PROCEDURE Update_Gain_Loss_Ind
27: (P_XLA_Event_Rec IN ap_accounting_pay_pkg.r_xla_event_info
28: ,P_Calling_Sequence IN VARCHAR2
29: ) IS
30:
31: l_curr_calling_sequence VARCHAR2(2000);
292: l_curr_calling_sequence VARCHAR2(2000);
293: l_total_paid_amt NUMBER;
294: l_final_payment BOOLEAN := FALSE;
295:
296: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
297: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
298: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
299: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
300: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
293: l_total_paid_amt NUMBER;
294: l_final_payment BOOLEAN := FALSE;
295:
296: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
297: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
298: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
299: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
300: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
301: l_prepay_hist_rec r_prepay_hist_info;
294: l_final_payment BOOLEAN := FALSE;
295:
296: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
297: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
298: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
299: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
300: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
301: l_prepay_hist_rec r_prepay_hist_info;
302: l_prepay_dist_rec r_prepay_dist_info;
295:
296: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
297: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
298: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
299: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
300: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
301: l_prepay_hist_rec r_prepay_hist_info;
302: l_prepay_dist_rec r_prepay_dist_info;
303:
296: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
297: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
298: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
299: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
300: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
301: l_prepay_hist_rec r_prepay_hist_info;
302: l_prepay_dist_rec r_prepay_dist_info;
303:
304: -- Logging Infra:
483:
484: ELSE
485:
486: /* Check if the invoice is fully paid */
487: l_final_payment := AP_Accounting_Pay_Pkg.Is_Final_Payment
488: (l_inv_rec,
489: NULL, -- Payment Amount
490: NULL, -- Discount Amount
491: l_prepay_dist_rec.amount,
580: END IF;
581:
582: -- bug 7611160
583: SELECT asp.base_currency_code
584: INTO ap_accounting_pay_pkg.g_base_currency_code
585: FROM ap_system_parameters_all asp,
586: ap_invoices_all ai
587: WHERE asp.org_id = ai.org_id
588: AND ai.invoice_id = l_inv_rec.invoice_id;
636: -- prepayment application payment distributions.
637: --
638: --------------------------------------------------------------------------------
639: PROCEDURE Prepay_Dist_Cascade_Adj
640: (P_XLA_Event_Rec IN ap_accounting_pay_pkg.r_xla_event_info
641: ,P_Calling_Sequence IN VARCHAR2
642: ) IS
643:
644: l_curr_calling_sequence VARCHAR2(2000);
645: l_inv_adj_amount NUMBER := 0;
646: l_sum_prepaid_amount NUMBER := 0;
647: l_sum_tax_diff_amount NUMBER := 0;
648:
649: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
650: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
651: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
652: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
653: l_prepay_hist_rec r_prepay_hist_info;
646: l_sum_prepaid_amount NUMBER := 0;
647: l_sum_tax_diff_amount NUMBER := 0;
648:
649: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
650: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
651: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
652: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
653: l_prepay_hist_rec r_prepay_hist_info;
654: l_prepay_dist_rec r_prepay_dist_info;
647: l_sum_tax_diff_amount NUMBER := 0;
648:
649: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
650: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
651: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
652: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
653: l_prepay_hist_rec r_prepay_hist_info;
654: l_prepay_dist_rec r_prepay_dist_info;
655: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
648:
649: l_pay_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
650: l_clr_hist_rec ap_accounting_pay_pkg.r_pay_hist_info;
651: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
652: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
653: l_prepay_hist_rec r_prepay_hist_info;
654: l_prepay_dist_rec r_prepay_dist_info;
655: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
656:
651: l_prepay_inv_rec ap_accounting_pay_pkg.r_invoices_info;
652: l_inv_rec ap_accounting_pay_pkg.r_invoices_info;
653: l_prepay_hist_rec r_prepay_hist_info;
654: l_prepay_dist_rec r_prepay_dist_info;
655: l_inv_dist_rec ap_accounting_pay_pkg.r_inv_dist_info;
656:
657: --7488981
658: l_prepay_dist_cnt NUMBER;
659:
1145: -- Also calculates ERV
1146: ---------------------------------------------------------------------
1147: -- Bug 6698125. Added p_xla_event_rec parameter
1148: PROCEDURE Prepay_Dist_Proc
1149: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1150: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1151: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1146: ---------------------------------------------------------------------
1147: -- Bug 6698125. Added p_xla_event_rec parameter
1148: PROCEDURE Prepay_Dist_Proc
1149: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1150: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1151: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1154: ,p_prepay_dist_rec IN r_prepay_dist_info
1147: -- Bug 6698125. Added p_xla_event_rec parameter
1148: PROCEDURE Prepay_Dist_Proc
1149: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1150: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1151: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1154: ,p_prepay_dist_rec IN r_prepay_dist_info
1155: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1148: PROCEDURE Prepay_Dist_Proc
1149: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1150: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1151: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1154: ,p_prepay_dist_rec IN r_prepay_dist_info
1155: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1156: ,p_xla_event_rec IN ap_accounting_pay_pkg.r_xla_event_info
1151: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1154: ,p_prepay_dist_rec IN r_prepay_dist_info
1155: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1156: ,p_xla_event_rec IN ap_accounting_pay_pkg.r_xla_event_info
1157: ,p_calc_mode IN VARCHAR2
1158: ,p_final_payment IN BOOLEAN
1159: ,p_calling_sequence IN VARCHAR2
1152: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1153: ,p_prepay_hist_rec IN r_prepay_hist_info
1154: ,p_prepay_dist_rec IN r_prepay_dist_info
1155: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1156: ,p_xla_event_rec IN ap_accounting_pay_pkg.r_xla_event_info
1157: ,p_calc_mode IN VARCHAR2
1158: ,p_final_payment IN BOOLEAN
1159: ,p_calling_sequence IN VARCHAR2
1160: ) IS
1223: -- total. This way the liability is fully relieved.
1224: IF p_final_payment = TRUE THEN
1225:
1226: IF (G_LEVEL_PROCEDURE >= G_CURRENT_RUNTIME_LEVEL ) THEN
1227: l_log_msg := 'Calling procedure AP_Accounting_Pay_Pkg.Get_Pay_Sum';
1228: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1229: END IF;
1230:
1231: AP_Accounting_Pay_Pkg.Get_Pay_Sum
1227: l_log_msg := 'Calling procedure AP_Accounting_Pay_Pkg.Get_Pay_Sum';
1228: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
1229: END IF;
1230:
1231: AP_Accounting_Pay_Pkg.Get_Pay_Sum
1232: (p_inv_dist_rec.invoice_distribution_id,
1233: 'PAYMENT CREATED',
1234: l_total_paid_amt,
1235: l_total_inv_dist_amt,
1236: l_total_bank_curr_amt,
1237: l_curr_calling_sequence);
1238:
1239:
1240: l_total_prepaid_amt := AP_Accounting_Pay_Pkg.Get_Prepay_Sum
1241: (p_inv_dist_rec.invoice_distribution_id,
1242: l_curr_calling_sequence);
1243:
1244:
1329: -- give us the amount that needs to be adjusted
1330: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
1331: (((p_inv_dist_rec.amount * p_prepay_dist_rec.amount)
1332: / p_inv_rec.invoice_amount)
1333: - AP_Accounting_Pay_Pkg.get_casc_prepay_sum
1334: (p_inv_dist_rec.invoice_distribution_id,
1335: p_prepay_dist_rec.invoice_distribution_id,
1336: l_curr_calling_sequence),
1337: p_inv_rec.invoice_currency_code);
1373: l_pad_rec.prepay_pay_exchange_rate_type := p_pay_hist_rec.pmt_to_base_xrate_type;
1374: l_pad_rec.prepay_clr_exchange_rate_type := p_clr_hist_rec.bank_to_base_xrate_type;
1375:
1376:
1377: l_pad_rec.base_amt_at_prepay_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1378: (l_prorated_amount,
1379: p_prepay_inv_rec.invoice_currency_code,
1380: p_inv_rec.base_currency_code,
1381: p_prepay_inv_rec.exchange_rate_type,
1391: ELSE
1392: l_prorated_pay_amt := l_prorated_amount;
1393: END IF;
1394:
1395: l_pad_rec.base_amt_at_prepay_pay_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1396: (l_prorated_pay_amt,
1397: p_pay_hist_rec.pmt_currency_code,
1398: p_inv_rec.base_currency_code,
1399: p_pay_hist_rec.pmt_to_base_xrate_type,
1409: ELSE
1410: l_prorated_clr_amt := l_prorated_pay_amt;
1411: END IF;
1412:
1413: l_pad_rec.base_amt_at_prepay_clr_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1414: (l_prorated_clr_amt,
1415: p_clr_hist_rec.bank_currency_code,
1416: p_inv_rec.base_currency_code,
1417: p_clr_hist_rec.bank_to_base_xrate_type,
1419: p_clr_hist_rec.bank_to_base_xrate,
1420: l_curr_calling_sequence);
1421:
1422:
1423: l_pad_rec.base_amount := AP_Accounting_Pay_Pkg.Get_Base_Amount
1424: (l_prorated_amount,
1425: p_inv_rec.invoice_currency_code,
1426: p_inv_rec.base_currency_code,
1427: p_inv_rec.exchange_rate_type,
1578: -- application distribution table
1579: ---------------------------------------------------------------------
1580:
1581: PROCEDURE Prepay_Dist_Tax_Diff
1582: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1583: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1584: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1585: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1586: ,p_prepay_hist_rec IN r_prepay_hist_info
1579: ---------------------------------------------------------------------
1580:
1581: PROCEDURE Prepay_Dist_Tax_Diff
1582: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1583: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1584: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1585: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1586: ,p_prepay_hist_rec IN r_prepay_hist_info
1587: ,p_prepay_dist_rec IN r_prepay_dist_info
1580:
1581: PROCEDURE Prepay_Dist_Tax_Diff
1582: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1583: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1584: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1585: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1586: ,p_prepay_hist_rec IN r_prepay_hist_info
1587: ,p_prepay_dist_rec IN r_prepay_dist_info
1588: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1581: PROCEDURE Prepay_Dist_Tax_Diff
1582: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1583: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1584: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1585: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1586: ,p_prepay_hist_rec IN r_prepay_hist_info
1587: ,p_prepay_dist_rec IN r_prepay_dist_info
1588: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1589: ,p_calc_mode IN VARCHAR2
1584: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1585: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1586: ,p_prepay_hist_rec IN r_prepay_hist_info
1587: ,p_prepay_dist_rec IN r_prepay_dist_info
1588: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1589: ,p_calc_mode IN VARCHAR2
1590: ,p_calling_sequence IN VARCHAR2
1591: ) IS
1592:
1649: -- give us the amount that needs to be adjusted
1650: l_prorated_amount := AP_UTILITIES_PKG.AP_ROUND_CURRENCY
1651: (((p_inv_dist_rec.amount * p_prepay_dist_rec.prepay_tax_diff_amount)
1652: / p_inv_rec.invoice_amount)
1653: - AP_Accounting_Pay_Pkg.get_casc_tax_diff_sum
1654: (p_inv_dist_rec.invoice_distribution_id,
1655: p_prepay_dist_rec.invoice_distribution_id,
1656: l_curr_calling_sequence),
1657: p_inv_rec.invoice_currency_code);
1690: l_pad_rec.prepay_pay_exchange_rate_type := p_pay_hist_rec.pmt_to_base_xrate_type;
1691: l_pad_rec.prepay_clr_exchange_rate_type := p_clr_hist_rec.bank_to_base_xrate_type;
1692:
1693:
1694: l_pad_rec.base_amt_at_prepay_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1695: (l_prorated_amount,
1696: p_prepay_inv_rec.invoice_currency_code,
1697: p_inv_rec.base_currency_code,
1698: p_prepay_inv_rec.exchange_rate_type,
1706: l_prorated_pay_amt := l_prorated_amount;
1707: END IF;
1708:
1709:
1710: l_pad_rec.base_amt_at_prepay_pay_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1711: (l_prorated_pay_amt,
1712: p_pay_hist_rec.pmt_currency_code,
1713: p_inv_rec.base_currency_code,
1714: p_pay_hist_rec.pmt_to_base_xrate_type,
1724: ELSE
1725: l_prorated_clr_amt := l_prorated_pay_amt;
1726: END IF;
1727:
1728: l_pad_rec.base_amt_at_prepay_clr_xrate := AP_Accounting_Pay_Pkg.Get_Base_Amount
1729: (l_prorated_clr_amt,
1730: p_clr_hist_rec.bank_currency_code,
1731: p_inv_rec.base_currency_code,
1732: p_clr_hist_rec.bank_to_base_xrate_type,
1734: p_clr_hist_rec.bank_to_base_xrate,
1735: l_curr_calling_sequence);
1736:
1737:
1738: l_pad_rec.base_amount := AP_Accounting_Pay_Pkg.Get_Base_Amount
1739: (l_prorated_amount,
1740: p_inv_rec.invoice_currency_code,
1741: p_inv_rec.base_currency_code,
1742: p_inv_rec.exchange_rate_type,
1780: -- and inserts the calculated values into prepay appl payment dists table
1781: ---------------------------------------------------------------------
1782:
1783: PROCEDURE Prepay_Dist_ERV
1784: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1785: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1786: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1787: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1788: ,p_prepay_hist_rec IN r_prepay_hist_info
1781: ---------------------------------------------------------------------
1782:
1783: PROCEDURE Prepay_Dist_ERV
1784: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1785: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1786: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1787: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1788: ,p_prepay_hist_rec IN r_prepay_hist_info
1789: ,p_prepay_dist_rec IN r_prepay_dist_info
1782:
1783: PROCEDURE Prepay_Dist_ERV
1784: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1785: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1786: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1787: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1788: ,p_prepay_hist_rec IN r_prepay_hist_info
1789: ,p_prepay_dist_rec IN r_prepay_dist_info
1790: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1783: PROCEDURE Prepay_Dist_ERV
1784: (p_pay_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1785: ,p_clr_hist_rec IN ap_accounting_pay_pkg.r_pay_hist_info
1786: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1787: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1788: ,p_prepay_hist_rec IN r_prepay_hist_info
1789: ,p_prepay_dist_rec IN r_prepay_dist_info
1790: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1791: ,p_prorated_amount IN NUMBER
1786: ,p_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1787: ,p_prepay_inv_rec IN ap_accounting_pay_pkg.r_invoices_info
1788: ,p_prepay_hist_rec IN r_prepay_hist_info
1789: ,p_prepay_dist_rec IN r_prepay_dist_info
1790: ,p_inv_dist_rec IN ap_accounting_pay_pkg.r_inv_dist_info
1791: ,p_prorated_amount IN NUMBER
1792: ,p_calling_sequence IN VARCHAR2
1793: ) IS
1794:
1961: -- Bug 7134020. Added p_inv_dist_id parameter
1962: PROCEDURE Prepay_Dist_Reverse
1963: (p_prepay_hist_rec IN r_prepay_hist_info
1964: ,p_prepay_reversal_id IN NUMBER
1965: ,P_XLA_Event_Rec IN ap_accounting_pay_pkg.r_xla_event_info
1966: ,p_inv_reversal_id IN NUMBER
1967: ,p_inv_dist_id IN NUMBER
1968: ,p_prepay_inv_dist_id IN NUMBER
1969: ,p_calling_sequence IN VARCHAR2