DBA Data[Home] [Help]

APPS.AP_RETAINAGE_RELEASE_PKG dependencies on AP_INVOICE_DISTRIBUTIONS_ALL

Line 41: TYPE relDistType IS TABLE OF ap_invoice_distributions_all%rowtype INDEX BY PLS_INTEGER;

37: g_user_id NUMBER;
38: g_login_id NUMBER;
39:
40: TYPE releaseLinesType IS TABLE OF ap_invoice_lines_all%rowtype INDEX BY PLS_INTEGER;
41: TYPE relDistType IS TABLE OF ap_invoice_distributions_all%rowtype INDEX BY PLS_INTEGER;
42:
43: Procedure Lock_Retained_Invoices (x_retained_lines_tab IN retainedLinesType,
44: x_lock_status OUT NOCOPY BOOLEAN);
45:

Line 508: Cursor c_retained_distributions (c_invoice_id in ap_invoice_distributions_all.invoice_id%type,

504: Procedure create_release_distributions (x_release_amount IN number,
505: x_release_amount_remaining IN number,
506: x_released_lines_tab IN releaseLinesType) As
507:
508: Cursor c_retained_distributions (c_invoice_id in ap_invoice_distributions_all.invoice_id%type,
509: c_line_number in ap_invoice_distributions_all.invoice_line_number%type) Is
510: select aid.*,
511: ap_invoice_distributions_s.nextval released_invoice_dist_id
512: from ap_invoice_distributions aid

Line 509: c_line_number in ap_invoice_distributions_all.invoice_line_number%type) Is

505: x_release_amount_remaining IN number,
506: x_released_lines_tab IN releaseLinesType) As
507:
508: Cursor c_retained_distributions (c_invoice_id in ap_invoice_distributions_all.invoice_id%type,
509: c_line_number in ap_invoice_distributions_all.invoice_line_number%type) Is
510: select aid.*,
511: ap_invoice_distributions_s.nextval released_invoice_dist_id
512: from ap_invoice_distributions aid
513: where invoice_id = c_invoice_id

Line 522: Type invDistIDType IS TABLE OF ap_invoice_distributions_all.invoice_distribution_id%type INDEX BY PLS_INTEGER;

518:
519: retained_dist_tab retDistType;
520: released_dist_tab relDistType;
521:
522: Type invDistIDType IS TABLE OF ap_invoice_distributions_all.invoice_distribution_id%type INDEX BY PLS_INTEGER;
523: Type relAmtType IS TABLE OF ap_invoice_distributions_all.amount%type INDEX BY PLS_INTEGER;
524:
525: retained_inv_dist_id_tab invDistIDType;
526: release_amount_tab relAmtType;

Line 523: Type relAmtType IS TABLE OF ap_invoice_distributions_all.amount%type INDEX BY PLS_INTEGER;

519: retained_dist_tab retDistType;
520: released_dist_tab relDistType;
521:
522: Type invDistIDType IS TABLE OF ap_invoice_distributions_all.invoice_distribution_id%type INDEX BY PLS_INTEGER;
523: Type relAmtType IS TABLE OF ap_invoice_distributions_all.amount%type INDEX BY PLS_INTEGER;
524:
525: retained_inv_dist_id_tab invDistIDType;
526: release_amount_tab relAmtType;
527:

Line 768: INSERT INTO ap_invoice_distributions_all VALUES released_dist_tab(k);

764: IF released_dist_tab.count > 0 THEN
765:
766: FORALL k in released_dist_tab.first .. released_dist_tab.last
767:
768: INSERT INTO ap_invoice_distributions_all VALUES released_dist_tab(k);
769:
770: END IF;
771:
772: -----------------------------------------------------------------

Line 781: UPDATE ap_invoice_distributions_all

777: IF retained_inv_dist_id_tab.count > 0 THEN
778:
779: FORALL i in retained_inv_dist_id_tab.first .. retained_inv_dist_id_tab.last
780:
781: UPDATE ap_invoice_distributions_all
782: SET retained_amount_remaining = (abs(retained_amount_remaining) - abs(release_amount_tab(i)))
783: WHERE invoice_distribution_id = retained_inv_dist_id_tab(i);
784:
785: END IF;