DBA Data[Home] [Help]

APPS.AP_ACCTG_PAY_ROUND_PKG dependencies on AP_PAYMENT_HIST_DISTS

Line 388: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

384:
385:
386: l_max_prepay_rec AP_PREPAY_APP_DISTS%ROWTYPE;
387: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
388: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
389: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
390: l_erv_base_amount AP_INVOICE_DISTRIBUTIONS_ALL.base_amount%type := 0;
391:
392: -- Logging Infra:

Line 389: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

385:
386: l_max_prepay_rec AP_PREPAY_APP_DISTS%ROWTYPE;
387: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
388: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
389: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
390: l_erv_base_amount AP_INVOICE_DISTRIBUTIONS_ALL.base_amount%type := 0;
391:
392: -- Logging Infra:
393: l_procedure_name CONSTANT VARCHAR2(30) := 'Final_Pay';

Line 472: FROM AP_Payment_Hist_Dists APHD,

468: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
469: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
470: APHD.Invoice_Dist_Base_Amount)
471: INTO l_sum_pay_dist_base_amt
472: FROM AP_Payment_Hist_Dists APHD,
473: AP_Payment_History_All APH,
474: AP_Invoice_Payments_All AIP
475: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
476: AND APHD.Pay_Dist_Lookup_Code IN

Line 504: FROM AP_Payment_Hist_Dists APHD,

500: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
501: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
502: APHD.Invoice_Dist_Base_Amount)
503: INTO l_sum_pay_dist_base_amt
504: FROM AP_Payment_Hist_Dists APHD,
505: AP_Payment_History_All APH,
506: AP_Invoice_Payments_All AIP
507: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
508: AND APHD.Pay_Dist_Lookup_Code IN

Line 535: FROM AP_Payment_Hist_Dists APHD,

531: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
532: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
533: APHD.Invoice_Dist_Base_Amount)
534: INTO l_sum_pay_dist_base_amt
535: FROM AP_Payment_Hist_Dists APHD,
536: AP_Payment_History_All APH,
537: AP_Invoice_Payments_All AIP
538: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
539: AND APHD.Pay_Dist_Lookup_Code IN

Line 716: FROM AP_Payment_Hist_Dists APHD

712:
713: -- Get the payment hist info
714: /*SELECT APHD.*
715: INTO l_max_pay_rec
716: FROM AP_Payment_Hist_Dists APHD
717: WHERE APHD.Payment_History_ID = p_pay_hist_rec.payment_history_id
718: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
719: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
720: AND APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id

Line 827: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

823: l_disc_clr_rate_diff_amt NUMBER := 0;
824: l_err_clr_rate_diff_amt NUMBER := 0;
825: l_chrg_clr_rate_diff_amt NUMBER := 0;
826:
827: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
828:
829: -- Logging Infra:
830: l_procedure_name CONSTANT VARCHAR2(30) := 'Total_Pay';
831: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 905: FROM AP_Payment_Hist_Dists APHD

901: APHD.Invoice_Adjustment_Event_ID
902: INTO l_payment_hist_id,
903: l_invoice_dist_id,
904: l_inv_adj_event_id
905: FROM AP_Payment_Hist_Dists APHD
906: WHERE APHD.Invoice_Distribution_ID =
907: (SELECT MAX(APHD1.Invoice_Distribution_ID)
908: FROM AP_Payment_Hist_Dists APHD1
909: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id

Line 908: FROM AP_Payment_Hist_Dists APHD1

904: l_inv_adj_event_id
905: FROM AP_Payment_Hist_Dists APHD
906: WHERE APHD.Invoice_Distribution_ID =
907: (SELECT MAX(APHD1.Invoice_Distribution_ID)
908: FROM AP_Payment_Hist_Dists APHD1
909: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id
910: AND APHD1.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
911: AND APHD1.Invoice_Distribution_ID IN
912: (SELECT AID.Invoice_Distribution_ID

Line 918: FROM AP_Payment_Hist_Dists APHD2

914: WHERE AID.Invoice_ID = p_inv_rec.invoice_id)
915: AND APHD1.Pay_Dist_Lookup_Code not IN('AWT') --8727277
916: AND ABS(APHD1.Amount) =
917: (SELECT MAX(ABS(APHD2.Amount))
918: FROM AP_Payment_Hist_Dists APHD2
919: WHERE APHD2.Accounting_Event_ID = p_xla_event_rec.event_id
920: AND APHD2.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
921: AND APHD2.Invoice_Distribution_ID IN
922: (SELECT AID.Invoice_Distribution_ID

Line 977: FROM AP_Payment_Hist_Dists APHD,

973: l_disc_pay_rate_sum_amt,
974: l_disc_clr_rate_sum_amt,
975: l_err_clr_rate_sum_amt,
976: l_chrg_clr_rate_sum_amt
977: FROM AP_Payment_Hist_Dists APHD,
978: AP_Payment_History_All APH
979: WHERE APH.Related_Event_ID = p_pay_hist_rec.Related_Event_ID
980: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.Invoice_Payment_ID
981: AND APHD.Payment_History_ID = APH.Payment_History_ID

Line 1027: from ap_payment_history and AP_Payment_Hist_dists tables to be

1023: END IF;
1024:
1025:
1026: /*Bug6600117 used below query to fetch the sum(amount) and sum(base_amount)
1027: from ap_payment_history and AP_Payment_Hist_dists tables to be
1028: used later in the calculation*/
1029: -- Bug 6649025
1030: SELECT sum(nvl(APHD.amount,0)),
1031: max(APHD.Invoice_Distribution_Id)

