DBA Data[Home] [Help]

APPS.AP_ACCTG_PAY_ROUND_PKG dependencies on AP_PAYMENT_HIST_DISTS

Line 352: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

348:
349:
350: l_max_prepay_rec AP_PREPAY_APP_DISTS%ROWTYPE;
351: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
352: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
353: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
354: l_erv_base_amount AP_INVOICE_DISTRIBUTIONS_ALL.base_amount%type := 0;
355:
356: -- Logging Infra:

Line 353: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

349:
350: l_max_prepay_rec AP_PREPAY_APP_DISTS%ROWTYPE;
351: l_pad_rec AP_PREPAY_APP_DISTS%ROWTYPE;
352: l_max_pay_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
353: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
354: l_erv_base_amount AP_INVOICE_DISTRIBUTIONS_ALL.base_amount%type := 0;
355:
356: -- Logging Infra:
357: l_procedure_name CONSTANT VARCHAR2(30) := 'Final_Pay';

Line 436: FROM AP_Payment_Hist_Dists APHD,

432: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
433: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
434: APHD.Invoice_Dist_Base_Amount)
435: INTO l_sum_pay_dist_base_amt
436: FROM AP_Payment_Hist_Dists APHD,
437: AP_Payment_History_All APH,
438: AP_Invoice_Payments_All AIP
439: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
440: AND APHD.Pay_Dist_Lookup_Code IN

Line 459: FROM AP_Payment_Hist_Dists APHD,

455: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
456: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
457: APHD.Invoice_Dist_Base_Amount)
458: INTO l_sum_pay_dist_base_amt
459: FROM AP_Payment_Hist_Dists APHD,
460: AP_Payment_History_All APH,
461: AP_Invoice_Payments_All AIP
462: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
463: AND APHD.Pay_Dist_Lookup_Code IN

Line 481: FROM AP_Payment_Hist_Dists APHD,

