DBA Data[Home] [Help]

APPS.AP_ACCTG_PAY_DIST_PKG dependencies on AP_PAYMENT_HIST_DISTS

Line 55: , ap_payment_hist_dists aphd

51: , SUM( NVL( aphd.cleared_base_amount, 0 ) ) inv_clr_amt
52: , SUM( NVL( aphd.matured_base_amount, 0 ) ) inv_mat_amt
53: , aid.invoice_id
54: FROM ap_invoice_distributions_all aid
55: , ap_payment_hist_dists aphd
56: WHERE aid.invoice_distribution_id = aphd.invoice_distribution_id
57: AND aphd.payment_history_id = p_payment_history_id
58: AND aphd.accounting_event_id = p_accounting_event_id
59: AND aphd.pay_dist_lookup_code NOT IN( 'FINAL CASH ROUNDING'

Line 106: UPDATE AP_PAYMENT_HIST_DISTS APHD

102: P_XLA_Event_Rec.Event_Type_Code;
103: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
104: END IF;
105:
106: UPDATE AP_PAYMENT_HIST_DISTS APHD
107: SET APHD.GAIN_LOSS_INDICATOR =
108: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_AMT-GAIN_LOSS_TBL(I).INV_PAY_AMT)--BUG 8276839
109: , 1, 'G'
110: , -1, 'L'

Line 129: UPDATE AP_PAYMENT_HIST_DISTS APHD

125: P_XLA_Event_Rec.Event_ID;
126: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
127: END IF;
128:
129: UPDATE AP_PAYMENT_HIST_DISTS APHD
130: SET APHD.GAIN_LOSS_INDICATOR =
131: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_PAY_AMT-GAIN_LOSS_TBL(I).INV_MAT_AMT) --BUG 8276839
132: , 1, 'G'
133: ,-1, 'L'

Line 176: UPDATE AP_PAYMENT_HIST_DISTS APHD

172: l_log_msg := 'Updating Gain Loss between maturity and clearing events';
173: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
174: END IF;
175:
176: UPDATE AP_PAYMENT_HIST_DISTS APHD
177: SET APHD.GAIN_LOSS_INDICATOR =
178: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_MAT_AMT-GAIN_LOSS_TBL(I).INV_CLR_AMT)--BUG 8276839
179: ,1, 'G'
180: ,-1, 'L'

Line 216: UPDATE AP_PAYMENT_HIST_DISTS APHD

212: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
213: END IF;
214:
215: -- Bug 6678474. Backing out the fix for bug 6621586 since it is incorrect.
216: UPDATE AP_PAYMENT_HIST_DISTS APHD
217: SET APHD.GAIN_LOSS_INDICATOR =
218: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_AMT-GAIN_LOSS_TBL(I).INV_CLR_AMT) --BUG 8276839
219: ,1, 'G'
220: , -1,'L'

Line 236: UPDATE AP_PAYMENT_HIST_DISTS APHD

232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
233: END IF;
234:
235: -- Bug 6678474. Backing out the fix for bug 6621586 since it is incorrect.
236: UPDATE AP_PAYMENT_HIST_DISTS APHD
237: SET APHD.GAIN_LOSS_INDICATOR =
238: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_PAY_AMT-GAIN_LOSS_TBL(I).INV_CLR_AMT)--BUG 8276839
239: ,1 ,'G'
240: ,-1,'L'

Line 260: UPDATE AP_PAYMENT_HIST_DISTS APHD