Line 1036: FROM AP_PAYMENT_HIST_DISTS APHD,

1032: ,SUM(DECODE(APHD.Pay_Dist_Lookup_Code, 'CASH', APHD.Invoice_Dist_Base_Amount,
1033: 'AWT', APHD.Invoice_Dist_Base_Amount,
1034: 'DISCOUNT', APHD.Invoice_Dist_Base_Amount, 0))
1035: INTO l_pay_sum_amt,l_max_dist_id,l_inv_rate_sum_full_amt
1036: FROM AP_PAYMENT_HIST_DISTS APHD,
1037: AP_PAYMENT_HISTORY_ALL APH
1038: WHERE
1039: APHD.PAYMENT_HISTORY_ID =APH.PAYMENT_HISTORY_ID
1040: ANd APHD.INVOICE_PAYMENT_ID =p_inv_pay_rec.Invoice_Payment_ID --6614295

Line 1048: 'from ap_payment_history and AP_Payment_Hist_dists tables executed' ||

1044: WHERE AID.Invoice_ID = p_inv_rec.invoice_id);
1045:
1046: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1047: l_log_msg := 'query to fetch the sum(amount) and sum(base_amount)' ||
1048: 'from ap_payment_history and AP_Payment_Hist_dists tables executed' ||
1049: 'for payment id ' || p_inv_pay_rec.Invoice_Payment_ID ||
1050: 'and invoice id ' || p_inv_rec.invoice_id;
1051: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1052: END IF;

Line 1196: Same is not done while calculating invoice_dist_Base_Amount in AP_Payment_Hist_Dists

1192: amounts and rounding between the invoice and payment should be same */
1193: /*Bug6600117
1194: The fractional rounding amount is added to the maximun distribution amount
1195: in ap_invoice_distributions_all to balance them in respect to the header base amount.
1196: Same is not done while calculating invoice_dist_Base_Amount in AP_Payment_Hist_Dists
1197: table.This is giving rise to the unbalance accounting entries in accounting journal*/
1198:
1199: IF (p_pay_hist_rec.pmt_to_base_xrate =
1200: p_inv_rec.exchange_rate / p_inv_rec.payment_cross_rate) THEN

Line 1208: base amount sum and AP_Payment_Hist_Dists base amount sum */

1204:
1205: END IF;
1206:
1207: /* Bug660017calculate the difference between AP_invoice_distribution
1208: base amount sum and AP_Payment_Hist_Dists base amount sum */
1209: l_inv_dist_diff_amt := l_inv_base_amt - l_inv_rate_sum_full_amt;
1210:
1211: --Bug6600117
1212:

Line 1226: UPDATE AP_Payment_Hist_Dists APHD

