1 PACKAGE OE_PrePayment_PVT AUTHID CURRENT_USER AS
2 /* $Header: OEXVPPYS.pls 120.10.12020000.1 2012/06/26 10:36:49 appldev ship $ */
3
4 g_process_pmt_req_logged VARCHAR2(1) := 'N';
5
6 /*--------------------------------------------------------------------------
7 Function Calculate_Pending_Amount
8 Returns the pending amount to be processed
9 Note that the threshold factor has been included here
10 /*--------------------------------------------------------------------------
11
12 FUNCTION Calculate_Pending_Amount
13 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type)
14 RETURN NUMBER;
15
16 /*--------------------------------------------------------------------------
17 Procedure Create_Receipt
18 This procedure calls AR API to create a new receipt for the amount specified.
19 This procedure is called from OE_PrePayment_PVT.Process_Payment.
20 ----------------------------------------------------------------------------*/
21 PROCEDURE Create_Receipt
22 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
23 , p_amount IN NUMBER
24 , p_receipt_method_id IN NUMBER
25 , p_bank_acct_id IN NUMBER
26 , p_bank_acct_uses_id IN NUMBER
27 , p_trxn_extension_id IN NUMBER --R12 CC Encryption
28 , p_payment_set_id IN OUT NOCOPY NUMBER
29 , p_receipt_number IN OUT NOCOPY VARCHAR2 -- bug 4724845
30 , p_payment_number IN OE_PAYMENTS.PAYMENT_NUMBER%TYPE DEFAULT NULL --7559372
31 , x_payment_response_error_code OUT NOCOPY VARCHAR2
32 , p_approval_code IN OUT NOCOPY VARCHAR2
33 , x_msg_count OUT NOCOPY NUMBER
34 , x_msg_data OUT NOCOPY VARCHAR2
35 , x_return_status OUT NOCOPY VARCHAR2
36 , x_result_out OUT NOCOPY VARCHAR2
37 );
38
39 /*--------------------------------------------------------------------------
40 Procedure Refund_Request
41 This procedure calls AR API to submit refund request for the amount specified.
42 ----------------------------------------------------------------------------*/
43 PROCEDURE Refund_Request
44 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
45 , p_amount IN NUMBER
46 , p_payment_set_id IN NUMBER
47 , x_msg_count OUT NOCOPY NUMBER
48 , x_msg_data OUT NOCOPY VARCHAR2
49 , x_return_status OUT NOCOPY VARCHAR2
50 , x_result_out OUT NOCOPY VARCHAR2
51 );
52
53 /*--------------------------------------------------------------------------
54 Procedure Process_PrePayment_Order
55 This is the main procedure to process prepayment for prepaid orders .
56 ----------------------------------------------------------------------------*/
57 PROCEDURE Process_PrePayment_Order
58 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
59 , p_calling_action IN VARCHAR2
60 , p_delayed_request IN VARCHAR2
61 , x_msg_count OUT NOCOPY NUMBER
62 , x_msg_data OUT NOCOPY VARCHAR2
63 , x_return_status OUT NOCOPY VARCHAR2
64 );
65
66 PROCEDURE Any_Prepayment_Hold_Exists
67 ( p_header_id IN NUMBER -- Unique Order Header Id
68 , p_hold_exists OUT NOCOPY VARCHAR2 -- 'Y' or 'N'
69 );
70
71 PROCEDURE Release_prepayment_hold
72 ( p_header_id IN NUMBER -- Unique Order Header Id
73 , p_msg_count OUT NOCOPY NUMBER -- Message Count
74 , p_msg_data OUT NOCOPY VARCHAR2 -- Messages
75 , p_return_status OUT NOCOPY VARCHAR2 -- Success or Failure
76 );
77
78
79 PROCEDURE Apply_prepayment_hold
80 ( p_header_id IN NUMBER -- Unique Order Header Id
81 , p_hold_id IN NUMBER -- Seeded Id of Hold to be applied
82 , p_msg_count IN OUT NOCOPY NUMBER -- Message Count
83 , p_msg_data IN OUT NOCOPY VARCHAR2 -- Messages
84 , p_return_status OUT NOCOPY VARCHAR2 -- Success or Failure
85 );
86
87 PROCEDURE Release_Payment_Hold
88 ( p_header_id IN NUMBER -- Unique Order Header Id
89 , p_hold_id IN NUMBER
90 , p_msg_count OUT NOCOPY NUMBER -- Message Count
91 , p_msg_data OUT NOCOPY VARCHAR2 -- Messages
92 , p_return_status OUT NOCOPY VARCHAR2 -- Success or Failure
93 );
94
95 FUNCTION Get_Format_Mask(p_currency_code IN VARCHAR2)
96 RETURN VARCHAR2;
97
98 -- New procedure for pack J multiple payments project.
99 PROCEDURE Process_Payments
100 ( p_header_id IN NUMBER
101 , p_line_id IN NUMBER DEFAULT null --bug3524209
102 , p_calling_action IN VARCHAR2
103 , p_amount IN NUMBER
104 , p_delayed_request IN VARCHAR2
105 --R12 CVV2
106 --comm rej, p_reject_on_auth_failure IN VARCHAR2 DEFAULT NULL
107 --comm rej, p_reject_on_risk_failure IN VARCHAR2 DEFAULT NULL
108 , p_risk_eval_flag IN VARCHAR2 DEFAULT NULL --bug 6805953 'Y'
109 --R12 CVV2
110 , p_process_prepayment IN VARCHAR2 DEFAULT 'Y'
111 , p_process_authorization IN VARCHAR2 DEFAULT 'Y'
112 , x_msg_count OUT NOCOPY NUMBER
113 , x_msg_data OUT NOCOPY VARCHAR2
114 , x_return_status OUT NOCOPY VARCHAR2
115 );
116 --R12 CC Encryption
117 Procedure Delete_Payments
118 ( p_line_id IN NUMBER
119 , p_header_id IN NUMBER
120 , p_invoice_to_org_id IN NUMBER
121 , x_return_status OUT NOCOPY VARCHAR2
122 , x_msg_count OUT NOCOPY NUMBER
123 , x_msg_data OUT NOCOPY VARCHAR2
124 );
125 --R12 CC Encryption
126 procedure Split_Payment
127 (p_line_id IN NUMBER
128 ,p_header_id IN NUMBER
129 ,p_split_from_line_id IN NUMBER
130 ,x_return_status OUT NOCOPY VARCHAR2
131 ,x_msg_count OUT NOCOPY NUMBER
132 ,x_msg_data OUT NOCOPY VARCHAR2
133 );
134
135 PROCEDURE Process_Payment_Assurance
136 (p_api_version_number IN NUMBER
137 ,p_line_id IN NUMBER
138 ,p_activity_id IN NUMBER
139 ,p_exists_prepay IN VARCHAR2 DEFAULT 'Y' --pnpl
140 ,x_result_out OUT NOCOPY VARCHAR2
141 ,x_return_status OUT NOCOPY VARCHAR2
142 ,x_msg_count OUT NOCOPY VARCHAR2
143 ,x_msg_data OUT NOCOPY VARCHAR2
144 );
145
146 Procedure Print_Payment_Receipt(p_header_id in Number,
147 x_result_out out NOCOPY /* file.sql.39 change */ varchar2,
148 x_return_status out NOCOPY /* file.sql.39 change */ varchar2);
149
150 PROCEDURE Update_Hdr_Payment(p_header_id in number,
151 p_action in varchar2 := NULL,
152 p_line_id in number := NULL,
153 x_return_status out nocopy varchar2,
154 x_msg_count out nocopy number,
155 x_msg_data out nocopy varchar2);
156
157 /*--------------------------------------------------------------------------
158 Procedure Create_Refund
159 This procedure calls AR Refund Wrapper API for multiple payments project.
160 ----------------------------------------------------------------------------*/
161 PROCEDURE Create_Refund
162 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
163 , p_refund_amount IN NUMBER
164 , p_payment_set_id IN NUMBER
165 , p_bank_account_id IN NUMBER
166 , p_receipt_method_id IN NUMBER
167 , x_return_status OUT NOCOPY VARCHAR2
168 );
169
170 PROCEDURE Process_Payment_Refund
171 ( p_header_rec IN OE_Order_PUB.Header_Rec_Type
172 , x_msg_count OUT NOCOPY /* file.sql.39 change */ NUMBER
173 , x_msg_data OUT NOCOPY /* file.sql.39 change */ VARCHAR2
174 , x_return_status OUT NOCOPY /* file.sql.39 change */ VARCHAR2
175 );
176
177 PROCEDURE Any_Payment_Hold_Exists
178 ( p_header_id IN NUMBER -- Unique Order Header Id
179 , p_line_id IN NUMBER DEFAULT NULL --pnpl
180 , p_hold_exists OUT NOCOPY VARCHAR2 -- 'Y' or 'N'
181 );
182
183 PROCEDURE Update_Payment_Numbers(p_header_id in number,
184 p_line_id in number := NULL,
185 x_return_status out nocopy varchar2,
186 x_msg_count out nocopy number,
187 x_msg_data out nocopy varchar2);
188
189 PROCEDURE Delete_Payment_Hold
190 (p_line_id IN NUMBER
191 ,p_header_id IN NUMBER
192 ,p_hold_type IN VARCHAR2
193 ,x_return_status OUT NOCOPY VARCHAR2
194 ,x_msg_count OUT NOCOPY NUMBER
195 ,x_msg_data OUT NOCOPY VARCHAR2
196 );
197
198 --pnpl start
199 TYPE pay_now_total_rec IS RECORD
200 (line_id NUMBER(15) DEFAULT NULL
201 ,pay_now_line_amount NUMBER DEFAULT NULL
202 ,pay_now_freight_amount NUMBER DEFAULT NULL
203 ,pay_now_tax_amount NUMBER DEFAULT NULL
204 ,pay_now_total NUMBER DEFAULT NULL
205 ,term_id ra_terms.term_id%type DEFAULT NULL
206 ,currency_code fnd_currencies.currency_code%type DEFAULT NULL
207 );
208
209 TYPE pay_now_total_tbl IS TABLE of pay_now_total_rec
210 INDEX BY BINARY_INTEGER;
211
212 -----------------------------------------------------------------------------------------
213 -- New procedure Get_First_Installment added for Pay Now Pay Later project to fetch and calculate first installment amount from AR tables.
214 ------------------------------------------------------------------------------------------
215 PROCEDURE Get_First_Installment
216 (p_currency_code IN fnd_currencies.currency_code%TYPE
217 ,p_x_due_now_total_detail_tbl IN OUT NOCOPY AR_VIEW_TERM_GRP.amounts_table
218 ,x_due_now_total_summary_rec OUT NOCOPY AR_VIEW_TERM_GRP.summary_amounts_rec
219 ,x_return_status OUT NOCOPY VARCHAR2
220 ,x_msg_count OUT NOCOPY NUMBER
221 ,x_msg_data OUT NOCOPY VARCHAR2
222 );
223
224
225 ----------------------------------------------------------------------------------------------------
226 -- New procedure to get pay now amounts for a sales order
227 ----------------------------------------------------------------------------------------------------
228 PROCEDURE Get_Pay_Now_Amounts
229 (p_header_id IN NUMBER DEFAULT NULL
230 ,p_line_id IN NUMBER DEFAULT NULL
231 ,p_exc_inv_lines IN VARCHAR2 DEFAULT NULL
232 ,x_pay_now_subtotal OUT NOCOPY NUMBER
233 ,x_pay_now_tax OUT NOCOPY NUMBER
234 ,x_pay_now_charges OUT NOCOPY NUMBER
235 ,x_pay_now_total OUT NOCOPY NUMBER
236 ,x_pay_now_commitment OUT NOCOPY NUMBER
237 ,x_msg_count OUT NOCOPY NUMBER
238 ,x_msg_data OUT NOCOPY VARCHAR2
239 ,x_return_status OUT NOCOPY VARCHAR2
240 );
241
242 --pnpl end
243
244 END OE_PrePayment_PVT ;
245