256: l_log_msg := 'Update Gain/Loss for Payment Cancellation';
257: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
258: END IF;
259:
260: UPDATE AP_PAYMENT_HIST_DISTS APHD
261: SET APHD.GAIN_LOSS_INDICATOR =
262: DECODE(SIGN( GAIN_LOSS_TBL(I).INV_PAY_AMT-GAIN_LOSS_TBL(I).INV_AMT)--BUG 8276839
263: , 1, 'G'
264: , -1, 'L'

Line 578: -- some exchange rates in the ap_payment_hist_dists table and trying to

574: -- Bug6900582
575: -- Get the count of historical payment history records for this check.
576: -- We should not do final and total rounding for payments that have been
577: -- upgraded to R12, since during upgrade the amounts are not populated for
578: -- some exchange rates in the ap_payment_hist_dists table and trying to
579: -- calculate the rounding for such payments will result in incorrect
580: -- accounting.
581: --
582: -- Bug 9492002, added the Join with XAH/ASP so as to ensure that

Line 1712: AP_Payment_Hist_Dists APHD

1708: AID.historical_flag, -- bug fix 6674279
1709: AID.accounting_event_id -- bug fix 6674279
1710: FROM AP_Invoice_Distributions_All AID,
1711: AP_Payment_History_All APH,
1712: AP_Payment_Hist_Dists APHD
1713: WHERE AID.Invoice_ID = P_Invoice_ID
1714: AND NVL(AID.Reversal_Flag,'N') <> 'Y'
1715: AND AID.Invoice_Distribution_ID = APHD.Invoice_Distribution_ID
1716: AND APH.Payment_History_ID = APHD.Payment_History_ID

Line 2050: FROM ap_payment_hist_dists

2046: IF l_inv_dist_rec.parent_reversal_id IS NOT NULL THEN
2047:
2048: SELECT count(*)
2049: INTO l_pay_dist_cnt
2050: FROM ap_payment_hist_dists
2051: WHERE invoice_distribution_id = l_inv_dist_rec.parent_reversal_id;
2052:
2053: END IF;
2054:

Line 2225: FROM AP_Payment_Hist_Dists APHD,

2221: INTO l_sum_paid_amount,
2222: l_sum_disc_amount,
2223: l_sum_error_amount,
2224: l_sum_charge_amount
2225: FROM AP_Payment_Hist_Dists APHD,
2226: AP_Invoice_Distributions_All AID,
2227: AP_Payment_History_All APH
2228: WHERE APH.Related_Event_ID = l_pay_hist_rec.related_event_id
2229: AND APHD.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id

Line 2247: UPDATE AP_Payment_Hist_Dists APD

2243:
2244: /* Adjust the discount amount for technical rounding */
2245: IF (P_XLA_Event_Rec.Event_Type_Code IN ('PAYMENT CLEARING ADJUSTED')
2246: AND l_pay_hist_rec.bank_currency_code = l_pay_hist_rec.pmt_currency_code) THEN
2247: UPDATE AP_Payment_Hist_Dists APD
2248: SET APD.Amount = APD.amount + l_tech_disc_rnd_amt,
2249: APD.bank_curr_amount = APD.bank_curr_amount + l_tech_disc_rnd_amt,
2250: APD.Cleared_Base_Amount = Decode(l_pay_hist_rec.bank_currency_code,
2251: ap_accounting_pay_pkg.g_base_currency_code,

Line 2275: FROM AP_Payment_Hist_Dists APD1

2271: APD.Invoice_Dist_Amount + l_tech_disc_rnd_amt,
2272: APD.Invoice_Dist_Amount)
2273: WHERE APD.Invoice_Distribution_ID =
2274: (SELECT MAX(APD1.Invoice_Distribution_ID)
2275: FROM AP_Payment_Hist_Dists APD1
2276: WHERE APD1.Accounting_Event_ID = p_xla_event_rec.event_id
2277: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2278: AND APD1.Pay_Dist_Lookup_Code = 'DISCOUNT'
2279: AND ABS(APD1.Amount) =

Line 2281: FROM AP_Payment_Hist_Dists APD2

2277: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2278: AND APD1.Pay_Dist_Lookup_Code = 'DISCOUNT'
2279: AND ABS(APD1.Amount) =
2280: (SELECT MAX(APD2.Amount)
2281: FROM AP_Payment_Hist_Dists APD2
2282: WHERE APD2.Accounting_Event_ID = p_xla_event_rec.event_id
2283: AND APD2.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2284: AND APD2.Pay_Dist_Lookup_Code = 'DISCOUNT'))
2285: AND APD.Pay_Dist_Lookup_Code = 'DISCOUNT'

Line 2306: FROM AP_Payment_Hist_Dists APHD

2302: , l_sum_disc_bank_curr_amount
2303: , l_sum_disc_dist_base_amount
2304: , l_sum_disc_paid_base_amount
2305: , l_sum_disc_clr_base_amount
2306: FROM AP_Payment_Hist_Dists APHD
2307: WHERE APHD.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2308: AND APHD.Payment_History_ID = l_pay_hist_rec.Payment_History_ID;
2309:
2310:

Line 2313: FROM AP_Payment_Hist_Dists APD1

2309:
2310:
2311: SELECT MAX (APD1.Invoice_Distribution_ID)
2312: INTO l_max_disc_dist_id
2313: FROM AP_Payment_Hist_Dists APD1
2314: WHERE APD1.Accounting_Event_ID = p_xla_event_rec.event_id
2315: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2316: AND APD1.Pay_Dist_Lookup_Code = 'DISCOUNT'
2317: AND ABS (APD1.Amount) =

Line 2319: FROM AP_Payment_Hist_Dists APD2

2315: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2316: AND APD1.Pay_Dist_Lookup_Code = 'DISCOUNT'
2317: AND ABS (APD1.Amount) =
2318: (SELECT ABS (MAX (APD2.Amount))
2319: FROM AP_Payment_Hist_Dists APD2
2320: WHERE APD2.Accounting_Event_ID = p_xla_event_rec.event_id
2321: AND APD2.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2322: AND APD2.Pay_Dist_Lookup_Code = 'DISCOUNT') ;
2323:

Line 2324: UPDATE AP_Payment_Hist_Dists APD

2320: WHERE APD2.Accounting_Event_ID = p_xla_event_rec.event_id
2321: AND APD2.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2322: AND APD2.Pay_Dist_Lookup_Code = 'DISCOUNT') ;
2323:
2324: UPDATE AP_Payment_Hist_Dists APD
2325: SET APD.Amount = APD.Amount - l_sum_disc_amount
2326: , APD.Invoice_Dist_Amount = APD.Invoice_Dist_Amount - l_sum_disc_dist_amount
2327: , APD.bank_curr_amount = APD.bank_curr_amount - l_sum_disc_bank_curr_amount
2328: , APD.Invoice_Dist_Base_Amount = APD.Invoice_Dist_Base_Amount - l_sum_disc_dist_base_amount