1222: amount*
1223: -- Bug 6649025
1224:
1225: --Bug 7270829 - the same update has been done below , hence commenting out this code.
1226: UPDATE AP_Payment_Hist_Dists APHD
1227: SET APHD.invoice_dist_Base_Amount = APHD.invoice_dist_Base_Amount + NVL(l_inv_dist_diff_amt,0)
1228: WHERE APHD.Invoice_Distribution_ID = l_invoice_dist_id -- l_max_dist_id
1229: AND APHD.Pay_Dist_Lookup_Code IN ('CASH')
1230: AND APHD.Payment_History_ID = l_payment_hist_id

Line 1234: from AP_Payment_Hist_Dists APHD1

1230: AND APHD.Payment_History_ID = l_payment_hist_id
1231: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1232: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1233: AND APHD.PAYMENT_HIST_DIST_ID= (select max(APHD1.PAYMENT_HIST_DIST_ID)
1234: from AP_Payment_Hist_Dists APHD1
1235: where APHD1.invoice_distribution_id = l_invoice_dist_id); --l_max_dist_id);
1236:
1237: --Bug 7270829
1238:

Line 1257: -- Rule: SUM(AP_PAYMENT_HIST_DISTS.INVOICE_DIST_BASE_AMOUNT) =

1253: l_chrg_clr_rate_diff_amt := l_chrg_clr_rate_total_amt - l_chrg_clr_rate_sum_amt;
1254:
1255: -- Bug fix 6314128 Starts
1256: -- Handling the difference amount in l_inv_rate_diff_amt
1257: -- Rule: SUM(AP_PAYMENT_HIST_DISTS.INVOICE_DIST_BASE_AMOUNT) =
1258: -- AP_INVOICE_PAYMENTS_ALL.INVOICE_BASE_AMOUNT
1259:
1260: /*Commenting out as added new code to avoid negative base amounts due to rounding Bug-7156680
1261: IF NVL(l_inv_rate_diff_amt,0) <> 0 THEN

Line 1268: UPDATE AP_Payment_Hist_Dists APHD

1264: l_log_msg := 'Updating rounding amount for l_inv_rate_diff_amt';
1265: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1266: END IF;
1267:
1268: UPDATE AP_Payment_Hist_Dists APHD
1269: SET APHD.Invoice_Dist_Base_Amount =
1270: APHD.Invoice_Dist_Base_Amount + NVL(l_inv_rate_diff_amt,0),
1271: APHD.Rounding_Amt = l_inv_rate_diff_amt
1272: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1300: UPDATE AP_Payment_Hist_Dists APHD

1296: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1297: END IF;
1298:
1299:
1300: UPDATE AP_Payment_Hist_Dists APHD
1301: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1302: + NVL(l_clr_rate_diff_amt,0),
1303: APHD.Rounding_Amt = l_clr_rate_diff_amt
1304: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1326: UPDATE AP_Payment_Hist_Dists APHD

1322: l_log_msg := 'Updating rounding amount for l_mat_rate_diff_amt';
1323: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1324: END IF;
1325:
1326: UPDATE AP_Payment_Hist_Dists APHD
1327: SET APHD.Matured_Base_Amount = APHD.Matured_Base_Amount
1328: + NVL(l_mat_rate_diff_amt,0),
1329: APHD.Rounding_Amt = l_mat_rate_diff_amt
1330: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1350: UPDATE AP_Payment_Hist_Dists APHD

1346: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1347: END IF;
1348:
1349:
1350: UPDATE AP_Payment_Hist_Dists APHD
1351: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount + NVL(l_pay_rate_diff_amt,0),
1352: APHD.Rounding_Amt = l_pay_rate_diff_amt
1353: WHERE APHD.Payment_History_ID = l_payment_hist_id
1354: AND APHD.Invoice_Distribution_ID = l_invoice_dist_id

Line 1375: UPDATE AP_Payment_Hist_Dists APHD

1371: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1372: END IF;
1373:
1374:
1375: UPDATE AP_Payment_Hist_Dists APHD
1376: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount
1377: + NVL(l_disc_pay_rate_diff_amt,0),
1378: APHD.Rounding_Amt = l_disc_pay_rate_diff_amt
1379: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1402: UPDATE AP_Payment_Hist_Dists APHD

1398: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1399: END IF;
1400:
1401:
1402: UPDATE AP_Payment_Hist_Dists APHD
1403: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1404: + NVL(l_disc_clr_rate_diff_amt,0),
1405: APHD.Rounding_Amt = l_disc_clr_rate_diff_amt
1406: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1430: UPDATE AP_Payment_Hist_Dists APHD

1426: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1427: END IF;
1428:
1429:
1430: UPDATE AP_Payment_Hist_Dists APHD
1431: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1432: + NVL(l_err_clr_rate_diff_amt,0),
1433: APHD.Rounding_Amt = l_err_clr_rate_diff_amt
1434: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1458: UPDATE AP_Payment_Hist_Dists APHD

1454: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1455: END IF;
1456:
1457:
1458: UPDATE AP_Payment_Hist_Dists APHD
1459: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1460: + NVL(l_chrg_clr_rate_diff_amt,0),
1461: APHD.Rounding_Amt = l_chrg_clr_rate_diff_amt
1462: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1514: FROM AP_Payment_Hist_Dists APHD

1510: l_inv_dist_base_amt,
1511: l_inv_mat_base_amt,
1512: l_inv_paid_base_amt,
1513: l_inv_clr_base_amt
1514: FROM AP_Payment_Hist_Dists APHD
1515: WHERE APHD.Payment_History_ID = l_pay_hist_id
1516: AND APHD.Invoice_Distribution_ID = l_inv_dist_id
1517: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1518: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id

Line 1587: UPDATE AP_Payment_Hist_Dists APHD

1583: FND_LOG.STRING(G_LEVEL_STATEMENT,
1584: G_MODULE_NAME || l_procedure_name,
1585: l_log_msg);
1586: END IF;
1587: UPDATE AP_Payment_Hist_Dists APHD
1588: SET APHD.Invoice_Dist_Base_Amount = 0,
1589: APHD.Rounding_Amt = -sign(l_inv_dist_amt)*l_inv_dist_base_amt
1590: WHERE APHD.Payment_History_ID = l_pay_hist_id
1591: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 1597: UPDATE AP_Payment_Hist_Dists APHD

1593: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1594: AND APHD.Pay_Dist_Lookup_Code = 'CASH';
1595:
1596: ELSE
1597: UPDATE AP_Payment_Hist_Dists APHD
1598: SET APHD.Invoice_Dist_Base_Amount = APHD.Invoice_Dist_Base_Amount +
1599: NVL(l_inv_dist_rounding_amt,
1600: 0),
1601: APHD.Rounding_Amt=l_inv_dist_rounding_amt

Line 1680: UPDATE AP_Payment_Hist_Dists APHD

1676:
1677: exit;
1678: end if;
1679:
1680: UPDATE AP_Payment_Hist_Dists APHD
1681: SET APHD.Cleared_Base_Amount = 0,
1682: APHD.Rounding_Amt=-sign(l_inv_clr_base_amt)*l_inv_clr_base_amt
1683: WHERE APHD.Payment_History_ID = l_pay_hist_id
1684: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 1689: UPDATE AP_Payment_Hist_Dists APHD

1685: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1686: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1687: AND APHD.Pay_Dist_Lookup_Code = 'CASH';
1688: ELSE
1689: UPDATE AP_Payment_Hist_Dists APHD
1690: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount +
1691: NVL(l_clr_rate_rounding_amt, 0),
1692: APHD.Rounding_Amt=l_clr_rate_rounding_amt
1693: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 1757: UPDATE AP_Payment_Hist_Dists APHD

1753:
1754: exit;
1755: end if;
1756:
1757: UPDATE AP_Payment_Hist_Dists APHD
1758: SET APHD.Matured_Base_Amount = 0,
1759: APHD.Rounding_Amt=-sign(l_inv_mat_base_amt )*l_inv_mat_base_amt
1760: WHERE APHD.Payment_History_ID = l_pay_hist_id
1761: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 1766: UPDATE AP_Payment_Hist_Dists APHD

1762: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1763: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1764: AND APHD.Pay_Dist_Lookup_Code = 'CASH';
1765: ELSE
1766: UPDATE AP_Payment_Hist_Dists APHD
1767: SET APHD.Matured_Base_Amount = APHD.Matured_Base_Amount +
1768: NVL(l_mat_rate_rounding_amt, 0),
1769: APHD.Rounding_Amt=l_mat_rate_rounding_amt
1770: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 1833: UPDATE AP_Payment_Hist_Dists APHD

1829:
1830: exit;
1831: end if;
1832:
1833: UPDATE AP_Payment_Hist_Dists APHD
1834: SET APHD.Paid_Base_Amount = 0,
1835: APHD.rounding_amt=-sign(l_inv_paid_base_amt)*l_inv_paid_base_amt
1836: WHERE APHD.Payment_History_ID = l_pay_hist_id
1837: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 1842: UPDATE AP_Payment_Hist_Dists APHD

1838: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1839: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1840: AND APHD.Pay_Dist_Lookup_Code = 'CASH';
1841: ELSE
1842: UPDATE AP_Payment_Hist_Dists APHD
1843: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount +
1844: NVL(l_pay_rate_rounding_amt, 0),
1845: APHD.Rounding_amt=l_pay_rate_rounding_amt
1846: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 1877: FROM AP_Payment_Hist_Dists APHD

1873: l_inv_dist_base_amt_disc,
1874: l_inv_mat_base_amt_disc,
1875: l_inv_paid_base_amt_disc,
1876: l_inv_clr_base_amt_disc
1877: FROM AP_Payment_Hist_Dists APHD
1878: WHERE APHD.Payment_History_ID = l_pay_hist_id
1879: AND APHD.Invoice_Distribution_ID = l_inv_dist_id
1880: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1881: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id

Line 1938: UPDATE AP_Payment_Hist_Dists APHD

1934:
1935: exit;
1936: end if;
1937:
1938: UPDATE AP_Payment_Hist_Dists APHD
1939: SET APHD.Paid_Base_Amount = 0,
1940: APHD.Rounding_amt=-sign(l_inv_paid_base_amt_disc)*l_inv_paid_base_amt_disc
1941: WHERE APHD.Payment_History_ID = l_pay_hist_id
1942: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 1947: UPDATE AP_Payment_Hist_Dists APHD

1943: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1944: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1945: AND APHD.Pay_Dist_Lookup_Code = 'DISCOUNT';
1946: ELSE
1947: UPDATE AP_Payment_Hist_Dists APHD
1948: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount +
1949: NVL(l_disc_pay_rounding_amt, 0),
1950: APHD.Rounding_amt=l_disc_pay_rounding_amt
1951: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 1982: FROM AP_Payment_Hist_Dists APHD

1978: l_inv_dist_base_amt_disc,
1979: l_inv_mat_base_amt_disc,
1980: l_inv_paid_base_amt_disc,
1981: l_inv_clr_base_amt_disc
1982: FROM AP_Payment_Hist_Dists APHD
1983: WHERE APHD.Payment_History_ID = l_pay_hist_id
1984: AND APHD.Invoice_Distribution_ID = l_inv_dist_id
1985: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1986: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id

Line 2043: UPDATE AP_Payment_Hist_Dists APHD

2039:
2040: exit;
2041: end if;
2042:
2043: UPDATE AP_Payment_Hist_Dists APHD
2044: SET APHD.Cleared_Base_Amount = 0,
2045: APHD.Rounding_amt=-sign(l_inv_clr_base_amt_disc)*l_inv_clr_base_amt_disc
2046: WHERE APHD.Payment_History_ID = l_pay_hist_id
2047: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 2052: UPDATE AP_Payment_Hist_Dists APHD

2048: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
2049: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
2050: AND APHD.Pay_Dist_Lookup_Code = 'DISCOUNT';
2051: ELSE
2052: UPDATE AP_Payment_Hist_Dists APHD
2053: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount +
2054: NVL(l_disc_clr_rounding_amt, 0),
2055: APHD.Rounding_Amt=l_disc_clr_rounding_amt
2056: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 2121: UPDATE AP_Payment_Hist_Dists APHD

2117:
2118: exit;
2119: end if;
2120:
2121: UPDATE AP_Payment_Hist_Dists APHD
2122: SET APHD.Cleared_Base_Amount = 0,
2123: APHD.Rounding_amt=-sign(l_inv_clr_base_amt)*l_inv_clr_base_amt
2124: WHERE APHD.Payment_History_ID = l_pay_hist_id
2125: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 2130: UPDATE AP_Payment_Hist_Dists APHD

2126: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
2127: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
2128: AND APHD.Pay_Dist_Lookup_Code = 'BANK ERROR';
2129: ELSE
2130: UPDATE AP_Payment_Hist_Dists APHD
2131: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount +
2132: NVL(l_err_clr_rounding_amt, 0),
2133: APHD.Rounding_amt=l_err_clr_rounding_amt
2134: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 2199: UPDATE AP_Payment_Hist_Dists APHD

2195:
2196: exit;
2197: end if;
2198:
2199: UPDATE AP_Payment_Hist_Dists APHD
2200: SET APHD.Cleared_Base_Amount = 0,
2201: APHD.Rounding_amt=-sign(l_inv_clr_base_amt)*l_inv_clr_base_amt
2202: WHERE APHD.Payment_History_ID = l_pay_hist_id
2203: AND APHD.Invoice_Distribution_ID = l_inv_dist_id

Line 2208: UPDATE AP_Payment_Hist_Dists APHD

2204: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
2205: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
2206: AND APHD.Pay_Dist_Lookup_Code = 'BANK CHARGE';
2207: ELSE
2208: UPDATE AP_Payment_Hist_Dists APHD
2209: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount +
2210: NVL(l_chrg_clr_rounding_amt, 0),
2211: APHD.Rounding_amt=l_chrg_clr_rounding_amt
2212: WHERE APHD.Payment_History_ID = l_pay_hist_id

Line 2260: FROM AP_Payment_Hist_Dists APHD

2256: BEGIN
2257: SELECT APHD.Payment_History_ID,
2258: APHD.Invoice_Distribution_ID
2259: INTO l_pay_hist_id, l_inv_dist_id
2260: FROM AP_Payment_Hist_Dists APHD
2261: WHERE APHD.Invoice_Distribution_ID =
2262: (SELECT MAX(APHD1.Invoice_Distribution_ID)
2263: FROM AP_Payment_Hist_Dists APHD1
2264: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id

Line 2263: FROM AP_Payment_Hist_Dists APHD1

2259: INTO l_pay_hist_id, l_inv_dist_id
2260: FROM AP_Payment_Hist_Dists APHD
2261: WHERE APHD.Invoice_Distribution_ID =
2262: (SELECT MAX(APHD1.Invoice_Distribution_ID)
2263: FROM AP_Payment_Hist_Dists APHD1
2264: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id
2265: AND APHD1.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
2266: AND APHD1.Rounding_Amt is NULL
2267: AND APHD1.Invoice_Distribution_ID IN

Line 2273: FROM AP_Payment_Hist_Dists APHD2

2269: FROM AP_Invoice_Distributions_All AID
2270: WHERE AID.Invoice_ID = p_inv_rec.invoice_id)
2271: AND ABS(APHD1.Amount) =
2272: (SELECT MAX(ABS(APHD2.Amount))
2273: FROM AP_Payment_Hist_Dists APHD2
2274: WHERE APHD2.Accounting_Event_ID = p_xla_event_rec.event_id
2275: AND APHD2.Invoice_Payment_ID =
2276: p_inv_pay_rec.invoice_payment_id
2277: AND APHD2.Rounding_Amt is NULL

Line 2346: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

2342: l_diff_clr_paid_base_amt NUMBER;
2343: l_diff_clr_mat_base_amt NUMBER;
2344:
2345:
2346: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
2347: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
2348:
2349: -- Logging Infra:
2350: l_procedure_name CONSTANT VARCHAR2(30) := 'Compare_Pay';

Line 2347: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

2343: l_diff_clr_mat_base_amt NUMBER;
2344:
2345:
2346: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
2347: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
2348:
2349: -- Logging Infra:
2350: l_procedure_name CONSTANT VARCHAR2(30) := 'Compare_Pay';
2351: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 2371: FROM AP_Payment_Hist_Dists APHD

2367: -- distribution
2368: BEGIN
2369: SELECT APHD.*
2370: INTO l_max_pd_rec
2371: FROM AP_Payment_Hist_Dists APHD
2372: WHERE APHD.Invoice_Distribution_ID =
2373: (SELECT MAX(APHD1.Invoice_Distribution_ID)
2374: FROM AP_Payment_Hist_Dists APHD1
2375: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id

Line 2374: FROM AP_Payment_Hist_Dists APHD1

2370: INTO l_max_pd_rec
2371: FROM AP_Payment_Hist_Dists APHD
2372: WHERE APHD.Invoice_Distribution_ID =
2373: (SELECT MAX(APHD1.Invoice_Distribution_ID)
2374: FROM AP_Payment_Hist_Dists APHD1
2375: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id
2376: AND APHD1.Invoice_payment_id = P_Inv_Pay_Rec.Invoice_payment_id -- Bug 8722710
2377: AND APHD1.Invoice_Distribution_ID IN
2378: (SELECT AID.Invoice_Distribution_ID

Line 2383: FROM AP_Payment_Hist_Dists APHD2

2379: FROM AP_Invoice_Distributions_All AID
2380: WHERE AID.Invoice_ID = p_inv_rec.invoice_id)
2381: AND ABS(APHD1.Amount) =
2382: (SELECT MAX(ABS(APHD2.Amount))
2383: FROM AP_Payment_Hist_Dists APHD2
2384: WHERE APHD2.Accounting_Event_ID = p_xla_event_rec.event_id
2385: AND APHD2.Invoice_payment_id = P_Inv_Pay_Rec.Invoice_payment_id -- Bug 8722710
2386: AND APHD2.Invoice_Distribution_ID IN
2387: (SELECT AID.Invoice_Distribution_ID

Line 2402: FROM AP_Payment_Hist_Dists APHD,

2398:
2399: -- Get the paid base amounts for the payment event
2400: SELECT SUM(APHD.Paid_Base_Amount)
2401: INTO l_sum_pay_paid_base_amt
2402: FROM AP_Payment_Hist_Dists APHD,
2403: AP_Payment_History_All APH,
2404: AP_Payment_History_All APH1
2405: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_pay_pmt_history_id
2406: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 2421: FROM AP_Payment_Hist_Dists APHD,

2417: SELECT SUM(APHD.Paid_Base_Amount),
2418: SUM(APHD.Matured_Base_Amount)
2419: INTO l_sum_mat_paid_base_amt,
2420: l_sum_mat_mat_base_amt
2421: FROM AP_Payment_Hist_Dists APHD,
2422: AP_Payment_History_All APH,
2423: AP_Payment_History_All APH1
2424: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_mat_pmt_history_id
2425: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 2445: FROM AP_Payment_Hist_Dists APHD,

2441: SELECT SUM(APHD.Paid_Base_Amount),
2442: SUM(APHD.Matured_Base_Amount)
2443: INTO l_sum_clr_paid_base_amt,
2444: l_sum_clr_mat_base_amt
2445: FROM AP_Payment_Hist_Dists APHD,
2446: AP_Payment_History_All APH,
2447: AP_Payment_History_All APH1
2448: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_clr_pmt_history_id
2449: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 3037: FROM AP_Payment_Hist_Dists APHD,

3033: /* Bug 13791619
3034: -- Get the paid base amount for the payment event
3035: SELECT SUM(APHD.Paid_Base_Amount)
3036: INTO l_sum_pay_paid_base_amt
3037: FROM AP_Payment_Hist_Dists APHD,
3038: AP_Payment_History_All APH
3039: WHERE APH.Related_Event_ID = p_pay_hist_rec.Related_Event_ID
3040: AND APHD.Payment_History_ID = APH.Payment_History_ID
3041: AND Invoice_Distribution_ID IN

Line 3051: FROM AP_Payment_Hist_Dists APHD,

3047:
3048: -- Get the cleared base amount for the payment clearing event
3049: SELECT SUM(APHD.Cleared_Base_Amount)
3050: INTO l_sum_pay_clrd_base_amt
3051: FROM AP_Payment_Hist_Dists APHD,
3052: AP_Payment_History_All APH
3053: WHERE APH.Related_Event_ID = p_clr_hist_rec.related_event_id
3054: AND APHD.Payment_History_ID = APH.Payment_History_ID
3055: AND Invoice_Distribution_ID IN

Line 3067: FROM AP_Payment_Hist_Dists APHD,

3063: /* Bug 13791619 */
3064: -- Get the paid base amount for the payment event
3065: SELECT SUM(APHD.Paid_Base_Amount)
3066: INTO l_sum_pay_paid_base_amt
3067: FROM AP_Payment_Hist_Dists APHD,
3068: AP_Payment_History_All APH
3069: WHERE APH.Related_Event_ID = p_pay_hist_rec.Related_Event_ID
3070: AND APHD.Payment_History_ID = APH.Payment_History_ID
3071: AND Invoice_Distribution_ID = p_prepay_dist_rec.prepay_distribution_id

