eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AP_PAYMENT_SCHEDULES_PKG dependencies on AP_PAYMENT_SCHEDULES

Line 1: PACKAGE BODY AP_PAYMENT_SCHEDULES_PKG AS

1: PACKAGE BODY AP_PAYMENT_SCHEDULES_PKG AS
2: /* $Header: apipascb.pls 120.7.12010000.3 2009/01/28 14:06:11 amitmukh ship $ */
3:
4: -----------------------------------------------------------------------
5: -- PROCEDURE adjust_pay_schedule adjusts the payment schedule of

Line 32: l_payment_status_flag ap_payment_schedules.payment_status_flag%TYPE;

28: l_original_invoice_amount number;
29: l_net_amount_to_adjust number;
30: l_payment_num_to_add number;
31: l_amount_remaining number;
32: l_payment_status_flag ap_payment_schedules.payment_status_flag%TYPE;
33: l_allow_paid_invoice_adjust
34: ap_system_parameters.allow_paid_invoice_adjust%TYPE;
35: l_add_new_payment_schedule varchar2(1) := 'Y';
36: l_sum_ps_amount_remaining number;

Line 47: FROM ap_payment_schedules

43: l_inv_curr_sched_total number;
44:
45: cursor message1_cursor is
46: SELECT 'AP_PAY_WARN_DISC_UPDATE'
47: FROM ap_payment_schedules
48: WHERE invoice_id = X_invoice_id
49: AND payment_num = l_current_payment_num
50: AND (NVL(discount_amount_available, 0) <> 0
51: OR NVL(second_disc_amt_available, 0) <> 0

Line 77: FROM ap_payment_schedules

73: cursor pay_sched_adjust_cursor is
74: SELECT payment_num,
75: amount_remaining,
76: payment_status_flag
77: FROM ap_payment_schedules
78: WHERE invoice_id = X_invoice_id
79: AND (l_add_new_payment_schedule='Y' OR
80: payment_status_flag <> 'Y')
81: ORDER BY due_date desc, payment_num desc;

Line 85: FROM ap_payment_schedules

81: ORDER BY due_date desc, payment_num desc;
82:
83: cursor payment_num_to_add_cursor is
84: SELECT nvl((MAX(payment_num)+1),1)
85: FROM ap_payment_schedules
86: WHERE invoice_id = X_invoice_id;
87:
88: cursor c_inv_curr_sched_total IS
89: SELECT SUM(nvl(inv_curr_gross_amount, gross_amount))

Line 90: FROM ap_payment_schedules

86: WHERE invoice_id = X_invoice_id;
87:
88: cursor c_inv_curr_sched_total IS
89: SELECT SUM(nvl(inv_curr_gross_amount, gross_amount))
90: FROM ap_payment_schedules
91: WHERE invoice_id = X_Invoice_Id;
92:
93: BEGIN
94: current_calling_sequence :=

Line 95: 'AP_PAYMENT_SCHEDULES_PKG.ADJUST_PAY_SCHEDULE<-' ||

91: WHERE invoice_id = X_Invoice_Id;
92:
93: BEGIN
94: current_calling_sequence :=
95: 'AP_PAYMENT_SCHEDULES_PKG.ADJUST_PAY_SCHEDULE<-' ||
96: X_calling_sequence;
97:
98: -- Determine the original invoice_amount
99: -- The precondition of this procedure is that it is being called

Line 233: debug_info := 'Delete AP_PAYMENT_SCHEDULES payment_num '||

229: --
230: if ((l_amount_remaining + l_current_amount_to_adjust = 0) and
231: l_payment_status_flag not in ('Y','P')) then
232:
233: debug_info := 'Delete AP_PAYMENT_SCHEDULES payment_num '||
234: l_current_payment_num;
235:
236: delete from ap_payment_schedules
237: where invoice_id = X_invoice_id

Line 236: delete from ap_payment_schedules

232:
233: debug_info := 'Delete AP_PAYMENT_SCHEDULES payment_num '||
234: l_current_payment_num;
235:
236: delete from ap_payment_schedules
237: where invoice_id = X_invoice_id
238: and payment_num = l_current_payment_num;
239:
240: else

Line 251: debug_info := 'Update AP_PAYMENT_SCHEDULES payment_num '||

247: -- when the commit was invoked. (See the update_liability trigger.)
248: -- Usual locking order is invoices then pay lines,
249: -- so this is consistent.
250: --
251: debug_info := 'Update AP_PAYMENT_SCHEDULES payment_num '||
252: l_current_payment_num;
253:
254: UPDATE ap_payment_schedules
255: SET gross_amount = NVL(gross_amount, 0)+l_current_amount_to_adjust,

Line 254: UPDATE ap_payment_schedules

250: --
251: debug_info := 'Update AP_PAYMENT_SCHEDULES payment_num '||
252: l_current_payment_num;
253:
254: UPDATE ap_payment_schedules
255: SET gross_amount = NVL(gross_amount, 0)+l_current_amount_to_adjust,
256: inv_curr_gross_amount = (
257: SELECT DECODE(F.minimum_accountable_unit,NULL,
258: ROUND( ((NVL(gross_amount, 0)+

Line 290: debug_info := 'Select from AP_PAYMENT_SCHEDULES';

286: -- discount which may need adjustment
287: -- Message to display is AP_PAY_WARN_DISC_UPDATE
288: --
289: if (X_Message1 is null) then
290: debug_info := 'Select from AP_PAYMENT_SCHEDULES';
291:
292: open message1_cursor;
293: debug_info := 'Fetch message1_cursor';
294: fetch message1_cursor into X_Message1;

Line 339: debug_info:= 'Update ap_payment_schedules - set inv_curr_gross_amount';

335: -- Adjust inv_curr_gross_amount for rounding errors
336: --
337: IF (l_inv_curr_sched_total <> X_invoice_amount) THEN
338: --
339: debug_info:= 'Update ap_payment_schedules - set inv_curr_gross_amount';
340: UPDATE AP_PAYMENT_SCHEDULES
341: SET inv_curr_gross_amount = inv_curr_gross_amount
342: + X_Invoice_Amount
343: - l_inv_curr_sched_total

Line 340: UPDATE AP_PAYMENT_SCHEDULES

336: --
337: IF (l_inv_curr_sched_total <> X_invoice_amount) THEN
338: --
339: debug_info:= 'Update ap_payment_schedules - set inv_curr_gross_amount';
340: UPDATE AP_PAYMENT_SCHEDULES
341: SET inv_curr_gross_amount = inv_curr_gross_amount
342: + X_Invoice_Amount
343: - l_inv_curr_sched_total
344: WHERE invoice_id = X_Invoice_Id

Line 346: FROM ap_payment_schedules

342: + X_Invoice_Amount
343: - l_inv_curr_sched_total
344: WHERE invoice_id = X_Invoice_Id
345: AND payment_num = (SELECT MAX(payment_num)
346: FROM ap_payment_schedules
347: WHERE invoice_id = X_Invoice_Id);
348: --
349: END IF;
350: end if;

Line 364: debug_info := 'Insert into AP_PAYMENT_SCHEDULES';

360: fetch payment_num_to_add_cursor into l_payment_num_to_add;
361: debug_info := 'Close payment_num_to_add_cursor';
362: close payment_num_to_add_cursor;
363:
364: debug_info := 'Insert into AP_PAYMENT_SCHEDULES';
365:
366: -- Insert the new payment schedule
367: INSERT INTO ap_payment_schedules(
368: invoice_id, payment_num, due_date,

Line 367: INSERT INTO ap_payment_schedules(

363:
364: debug_info := 'Insert into AP_PAYMENT_SCHEDULES';
365:
366: -- Insert the new payment schedule
367: INSERT INTO ap_payment_schedules(
368: invoice_id, payment_num, due_date,
369: last_update_date, last_updated_by,
370: last_update_login, creation_date, created_by,
371: payment_cross_rate,

Line 407: FROM ap_payment_schedules P

403: p.remit_to_supplier_id,
404: p.remit_to_supplier_site,
405: p.remit_to_supplier_site_id,
406: p.relationship_id
407: FROM ap_payment_schedules P
408: WHERE P.invoice_id = X_invoice_id
409: AND P.payment_num = l_current_payment_num;
410:
411: x_revalidate_ps := 'Y';

Line 432: FROM ap_payment_schedules

428: -- Check if we need to change the payment_status_flag
429: --
430: SELECT sum(amount_remaining)
431: INTO l_sum_ps_amount_remaining
432: FROM ap_payment_schedules
433: WHERE invoice_id = X_invoice_id;
434:
435: if (l_sum_ps_amount_remaining <> 0) then
436: X_payment_status_flag := 'P';

Line 513: from ap_invoices ai,ap_payment_schedules aps

509: aps.gross_amount/decode(ai.pay_curr_invoice_amount, 0, 1,
510: nvl(ai.pay_curr_invoice_amount, 1)),
511: aps.gross_amount -- BUG 3741934
512: into l_wt_amt_to_subtract, l_gross_amount
513: from ap_invoices ai,ap_payment_schedules aps
514: where ai.invoice_id=aps.invoice_id
515: and aps.payment_num=X_payment_num
516: and ai.invoice_id=X_invoice_id;
517:

Line 657: FROM ap_payment_schedules

653: X_Relationship_Id NUMBER
654: ) IS
655: CURSOR C IS
656: SELECT *
657: FROM ap_payment_schedules
658: WHERE invoice_id = X_Invoice_Id
659: AND payment_num = X_Payment_Num
660: FOR UPDATE of invoice_id NOWAIT;
661: Recinfo C%ROWTYPE;

Line 671: 'AP_PAYMENT_SCHEDULES_PKG.LOCK_ROW<-'||X_calling_sequence;

667: BEGIN
668: -- Update the calling sequence
669: --
670: current_calling_sequence :=
671: 'AP_PAYMENT_SCHEDULES_PKG.LOCK_ROW<-'||X_calling_sequence;
672:
673: debug_info := 'Open cursor C';
674: OPEN C;
675: debug_info := 'Fetch cursor C';

Line 924: END AP_PAYMENT_SCHEDULES_PKG;

920: APP_EXCEPTION.RAISE_EXCEPTION;
921:
922: END Lock_Row;
923:
924: END AP_PAYMENT_SCHEDULES_PKG;