Line 2342: UPDATE AP_Payment_Hist_Dists APD

2338: because when this code reaches here, pay_dist_proc call is already over as above update adjusted
2339: discount amount after all technical rounding so the same amount for same distribution id we are
2340: adjusting here. */
2341:
2342: UPDATE AP_Payment_Hist_Dists APD
2343: SET APD.Amount = APD.Amount + l_sum_disc_amount
2344: , APD.Invoice_Dist_Amount = APD.Invoice_Dist_Amount + l_sum_disc_dist_amount
2345: , APD.bank_curr_amount = APD.bank_curr_amount + l_sum_disc_bank_curr_amount
2346: , APD.Invoice_Dist_Base_Amount = APD.Invoice_Dist_Base_Amount + l_sum_disc_dist_base_amount

Line 2368: UPDATE AP_Payment_Hist_Dists APD

2364: END IF;
2365:
2366:
2367: /* Adjust the bank errors amount for technical rounding */
2368: UPDATE AP_Payment_Hist_Dists APD
2369: SET APD.Amount = APD.Amount - NVL(l_sum_error_amount,0)
2370: + l_pay_hist_rec.errors_bank_amount
2371: WHERE APD.Invoice_Distribution_ID =
2372: (SELECT MAX(APD1.Invoice_Distribution_ID)

Line 2373: FROM AP_Payment_Hist_Dists APD1

2369: SET APD.Amount = APD.Amount - NVL(l_sum_error_amount,0)
2370: + l_pay_hist_rec.errors_bank_amount
2371: WHERE APD.Invoice_Distribution_ID =
2372: (SELECT MAX(APD1.Invoice_Distribution_ID)
2373: FROM AP_Payment_Hist_Dists APD1
2374: WHERE APD1.Accounting_Event_ID = p_xla_event_rec.event_id
2375: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2376: AND APD1.Pay_Dist_Lookup_Code = 'BANK ERROR'
2377: AND ABS(APD1.Amount) =

Line 2379: FROM AP_Payment_Hist_Dists APD2

2375: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2376: AND APD1.Pay_Dist_Lookup_Code = 'BANK ERROR'
2377: AND ABS(APD1.Amount) =
2378: (SELECT MAX(APD2.Amount)
2379: FROM AP_Payment_Hist_Dists APD2
2380: WHERE APD2.Accounting_Event_ID = p_xla_event_rec.event_id
2381: AND APD2.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2382: AND APD2.Pay_Dist_Lookup_Code = 'BANK ERROR'))
2383: AND APD.Pay_Dist_Lookup_Code = 'BANK ERROR'

Line 2399: UPDATE AP_Payment_Hist_Dists APD

2395: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2396: END IF;
2397:
2398: /* Adjust the bank charges amount for technical rounding */
2399: UPDATE AP_Payment_Hist_Dists APD
2400: SET APD.Amount = APD.Amount - NVL(l_sum_charge_amount,0)
2401: + l_pay_hist_rec.charges_bank_amount
2402: WHERE APD.Invoice_Distribution_ID =
2403: (SELECT MAX(APD1.Invoice_Distribution_ID)

Line 2404: FROM AP_Payment_Hist_Dists APD1

2400: SET APD.Amount = APD.Amount - NVL(l_sum_charge_amount,0)
2401: + l_pay_hist_rec.charges_bank_amount
2402: WHERE APD.Invoice_Distribution_ID =
2403: (SELECT MAX(APD1.Invoice_Distribution_ID)
2404: FROM AP_Payment_Hist_Dists APD1
2405: WHERE APD1.Accounting_Event_ID = p_xla_event_rec.event_id
2406: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2407: AND APD1.Pay_Dist_Lookup_Code = 'BANK CHARGE'
2408: AND ABS(APD1.Amount) =

Line 2410: FROM AP_Payment_Hist_Dists APD2

2406: AND APD1.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2407: AND APD1.Pay_Dist_Lookup_Code = 'BANK CHARGE'
2408: AND ABS(APD1.Amount) =
2409: (SELECT MAX(APD2.Amount)
2410: FROM AP_Payment_Hist_Dists APD2
2411: WHERE APD2.Accounting_Event_ID = p_xla_event_rec.event_id
2412: AND APD2.Invoice_Payment_ID = l_inv_pay_rec.invoice_payment_id
2413: AND APD2.Pay_Dist_Lookup_Code = 'BANK CHARGE'))
2414: AND APD.Pay_Dist_Lookup_Code = 'BANK CHARGE'

Line 2580: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

2576: l_base_qty_variance NUMBER;
2577: l_amt_variance NUMBER;
2578: l_base_amt_variance NUMBER;
2579:
2580: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
2581:
2582: --Bug 9282465 start
2583: l_total_paid_base_amt NUMBER;
2584: l_tot_paid_inv_base_amt NUMBER;

Line 3293: FROM ap_payment_hist_dists aphd

3289: -NVL(SUM(aphd.bank_curr_amount), 0)
3290: INTO l_prorated_amount,
3291: l_inv_dist_amount ,
3292: l_bank_curr_amount
3293: FROM ap_payment_hist_dists aphd
3294: WHERE aphd.invoice_distribution_id IN
3295: (SELECT invoice_distribution_id
3296: FROM ap_invoice_distributions_all aid
3297: WHERE aid.invoice_id = p_inv_rec.invoice_id

Line 3818: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

3814: l_bank_curr_amount NUMBER;
3815: l_disc_amt_inv_curr NUMBER;
3816: l_disc_amt_bank_curr NUMBER;
3817:
3818: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
3819:
3820: -- Logging Infra:
3821: l_procedure_name CONSTANT VARCHAR2(30) := 'Pay_Dist_Discount';
3822: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 4261: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

4257: l_po_exchange_rate NUMBER;
4258: l_po_pay_exchange_rate NUMBER;
4259: l_erv_amount NUMBER;
4260: l_inv_erv_amount NUMBER;
4261: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
4262:
4263: -- Logging Infra:
4264: l_procedure_name CONSTANT VARCHAR2(30) := 'Pay_Dist_ERV';
4265: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

Line 4437: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;

4433: l_total_dist_amt NUMBER := 0;
4434: l_total_prorated_amt NUMBER := 0;
4435: l_inv_dist_amount NUMBER;
4436:
4437: l_pd_rec AP_PAYMENT_HIST_DISTS%ROWTYPE;
4438:
4439: CURSOR clearing_pay_dists
4440: (P_Event_ID NUMBER)
4441: IS

Line 4447: FROM AP_Payment_Hist_Dists APHD

4443: Invoice_Distribution_ID,
4444: Amount,
4445: Payment_History_ID,
4446: Invoice_Payment_ID
4447: FROM AP_Payment_Hist_Dists APHD
4448: WHERE APHD.Accounting_Event_ID = P_Event_ID
4449: AND APHD.Pay_Dist_Lookup_Code = 'CASH'
4450: AND NOT EXISTS
4451: (SELECT 1 FROM AP_PAYMENT_HIST_DISTS APHD1

Line 4451: (SELECT 1 FROM AP_PAYMENT_HIST_DISTS APHD1

4447: FROM AP_Payment_Hist_Dists APHD
4448: WHERE APHD.Accounting_Event_ID = P_Event_ID
4449: AND APHD.Pay_Dist_Lookup_Code = 'CASH'
4450: AND NOT EXISTS
4451: (SELECT 1 FROM AP_PAYMENT_HIST_DISTS APHD1
4452: WHERE APHD1.ACCOUNTING_EVENT_ID=P_Event_ID
4453: AND APHD1.INVOICE_DISTRIBUTION_ID = APHD.INVOICE_DISTRIBUTION_ID
4454: AND APHD1.PAY_DIST_LOOKUP_CODE ='BANK CHARGE')
4455: ORDER BY Amount; /* Bug13385106 */

Line 4511: FROM AP_Payment_Hist_Dists

4507:
4508:
4509: SELECT SUM(Amount)
4510: INTO l_total_pay_amt
4511: FROM AP_Payment_Hist_Dists
4512: WHERE accounting_event_id = nvl(p_pay_hist_rec.related_event_id,P_XLA_Event_Rec.event_id)/* Bug13385106 */
4513: AND Pay_Dist_Lookup_Code = 'CASH';
4514:
4515: FOR l_clr_rec IN clearing_pay_dists(p_xla_event_rec.event_id)

Line 4697: INSERT INTO ap_payment_hist_dists

4693: p_reversal_inv_pmt_id;
4694: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
4695: END IF;
4696:
4697: INSERT INTO ap_payment_hist_dists
4698: (Payment_Hist_Dist_ID,
4699: Accounting_Event_ID,
4700: Amount,
4701: Pay_Dist_Lookup_Code,

Line 4731: SELECT AP_Payment_Hist_Dists_S.nextval,

4727: Program_Login_ID,
4728: Program_Update_Date,
4729: Request_ID
4730: )
4731: SELECT AP_Payment_Hist_Dists_S.nextval,
4732: p_xla_event_rec.event_id,
4733: -1 * APHD.Amount,
4734: APHD.Pay_Dist_Lookup_Code,
4735: p_pay_hist_rec.Payment_History_ID,

Line 4763: FROM AP_Payment_Hist_Dists APHD,

4759: FND_GLOBAL.Conc_Program_ID,
4760: NULL,
4761: SYSDATE,
4762: FND_GLOBAL.Conc_Request_ID
4763: FROM AP_Payment_Hist_Dists APHD,
4764: AP_Invoice_Payments_All AIP,
4765: AP_Invoice_Distributions_All AID
4766: WHERE AIP.Invoice_Payment_ID = p_reversal_inv_pmt_id
4767: AND AIP.Accounting_Event_ID = APHD.Accounting_Event_ID

Line 4786: INSERT INTO ap_payment_hist_dists

4782: -- cancelled event.
4783: IF p_xla_event_rec.event_type_code IN ('PAYMENT CANCELLED',
4784: 'REFUND CANCELLED') THEN
4785:
4786: INSERT INTO ap_payment_hist_dists
4787: (Payment_Hist_Dist_ID,
4788: Accounting_Event_ID,
4789: Amount,
4790: Pay_Dist_Lookup_Code,

Line 4821: SELECT AP_Payment_Hist_Dists_S.nextval,

4817: Program_Update_Date,
4818: Request_ID,
4819: Gain_Loss_Indicator --11681786
4820: )
4821: SELECT AP_Payment_Hist_Dists_S.nextval,
4822: p_xla_event_rec.event_id,
4823: -1 * APHD.Amount,
4824: APHD.Pay_Dist_Lookup_Code,
4825: p_pay_hist_rec.Payment_History_ID,

Line 4854: FROM AP_Payment_Hist_Dists APHD,

4850: NULL,
4851: SYSDATE,
4852: FND_GLOBAL.Conc_Request_ID,
4853: APHD.Gain_Loss_Indicator --11681786
4854: FROM AP_Payment_Hist_Dists APHD,
4855: AP_Payment_History_All APH,
4856: AP_Invoice_Payments_All AIP,
4857: AP_Invoice_Distributions_All AID -- 6804379
4858: WHERE nvl(APH.Related_Event_ID, APH.Accounting_Event_ID) = p_related_event_id

Line 4867: FROM AP_Payment_Hist_Dists APHD1,

4863: AND AIP.Accounting_Event_ID = p_xla_event_rec.event_id
4864: AND AIP.Check_ID = APH.Check_ID -- Bug 6856694
4865: AND AIP.Invoice_ID = AID.Invoice_ID
4866: AND NOT EXISTS (SELECT 'Reversal Payment Dists'
4867: FROM AP_Payment_Hist_Dists APHD1,
4868: AP_Invoice_Distributions_ALL AID1 --Bug11681786
4869: WHERE APHD1.Reversed_Pay_Hist_Dist_ID = APHD.Payment_Hist_Dist_ID -- Bug 6856694
4870: AND APHD1.Invoice_Distribution_ID IN (AID1.Invoice_Distribution_id, APHD.Invoice_Distribution_ID)
4871: AND AID1.Parent_Reversal_ID (+) = APHD.Invoice_Distribution_ID );

Line 4874: INSERT INTO ap_payment_hist_dists

4870: AND APHD1.Invoice_Distribution_ID IN (AID1.Invoice_Distribution_id, APHD.Invoice_Distribution_ID)
4871: AND AID1.Parent_Reversal_ID (+) = APHD.Invoice_Distribution_ID );
4872:
4873: ELSE
4874: INSERT INTO ap_payment_hist_dists
4875: (Payment_Hist_Dist_ID,
4876: Accounting_Event_ID,
4877: Amount,
4878: Pay_Dist_Lookup_Code,

Line 4908: SELECT AP_Payment_Hist_Dists_S.nextval,

4904: Program_Login_ID,
4905: Program_Update_Date,
4906: Request_ID
4907: )
4908: SELECT AP_Payment_Hist_Dists_S.nextval,
4909: p_xla_event_rec.event_id,
4910: -1 * APHD.Amount,
4911: APHD.Pay_Dist_Lookup_Code,
4912: p_pay_hist_rec.Payment_History_ID,

Line 4940: FROM AP_Payment_Hist_Dists APHD,

4936: FND_GLOBAL.Conc_Program_ID,
4937: NULL,
4938: SYSDATE,
4939: FND_GLOBAL.Conc_Request_ID
4940: FROM AP_Payment_Hist_Dists APHD,
4941: AP_Payment_History_All APH -- 6804379
4942: WHERE APH.Check_ID = p_xla_event_rec.Source_ID_Int_1 -- Bug 6856694
4943: AND NVL(APH.Related_Event_ID, APH.Accounting_Event_ID) = p_related_event_id
4944: AND APHD.Payment_History_ID = APH.Payment_History_ID

Line 4947: FROM AP_Payment_Hist_Dists APHD1,

4943: AND NVL(APH.Related_Event_ID, APH.Accounting_Event_ID) = p_related_event_id
4944: AND APHD.Payment_History_ID = APH.Payment_History_ID
4945: AND NVL(APHD.Reversal_Flag,'N') <> 'Y'
4946: AND NOT EXISTS (SELECT 'Reversal Payment Dists'
4947: FROM AP_Payment_Hist_Dists APHD1,
4948: AP_Invoice_Distributions_ALL AID1 --Bug11681786
4949: WHERE APHD1.Reversed_Pay_Hist_Dist_ID = APHD.Payment_Hist_Dist_ID -- Bug 6856694
4950: AND APHD1.Invoice_Distribution_ID IN (AID1.Invoice_Distribution_id, APHD.Invoice_Distribution_ID)
4951: AND AID1.Parent_Reversal_ID (+) = APHD.Invoice_Distribution_ID );

Line 4963: INSERT INTO ap_payment_hist_dists

4959: p_invoice_dist_id;
4960: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
4961: END IF;
4962:
4963: INSERT INTO ap_payment_hist_dists
4964: (Payment_Hist_Dist_ID,
4965: Accounting_Event_ID,
4966: Amount,
4967: Pay_Dist_Lookup_Code,

Line 4997: SELECT AP_Payment_Hist_Dists_S.nextval,

4993: Program_Login_ID,
4994: Program_Update_Date,
4995: Request_ID
4996: )
4997: SELECT AP_Payment_Hist_Dists_S.nextval,
4998: p_xla_event_rec.event_id,
4999: -1 * APHD.Amount,
5000: APHD.Pay_Dist_Lookup_Code,
5001: p_pay_hist_rec.Payment_History_ID,

Line 5029: FROM AP_Payment_Hist_Dists APHD,

5025: FND_GLOBAL.Conc_Program_ID,
5026: NULL,
5027: SYSDATE,
5028: FND_GLOBAL.Conc_Request_ID
5029: FROM AP_Payment_Hist_Dists APHD,
5030: AP_Payment_History_All APH
5031: WHERE APHD.Invoice_Distribution_ID = p_invoice_dist_id
5032: AND APHD.Payment_History_ID = APH.Payment_History_ID
5033: AND APH.Check_ID = p_xla_event_rec.source_id_int_1 -- Bug 6887295

Line 5260: -- ap_payment_hist_dists table

5256:
5257: ----------------------------------------------------------------------------------
5258: -- PROCEDURE Pay_Dist_Insert
5259: -- This procedure is used to insert the payment hist distributions into the
5260: -- ap_payment_hist_dists table
5261: ----------------------------------------------------------------------------------
5262:
5263: PROCEDURE Pay_Dist_Insert
5264: (P_PD_Rec IN AP_PAYMENT_HIST_DISTS%ROWTYPE

Line 5264: (P_PD_Rec IN AP_PAYMENT_HIST_DISTS%ROWTYPE

5260: -- ap_payment_hist_dists table
5261: ----------------------------------------------------------------------------------
5262:
5263: PROCEDURE Pay_Dist_Insert
5264: (P_PD_Rec IN AP_PAYMENT_HIST_DISTS%ROWTYPE
5265: ,P_Calling_Sequence IN VARCHAR2
5266: ) IS
5267:
5268: l_curr_calling_sequence VARCHAR2(2000);

Line 5288: INSERT INTO AP_Payment_Hist_Dists

5284: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||l_procedure_name||'.begin', l_log_msg);
5285: END IF;
5286:
5287:
5288: INSERT INTO AP_Payment_Hist_Dists
5289: (Payment_Hist_Dist_ID,
5290: Accounting_Event_ID,
5291: Amount,
5292: Pay_Dist_Lookup_Code,

Line 5322: VALUES (AP_Payment_Hist_Dists_S.nextval,

5318: Program_Login_ID,
5319: Program_Update_Date,
5320: Request_ID
5321: )
5322: VALUES (AP_Payment_Hist_Dists_S.nextval,
5323: P_PD_Rec.Accounting_Event_ID,
5324: P_PD_Rec.Amount,
5325: P_PD_Rec.Pay_Dist_Lookup_Code,
5326: P_PD_Rec.Payment_History_ID,

Line 5383: -- ap_payment_hist_dists table

5379: -- distribution links with the right amounts
5380: ----------------------------------------------------------------------------------
5381: -- PROCEDURE Upg_Dist_Links_Insert
5382: -- This procedure is used to insert the payment hist distributions into the
5383: -- ap_payment_hist_dists table
5384: ----------------------------------------------------------------------------------
5385:
5386: PROCEDURE Upg_Dist_Links_Insert
5387: (p_xla_event_rec IN ap_accounting_pay_pkg.r_xla_event_info

Line 5677: AP_Payment_Hist_Dists APHD,

5673: XLA_AE_Lines AEL,
5674: AP_Inv_Dists_Source AID1,
5675: AP_Invoices_All AI,
5676: AP_Invoice_Distributions_All AID,
5677: AP_Payment_Hist_Dists APHD,
5678: XLA_Transaction_Entities_Upg XTE_INV --Bug7169843 Bug11071399
5679: WHERE AC.Check_ID = p_xla_event_rec.source_id_int_1
5680: AND AC.Org_ID = ASP.Org_ID
5681: AND XLE.Event_ID = p_accounting_event_id

Line 5792: AP_Payment_Hist_Dists APHD,

5788: XLA_Events XLE,
5789: AP_Payment_History_All APH,
5790: XLA_AE_Headers AEH,
5791: XLA_AE_Lines AEL,
5792: AP_Payment_Hist_Dists APHD,
5793: AP_Invoice_Distributions_All AID,
5794: AP_Invoices_All AI,
5795: XLA_Transaction_Entities_Upg XTE_INV --Bug7169843 Bug11071399
5796: WHERE AC.Check_ID = p_xla_event_rec.source_id_int_1

Line 6110: AP_Payment_Hist_Dists APHD,

6106: XLA_AE_Lines AEL,
6107: AP_Inv_Dists_Source AID1,
6108: AP_Invoices_All AI,
6109: AP_Invoice_Distributions_All AID,
6110: AP_Payment_Hist_Dists APHD,
6111: XLA_Transaction_Entities_Upg XTE_INV, --Bug7169843 Bug11071399
6112: AP_MC_Invoice_Dists AID_MC
6113: WHERE AC.Check_ID = p_xla_event_rec.source_id_int_1
6114: AND AC.Org_ID = ASP.Org_ID

Line 6205: AP_Payment_Hist_Dists APHD,

6201: XLA_Events XLE,
6202: AP_Payment_History_All APH,
6203: XLA_AE_Headers AEH,
6204: XLA_AE_Lines AEL,
6205: AP_Payment_Hist_Dists APHD,
6206: ap_mc_invoice_dists AID_MC,
6207: AP_Invoices_All AI,
6208: XLA_Transaction_Entities_Upg XTE_INV, --Bug7169843 Bug11071399
6209: AP_Invoice_Distributions_All AID,

Line 6282: INTO ap_payment_hist_dists aphd

6278: BEGIN
6279: /* Added MERGE inplace of update statement for bug13437260 */
6280:
6281: MERGE
6282: INTO ap_payment_hist_dists aphd
6283: USING ( SELECT aphd.payment_hist_dist_id,
6284: aphd.invoice_dist_base_amount,
6285: NVL(xdl.unrounded_accounted_cr,0) - NVL(xdl.unrounded_accounted_dr,0) xdl_acctd_amt,
6286: aphd.invoice_dist_amount ,

Line 6288: FROM ap_payment_hist_dists aphd,

6284: aphd.invoice_dist_base_amount,
6285: NVL(xdl.unrounded_accounted_cr,0) - NVL(xdl.unrounded_accounted_dr,0) xdl_acctd_amt,
6286: aphd.invoice_dist_amount ,
6287: NVL(xdl.unrounded_entered_cr,0) - NVL(xdl.unrounded_entered_dr,0) xdl_ent_amt
6288: FROM ap_payment_hist_dists aphd,
6289: ap_payment_history_all aph,
6290: xla_ae_headers xh,
6291: ap_system_parameters_all asp,
6292: xla_distribution_links xdl