Line 3078: FROM AP_Payment_Hist_Dists APHD,

3074:
3075: -- Get the cleared base amount for the payment clearing event
3076: SELECT SUM(APHD.Cleared_Base_Amount)
3077: INTO l_sum_pay_clrd_base_amt
3078: FROM AP_Payment_Hist_Dists APHD,
3079: AP_Payment_History_All APH
3080: WHERE APH.Related_Event_ID = p_clr_hist_rec.related_event_id
3081: AND APHD.Payment_History_ID = APH.Payment_History_ID
3082: AND Invoice_Distribution_ID = p_prepay_dist_rec.prepay_distribution_id

Line 3209: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

3205: ,P_Calling_Sequence IN VARCHAR2
3206: ) IS
3207:
3208: l_curr_calling_sequence VARCHAR2(2000);
3209: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
3210: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
3211: l_ac_base_amount NUMBER;
3212: l_transaction_type VARCHAR2(50);
3213: l_sum_cash_amt NUMBER;

Line 3210: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

3206: ) IS
3207:
3208: l_curr_calling_sequence VARCHAR2(2000);
3209: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
3210: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
3211: l_ac_base_amount NUMBER;
3212: l_transaction_type VARCHAR2(50);
3213: l_sum_cash_amt NUMBER;
3214: l_ac_amount NUMBER;

