[Home] [Help]
PACKAGE BODY: APPS.APRX_C_PY
Source
1 package body aprx_c_py as
2 /* $Header: aprxcpyb.pls 120.4 2004/10/29 18:55:42 pjena noship $ */
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 varchar2 default null,
15 argument9 in varchar2 default null,
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 begin
116 --
117 -- Assign parameters doing any necessary mappings
118 -- e.g. date/number conversion
119 l_request_id := fnd_global.conc_request_id;
120 l_payment_date_start := to_date(argument1, 'YYYY/MM/DD HH24:MI:SS');
121 l_payment_date_end := to_date(argument2, 'YYYY/MM/DD HH24:MI:SS');
122 l_payment_type_flag := argument3;
123 debug_flag := upper(substrb(argument4,1,1));
124 sql_trace := upper(substrb(argument5,1,1));
125
126 --
127 -- SQL Trace switches and debug flags are optional
128 -- but highly recommended.
129 if sql_trace = 'Y' then
130 fa_rx_util_pkg.enable_trace;
131 end if;
132 if debug_flag = 'Y' then
133 fa_rx_util_pkg.enable_debug;
134 end if;
135
136 --
137 -- Run report
138 aprx_py.payment_register_run(
139 l_payment_date_start,
140 l_payment_date_end,
141 null, -- Curreny code
142 null, -- Bank Account name
143 null, -- Payment Method
144 l_payment_type_flag,
145 l_request_id,
146 retcode,
147 errbuf);
148 end payment_register_run;
149
150
151 procedure payment_actual_run(
152 errbuf out NOCOPY varchar2,
153 retcode out NOCOPY varchar2,
154 argument1 in varchar2, -- payment_date_start
155 argument2 in varchar2, -- payment_date_end
156 argument3 in varchar2, -- payment_currency_code
157 argument4 in varchar2, -- payment_bank_account_name
158 argument5 in varchar2, -- payment_method
159 argument6 in varchar2 default 'N', -- debug_flag
160 argument7 in varchar2 default 'N', -- sql_trace
161 argument8 in varchar2 default null,
162 argument9 in varchar2 default null,
163 argument10 in varchar2 default null,
164 argument11 in varchar2 default null,
165 argument12 in varchar2 default null,
166 argument13 in varchar2 default null,
167 argument14 in varchar2 default null,
168 argument15 in varchar2 default null,
169 argument16 in varchar2 default null,
170 argument17 in varchar2 default null,
171 argument18 in varchar2 default null,
172 argument19 in varchar2 default null,
173 argument20 in varchar2 default null,
174 argument21 in varchar2 default null,
175 argument22 in varchar2 default null,
176 argument23 in varchar2 default null,
177 argument24 in varchar2 default null,
178 argument25 in varchar2 default null,
179 argument26 in varchar2 default null,
180 argument27 in varchar2 default null,
181 argument28 in varchar2 default null,
182 argument29 in varchar2 default null,
183 argument30 in varchar2 default null,
184 argument31 in varchar2 default null,
185 argument32 in varchar2 default null,
186 argument33 in varchar2 default null,
187 argument34 in varchar2 default null,
188 argument35 in varchar2 default null,
189 argument36 in varchar2 default null,
190 argument37 in varchar2 default null,
191 argument38 in varchar2 default null,
192 argument39 in varchar2 default null,
193 argument40 in varchar2 default null,
194 argument41 in varchar2 default null,
195 argument42 in varchar2 default null,
196 argument43 in varchar2 default null,
197 argument44 in varchar2 default null,
198 argument45 in varchar2 default null,
199 argument46 in varchar2 default null,
200 argument47 in varchar2 default null,
201 argument48 in varchar2 default null,
202 argument49 in varchar2 default null,
203 argument50 in varchar2 default null,
204 argument51 in varchar2 default null,
205 argument52 in varchar2 default null,
206 argument53 in varchar2 default null,
207 argument54 in varchar2 default null,
208 argument55 in varchar2 default null,
209 argument56 in varchar2 default null,
210 argument57 in varchar2 default null,
211 argument58 in varchar2 default null,
212 argument59 in varchar2 default null,
213 argument60 in varchar2 default null,
214 argument61 in varchar2 default null,
215 argument62 in varchar2 default null,
216 argument63 in varchar2 default null,
217 argument64 in varchar2 default null,
218 argument65 in varchar2 default null,
219 argument66 in varchar2 default null,
220 argument67 in varchar2 default null,
221 argument68 in varchar2 default null,
222 argument69 in varchar2 default null,
223 argument70 in varchar2 default null,
224 argument71 in varchar2 default null,
225 argument72 in varchar2 default null,
226 argument73 in varchar2 default null,
227 argument74 in varchar2 default null,
228 argument75 in varchar2 default null,
229 argument76 in varchar2 default null,
230 argument77 in varchar2 default null,
231 argument78 in varchar2 default null,
232 argument79 in varchar2 default null,
233 argument80 in varchar2 default null,
234 argument81 in varchar2 default null,
235 argument82 in varchar2 default null,
236 argument83 in varchar2 default null,
237 argument84 in varchar2 default null,
238 argument85 in varchar2 default null,
239 argument86 in varchar2 default null,
240 argument87 in varchar2 default null,
241 argument88 in varchar2 default null,
242 argument89 in varchar2 default null,
243 argument90 in varchar2 default null,
244 argument91 in varchar2 default null,
245 argument92 in varchar2 default null,
246 argument93 in varchar2 default null,
247 argument94 in varchar2 default null,
248 argument95 in varchar2 default null,
249 argument96 in varchar2 default null,
250 argument97 in varchar2 default null,
251 argument98 in varchar2 default null,
252 argument99 in varchar2 default null,
253 argument100 in varchar2 default null)
254 is
255 l_request_id number;
256 debug_flag varchar2(1);
257 sql_trace varchar2(1);
258
259 l_payment_date_start date;
260 l_payment_date_end date;
261 l_payment_currency_code varchar2(15);
262 l_payment_bank_account_name varchar2(80);
263 l_payment_method varchar2(25);
264 l_payment_actual_date varchar2(20);
265 begin
266 --
267 -- Assign parameters doing any necessary mappings
268 -- e.g. date/number conversion
269 l_request_id := fnd_global.conc_request_id;
270 l_payment_date_start := to_date(argument1, 'YYYY/MM/DD HH24:MI:SS');
271 l_payment_date_end := to_date(argument2, 'YYYY/MM/DD HH24:MI:SS');
272 l_payment_currency_code := argument3;
273 l_payment_bank_account_name := argument4;
274 l_payment_method := argument5;
275 debug_flag := upper(substrb(argument6,1,1));
276 sql_trace := upper(substrb(argument7,1,1));
277
278 --
279 -- SQL Trace switches and debug flags are optional
280 -- but highly recommended.
281 if sql_trace = 'Y' then
282 fa_rx_util_pkg.enable_trace;
283 end if;
284 if debug_flag = 'Y' then
285 fa_rx_util_pkg.enable_debug;
286 end if;
287
288 --
289 -- Run report
290 aprx_py.payment_actual_run(
291 l_payment_date_start,
292 l_payment_date_end,
293 l_payment_currency_code,
294 l_payment_bank_account_name,
295 l_payment_method,
296 NULL, -- Payment type
297 l_request_id,
298 retcode,
299 errbuf);
300
301 end payment_actual_run;
302
303
304 end aprx_c_py;