[Home] [Help]
1516: /*Check whether this invoice is matched to any LCM enabled receipt*/
1517: BEGIN
1518: SELECT 'Y'
1519: INTO l_lcm_used
1520: FROM DUAL
1521: WHERE EXISTS
1522: (SELECT 1 FROM AP_INVOICE_DISTRIBUTIONS aid, RCV_TRANSACTIONS rt
1523: WHERE aid.invoice_id = l_invoice_id
1524: AND aid.rcv_transaction_id = rt.transaction_id
1534: -- Added by 7641045, modified by 7678786, modification reverted by 7830298
1535: BEGIN
1536: SELECT 'Y'
1537: INTO l_unpostable_holds_exist
1538: FROM dual
1539: WHERE EXISTS (SELECT 1
1540: FROM ap_holds H, ap_hold_codes C
1541: WHERE H.invoice_id = l_invoice_id
1542: AND H.hold_lookup_code = C.hold_lookup_code
3317:
3318: CURSOR Dist_Var_Cur IS
3319: /* Modified by epajaril to fix bug 6729934 */
3320: SELECT 'Distribution needs to be verified. '
3321: FROM DUAL
3322: WHERE EXISTS (
3323: SELECT 'Dist Total <> Invoice Line Amount'
3324: FROM ap_invoice_lines_all AIL, ap_invoice_distributions_all D
3325: -- WHERE AIL.invoice_id = D.invoice_id
5277: -------------------------------------------
5278:
5279: SELECT ap_holds_s.nextval
5280: INTO l_hold_id
5281: FROM DUAL;
5282:
5283: INSERT INTO ap_holds (
5284: invoice_id,
5285: line_location_id,
6900: l_dist_tab(i).invoice_line_number := p_invoice_line_rec.line_number;
6901:
6902: SELECT ap_invoice_distributions_s.nextval
6903: INTO l_dist_tab(i).invoice_distribution_id
6904: FROM DUAL;
6905:
6906: l_dist_tab(i).line_type_lookup_code := 'ITEM';
6907:
6908: IF (nvl(p_generate_permanent,'N') = 'N') THEN
7047: ------------------------------------------------------------------------
7048: -- Function Batch_Approval:
7049: -- It selects all invoices depending on the parameters given to it and
7050: -- calls the on-line PL/SQL approval package to approve each invoice
7051: -- individually.
7052: ------------------------------------------------------------------------
7053:
7054: FUNCTION batch_approval
7055: (p_run_option IN VARCHAR2,