Line 3236: FROM ap_payment_hist_dists aphd

3232: SELECT count(*) into l_do_cash_rounding
3233: FROM ap_invoice_payments_all aip
3234: WHERE check_id = P_XLA_Event_Rec.source_id_int_1
3235: AND NOT EXISTS (SELECT 1
3236: FROM ap_payment_hist_dists aphd
3237: WHERE aphd.invoice_payment_id = aip.invoice_payment_id);
3238:
3239: IF ( l_do_cash_rounding = 0) THEN -- Now Do the Cash Rounding
3240:

Line 3267: FROM ap_payment_hist_dists aphd,

3263:
3264: SELECT SUM(DECODE(l_transaction_type, 'CLEARING' , nvl(cleared_base_amount,0),
3265: 'MATURITY' , nvl(matured_base_amount,0),nvl(paid_base_amount,0)))
3266: INTO l_sum_cash_amt
3267: FROM ap_payment_hist_dists aphd,
3268: ap_payment_history_all aph
3269: WHERE aph.payment_history_id = aphd.payment_history_id
3270: AND aph.check_id = P_XLA_Event_Rec.source_id_int_1
3271: AND aph.accounting_event_id = P_XLA_Event_Rec.event_id

Line 3307: FROM AP_Payment_Hist_Dists APHD

3303: -- Getting the distribution for inserting the rounding distribution
3304: BEGIN
3305: SELECT APHD.*
3306: INTO l_max_pd_rec
3307: FROM AP_Payment_Hist_Dists APHD
3308: WHERE APHD.Accounting_Event_ID = p_xla_event_rec.event_id
3309: AND APHD.pay_dist_lookup_code = 'CASH'
3310: AND Rownum = 1;
3311: EXCEPTION