[Home] [Help]
PACKAGE: APPS.AP_ACCOUNTING_PAY_PKG
Source
1 PACKAGE AP_ACCOUNTING_PAY_PKG AS
2 /* $Header: apacpays.pls 120.6.12010000.1 2008/07/28 05:58:18 appldev ship $ */
3
4
5 -- Public Variables declared here
6
7 G_Base_Currency_Code AP_SYSTEM_PARAMETERS.Base_Currency_Code%TYPE;
8
9 G_Pay_Pmt_History_ID AP_PAYMENT_HISTORY.Payment_History_ID%TYPE;
10 G_Pmt_To_Base_XRate_Type AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Type%TYPE;
11 G_Pmt_To_Base_XRate_Date AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Date%TYPE;
12 G_Pmt_To_Base_XRate AP_PAYMENT_HISTORY.Pmt_To_Base_XRate%TYPE;
13
14 G_Mat_Pmt_History_ID AP_PAYMENT_HISTORY.Payment_History_ID%TYPE;
15 G_Mat_To_Base_XRate_Type AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Type%TYPE;
16 G_Mat_To_Base_XRate_Date AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Date%TYPE;
17 G_Mat_To_Base_XRate AP_PAYMENT_HISTORY.Pmt_To_Base_XRate%TYPE;
18
19 G_Clr_Pmt_History_ID AP_PAYMENT_HISTORY.Payment_History_ID%TYPE;
20 G_Clr_To_Base_XRate_Type AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Type%TYPE;
21 G_Clr_To_Base_XRate_Date AP_PAYMENT_HISTORY.Pmt_To_Base_XRate_Date%TYPE;
22 G_Clr_To_Base_XRate AP_PAYMENT_HISTORY.Pmt_To_Base_XRate%TYPE;
23
24
25 -- Record for cursor xla_events_cur
26 TYPE r_xla_event_info IS RECORD
27 (event_id XLA_EVENTS_GT.event_id%TYPE
28 ,event_type_code XLA_EVENTS_GT.event_type_code%TYPE
29 ,event_date XLA_EVENTS_GT.event_date%TYPE
30 ,event_number XLA_EVENTS_GT.event_number%TYPE
31 ,event_status_code XLA_EVENTS_GT.event_status_code%TYPE
32 ,entity_code XLA_EVENTS_GT.entity_code%TYPE
33 ,source_id_int_1 XLA_EVENTS_GT.source_id_int_1%TYPE
34 );
35
36
37 -- Record for cursor payment_history
38 TYPE r_pay_hist_info IS RECORD
39 (Payment_History_ID AP_Payment_History.Payment_History_ID%TYPE
40 ,Pmt_Currency_Code AP_Payment_History.Pmt_Currency_Code%TYPE
41 ,Pmt_To_Base_XRate_Type AP_Payment_History.Pmt_To_Base_XRate_Type%TYPE
42 ,Pmt_To_Base_XRate_Date AP_Payment_History.Pmt_To_Base_XRate_Date%TYPE
43 ,Pmt_To_Base_XRate AP_Payment_History.Pmt_To_Base_XRate%TYPE
44 ,Bank_Currency_Code AP_Payment_History.Bank_Currency_Code%TYPE
45 ,Bank_To_Base_XRate_Type AP_Payment_History.Bank_To_Base_XRate_Type%TYPE
46 ,Bank_To_Base_XRate_Date AP_Payment_History.Bank_To_Base_XRate_Date%TYPE
47 ,Bank_To_Base_XRate AP_Payment_History.Bank_To_Base_XRate%TYPE
48 ,Errors_Bank_Amount AP_Payment_History.Errors_Bank_Amount%TYPE
49 ,Charges_Bank_Amount AP_Payment_History.Charges_Bank_Amount%TYPE
50 ,Rev_Pmt_Hist_ID AP_Payment_History.Rev_Pmt_Hist_ID%TYPE
51 ,Related_Event_ID AP_Payment_History.Related_Event_ID%TYPE
52 ,Invoice_Adjustment_Event_ID AP_Payment_History.Invoice_Adjustment_Event_ID%TYPE
53 );
54
55
56 -- Record for cursor invoice_header
57 TYPE r_invoices_info IS RECORD
58 (Invoice_ID AP_Invoices.Invoice_ID%TYPE
59 ,Invoice_Amount AP_Invoices.Invoice_Amount%TYPE
60 ,Invoice_Currency_Code AP_Invoices.Invoice_Currency_Code%TYPE
61 ,Payment_Currency_Code AP_Invoices.Payment_Currency_Code%TYPE
62 ,Base_Currency_Code AP_System_Parameters.Base_Currency_Code%TYPE
63 ,Pay_Curr_Invoice_Amount AP_Invoices.Pay_Curr_Invoice_Amount%TYPE
64 ,Payment_Cross_Rate_Type AP_Invoices.Payment_Cross_Rate_Type%TYPE
65 ,Payment_Cross_Rate_Date AP_Invoices.Payment_Cross_Rate_Date%TYPE
66 ,Payment_Cross_Rate AP_Invoices.Payment_Cross_Rate%TYPE
67 ,Exchange_Rate_Type AP_Invoices.Exchange_Rate_Type%TYPE
68 ,Exchange_Date AP_Invoices.Exchange_Date%TYPE
69 ,Exchange_Rate AP_Invoices.Exchange_Rate%TYPE
70 ,Disc_Is_Inv_Less_Tax_Flag AP_Invoices.Disc_Is_Inv_Less_Tax_Flag%TYPE
71 ,Exclude_Freight_From_Discount AP_Invoices.Exclude_Freight_From_Discount%TYPE
72 );
73
74
75 -- Record for cursor invoice_dists
76 TYPE r_inv_dist_info IS RECORD
77 (Invoice_Distribution_ID AP_Invoice_Distributions.Invoice_Distribution_ID%TYPE
78 ,Line_Type_Lookup_Code AP_Invoice_Distributions.Line_Type_Lookup_Code%TYPE
79 ,Amount AP_Invoice_Distributions.Amount%TYPE
80 ,Base_Amount AP_Invoice_Distributions.Base_Amount%TYPE
81 ,PO_Distribution_ID AP_Invoice_Distributions.PO_Distribution_ID%TYPE
82 ,RCV_Transaction_ID AP_Invoice_Distributions.RCV_Transaction_ID%TYPE
83 ,Reversal_Flag AP_Invoice_Distributions.Reversal_Flag%TYPE
84 ,Parent_Reversal_ID AP_Invoice_Distributions.Parent_Reversal_ID%TYPE
85 ,AWT_Related_ID AP_Invoice_Distributions.AWT_Related_ID%TYPE
86 ,AWT_Invoice_Payment_ID AP_Invoice_Distributions.AWT_Invoice_Payment_ID%TYPE
87 ,Quantity_Variance AP_Invoice_Distributions.Quantity_Variance%TYPE
88 ,Base_Quantity_Variance AP_Invoice_Distributions.Base_Quantity_Variance%TYPE
89 ,Amount_Variance AP_Invoice_Distributions.Amount_Variance%TYPE
90 ,Base_Amount_Variance AP_Invoice_Distributions.Base_Amount_Variance%TYPE
91 ,Historical_Flag AP_Invoice_Distributions.Historical_Flag%TYPE
92 ,Accounting_Event_Id AP_Invoice_Distributions.Accounting_Event_id%TYPE
93 );
94
95 -- Main procedure to create payment hist dists and prepay appl payment dists
96 PROCEDURE Do_Pay_Accounting
97 (P_Calling_Sequence IN VARCHAR2
98 );
99
100 PROCEDURE Delete_Hist_Dists
101 (P_Calling_Sequence IN VARCHAR2
102 );
103
104 FUNCTION Get_Casc_Pay_Sum
105 (P_Invoice_Distribution_ID IN NUMBER
106 ,P_Related_Event_ID IN NUMBER
107 ,P_Invoice_Payment_ID IN NUMBER
108 ,P_Calling_Sequence IN VARCHAR2
109 ) RETURN NUMBER;
110
111
112 FUNCTION Get_Casc_Inv_Dist_Sum
113 (P_Invoice_Distribution_ID IN NUMBER
114 ,P_Related_Event_ID IN NUMBER
115 ,P_Invoice_Payment_ID IN NUMBER
116 ,P_Calling_Sequence IN VARCHAR2
117 ) RETURN NUMBER;
118
119
120 FUNCTION Get_Casc_Bank_Curr_Sum
121 (P_Invoice_Distribution_ID IN NUMBER
122 ,P_Related_Event_ID IN NUMBER
123 ,P_Invoice_Payment_ID IN NUMBER
124 ,P_Calling_Sequence IN VARCHAR2
125 ) RETURN NUMBER;
126
127
128 FUNCTION Get_Casc_Prepay_Sum
129 (P_Invoice_Distribution_ID IN NUMBER
130 ,P_Prepay_App_Dist_ID IN NUMBER
131 ,P_Calling_Sequence IN VARCHAR2
132 ) RETURN NUMBER;
133
134
135 FUNCTION Get_Casc_Tax_Diff_Sum
136 (P_Invoice_Distribution_ID IN NUMBER
137 ,P_Prepay_App_Dist_ID IN NUMBER
138 ,P_Calling_Sequence IN VARCHAR2
139 ) RETURN NUMBER;
140
141
142 FUNCTION Get_Casc_Discount_Sum
143 (P_Invoice_Distribution_ID IN NUMBER
144 ,P_Related_Event_ID IN NUMBER
145 ,P_Invoice_Payment_ID IN NUMBER
146 ,P_Calling_Sequence IN VARCHAR2
147 ) RETURN NUMBER;
148
149
150 FUNCTION Get_Casc_Inv_Dist_Disc_Sum
151 (P_Invoice_Distribution_ID IN NUMBER
152 ,P_Related_Event_ID IN NUMBER
153 ,P_Invoice_Payment_ID IN NUMBER
154 ,P_Calling_Sequence IN VARCHAR2
155 ) RETURN NUMBER;
156
157
158 FUNCTION Get_Casc_Bank_Curr_Disc_Sum
159 (P_Invoice_Distribution_ID IN NUMBER
160 ,P_Related_Event_ID IN NUMBER
161 ,P_Invoice_Payment_ID IN NUMBER
162 ,P_Calling_Sequence IN VARCHAR2
163 ) RETURN NUMBER;
164
165
166 PROCEDURE Get_Pay_Sum
167 (P_Invoice_Distribution_ID IN NUMBER
168 ,P_Transaction_Type IN VARCHAR2
169 ,P_Payment_Sum OUT NOCOPY NUMBER
170 ,P_Inv_Dist_Sum OUT NOCOPY NUMBER
171 ,P_Bank_Curr_Sum OUT NOCOPY NUMBER
172 ,P_Calling_Sequence IN VARCHAR2
173 );
174
175
176 FUNCTION Get_Prepay_Sum
177 (P_Invoice_Distribution_ID IN NUMBER
178 ,P_Calling_Sequence IN VARCHAR2
179 ) RETURN NUMBER;
180
181
182 FUNCTION Is_Final_Payment
183 (P_Inv_Rec IN r_invoices_info
184 ,P_Payment_Amount IN NUMBER
185 ,P_Discount_Amount IN NUMBER
186 ,P_Prepay_Amount IN NUMBER
187 ,P_Transaction_Type IN VARCHAR2
188 ,P_Calling_Sequence IN VARCHAR2
189 ) RETURN BOOLEAN;
190
191
192
193 FUNCTION Get_Base_Amount
194 (P_amount IN NUMBER
195 ,P_currency_code IN VARCHAR2
196 ,P_base_currency_code IN VARCHAR2
197 ,P_exchange_rate_type IN VARCHAR2
198 ,P_exchange_rate_date IN DATE
199 ,P_exchange_rate IN NUMBER
200 ,P_calling_sequence IN VARCHAR2
201 ) RETURN NUMBER;
202
203
204 END AP_ACCOUNTING_PAY_PKG;