1: PACKAGE BODY AP_INVOICES_POST_PROCESS_PKG AS
2: /* $Header: apinvppb.pls 120.13.12010000.7 2010/02/10 08:58:37 asansari ship $ */
3:
4: -----------------------------------------------------------------------
5: -- Procedure create_holds
47:
48: -- Update the calling sequence
49: --
50: current_calling_sequence :=
51: 'AP_INVOICES_POST_PROCESS_PKG.create_holds<-'
52: ||X_calling_sequence;
53:
54: open invoice_cursor;
55: fetch invoice_cursor
225:
226: -- Update the calling sequence
227: --
228: current_calling_sequence :=
229: 'AP_INVOICES_POST_PROCESS_PKG.insert_children<-'
230: ||X_calling_sequence;
231:
232: -- Retrieve the values we need from the newly inserted
233: -- invoice so we can create the payment schedules
442:
443: -- Update the calling sequence
444: --
445: current_calling_sequence :=
446: 'AP_INVOICES_POST_PROCESS_PKG.invoice_pre_update<-'||X_calling_sequence;
447:
448: -- Determine whether the vendor has changed
449: open vendor_changed_cursor;
450: fetch vendor_changed_cursor into X_vendor_changed_flag;
590:
591: -- Update the calling sequence
592: --
593: current_calling_sequence :=
594: 'AP_INVOICES_POST_PROCESS_PKG.invoice_post_update<-'
595: ||X_calling_sequence;
596:
597: -- Retrieve the values we need from the recently updated
598: -- invoice so we can create the payment schedules
814:
815: -- Update the calling sequence
816: --
817: current_calling_sequence :=
818: 'AP_INVOICES_POST_PROCESS_PKG.post_forms_commit<-'||X_calling_sequence;
819:
820: -- Update the invoice distributions if necessary
821: --
822: if (nvl(X_update_base,'N') = 'Y' or
898:
899: -- Update the calling sequence
900: --
901: current_calling_sequence :=
902: 'AP_INVOICES_POST_PROCESS_PKG.Select_Summary<-'||X_Calling_Sequence;
903:
904: debug_info := 'Select from AP_INVOICES';
905:
906: select sum(nvl(invoice_amount,0))
924: end if;
925: APP_EXCEPTION.RAISE_EXCEPTION;
926: END Select_Summary;
927:
928: END AP_INVOICES_POST_PROCESS_PKG;