477: -- 'EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
478: -- 'TAX EXCHANGE RATE VARIANCE', -1*APHD.Invoice_Dist_Base_Amount,
479: APHD.Invoice_Dist_Base_Amount)
480: INTO l_sum_pay_dist_base_amt
481: FROM AP_Payment_Hist_Dists APHD,
482: AP_Payment_History_All APH,
483: AP_Invoice_Payments_All AIP
484: WHERE ((APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id
485: AND APHD.Pay_Dist_Lookup_Code IN

Line 631: FROM AP_Payment_Hist_Dists APHD

627:
628: -- Get the payment hist info
629: SELECT APHD.*
630: INTO l_max_pay_rec
631: FROM AP_Payment_Hist_Dists APHD
632: WHERE APHD.Payment_History_ID = p_pay_hist_rec.payment_history_id
633: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
634: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
635: AND APHD.Invoice_Distribution_ID = l_inv_dist_rec.invoice_distribution_id

Line 741: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

737: l_disc_clr_rate_diff_amt NUMBER := 0;
738: l_err_clr_rate_diff_amt NUMBER := 0;
739: l_chrg_clr_rate_diff_amt NUMBER := 0;
740:
741: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
742:
743: -- Logging Infra:
744: l_procedure_name CONSTANT VARCHAR2(30) := 'Total_Pay';
745: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 774: FROM AP_Payment_Hist_Dists APHD

770: APHD.Invoice_Adjustment_Event_ID
771: INTO l_payment_hist_id,
772: l_invoice_dist_id,
773: l_inv_adj_event_id
774: FROM AP_Payment_Hist_Dists APHD
775: WHERE APHD.Invoice_Distribution_ID =
776: (SELECT MAX(APHD1.Invoice_Distribution_ID)
777: FROM AP_Payment_Hist_Dists APHD1
778: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id

Line 777: FROM AP_Payment_Hist_Dists APHD1

773: l_inv_adj_event_id
774: FROM AP_Payment_Hist_Dists APHD
775: WHERE APHD.Invoice_Distribution_ID =
776: (SELECT MAX(APHD1.Invoice_Distribution_ID)
777: FROM AP_Payment_Hist_Dists APHD1
778: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id
779: AND APHD1.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
780: AND APHD1.Invoice_Distribution_ID IN
781: (SELECT AID.Invoice_Distribution_ID

Line 786: FROM AP_Payment_Hist_Dists APHD2

782: FROM AP_Invoice_Distributions_All AID
783: WHERE AID.Invoice_ID = p_inv_rec.invoice_id)
784: AND ABS(APHD1.Amount) =
785: (SELECT MAX(ABS(APHD2.Amount))
786: FROM AP_Payment_Hist_Dists APHD2
787: WHERE APHD2.Accounting_Event_ID = p_xla_event_rec.event_id
788: AND APHD2.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
789: AND APHD2.Invoice_Distribution_ID IN
790: (SELECT AID.Invoice_Distribution_ID

Line 832: FROM AP_Payment_Hist_Dists APHD,

828: l_disc_pay_rate_sum_amt,
829: l_disc_clr_rate_sum_amt,
830: l_err_clr_rate_sum_amt,
831: l_chrg_clr_rate_sum_amt
832: FROM AP_Payment_Hist_Dists APHD,
833: AP_Payment_History_All APH
834: WHERE APH.Related_Event_ID = p_pay_hist_rec.Related_Event_ID
835: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.Invoice_Payment_ID
836: AND APHD.Payment_History_ID = APH.Payment_History_ID

Line 844: from ap_payment_history and AP_Payment_Hist_dists tables to be

840: WHERE AID.Invoice_ID = p_inv_rec.invoice_id);
841:
842:
843: /*Bug6600117 used below query to fetch the sum(amount) and sum(base_amount)
844: from ap_payment_history and AP_Payment_Hist_dists tables to be
845: used later in the calculation*/
846: -- Bug 6649025
847: SELECT sum(nvl(APHD.amount,0)),
848: max(APHD.Invoice_Distribution_Id)

Line 853: FROM AP_PAYMENT_HIST_DISTS APHD,

849: ,SUM(DECODE(APHD.Pay_Dist_Lookup_Code, 'CASH', APHD.Invoice_Dist_Base_Amount,
850: 'AWT', APHD.Invoice_Dist_Base_Amount,
851: 'DISCOUNT', APHD.Invoice_Dist_Base_Amount, 0))
852: INTO l_pay_sum_amt,l_max_dist_id,l_inv_rate_sum_full_amt
853: FROM AP_PAYMENT_HIST_DISTS APHD,
854: AP_PAYMENT_HISTORY_ALL APH
855: WHERE
856: APHD.PAYMENT_HISTORY_ID =APH.PAYMENT_HISTORY_ID
857: ANd APHD.INVOICE_PAYMENT_ID =p_inv_pay_rec.Invoice_Payment_ID --6614295

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

965: amounts and rounding between the invoice and payment should be same */
966: /*Bug6600117
967: The fractional rounding amount is added to the maximun distribution amount
968: in ap_invoice_distributions_all to balance them in respect to the header base amount.
969: Same is not done while calculating invoice_dist_Base_Amount in AP_Payment_Hist_Dists
970: table.This is giving rise to the unbalance accounting entries in accounting journal*/
971:
972: IF (p_pay_hist_rec.pmt_to_base_xrate =
973: p_inv_rec.exchange_rate / p_inv_rec.payment_cross_rate) THEN

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

977:
978: END IF;
979:
980: /* Bug660017calculate the difference between AP_invoice_distribution
981: base amount sum and AP_Payment_Hist_Dists base amount sum */
982: l_inv_dist_diff_amt := l_inv_base_amt - l_inv_rate_sum_full_amt;
983:
984: --Bug6600117
985:

Line 999: /* UPDATE AP_Payment_Hist_Dists APHD

995: amount*/
996: -- Bug 6649025
997:
998: --Bug 7270829 - the same update has been done below , hence commenting out this code.
999: /* UPDATE AP_Payment_Hist_Dists APHD
1000: SET APHD.invoice_dist_Base_Amount = APHD.invoice_dist_Base_Amount + NVL(l_inv_dist_diff_amt,0)
1001: WHERE APHD.Invoice_Distribution_ID = l_invoice_dist_id -- l_max_dist_id
1002: AND APHD.Pay_Dist_Lookup_Code IN ('CASH')
1003: AND APHD.Payment_History_ID = l_payment_hist_id

Line 1007: from AP_Payment_Hist_Dists APHD1

1003: AND APHD.Payment_History_ID = l_payment_hist_id
1004: AND APHD.Invoice_Payment_ID = p_inv_pay_rec.invoice_payment_id
1005: AND APHD.Accounting_Event_ID = p_xla_event_rec.event_id
1006: AND APHD.PAYMENT_HIST_DIST_ID= (select max(APHD1.PAYMENT_HIST_DIST_ID)
1007: from AP_Payment_Hist_Dists APHD1
1008: where APHD1.invoice_distribution_id = l_invoice_dist_id); --l_max_dist_id);
1009: */
1010: --Bug 7270829
1011:

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

1026: l_chrg_clr_rate_diff_amt := l_chrg_clr_rate_total_amt - l_chrg_clr_rate_sum_amt;
1027:
1028: -- Bug fix 6314128 Starts
1029: -- Handling the difference amount in l_inv_rate_diff_amt
1030: -- Rule: SUM(AP_PAYMENT_HIST_DISTS.INVOICE_DIST_BASE_AMOUNT) =
1031: -- AP_INVOICE_PAYMENTS_ALL.INVOICE_BASE_AMOUNT
1032:
1033: IF NVL(l_inv_rate_diff_amt,0) <> 0 THEN
1034:

Line 1040: UPDATE AP_Payment_Hist_Dists APHD

1036: l_log_msg := 'Updating rounding amount for l_inv_rate_diff_amt';
1037: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1038: END IF;
1039:
1040: UPDATE AP_Payment_Hist_Dists APHD
1041: SET APHD.Invoice_Dist_Base_Amount =
1042: APHD.Invoice_Dist_Base_Amount + NVL(l_inv_rate_diff_amt,0),
1043: APHD.Rounding_Amt = l_inv_rate_diff_amt
1044: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1072: UPDATE AP_Payment_Hist_Dists APHD

1068: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1069: END IF;
1070:
1071:
1072: UPDATE AP_Payment_Hist_Dists APHD
1073: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1074: + NVL(l_clr_rate_diff_amt,0),
1075: APHD.Rounding_Amt = l_clr_rate_diff_amt
1076: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1098: UPDATE AP_Payment_Hist_Dists APHD

1094: l_log_msg := 'Updating rounding amount for l_mat_rate_diff_amt';
1095: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1096: END IF;
1097:
1098: UPDATE AP_Payment_Hist_Dists APHD
1099: SET APHD.Matured_Base_Amount = APHD.Matured_Base_Amount
1100: + NVL(l_mat_rate_diff_amt,0),
1101: APHD.Rounding_Amt = l_mat_rate_diff_amt
1102: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1122: UPDATE AP_Payment_Hist_Dists APHD

1118: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1119: END IF;
1120:
1121:
1122: UPDATE AP_Payment_Hist_Dists APHD
1123: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount + NVL(l_pay_rate_diff_amt,0),
1124: APHD.Rounding_Amt = l_pay_rate_diff_amt
1125: WHERE APHD.Payment_History_ID = l_payment_hist_id
1126: AND APHD.Invoice_Distribution_ID = l_invoice_dist_id

Line 1147: UPDATE AP_Payment_Hist_Dists APHD

1143: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1144: END IF;
1145:
1146:
1147: UPDATE AP_Payment_Hist_Dists APHD
1148: SET APHD.Paid_Base_Amount = APHD.Paid_Base_Amount
1149: + NVL(l_disc_pay_rate_diff_amt,0),
1150: APHD.Rounding_Amt = l_disc_pay_rate_diff_amt
1151: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1174: UPDATE AP_Payment_Hist_Dists APHD

1170: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1171: END IF;
1172:
1173:
1174: UPDATE AP_Payment_Hist_Dists APHD
1175: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1176: + NVL(l_disc_clr_rate_diff_amt,0),
1177: APHD.Rounding_Amt = l_disc_clr_rate_diff_amt
1178: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1202: UPDATE AP_Payment_Hist_Dists APHD

1198: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1199: END IF;
1200:
1201:
1202: UPDATE AP_Payment_Hist_Dists APHD
1203: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1204: + NVL(l_err_clr_rate_diff_amt,0),
1205: APHD.Rounding_Amt = l_err_clr_rate_diff_amt
1206: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1230: UPDATE AP_Payment_Hist_Dists APHD

1226: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1227: END IF;
1228:
1229:
1230: UPDATE AP_Payment_Hist_Dists APHD
1231: SET APHD.Cleared_Base_Amount = APHD.Cleared_Base_Amount
1232: + NVL(l_chrg_clr_rate_diff_amt,0),
1233: APHD.Rounding_Amt = l_chrg_clr_rate_diff_amt
1234: WHERE APHD.Payment_History_ID = l_payment_hist_id

Line 1299: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

1295: l_diff_clr_paid_base_amt NUMBER;
1296: l_diff_clr_mat_base_amt NUMBER;
1297:
1298:
1299: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
1300: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
1301:
1302: -- Logging Infra:
1303: l_procedure_name CONSTANT VARCHAR2(30) := 'Compare_Pay';

Line 1300: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

1296: l_diff_clr_mat_base_amt NUMBER;
1297:
1298:
1299: l_max_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
1300: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
1301:
1302: -- Logging Infra:
1303: l_procedure_name CONSTANT VARCHAR2(30) := 'Compare_Pay';
1304: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 1323: FROM AP_Payment_Hist_Dists APHD

1319: -- Getting the max of the largest distribution for inserting the rounding
1320: -- distribution
1321: SELECT APHD.*
1322: INTO l_max_pd_rec
1323: FROM AP_Payment_Hist_Dists APHD
1324: WHERE APHD.Invoice_Distribution_ID =
1325: (SELECT MAX(APHD1.Invoice_Distribution_ID)
1326: FROM AP_Payment_Hist_Dists APHD1
1327: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id

Line 1326: FROM AP_Payment_Hist_Dists APHD1

1322: INTO l_max_pd_rec
1323: FROM AP_Payment_Hist_Dists APHD
1324: WHERE APHD.Invoice_Distribution_ID =
1325: (SELECT MAX(APHD1.Invoice_Distribution_ID)
1326: FROM AP_Payment_Hist_Dists APHD1
1327: WHERE APHD1.Accounting_Event_ID = p_xla_event_rec.event_id
1328: AND APHD1.Invoice_Distribution_ID IN
1329: (SELECT AID.Invoice_Distribution_ID
1330: FROM AP_Invoice_Distributions_All AID

Line 1334: FROM AP_Payment_Hist_Dists APHD2

1330: FROM AP_Invoice_Distributions_All AID
1331: WHERE AID.Invoice_ID = p_inv_rec.invoice_id)
1332: AND ABS(APHD1.Amount) =
1333: (SELECT MAX(ABS(APHD2.Amount))
1334: FROM AP_Payment_Hist_Dists APHD2
1335: WHERE APHD2.Accounting_Event_ID = p_xla_event_rec.event_id
1336: AND APHD2.Invoice_Distribution_ID IN
1337: (SELECT AID.Invoice_Distribution_ID
1338: FROM AP_Invoice_Distributions_All AID

Line 1347: FROM AP_Payment_Hist_Dists APHD,

1343:
1344: -- Get the paid base amounts for the payment event
1345: SELECT SUM(APHD.Paid_Base_Amount)
1346: INTO l_sum_pay_paid_base_amt
1347: FROM AP_Payment_Hist_Dists APHD,
1348: AP_Payment_History_All APH,
1349: AP_Payment_History_All APH1
1350: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_pay_pmt_history_id
1351: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 1365: FROM AP_Payment_Hist_Dists APHD,

1361: SELECT SUM(APHD.Paid_Base_Amount),
1362: SUM(APHD.Matured_Base_Amount)
1363: INTO l_sum_mat_paid_base_amt,
1364: l_sum_mat_mat_base_amt
1365: FROM AP_Payment_Hist_Dists APHD,
1366: AP_Payment_History_All APH,
1367: AP_Payment_History_All APH1
1368: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_mat_pmt_history_id
1369: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 1388: FROM AP_Payment_Hist_Dists APHD,

1384: SELECT SUM(APHD.Paid_Base_Amount),
1385: SUM(APHD.Matured_Base_Amount)
1386: INTO l_sum_clr_paid_base_amt,
1387: l_sum_clr_mat_base_amt
1388: FROM AP_Payment_Hist_Dists APHD,
1389: AP_Payment_History_All APH,
1390: AP_Payment_History_All APH1
1391: WHERE APH1.Payment_History_ID = ap_accounting_pay_pkg.g_clr_pmt_history_id
1392: AND APH.Related_Event_ID = APH1.Accounting_Event_ID

Line 1929: FROM AP_Payment_Hist_Dists APHD,

1925:
1926: -- Get the paid base amount for the payment event
1927: SELECT SUM(APHD.Paid_Base_Amount)
1928: INTO l_sum_pay_paid_base_amt
1929: FROM AP_Payment_Hist_Dists APHD,
1930: AP_Payment_History_All APH
1931: WHERE APH.Related_Event_ID = p_pay_hist_rec.Related_Event_ID
1932: AND APHD.Payment_History_ID = APH.Payment_History_ID
1933: AND Invoice_Distribution_ID IN

Line 1944: FROM AP_Payment_Hist_Dists APHD,

1940:
1941: -- Get the cleared base amount for the payment clearing event
1942: SELECT SUM(APHD.Cleared_Base_Amount)
1943: INTO l_sum_pay_clrd_base_amt
1944: FROM AP_Payment_Hist_Dists APHD,
1945: AP_Payment_History_All APH
1946: WHERE APH.Related_Event_ID = p_clr_hist_rec.related_event_id
1947: AND APHD.Payment_History_ID = APH.Payment_History_ID
1948: AND Invoice_Distribution_ID IN