1 PACKAGE AP_FUNDS_CONTROL_PKG AUTHID CURRENT_USER AS
2 /* $Header: aprfunds.pls 120.11.12010000.2 2009/08/05 21:23:44 serabell ship $ */
3
4
5 /*=============================================================================
6 | Global variable Spec
7 *===========================================================================*/
8 g_debug_mode VARCHAR2(1):= 'N';
9
10 --Invoice Lines: Distributions, Added the Index by binary integer clause
11 TYPE Key_Value_Tab_Type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
12
13 TYPE Funds_Dist_Tab_Type IS TABLE OF PSA_AP_BC_PVT.Funds_Dist_Rec
14 INDEX BY BINARY_INTEGER;
15
16
17 /*=============================================================================
18 |Public Procedure Specification
19 *===========================================================================*/
20
21 PROCEDURE Funds_Reserve(
22 p_calling_mode IN VARCHAR2 DEFAULT 'APPROVE',
23 p_invoice_id IN NUMBER,
24 p_set_of_books_id IN NUMBER,
25 p_base_currency_code IN VARCHAR2,
26 p_conc_flag IN VARCHAR2,
27 p_system_user IN NUMBER,
28 p_holds IN OUT NOCOPY AP_APPROVAL_PKG.HOLDSARRAY,
29 p_hold_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
30 p_release_count IN OUT NOCOPY AP_APPROVAL_PKG.COUNTARRAY,
31 p_funds_return_code OUT NOCOPY VARCHAR2,
32 p_calling_sequence IN VARCHAR2);
33
34 --ETAX: Validation
35 PROCEDURE GET_ERV_CCID(
36 p_sys_xrate_gain_ccid IN NUMBER,
37 p_sys_xrate_loss_ccid IN NUMBER,
38 p_dist_ccid IN NUMBER,
39 p_variance_ccid IN NUMBER,
40 p_destination_type IN VARCHAR2,
41 p_inv_distribution_id IN NUMBER,
42 p_related_id IN NUMBER,
43 p_erv IN NUMBER,
44 p_erv_ccid IN OUT NOCOPY NUMBER,
45 p_calling_sequence IN VARCHAR2);
46
47 --procedure added for bug 8733916
48
49 PROCEDURE Encum_Unprocessed_Events_Del
50 (
51 p_invoice_id IN NUMBER,
52 p_calling_sequence IN VARCHAR2 DEFAULT NULL
53 );
54
55
56 PROCEDURE Calc_QV(
57 p_invoice_id IN NUMBER,
58 p_po_dist_id IN NUMBER,
59 p_inv_currency_code IN VARCHAR2,
60 p_base_currency_code IN VARCHAR2,
61 p_po_price IN NUMBER,
62 p_po_qty IN NUMBER,
63 p_match_option IN VARCHAR2,
64 p_po_uom IN VARCHAR2,
65 p_item_id IN NUMBER,
66 p_qv IN OUT NOCOPY NUMBER,
67 p_bqv IN OUT NOCOPY NUMBER,
68 p_update_line_num IN OUT NOCOPY NUMBER,
69 p_update_dist_num IN OUT NOCOPY NUMBER,
70 p_calling_sequence IN VARCHAR2);
71
72 PROCEDURE Calc_AV(
73 p_invoice_id IN NUMBER,
74 p_po_dist_id IN NUMBER,
75 p_inv_currency_code IN VARCHAR2,
76 p_base_currency_code IN VARCHAR2,
77 p_po_amt IN NUMBER,
78 p_av IN OUT NOCOPY NUMBER,
79 p_bav IN OUT NOCOPY NUMBER,
80 p_update_line_num IN OUT NOCOPY NUMBER,
81 p_update_dist_num IN OUT NOCOPY NUMBER,
82 p_calling_sequence IN VARCHAR2);
83
84 PROCEDURE Funds_Check(
85 p_invoice_id IN NUMBER,
86 p_inv_line_num IN NUMBER,
87 p_dist_line_num IN NUMBER,
88 p_return_message_name IN OUT NOCOPY VARCHAR2,
89 p_calling_sequence IN VARCHAR2);
90
91 FUNCTION Funds_Check_Processor (
92 P_Invoice_Id IN NUMBER,
93 P_Invoice_Line_Number IN NUMBER,
94 p_dist_line_num IN NUMBER,
95 P_Invoice_Needs_Validation IN VARCHAR2,
96 P_Error_Code OUT NOCOPY VARCHAR2,
97 P_Token1 OUT NOCOPY NUMBER,
98 P_Calling_Sequence IN VARCHAR2) RETURN BOOLEAN;
99
100 END AP_FUNDS_CONTROL_PKG;