[Home] [Help]
PACKAGE BODY: APPS.APRX_C_PY
Source
1 package body aprx_c_py as
2 /* $Header: aprxcpyb.pls 120.6.12020000.2 2012/07/13 13:56:22 mkmeda ship $ */
3
4 procedure payment_register_run(
5 errbuf out NOCOPY varchar2,
6 retcode out NOCOPY varchar2,
7 argument1 in varchar2, -- payment_date_start
8 argument2 in varchar2, -- payment_date_end
9 argument3 in varchar2, -- payment_type_flag
10 argument4 in varchar2 default 'N', -- debug_flag
11 argument5 in varchar2 default 'N', -- sql_trace
12 argument6 in varchar2 default null,
13 argument7 in varchar2 default null,
14 argument8 in number, /* ledger_id , bug8760710 */
15 argument9 in number, /* org_id, bug13941628 */
16 argument10 in varchar2 default null,
17 argument11 in varchar2 default null,
18 argument12 in varchar2 default null,
19 argument13 in varchar2 default null,
20 argument14 in varchar2 default null,
21 argument15 in varchar2 default null,
22 argument16 in varchar2 default null,
23 argument17 in varchar2 default null,
24 argument18 in varchar2 default null,
25 argument19 in varchar2 default null,
26 argument20 in varchar2 default null,
27 argument21 in varchar2 default null,
28 argument22 in varchar2 default null,
29 argument23 in varchar2 default null,
30 argument24 in varchar2 default null,
31 argument25 in varchar2 default null,
32 argument26 in varchar2 default null,
33 argument27 in varchar2 default null,
34 argument28 in varchar2 default null,
35 argument29 in varchar2 default null,
36 argument30 in varchar2 default null,
37 argument31 in varchar2 default null,
38 argument32 in varchar2 default null,
39 argument33 in varchar2 default null,
40 argument34 in varchar2 default null,
41 argument35 in varchar2 default null,
42 argument36 in varchar2 default null,
43 argument37 in varchar2 default null,
44 argument38 in varchar2 default null,
45 argument39 in varchar2 default null,
46 argument40 in varchar2 default null,
47 argument41 in varchar2 default null,
48 argument42 in varchar2 default null,
49 argument43 in varchar2 default null,
50 argument44 in varchar2 default null,
51 argument45 in varchar2 default null,
52 argument46 in varchar2 default null,
53 argument47 in varchar2 default null,
54 argument48 in varchar2 default null,
55 argument49 in varchar2 default null,
56 argument50 in varchar2 default null,
57 argument51 in varchar2 default null,
58 argument52 in varchar2 default null,
59 argument53 in varchar2 default null,
60 argument54 in varchar2 default null,
61 argument55 in varchar2 default null,
62 argument56 in varchar2 default null,
63 argument57 in varchar2 default null,
64 argument58 in varchar2 default null,
65 argument59 in varchar2 default null,
66 argument60 in varchar2 default null,
67 argument61 in varchar2 default null,
68 argument62 in varchar2 default null,
69 argument63 in varchar2 default null,
70 argument64 in varchar2 default null,
71 argument65 in varchar2 default null,
72 argument66 in varchar2 default null,
73 argument67 in varchar2 default null,
74 argument68 in varchar2 default null,
75 argument69 in varchar2 default null,
76 argument70 in varchar2 default null,
77 argument71 in varchar2 default null,
78 argument72 in varchar2 default null,
79 argument73 in varchar2 default null,
80 argument74 in varchar2 default null,
81 argument75 in varchar2 default null,
82 argument76 in varchar2 default null,
83 argument77 in varchar2 default null,
84 argument78 in varchar2 default null,
85 argument79 in varchar2 default null,
86 argument80 in varchar2 default null,
87 argument81 in varchar2 default null,
88 argument82 in varchar2 default null,
89 argument83 in varchar2 default null,
90 argument84 in varchar2 default null,
91 argument85 in varchar2 default null,
92 argument86 in varchar2 default null,
93 argument87 in varchar2 default null,
94 argument88 in varchar2 default null,
95 argument89 in varchar2 default null,
96 argument90 in varchar2 default null,
97 argument91 in varchar2 default null,
98 argument92 in varchar2 default null,
99 argument93 in varchar2 default null,
100 argument94 in varchar2 default null,
101 argument95 in varchar2 default null,
102 argument96 in varchar2 default null,
103 argument97 in varchar2 default null,
104 argument98 in varchar2 default null,
105 argument99 in varchar2 default null,
106 argument100 in varchar2 default null)
107 is
108 l_request_id number;
109 debug_flag varchar2(1);
110 sql_trace varchar2(1);
111
112 l_payment_date_start date;
113 l_payment_date_end date;
114 l_payment_type_flag varchar2(25);
115 l_ledger_id number; /* 8760710 */
116 l_org_id number; /* bug 13941628 */
117
118 begin
119 --
120 -- Assign parameters doing any necessary mappings
121 -- e.g. date/number conversion
122 l_request_id := fnd_global.conc_request_id;
123 l_payment_date_start := to_date(argument1, 'YYYY/MM/DD HH24:MI:SS');
124 l_payment_date_end := to_date(argument2, 'YYYY/MM/DD HH24:MI:SS');
125 l_payment_type_flag := argument3;
126 l_ledger_id := argument8; /* 8760710 */
127 l_org_id := argument9; /* bug 13941628 */
128 debug_flag := upper(substrb(argument4,1,1));
129 sql_trace := upper(substrb(argument5,1,1));
130
131 --
132 -- SQL Trace switches and debug flags are optional
133 -- but highly recommended.
134 if sql_trace = 'Y' then
135 fa_rx_util_pkg.enable_trace;
136 end if;
137 if debug_flag = 'Y' then
138 fa_rx_util_pkg.enable_debug;
139 end if;
140
141 --
142 -- Run report
143 aprx_py.payment_register_run(
144 l_payment_date_start,
145 l_payment_date_end,
146 null, -- Curreny code
147 null, -- Bank Account name
148 null, -- Payment Method
149 l_payment_type_flag,
150 l_ledger_id, /* 8760710 */
151 l_org_id, /* bug 13941628 */
152 l_request_id,
153 retcode,
154 errbuf);
155 end payment_register_run;
156
157
158
159 procedure payment_actual_run(
160 errbuf out NOCOPY varchar2,
161 retcode out NOCOPY varchar2,
162 argument1 in varchar2, -- payment_date_start
163 argument2 in varchar2, -- payment_date_end
164 argument3 in varchar2, -- payment_currency_code
165 argument4 in varchar2, -- payment_bank_account_name
166 argument5 in varchar2, -- payment_method
167 argument6 in varchar2 default 'N', -- debug_flag
168 argument7 in varchar2 default 'N', -- sql_trace
169 argument8 in varchar2 default null,
170 argument9 in number, /* ledger_id Added for bug#9475295*/
171 argument10 in varchar2 default null, /* Added for bug#9475295 */
172 argument11 in varchar2 default null,
173 argument12 in varchar2 default null,
174 argument13 in varchar2 default null,
175 argument14 in varchar2 default null,
176 argument15 in varchar2 default null,
177 argument16 in varchar2 default null,
178 argument17 in varchar2 default null,
179 argument18 in varchar2 default null,
180 argument19 in varchar2 default null,
181 argument20 in varchar2 default null,
182 argument21 in varchar2 default null,
183 argument22 in varchar2 default null,
184 argument23 in varchar2 default null,
185 argument24 in varchar2 default null,
186 argument25 in varchar2 default null,
187 argument26 in varchar2 default null,
188 argument27 in varchar2 default null,
189 argument28 in varchar2 default null,
190 argument29 in varchar2 default null,
191 argument30 in varchar2 default null,
192 argument31 in varchar2 default null,
193 argument32 in varchar2 default null,
194 argument33 in varchar2 default null,
195 argument34 in varchar2 default null,
196 argument35 in varchar2 default null,
197 argument36 in varchar2 default null,
198 argument37 in varchar2 default null,
199 argument38 in varchar2 default null,
200 argument39 in varchar2 default null,
201 argument40 in varchar2 default null,
202 argument41 in varchar2 default null,
203 argument42 in varchar2 default null,
204 argument43 in varchar2 default null,
205 argument44 in varchar2 default null,
206 argument45 in varchar2 default null,
207 argument46 in varchar2 default null,
208 argument47 in varchar2 default null,
209 argument48 in varchar2 default null,
210 argument49 in varchar2 default null,
211 argument50 in varchar2 default null,
212 argument51 in varchar2 default null,
213 argument52 in varchar2 default null,
214 argument53 in varchar2 default null,
215 argument54 in varchar2 default null,
216 argument55 in varchar2 default null,
217 argument56 in varchar2 default null,
218 argument57 in varchar2 default null,
219 argument58 in varchar2 default null,
220 argument59 in varchar2 default null,
221 argument60 in varchar2 default null,
222 argument61 in varchar2 default null,
223 argument62 in varchar2 default null,
224 argument63 in varchar2 default null,
225 argument64 in varchar2 default null,
226 argument65 in varchar2 default null,
227 argument66 in varchar2 default null,
228 argument67 in varchar2 default null,
229 argument68 in varchar2 default null,
230 argument69 in varchar2 default null,
231 argument70 in varchar2 default null,
232 argument71 in varchar2 default null,
233 argument72 in varchar2 default null,
234 argument73 in varchar2 default null,
235 argument74 in varchar2 default null,
236 argument75 in varchar2 default null,
237 argument76 in varchar2 default null,
238 argument77 in varchar2 default null,
239 argument78 in varchar2 default null,
240 argument79 in varchar2 default null,
241 argument80 in varchar2 default null,
242 argument81 in varchar2 default null,
243 argument82 in varchar2 default null,
244 argument83 in varchar2 default null,
245 argument84 in varchar2 default null,
246 argument85 in varchar2 default null,
247 argument86 in varchar2 default null,
248 argument87 in varchar2 default null,
249 argument88 in varchar2 default null,
250 argument89 in varchar2 default null,
251 argument90 in varchar2 default null,
252 argument91 in varchar2 default null,
253 argument92 in varchar2 default null,
254 argument93 in varchar2 default null,
255 argument94 in varchar2 default null,
256 argument95 in varchar2 default null,
257 argument96 in varchar2 default null,
258 argument97 in varchar2 default null,
259 argument98 in varchar2 default null,
260 argument99 in varchar2 default null,
261 argument100 in varchar2 default null)
262 is
263 l_request_id number;
264 debug_flag varchar2(1);
265 sql_trace varchar2(1);
266
267 l_payment_date_start date;
268 l_payment_date_end date;
269 l_payment_currency_code varchar2(15);
270 l_payment_bank_account_name varchar2(80);
271 l_payment_method varchar2(25);
272 l_payment_actual_date varchar2(20);
273 l_ledger_id number; /* bug8760710 */
274 begin
275 --
276 -- Assign parameters doing any necessary mappings
277 -- e.g. date/number conversion
278 l_request_id := fnd_global.conc_request_id;
279 l_payment_date_start := to_date(argument1, 'YYYY/MM/DD HH24:MI:SS');
280 l_payment_date_end := to_date(argument2, 'YYYY/MM/DD HH24:MI:SS');
281 l_payment_currency_code := argument3;
282 l_payment_bank_account_name := argument4;
283 l_ledger_id := argument9; /* Changed from argument10 to argument9 for bug#9475295 */
284 l_payment_method := argument5;
285 debug_flag := upper(substrb(argument6,1,1));
286 sql_trace := upper(substrb(argument7,1,1));
287
288 --
292 fa_rx_util_pkg.enable_trace;
289 -- SQL Trace switches and debug flags are optional
290 -- but highly recommended.
291 if sql_trace = 'Y' then
293 end if;
294 if debug_flag = 'Y' then
295 fa_rx_util_pkg.enable_debug;
296 end if;
297
298 --
299 -- Run report
300 aprx_py.payment_actual_run(
301 l_payment_date_start,
302 l_payment_date_end,
303 l_payment_currency_code,
304 l_payment_bank_account_name,
305 l_payment_method,
306 NULL, -- Payment type
307 l_ledger_id , /* bug8760710 */
308 l_request_id,
309 retcode,
310 errbuf);
311
312 end payment_actual_run;
313
314
315 end aprx_c_py;