[Home] [Help]
PACKAGE BODY: APPS.OKL_SIF_FEES_PUB_W
Source
1 package body okl_sif_fees_pub_w as
2 /* $Header: OKLUSFEB.pls 120.3 2005/10/11 06:39:47 rgooty noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure insert_sif_fees(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , x_return_status out nocopy VARCHAR2
25 , x_msg_count out nocopy NUMBER
26 , x_msg_data out nocopy VARCHAR2
27 , p6_a0 out nocopy NUMBER
28 , p6_a1 out nocopy VARCHAR2
29 , p6_a2 out nocopy DATE
30 , p6_a3 out nocopy DATE
31 , p6_a4 out nocopy NUMBER
32 , p6_a5 out nocopy VARCHAR2
33 , p6_a6 out nocopy VARCHAR2
34 , p6_a7 out nocopy VARCHAR2
35 , p6_a8 out nocopy NUMBER
36 , p6_a9 out nocopy NUMBER
37 , p6_a10 out nocopy VARCHAR2
38 , p6_a11 out nocopy VARCHAR2
39 , p6_a12 out nocopy VARCHAR2
40 , p6_a13 out nocopy VARCHAR2
41 , p6_a14 out nocopy NUMBER
42 , p6_a15 out nocopy NUMBER
43 , p6_a16 out nocopy NUMBER
44 , p6_a17 out nocopy NUMBER
45 , p6_a18 out nocopy NUMBER
46 , p6_a19 out nocopy NUMBER
47 , p6_a20 out nocopy VARCHAR2
48 , p6_a21 out nocopy VARCHAR2
49 , p6_a22 out nocopy NUMBER
50 , p6_a23 out nocopy NUMBER
51 , p6_a24 out nocopy VARCHAR2
52 , p6_a25 out nocopy VARCHAR2
53 , p6_a26 out nocopy VARCHAR2
54 , p6_a27 out nocopy VARCHAR2
55 , p6_a28 out nocopy VARCHAR2
56 , p6_a29 out nocopy VARCHAR2
57 , p6_a30 out nocopy VARCHAR2
58 , p6_a31 out nocopy VARCHAR2
59 , p6_a32 out nocopy VARCHAR2
60 , p6_a33 out nocopy VARCHAR2
61 , p6_a34 out nocopy VARCHAR2
62 , p6_a35 out nocopy VARCHAR2
63 , p6_a36 out nocopy VARCHAR2
64 , p6_a37 out nocopy VARCHAR2
65 , p6_a38 out nocopy VARCHAR2
66 , p6_a39 out nocopy VARCHAR2
67 , p6_a40 out nocopy VARCHAR2
68 , p6_a41 out nocopy VARCHAR2
69 , p6_a42 out nocopy VARCHAR2
70 , p6_a43 out nocopy VARCHAR2
71 , p6_a44 out nocopy VARCHAR2
72 , p6_a45 out nocopy VARCHAR2
73 , p6_a46 out nocopy VARCHAR2
74 , p6_a47 out nocopy VARCHAR2
75 , p6_a48 out nocopy VARCHAR2
76 , p6_a49 out nocopy NUMBER
77 , p6_a50 out nocopy NUMBER
78 , p6_a51 out nocopy DATE
79 , p6_a52 out nocopy DATE
80 , p6_a53 out nocopy NUMBER
81 , p6_a54 out nocopy NUMBER
82 , p5_a0 NUMBER := 0-1962.0724
83 , p5_a1 VARCHAR2 := fnd_api.g_miss_char
84 , p5_a2 DATE := fnd_api.g_miss_date
85 , p5_a3 DATE := fnd_api.g_miss_date
86 , p5_a4 NUMBER := 0-1962.0724
87 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
88 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
89 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
90 , p5_a8 NUMBER := 0-1962.0724
91 , p5_a9 NUMBER := 0-1962.0724
92 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
93 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
94 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
95 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
96 , p5_a14 NUMBER := 0-1962.0724
97 , p5_a15 NUMBER := 0-1962.0724
98 , p5_a16 NUMBER := 0-1962.0724
99 , p5_a17 NUMBER := 0-1962.0724
100 , p5_a18 NUMBER := 0-1962.0724
101 , p5_a19 NUMBER := 0-1962.0724
102 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
103 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
104 , p5_a22 NUMBER := 0-1962.0724
105 , p5_a23 NUMBER := 0-1962.0724
106 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
107 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
108 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
109 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
110 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
111 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
112 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
113 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
114 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
115 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
116 , p5_a34 VARCHAR2 := fnd_api.g_miss_char
117 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
118 , p5_a36 VARCHAR2 := fnd_api.g_miss_char
119 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
120 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
121 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
122 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
123 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
124 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
125 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
126 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
127 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
128 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
129 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
130 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
131 , p5_a49 NUMBER := 0-1962.0724
132 , p5_a50 NUMBER := 0-1962.0724
133 , p5_a51 DATE := fnd_api.g_miss_date
134 , p5_a52 DATE := fnd_api.g_miss_date
135 , p5_a53 NUMBER := 0-1962.0724
136 , p5_a54 NUMBER := 0-1962.0724
137 )
138
139 as
140 ddp_sfev_rec okl_sif_fees_pub.sfev_rec_type;
141 ddx_sfev_rec okl_sif_fees_pub.sfev_rec_type;
142 ddindx binary_integer; indx binary_integer;
143 begin
144
145 -- copy data to the local IN or IN-OUT args, if any
146
147
148
149
150
151 ddp_sfev_rec.id := rosetta_g_miss_num_map(p5_a0);
152 ddp_sfev_rec.sfe_type := p5_a1;
153 ddp_sfev_rec.date_start := rosetta_g_miss_date_in_map(p5_a2);
154 ddp_sfev_rec.date_paid := rosetta_g_miss_date_in_map(p5_a3);
155 ddp_sfev_rec.amount := rosetta_g_miss_num_map(p5_a4);
156 ddp_sfev_rec.idc_accounting_flag := p5_a5;
157 ddp_sfev_rec.income_or_expense := p5_a6;
158 ddp_sfev_rec.description := p5_a7;
159 ddp_sfev_rec.fee_index_number := rosetta_g_miss_num_map(p5_a8);
160 ddp_sfev_rec.level_index_number := rosetta_g_miss_num_map(p5_a9);
161 ddp_sfev_rec.advance_or_arrears := p5_a10;
162 ddp_sfev_rec.level_type := p5_a11;
163 ddp_sfev_rec.lock_level_step := p5_a12;
164 ddp_sfev_rec.period := p5_a13;
165 ddp_sfev_rec.number_of_periods := rosetta_g_miss_num_map(p5_a14);
166 ddp_sfev_rec.level_line_number := rosetta_g_miss_num_map(p5_a15);
167 ddp_sfev_rec.sif_id := rosetta_g_miss_num_map(p5_a16);
168 ddp_sfev_rec.kle_id := rosetta_g_miss_num_map(p5_a17);
169 ddp_sfev_rec.sil_id := rosetta_g_miss_num_map(p5_a18);
170 ddp_sfev_rec.rate := rosetta_g_miss_num_map(p5_a19);
171 ddp_sfev_rec.query_level_yn := p5_a20;
172 ddp_sfev_rec.structure := p5_a21;
173 ddp_sfev_rec.days_in_period := rosetta_g_miss_num_map(p5_a22);
174 ddp_sfev_rec.object_version_number := rosetta_g_miss_num_map(p5_a23);
175 ddp_sfev_rec.cash_effect_yn := p5_a24;
176 ddp_sfev_rec.tax_effect_yn := p5_a25;
177 ddp_sfev_rec.days_in_month := p5_a26;
178 ddp_sfev_rec.days_in_year := p5_a27;
179 ddp_sfev_rec.balance_type_code := p5_a28;
180 ddp_sfev_rec.stream_interface_attribute01 := p5_a29;
181 ddp_sfev_rec.stream_interface_attribute02 := p5_a30;
182 ddp_sfev_rec.stream_interface_attribute03 := p5_a31;
183 ddp_sfev_rec.stream_interface_attribute04 := p5_a32;
184 ddp_sfev_rec.stream_interface_attribute05 := p5_a33;
185 ddp_sfev_rec.stream_interface_attribute06 := p5_a34;
186 ddp_sfev_rec.stream_interface_attribute07 := p5_a35;
187 ddp_sfev_rec.stream_interface_attribute08 := p5_a36;
188 ddp_sfev_rec.stream_interface_attribute09 := p5_a37;
189 ddp_sfev_rec.stream_interface_attribute10 := p5_a38;
190 ddp_sfev_rec.stream_interface_attribute11 := p5_a39;
191 ddp_sfev_rec.stream_interface_attribute12 := p5_a40;
192 ddp_sfev_rec.stream_interface_attribute13 := p5_a41;
193 ddp_sfev_rec.stream_interface_attribute14 := p5_a42;
194 ddp_sfev_rec.stream_interface_attribute15 := p5_a43;
195 ddp_sfev_rec.stream_interface_attribute16 := p5_a44;
196 ddp_sfev_rec.stream_interface_attribute17 := p5_a45;
197 ddp_sfev_rec.stream_interface_attribute18 := p5_a46;
198 ddp_sfev_rec.stream_interface_attribute19 := p5_a47;
199 ddp_sfev_rec.stream_interface_attribute20 := p5_a48;
200 ddp_sfev_rec.created_by := rosetta_g_miss_num_map(p5_a49);
201 ddp_sfev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a50);
202 ddp_sfev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
203 ddp_sfev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
204 ddp_sfev_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
205 ddp_sfev_rec.down_payment_amount := rosetta_g_miss_num_map(p5_a54);
206
207
208 -- here's the delegated call to the old PL/SQL routine
209 okl_sif_fees_pub.insert_sif_fees(p_api_version,
210 p_init_msg_list,
211 x_return_status,
212 x_msg_count,
213 x_msg_data,
214 ddp_sfev_rec,
215 ddx_sfev_rec);
216
217 -- copy data back from the local variables to OUT or IN-OUT args, if any
218
219
220
221
222
223
224 p6_a0 := rosetta_g_miss_num_map(ddx_sfev_rec.id);
225 p6_a1 := ddx_sfev_rec.sfe_type;
226 p6_a2 := ddx_sfev_rec.date_start;
227 p6_a3 := ddx_sfev_rec.date_paid;
228 p6_a4 := rosetta_g_miss_num_map(ddx_sfev_rec.amount);
229 p6_a5 := ddx_sfev_rec.idc_accounting_flag;
230 p6_a6 := ddx_sfev_rec.income_or_expense;
231 p6_a7 := ddx_sfev_rec.description;
232 p6_a8 := rosetta_g_miss_num_map(ddx_sfev_rec.fee_index_number);
233 p6_a9 := rosetta_g_miss_num_map(ddx_sfev_rec.level_index_number);
234 p6_a10 := ddx_sfev_rec.advance_or_arrears;
235 p6_a11 := ddx_sfev_rec.level_type;
236 p6_a12 := ddx_sfev_rec.lock_level_step;
237 p6_a13 := ddx_sfev_rec.period;
238 p6_a14 := rosetta_g_miss_num_map(ddx_sfev_rec.number_of_periods);
239 p6_a15 := rosetta_g_miss_num_map(ddx_sfev_rec.level_line_number);
240 p6_a16 := rosetta_g_miss_num_map(ddx_sfev_rec.sif_id);
241 p6_a17 := rosetta_g_miss_num_map(ddx_sfev_rec.kle_id);
242 p6_a18 := rosetta_g_miss_num_map(ddx_sfev_rec.sil_id);
243 p6_a19 := rosetta_g_miss_num_map(ddx_sfev_rec.rate);
244 p6_a20 := ddx_sfev_rec.query_level_yn;
245 p6_a21 := ddx_sfev_rec.structure;
246 p6_a22 := rosetta_g_miss_num_map(ddx_sfev_rec.days_in_period);
247 p6_a23 := rosetta_g_miss_num_map(ddx_sfev_rec.object_version_number);
248 p6_a24 := ddx_sfev_rec.cash_effect_yn;
249 p6_a25 := ddx_sfev_rec.tax_effect_yn;
250 p6_a26 := ddx_sfev_rec.days_in_month;
251 p6_a27 := ddx_sfev_rec.days_in_year;
252 p6_a28 := ddx_sfev_rec.balance_type_code;
253 p6_a29 := ddx_sfev_rec.stream_interface_attribute01;
254 p6_a30 := ddx_sfev_rec.stream_interface_attribute02;
255 p6_a31 := ddx_sfev_rec.stream_interface_attribute03;
256 p6_a32 := ddx_sfev_rec.stream_interface_attribute04;
257 p6_a33 := ddx_sfev_rec.stream_interface_attribute05;
258 p6_a34 := ddx_sfev_rec.stream_interface_attribute06;
259 p6_a35 := ddx_sfev_rec.stream_interface_attribute07;
260 p6_a36 := ddx_sfev_rec.stream_interface_attribute08;
261 p6_a37 := ddx_sfev_rec.stream_interface_attribute09;
262 p6_a38 := ddx_sfev_rec.stream_interface_attribute10;
263 p6_a39 := ddx_sfev_rec.stream_interface_attribute11;
264 p6_a40 := ddx_sfev_rec.stream_interface_attribute12;
265 p6_a41 := ddx_sfev_rec.stream_interface_attribute13;
266 p6_a42 := ddx_sfev_rec.stream_interface_attribute14;
267 p6_a43 := ddx_sfev_rec.stream_interface_attribute15;
268 p6_a44 := ddx_sfev_rec.stream_interface_attribute16;
269 p6_a45 := ddx_sfev_rec.stream_interface_attribute17;
270 p6_a46 := ddx_sfev_rec.stream_interface_attribute18;
271 p6_a47 := ddx_sfev_rec.stream_interface_attribute19;
272 p6_a48 := ddx_sfev_rec.stream_interface_attribute20;
273 p6_a49 := rosetta_g_miss_num_map(ddx_sfev_rec.created_by);
274 p6_a50 := rosetta_g_miss_num_map(ddx_sfev_rec.last_updated_by);
275 p6_a51 := ddx_sfev_rec.creation_date;
276 p6_a52 := ddx_sfev_rec.last_update_date;
277 p6_a53 := rosetta_g_miss_num_map(ddx_sfev_rec.last_update_login);
278 p6_a54 := rosetta_g_miss_num_map(ddx_sfev_rec.down_payment_amount);
279 end;
280
281 procedure insert_sif_fees(p_api_version NUMBER
282 , p_init_msg_list VARCHAR2
283 , x_return_status out nocopy VARCHAR2
284 , x_msg_count out nocopy NUMBER
285 , x_msg_data out nocopy VARCHAR2
286 , p5_a0 JTF_NUMBER_TABLE
287 , p5_a1 JTF_VARCHAR2_TABLE_100
288 , p5_a2 JTF_DATE_TABLE
289 , p5_a3 JTF_DATE_TABLE
290 , p5_a4 JTF_NUMBER_TABLE
291 , p5_a5 JTF_VARCHAR2_TABLE_100
292 , p5_a6 JTF_VARCHAR2_TABLE_100
293 , p5_a7 JTF_VARCHAR2_TABLE_2000
294 , p5_a8 JTF_NUMBER_TABLE
295 , p5_a9 JTF_NUMBER_TABLE
296 , p5_a10 JTF_VARCHAR2_TABLE_100
297 , p5_a11 JTF_VARCHAR2_TABLE_100
298 , p5_a12 JTF_VARCHAR2_TABLE_100
299 , p5_a13 JTF_VARCHAR2_TABLE_100
300 , p5_a14 JTF_NUMBER_TABLE
301 , p5_a15 JTF_NUMBER_TABLE
302 , p5_a16 JTF_NUMBER_TABLE
303 , p5_a17 JTF_NUMBER_TABLE
304 , p5_a18 JTF_NUMBER_TABLE
305 , p5_a19 JTF_NUMBER_TABLE
306 , p5_a20 JTF_VARCHAR2_TABLE_100
307 , p5_a21 JTF_VARCHAR2_TABLE_200
308 , p5_a22 JTF_NUMBER_TABLE
309 , p5_a23 JTF_NUMBER_TABLE
310 , p5_a24 JTF_VARCHAR2_TABLE_100
311 , p5_a25 JTF_VARCHAR2_TABLE_100
312 , p5_a26 JTF_VARCHAR2_TABLE_100
313 , p5_a27 JTF_VARCHAR2_TABLE_100
314 , p5_a28 JTF_VARCHAR2_TABLE_100
315 , p5_a29 JTF_VARCHAR2_TABLE_500
316 , p5_a30 JTF_VARCHAR2_TABLE_500
317 , p5_a31 JTF_VARCHAR2_TABLE_500
318 , p5_a32 JTF_VARCHAR2_TABLE_500
319 , p5_a33 JTF_VARCHAR2_TABLE_500
320 , p5_a34 JTF_VARCHAR2_TABLE_500
321 , p5_a35 JTF_VARCHAR2_TABLE_500
322 , p5_a36 JTF_VARCHAR2_TABLE_500
323 , p5_a37 JTF_VARCHAR2_TABLE_500
324 , p5_a38 JTF_VARCHAR2_TABLE_500
325 , p5_a39 JTF_VARCHAR2_TABLE_500
326 , p5_a40 JTF_VARCHAR2_TABLE_500
327 , p5_a41 JTF_VARCHAR2_TABLE_500
328 , p5_a42 JTF_VARCHAR2_TABLE_500
329 , p5_a43 JTF_VARCHAR2_TABLE_500
330 , p5_a44 JTF_VARCHAR2_TABLE_500
331 , p5_a45 JTF_VARCHAR2_TABLE_500
332 , p5_a46 JTF_VARCHAR2_TABLE_500
333 , p5_a47 JTF_VARCHAR2_TABLE_500
334 , p5_a48 JTF_VARCHAR2_TABLE_500
335 , p5_a49 JTF_NUMBER_TABLE
336 , p5_a50 JTF_NUMBER_TABLE
337 , p5_a51 JTF_DATE_TABLE
338 , p5_a52 JTF_DATE_TABLE
339 , p5_a53 JTF_NUMBER_TABLE
340 , p5_a54 JTF_NUMBER_TABLE
341 , p6_a0 out nocopy JTF_NUMBER_TABLE
342 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
343 , p6_a2 out nocopy JTF_DATE_TABLE
344 , p6_a3 out nocopy JTF_DATE_TABLE
345 , p6_a4 out nocopy JTF_NUMBER_TABLE
346 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
347 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
348 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
349 , p6_a8 out nocopy JTF_NUMBER_TABLE
350 , p6_a9 out nocopy JTF_NUMBER_TABLE
351 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
352 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
353 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
354 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
355 , p6_a14 out nocopy JTF_NUMBER_TABLE
356 , p6_a15 out nocopy JTF_NUMBER_TABLE
357 , p6_a16 out nocopy JTF_NUMBER_TABLE
358 , p6_a17 out nocopy JTF_NUMBER_TABLE
359 , p6_a18 out nocopy JTF_NUMBER_TABLE
360 , p6_a19 out nocopy JTF_NUMBER_TABLE
361 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
362 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
363 , p6_a22 out nocopy JTF_NUMBER_TABLE
364 , p6_a23 out nocopy JTF_NUMBER_TABLE
365 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_100
366 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_100
367 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_100
368 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
369 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_100
370 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
371 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
372 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
373 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
374 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
375 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
376 , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
377 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
378 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
379 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
380 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
381 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
382 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
383 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
384 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
385 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
386 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
387 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
388 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
389 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
390 , p6_a49 out nocopy JTF_NUMBER_TABLE
391 , p6_a50 out nocopy JTF_NUMBER_TABLE
392 , p6_a51 out nocopy JTF_DATE_TABLE
393 , p6_a52 out nocopy JTF_DATE_TABLE
394 , p6_a53 out nocopy JTF_NUMBER_TABLE
395 , p6_a54 out nocopy JTF_NUMBER_TABLE
396 )
397
398 as
399 ddp_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
400 ddx_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
401 ddindx binary_integer; indx binary_integer;
402 begin
403
404 -- copy data to the local IN or IN-OUT args, if any
405
406
407
408
409
410 okl_sfe_pvt_w.rosetta_table_copy_in_p5(ddp_sfev_tbl, p5_a0
411 , p5_a1
412 , p5_a2
413 , p5_a3
414 , p5_a4
415 , p5_a5
416 , p5_a6
417 , p5_a7
418 , p5_a8
419 , p5_a9
420 , p5_a10
421 , p5_a11
422 , p5_a12
423 , p5_a13
424 , p5_a14
425 , p5_a15
426 , p5_a16
427 , p5_a17
428 , p5_a18
429 , p5_a19
430 , p5_a20
431 , p5_a21
432 , p5_a22
433 , p5_a23
434 , p5_a24
435 , p5_a25
436 , p5_a26
437 , p5_a27
438 , p5_a28
439 , p5_a29
440 , p5_a30
441 , p5_a31
442 , p5_a32
443 , p5_a33
444 , p5_a34
445 , p5_a35
446 , p5_a36
447 , p5_a37
448 , p5_a38
449 , p5_a39
450 , p5_a40
451 , p5_a41
452 , p5_a42
453 , p5_a43
454 , p5_a44
455 , p5_a45
456 , p5_a46
457 , p5_a47
458 , p5_a48
459 , p5_a49
460 , p5_a50
461 , p5_a51
462 , p5_a52
463 , p5_a53
464 , p5_a54
465 );
466
467
468 -- here's the delegated call to the old PL/SQL routine
469 okl_sif_fees_pub.insert_sif_fees(p_api_version,
470 p_init_msg_list,
471 x_return_status,
472 x_msg_count,
473 x_msg_data,
474 ddp_sfev_tbl,
475 ddx_sfev_tbl);
476
477 -- copy data back from the local variables to OUT or IN-OUT args, if any
478
479
480
481
482
483
484 okl_sfe_pvt_w.rosetta_table_copy_out_p5(ddx_sfev_tbl, p6_a0
485 , p6_a1
486 , p6_a2
487 , p6_a3
488 , p6_a4
489 , p6_a5
490 , p6_a6
491 , p6_a7
492 , p6_a8
493 , p6_a9
494 , p6_a10
495 , p6_a11
496 , p6_a12
497 , p6_a13
498 , p6_a14
499 , p6_a15
500 , p6_a16
501 , p6_a17
502 , p6_a18
503 , p6_a19
504 , p6_a20
505 , p6_a21
506 , p6_a22
507 , p6_a23
508 , p6_a24
509 , p6_a25
510 , p6_a26
511 , p6_a27
512 , p6_a28
513 , p6_a29
514 , p6_a30
515 , p6_a31
516 , p6_a32
517 , p6_a33
518 , p6_a34
519 , p6_a35
520 , p6_a36
521 , p6_a37
522 , p6_a38
523 , p6_a39
524 , p6_a40
525 , p6_a41
526 , p6_a42
527 , p6_a43
528 , p6_a44
529 , p6_a45
530 , p6_a46
531 , p6_a47
532 , p6_a48
533 , p6_a49
534 , p6_a50
535 , p6_a51
536 , p6_a52
537 , p6_a53
538 , p6_a54
539 );
540 end;
541
542 procedure lock_sif_fees(p_api_version NUMBER
543 , p_init_msg_list VARCHAR2
544 , x_return_status out nocopy VARCHAR2
545 , x_msg_count out nocopy NUMBER
546 , x_msg_data out nocopy VARCHAR2
547 , p5_a0 NUMBER := 0-1962.0724
548 , p5_a1 VARCHAR2 := fnd_api.g_miss_char
549 , p5_a2 DATE := fnd_api.g_miss_date
550 , p5_a3 DATE := fnd_api.g_miss_date
551 , p5_a4 NUMBER := 0-1962.0724
552 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
553 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
554 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
555 , p5_a8 NUMBER := 0-1962.0724
556 , p5_a9 NUMBER := 0-1962.0724
557 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
558 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
559 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
560 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
561 , p5_a14 NUMBER := 0-1962.0724
562 , p5_a15 NUMBER := 0-1962.0724
563 , p5_a16 NUMBER := 0-1962.0724
564 , p5_a17 NUMBER := 0-1962.0724
565 , p5_a18 NUMBER := 0-1962.0724
566 , p5_a19 NUMBER := 0-1962.0724
567 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
568 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
569 , p5_a22 NUMBER := 0-1962.0724
570 , p5_a23 NUMBER := 0-1962.0724
571 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
572 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
573 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
574 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
575 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
576 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
577 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
578 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
579 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
580 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
581 , p5_a34 VARCHAR2 := fnd_api.g_miss_char
582 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
583 , p5_a36 VARCHAR2 := fnd_api.g_miss_char
584 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
585 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
586 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
587 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
588 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
589 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
590 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
591 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
592 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
593 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
594 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
595 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
596 , p5_a49 NUMBER := 0-1962.0724
597 , p5_a50 NUMBER := 0-1962.0724
598 , p5_a51 DATE := fnd_api.g_miss_date
599 , p5_a52 DATE := fnd_api.g_miss_date
600 , p5_a53 NUMBER := 0-1962.0724
601 , p5_a54 NUMBER := 0-1962.0724
602 )
603
604 as
605 ddp_sfev_rec okl_sif_fees_pub.sfev_rec_type;
606 ddindx binary_integer; indx binary_integer;
607 begin
608
609 -- copy data to the local IN or IN-OUT args, if any
610
611
612
613
614
615 ddp_sfev_rec.id := rosetta_g_miss_num_map(p5_a0);
616 ddp_sfev_rec.sfe_type := p5_a1;
617 ddp_sfev_rec.date_start := rosetta_g_miss_date_in_map(p5_a2);
618 ddp_sfev_rec.date_paid := rosetta_g_miss_date_in_map(p5_a3);
619 ddp_sfev_rec.amount := rosetta_g_miss_num_map(p5_a4);
620 ddp_sfev_rec.idc_accounting_flag := p5_a5;
621 ddp_sfev_rec.income_or_expense := p5_a6;
622 ddp_sfev_rec.description := p5_a7;
623 ddp_sfev_rec.fee_index_number := rosetta_g_miss_num_map(p5_a8);
624 ddp_sfev_rec.level_index_number := rosetta_g_miss_num_map(p5_a9);
625 ddp_sfev_rec.advance_or_arrears := p5_a10;
626 ddp_sfev_rec.level_type := p5_a11;
627 ddp_sfev_rec.lock_level_step := p5_a12;
628 ddp_sfev_rec.period := p5_a13;
629 ddp_sfev_rec.number_of_periods := rosetta_g_miss_num_map(p5_a14);
630 ddp_sfev_rec.level_line_number := rosetta_g_miss_num_map(p5_a15);
631 ddp_sfev_rec.sif_id := rosetta_g_miss_num_map(p5_a16);
632 ddp_sfev_rec.kle_id := rosetta_g_miss_num_map(p5_a17);
633 ddp_sfev_rec.sil_id := rosetta_g_miss_num_map(p5_a18);
634 ddp_sfev_rec.rate := rosetta_g_miss_num_map(p5_a19);
635 ddp_sfev_rec.query_level_yn := p5_a20;
636 ddp_sfev_rec.structure := p5_a21;
637 ddp_sfev_rec.days_in_period := rosetta_g_miss_num_map(p5_a22);
638 ddp_sfev_rec.object_version_number := rosetta_g_miss_num_map(p5_a23);
639 ddp_sfev_rec.cash_effect_yn := p5_a24;
640 ddp_sfev_rec.tax_effect_yn := p5_a25;
641 ddp_sfev_rec.days_in_month := p5_a26;
642 ddp_sfev_rec.days_in_year := p5_a27;
643 ddp_sfev_rec.balance_type_code := p5_a28;
644 ddp_sfev_rec.stream_interface_attribute01 := p5_a29;
645 ddp_sfev_rec.stream_interface_attribute02 := p5_a30;
646 ddp_sfev_rec.stream_interface_attribute03 := p5_a31;
647 ddp_sfev_rec.stream_interface_attribute04 := p5_a32;
648 ddp_sfev_rec.stream_interface_attribute05 := p5_a33;
649 ddp_sfev_rec.stream_interface_attribute06 := p5_a34;
650 ddp_sfev_rec.stream_interface_attribute07 := p5_a35;
651 ddp_sfev_rec.stream_interface_attribute08 := p5_a36;
652 ddp_sfev_rec.stream_interface_attribute09 := p5_a37;
653 ddp_sfev_rec.stream_interface_attribute10 := p5_a38;
654 ddp_sfev_rec.stream_interface_attribute11 := p5_a39;
655 ddp_sfev_rec.stream_interface_attribute12 := p5_a40;
656 ddp_sfev_rec.stream_interface_attribute13 := p5_a41;
657 ddp_sfev_rec.stream_interface_attribute14 := p5_a42;
658 ddp_sfev_rec.stream_interface_attribute15 := p5_a43;
659 ddp_sfev_rec.stream_interface_attribute16 := p5_a44;
660 ddp_sfev_rec.stream_interface_attribute17 := p5_a45;
661 ddp_sfev_rec.stream_interface_attribute18 := p5_a46;
662 ddp_sfev_rec.stream_interface_attribute19 := p5_a47;
663 ddp_sfev_rec.stream_interface_attribute20 := p5_a48;
664 ddp_sfev_rec.created_by := rosetta_g_miss_num_map(p5_a49);
665 ddp_sfev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a50);
666 ddp_sfev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
667 ddp_sfev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
668 ddp_sfev_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
669 ddp_sfev_rec.down_payment_amount := rosetta_g_miss_num_map(p5_a54);
670
671 -- here's the delegated call to the old PL/SQL routine
672 okl_sif_fees_pub.lock_sif_fees(p_api_version,
673 p_init_msg_list,
674 x_return_status,
675 x_msg_count,
676 x_msg_data,
677 ddp_sfev_rec);
678
679 -- copy data back from the local variables to OUT or IN-OUT args, if any
680
681
682
683
684
685 end;
686
687 procedure lock_sif_fees(p_api_version NUMBER
688 , p_init_msg_list VARCHAR2
689 , x_return_status out nocopy VARCHAR2
690 , x_msg_count out nocopy NUMBER
691 , x_msg_data out nocopy VARCHAR2
692 , p5_a0 JTF_NUMBER_TABLE
693 , p5_a1 JTF_VARCHAR2_TABLE_100
694 , p5_a2 JTF_DATE_TABLE
695 , p5_a3 JTF_DATE_TABLE
696 , p5_a4 JTF_NUMBER_TABLE
697 , p5_a5 JTF_VARCHAR2_TABLE_100
698 , p5_a6 JTF_VARCHAR2_TABLE_100
699 , p5_a7 JTF_VARCHAR2_TABLE_2000
700 , p5_a8 JTF_NUMBER_TABLE
701 , p5_a9 JTF_NUMBER_TABLE
702 , p5_a10 JTF_VARCHAR2_TABLE_100
703 , p5_a11 JTF_VARCHAR2_TABLE_100
704 , p5_a12 JTF_VARCHAR2_TABLE_100
705 , p5_a13 JTF_VARCHAR2_TABLE_100
706 , p5_a14 JTF_NUMBER_TABLE
707 , p5_a15 JTF_NUMBER_TABLE
708 , p5_a16 JTF_NUMBER_TABLE
709 , p5_a17 JTF_NUMBER_TABLE
710 , p5_a18 JTF_NUMBER_TABLE
711 , p5_a19 JTF_NUMBER_TABLE
712 , p5_a20 JTF_VARCHAR2_TABLE_100
713 , p5_a21 JTF_VARCHAR2_TABLE_200
714 , p5_a22 JTF_NUMBER_TABLE
715 , p5_a23 JTF_NUMBER_TABLE
716 , p5_a24 JTF_VARCHAR2_TABLE_100
717 , p5_a25 JTF_VARCHAR2_TABLE_100
718 , p5_a26 JTF_VARCHAR2_TABLE_100
719 , p5_a27 JTF_VARCHAR2_TABLE_100
720 , p5_a28 JTF_VARCHAR2_TABLE_100
721 , p5_a29 JTF_VARCHAR2_TABLE_500
722 , p5_a30 JTF_VARCHAR2_TABLE_500
723 , p5_a31 JTF_VARCHAR2_TABLE_500
724 , p5_a32 JTF_VARCHAR2_TABLE_500
725 , p5_a33 JTF_VARCHAR2_TABLE_500
726 , p5_a34 JTF_VARCHAR2_TABLE_500
727 , p5_a35 JTF_VARCHAR2_TABLE_500
728 , p5_a36 JTF_VARCHAR2_TABLE_500
729 , p5_a37 JTF_VARCHAR2_TABLE_500
730 , p5_a38 JTF_VARCHAR2_TABLE_500
731 , p5_a39 JTF_VARCHAR2_TABLE_500
732 , p5_a40 JTF_VARCHAR2_TABLE_500
733 , p5_a41 JTF_VARCHAR2_TABLE_500
734 , p5_a42 JTF_VARCHAR2_TABLE_500
735 , p5_a43 JTF_VARCHAR2_TABLE_500
736 , p5_a44 JTF_VARCHAR2_TABLE_500
737 , p5_a45 JTF_VARCHAR2_TABLE_500
738 , p5_a46 JTF_VARCHAR2_TABLE_500
739 , p5_a47 JTF_VARCHAR2_TABLE_500
740 , p5_a48 JTF_VARCHAR2_TABLE_500
741 , p5_a49 JTF_NUMBER_TABLE
742 , p5_a50 JTF_NUMBER_TABLE
743 , p5_a51 JTF_DATE_TABLE
744 , p5_a52 JTF_DATE_TABLE
745 , p5_a53 JTF_NUMBER_TABLE
746 , p5_a54 JTF_NUMBER_TABLE
747 )
748
749 as
750 ddp_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
751 ddindx binary_integer; indx binary_integer;
752 begin
753
754 -- copy data to the local IN or IN-OUT args, if any
755
756
757
758
759
760 okl_sfe_pvt_w.rosetta_table_copy_in_p5(ddp_sfev_tbl, p5_a0
761 , p5_a1
762 , p5_a2
763 , p5_a3
764 , p5_a4
765 , p5_a5
766 , p5_a6
767 , p5_a7
768 , p5_a8
769 , p5_a9
770 , p5_a10
771 , p5_a11
772 , p5_a12
773 , p5_a13
774 , p5_a14
775 , p5_a15
776 , p5_a16
777 , p5_a17
778 , p5_a18
779 , p5_a19
780 , p5_a20
781 , p5_a21
782 , p5_a22
783 , p5_a23
784 , p5_a24
785 , p5_a25
786 , p5_a26
787 , p5_a27
788 , p5_a28
789 , p5_a29
790 , p5_a30
791 , p5_a31
792 , p5_a32
793 , p5_a33
794 , p5_a34
795 , p5_a35
796 , p5_a36
797 , p5_a37
798 , p5_a38
799 , p5_a39
800 , p5_a40
801 , p5_a41
802 , p5_a42
803 , p5_a43
804 , p5_a44
805 , p5_a45
806 , p5_a46
807 , p5_a47
808 , p5_a48
809 , p5_a49
810 , p5_a50
811 , p5_a51
812 , p5_a52
813 , p5_a53
814 , p5_a54
815 );
816
817 -- here's the delegated call to the old PL/SQL routine
818 okl_sif_fees_pub.lock_sif_fees(p_api_version,
819 p_init_msg_list,
820 x_return_status,
821 x_msg_count,
822 x_msg_data,
823 ddp_sfev_tbl);
824
825 -- copy data back from the local variables to OUT or IN-OUT args, if any
826
827
828
829
830
831 end;
832
833 procedure update_sif_fees(p_api_version NUMBER
834 , p_init_msg_list VARCHAR2
835 , x_return_status out nocopy VARCHAR2
836 , x_msg_count out nocopy NUMBER
837 , x_msg_data out nocopy VARCHAR2
838 , p6_a0 out nocopy NUMBER
839 , p6_a1 out nocopy VARCHAR2
840 , p6_a2 out nocopy DATE
841 , p6_a3 out nocopy DATE
842 , p6_a4 out nocopy NUMBER
843 , p6_a5 out nocopy VARCHAR2
844 , p6_a6 out nocopy VARCHAR2
845 , p6_a7 out nocopy VARCHAR2
846 , p6_a8 out nocopy NUMBER
847 , p6_a9 out nocopy NUMBER
848 , p6_a10 out nocopy VARCHAR2
849 , p6_a11 out nocopy VARCHAR2
850 , p6_a12 out nocopy VARCHAR2
851 , p6_a13 out nocopy VARCHAR2
852 , p6_a14 out nocopy NUMBER
853 , p6_a15 out nocopy NUMBER
854 , p6_a16 out nocopy NUMBER
855 , p6_a17 out nocopy NUMBER
856 , p6_a18 out nocopy NUMBER
857 , p6_a19 out nocopy NUMBER
858 , p6_a20 out nocopy VARCHAR2
859 , p6_a21 out nocopy VARCHAR2
860 , p6_a22 out nocopy NUMBER
861 , p6_a23 out nocopy NUMBER
862 , p6_a24 out nocopy VARCHAR2
863 , p6_a25 out nocopy VARCHAR2
864 , p6_a26 out nocopy VARCHAR2
865 , p6_a27 out nocopy VARCHAR2
866 , p6_a28 out nocopy VARCHAR2
867 , p6_a29 out nocopy VARCHAR2
868 , p6_a30 out nocopy VARCHAR2
869 , p6_a31 out nocopy VARCHAR2
870 , p6_a32 out nocopy VARCHAR2
871 , p6_a33 out nocopy VARCHAR2
872 , p6_a34 out nocopy VARCHAR2
873 , p6_a35 out nocopy VARCHAR2
874 , p6_a36 out nocopy VARCHAR2
875 , p6_a37 out nocopy VARCHAR2
876 , p6_a38 out nocopy VARCHAR2
877 , p6_a39 out nocopy VARCHAR2
878 , p6_a40 out nocopy VARCHAR2
879 , p6_a41 out nocopy VARCHAR2
880 , p6_a42 out nocopy VARCHAR2
881 , p6_a43 out nocopy VARCHAR2
882 , p6_a44 out nocopy VARCHAR2
883 , p6_a45 out nocopy VARCHAR2
884 , p6_a46 out nocopy VARCHAR2
885 , p6_a47 out nocopy VARCHAR2
886 , p6_a48 out nocopy VARCHAR2
887 , p6_a49 out nocopy NUMBER
888 , p6_a50 out nocopy NUMBER
889 , p6_a51 out nocopy DATE
890 , p6_a52 out nocopy DATE
891 , p6_a53 out nocopy NUMBER
892 , p6_a54 out nocopy NUMBER
893 , p5_a0 NUMBER := 0-1962.0724
894 , p5_a1 VARCHAR2 := fnd_api.g_miss_char
895 , p5_a2 DATE := fnd_api.g_miss_date
896 , p5_a3 DATE := fnd_api.g_miss_date
897 , p5_a4 NUMBER := 0-1962.0724
898 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
899 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
900 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
901 , p5_a8 NUMBER := 0-1962.0724
902 , p5_a9 NUMBER := 0-1962.0724
903 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
904 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
905 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
906 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
907 , p5_a14 NUMBER := 0-1962.0724
908 , p5_a15 NUMBER := 0-1962.0724
909 , p5_a16 NUMBER := 0-1962.0724
910 , p5_a17 NUMBER := 0-1962.0724
911 , p5_a18 NUMBER := 0-1962.0724
912 , p5_a19 NUMBER := 0-1962.0724
913 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
914 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
915 , p5_a22 NUMBER := 0-1962.0724
916 , p5_a23 NUMBER := 0-1962.0724
917 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
918 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
919 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
920 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
921 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
922 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
923 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
924 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
925 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
926 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
927 , p5_a34 VARCHAR2 := fnd_api.g_miss_char
928 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
929 , p5_a36 VARCHAR2 := fnd_api.g_miss_char
930 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
931 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
932 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
933 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
934 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
935 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
936 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
937 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
938 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
939 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
940 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
941 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
942 , p5_a49 NUMBER := 0-1962.0724
943 , p5_a50 NUMBER := 0-1962.0724
944 , p5_a51 DATE := fnd_api.g_miss_date
945 , p5_a52 DATE := fnd_api.g_miss_date
946 , p5_a53 NUMBER := 0-1962.0724
947 , p5_a54 NUMBER := 0-1962.0724
948 )
949
950 as
951 ddp_sfev_rec okl_sif_fees_pub.sfev_rec_type;
952 ddx_sfev_rec okl_sif_fees_pub.sfev_rec_type;
953 ddindx binary_integer; indx binary_integer;
954 begin
955
956 -- copy data to the local IN or IN-OUT args, if any
957
958
959
960
961
962 ddp_sfev_rec.id := rosetta_g_miss_num_map(p5_a0);
963 ddp_sfev_rec.sfe_type := p5_a1;
964 ddp_sfev_rec.date_start := rosetta_g_miss_date_in_map(p5_a2);
965 ddp_sfev_rec.date_paid := rosetta_g_miss_date_in_map(p5_a3);
966 ddp_sfev_rec.amount := rosetta_g_miss_num_map(p5_a4);
967 ddp_sfev_rec.idc_accounting_flag := p5_a5;
968 ddp_sfev_rec.income_or_expense := p5_a6;
969 ddp_sfev_rec.description := p5_a7;
970 ddp_sfev_rec.fee_index_number := rosetta_g_miss_num_map(p5_a8);
971 ddp_sfev_rec.level_index_number := rosetta_g_miss_num_map(p5_a9);
972 ddp_sfev_rec.advance_or_arrears := p5_a10;
973 ddp_sfev_rec.level_type := p5_a11;
974 ddp_sfev_rec.lock_level_step := p5_a12;
975 ddp_sfev_rec.period := p5_a13;
976 ddp_sfev_rec.number_of_periods := rosetta_g_miss_num_map(p5_a14);
977 ddp_sfev_rec.level_line_number := rosetta_g_miss_num_map(p5_a15);
978 ddp_sfev_rec.sif_id := rosetta_g_miss_num_map(p5_a16);
979 ddp_sfev_rec.kle_id := rosetta_g_miss_num_map(p5_a17);
980 ddp_sfev_rec.sil_id := rosetta_g_miss_num_map(p5_a18);
981 ddp_sfev_rec.rate := rosetta_g_miss_num_map(p5_a19);
982 ddp_sfev_rec.query_level_yn := p5_a20;
983 ddp_sfev_rec.structure := p5_a21;
984 ddp_sfev_rec.days_in_period := rosetta_g_miss_num_map(p5_a22);
985 ddp_sfev_rec.object_version_number := rosetta_g_miss_num_map(p5_a23);
986 ddp_sfev_rec.cash_effect_yn := p5_a24;
987 ddp_sfev_rec.tax_effect_yn := p5_a25;
988 ddp_sfev_rec.days_in_month := p5_a26;
989 ddp_sfev_rec.days_in_year := p5_a27;
990 ddp_sfev_rec.balance_type_code := p5_a28;
991 ddp_sfev_rec.stream_interface_attribute01 := p5_a29;
992 ddp_sfev_rec.stream_interface_attribute02 := p5_a30;
993 ddp_sfev_rec.stream_interface_attribute03 := p5_a31;
994 ddp_sfev_rec.stream_interface_attribute04 := p5_a32;
995 ddp_sfev_rec.stream_interface_attribute05 := p5_a33;
996 ddp_sfev_rec.stream_interface_attribute06 := p5_a34;
997 ddp_sfev_rec.stream_interface_attribute07 := p5_a35;
998 ddp_sfev_rec.stream_interface_attribute08 := p5_a36;
999 ddp_sfev_rec.stream_interface_attribute09 := p5_a37;
1000 ddp_sfev_rec.stream_interface_attribute10 := p5_a38;
1001 ddp_sfev_rec.stream_interface_attribute11 := p5_a39;
1002 ddp_sfev_rec.stream_interface_attribute12 := p5_a40;
1003 ddp_sfev_rec.stream_interface_attribute13 := p5_a41;
1004 ddp_sfev_rec.stream_interface_attribute14 := p5_a42;
1005 ddp_sfev_rec.stream_interface_attribute15 := p5_a43;
1006 ddp_sfev_rec.stream_interface_attribute16 := p5_a44;
1007 ddp_sfev_rec.stream_interface_attribute17 := p5_a45;
1008 ddp_sfev_rec.stream_interface_attribute18 := p5_a46;
1009 ddp_sfev_rec.stream_interface_attribute19 := p5_a47;
1010 ddp_sfev_rec.stream_interface_attribute20 := p5_a48;
1011 ddp_sfev_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1012 ddp_sfev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a50);
1013 ddp_sfev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
1014 ddp_sfev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1015 ddp_sfev_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1016 ddp_sfev_rec.down_payment_amount := rosetta_g_miss_num_map(p5_a54);
1017
1018
1019 -- here's the delegated call to the old PL/SQL routine
1020 okl_sif_fees_pub.update_sif_fees(p_api_version,
1021 p_init_msg_list,
1022 x_return_status,
1023 x_msg_count,
1024 x_msg_data,
1025 ddp_sfev_rec,
1026 ddx_sfev_rec);
1027
1028 -- copy data back from the local variables to OUT or IN-OUT args, if any
1029
1030
1031
1032
1033
1034
1035 p6_a0 := rosetta_g_miss_num_map(ddx_sfev_rec.id);
1036 p6_a1 := ddx_sfev_rec.sfe_type;
1037 p6_a2 := ddx_sfev_rec.date_start;
1038 p6_a3 := ddx_sfev_rec.date_paid;
1039 p6_a4 := rosetta_g_miss_num_map(ddx_sfev_rec.amount);
1040 p6_a5 := ddx_sfev_rec.idc_accounting_flag;
1041 p6_a6 := ddx_sfev_rec.income_or_expense;
1042 p6_a7 := ddx_sfev_rec.description;
1043 p6_a8 := rosetta_g_miss_num_map(ddx_sfev_rec.fee_index_number);
1044 p6_a9 := rosetta_g_miss_num_map(ddx_sfev_rec.level_index_number);
1045 p6_a10 := ddx_sfev_rec.advance_or_arrears;
1046 p6_a11 := ddx_sfev_rec.level_type;
1047 p6_a12 := ddx_sfev_rec.lock_level_step;
1048 p6_a13 := ddx_sfev_rec.period;
1049 p6_a14 := rosetta_g_miss_num_map(ddx_sfev_rec.number_of_periods);
1050 p6_a15 := rosetta_g_miss_num_map(ddx_sfev_rec.level_line_number);
1051 p6_a16 := rosetta_g_miss_num_map(ddx_sfev_rec.sif_id);
1052 p6_a17 := rosetta_g_miss_num_map(ddx_sfev_rec.kle_id);
1053 p6_a18 := rosetta_g_miss_num_map(ddx_sfev_rec.sil_id);
1054 p6_a19 := rosetta_g_miss_num_map(ddx_sfev_rec.rate);
1055 p6_a20 := ddx_sfev_rec.query_level_yn;
1056 p6_a21 := ddx_sfev_rec.structure;
1057 p6_a22 := rosetta_g_miss_num_map(ddx_sfev_rec.days_in_period);
1058 p6_a23 := rosetta_g_miss_num_map(ddx_sfev_rec.object_version_number);
1059 p6_a24 := ddx_sfev_rec.cash_effect_yn;
1060 p6_a25 := ddx_sfev_rec.tax_effect_yn;
1061 p6_a26 := ddx_sfev_rec.days_in_month;
1062 p6_a27 := ddx_sfev_rec.days_in_year;
1063 p6_a28 := ddx_sfev_rec.balance_type_code;
1064 p6_a29 := ddx_sfev_rec.stream_interface_attribute01;
1065 p6_a30 := ddx_sfev_rec.stream_interface_attribute02;
1066 p6_a31 := ddx_sfev_rec.stream_interface_attribute03;
1067 p6_a32 := ddx_sfev_rec.stream_interface_attribute04;
1068 p6_a33 := ddx_sfev_rec.stream_interface_attribute05;
1069 p6_a34 := ddx_sfev_rec.stream_interface_attribute06;
1070 p6_a35 := ddx_sfev_rec.stream_interface_attribute07;
1071 p6_a36 := ddx_sfev_rec.stream_interface_attribute08;
1072 p6_a37 := ddx_sfev_rec.stream_interface_attribute09;
1073 p6_a38 := ddx_sfev_rec.stream_interface_attribute10;
1074 p6_a39 := ddx_sfev_rec.stream_interface_attribute11;
1075 p6_a40 := ddx_sfev_rec.stream_interface_attribute12;
1076 p6_a41 := ddx_sfev_rec.stream_interface_attribute13;
1077 p6_a42 := ddx_sfev_rec.stream_interface_attribute14;
1078 p6_a43 := ddx_sfev_rec.stream_interface_attribute15;
1079 p6_a44 := ddx_sfev_rec.stream_interface_attribute16;
1080 p6_a45 := ddx_sfev_rec.stream_interface_attribute17;
1081 p6_a46 := ddx_sfev_rec.stream_interface_attribute18;
1082 p6_a47 := ddx_sfev_rec.stream_interface_attribute19;
1083 p6_a48 := ddx_sfev_rec.stream_interface_attribute20;
1084 p6_a49 := rosetta_g_miss_num_map(ddx_sfev_rec.created_by);
1085 p6_a50 := rosetta_g_miss_num_map(ddx_sfev_rec.last_updated_by);
1086 p6_a51 := ddx_sfev_rec.creation_date;
1087 p6_a52 := ddx_sfev_rec.last_update_date;
1088 p6_a53 := rosetta_g_miss_num_map(ddx_sfev_rec.last_update_login);
1089 p6_a54 := rosetta_g_miss_num_map(ddx_sfev_rec.down_payment_amount);
1090 end;
1091
1092 procedure update_sif_fees(p_api_version NUMBER
1093 , p_init_msg_list VARCHAR2
1094 , x_return_status out nocopy VARCHAR2
1095 , x_msg_count out nocopy NUMBER
1096 , x_msg_data out nocopy VARCHAR2
1097 , p5_a0 JTF_NUMBER_TABLE
1098 , p5_a1 JTF_VARCHAR2_TABLE_100
1099 , p5_a2 JTF_DATE_TABLE
1100 , p5_a3 JTF_DATE_TABLE
1101 , p5_a4 JTF_NUMBER_TABLE
1102 , p5_a5 JTF_VARCHAR2_TABLE_100
1103 , p5_a6 JTF_VARCHAR2_TABLE_100
1104 , p5_a7 JTF_VARCHAR2_TABLE_2000
1105 , p5_a8 JTF_NUMBER_TABLE
1106 , p5_a9 JTF_NUMBER_TABLE
1107 , p5_a10 JTF_VARCHAR2_TABLE_100
1108 , p5_a11 JTF_VARCHAR2_TABLE_100
1109 , p5_a12 JTF_VARCHAR2_TABLE_100
1110 , p5_a13 JTF_VARCHAR2_TABLE_100
1111 , p5_a14 JTF_NUMBER_TABLE
1112 , p5_a15 JTF_NUMBER_TABLE
1113 , p5_a16 JTF_NUMBER_TABLE
1114 , p5_a17 JTF_NUMBER_TABLE
1115 , p5_a18 JTF_NUMBER_TABLE
1116 , p5_a19 JTF_NUMBER_TABLE
1117 , p5_a20 JTF_VARCHAR2_TABLE_100
1118 , p5_a21 JTF_VARCHAR2_TABLE_200
1119 , p5_a22 JTF_NUMBER_TABLE
1120 , p5_a23 JTF_NUMBER_TABLE
1121 , p5_a24 JTF_VARCHAR2_TABLE_100
1122 , p5_a25 JTF_VARCHAR2_TABLE_100
1123 , p5_a26 JTF_VARCHAR2_TABLE_100
1124 , p5_a27 JTF_VARCHAR2_TABLE_100
1125 , p5_a28 JTF_VARCHAR2_TABLE_100
1126 , p5_a29 JTF_VARCHAR2_TABLE_500
1127 , p5_a30 JTF_VARCHAR2_TABLE_500
1128 , p5_a31 JTF_VARCHAR2_TABLE_500
1129 , p5_a32 JTF_VARCHAR2_TABLE_500
1130 , p5_a33 JTF_VARCHAR2_TABLE_500
1131 , p5_a34 JTF_VARCHAR2_TABLE_500
1132 , p5_a35 JTF_VARCHAR2_TABLE_500
1133 , p5_a36 JTF_VARCHAR2_TABLE_500
1134 , p5_a37 JTF_VARCHAR2_TABLE_500
1135 , p5_a38 JTF_VARCHAR2_TABLE_500
1136 , p5_a39 JTF_VARCHAR2_TABLE_500
1137 , p5_a40 JTF_VARCHAR2_TABLE_500
1138 , p5_a41 JTF_VARCHAR2_TABLE_500
1139 , p5_a42 JTF_VARCHAR2_TABLE_500
1140 , p5_a43 JTF_VARCHAR2_TABLE_500
1141 , p5_a44 JTF_VARCHAR2_TABLE_500
1142 , p5_a45 JTF_VARCHAR2_TABLE_500
1143 , p5_a46 JTF_VARCHAR2_TABLE_500
1144 , p5_a47 JTF_VARCHAR2_TABLE_500
1145 , p5_a48 JTF_VARCHAR2_TABLE_500
1146 , p5_a49 JTF_NUMBER_TABLE
1147 , p5_a50 JTF_NUMBER_TABLE
1148 , p5_a51 JTF_DATE_TABLE
1149 , p5_a52 JTF_DATE_TABLE
1150 , p5_a53 JTF_NUMBER_TABLE
1151 , p5_a54 JTF_NUMBER_TABLE
1152 , p6_a0 out nocopy JTF_NUMBER_TABLE
1153 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
1154 , p6_a2 out nocopy JTF_DATE_TABLE
1155 , p6_a3 out nocopy JTF_DATE_TABLE
1156 , p6_a4 out nocopy JTF_NUMBER_TABLE
1157 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1158 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1159 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
1160 , p6_a8 out nocopy JTF_NUMBER_TABLE
1161 , p6_a9 out nocopy JTF_NUMBER_TABLE
1162 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
1163 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
1164 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1165 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1166 , p6_a14 out nocopy JTF_NUMBER_TABLE
1167 , p6_a15 out nocopy JTF_NUMBER_TABLE
1168 , p6_a16 out nocopy JTF_NUMBER_TABLE
1169 , p6_a17 out nocopy JTF_NUMBER_TABLE
1170 , p6_a18 out nocopy JTF_NUMBER_TABLE
1171 , p6_a19 out nocopy JTF_NUMBER_TABLE
1172 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
1173 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
1174 , p6_a22 out nocopy JTF_NUMBER_TABLE
1175 , p6_a23 out nocopy JTF_NUMBER_TABLE
1176 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_100
1177 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_100
1178 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_100
1179 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
1180 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_100
1181 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
1182 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
1183 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
1184 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1185 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1186 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
1187 , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
1188 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
1189 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
1190 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
1191 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
1192 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
1193 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
1194 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
1195 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
1196 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
1197 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
1198 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
1199 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
1200 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
1201 , p6_a49 out nocopy JTF_NUMBER_TABLE
1202 , p6_a50 out nocopy JTF_NUMBER_TABLE
1203 , p6_a51 out nocopy JTF_DATE_TABLE
1204 , p6_a52 out nocopy JTF_DATE_TABLE
1205 , p6_a53 out nocopy JTF_NUMBER_TABLE
1206 , p6_a54 out nocopy JTF_NUMBER_TABLE
1207 )
1208
1209 as
1210 ddp_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
1211 ddx_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
1212 ddindx binary_integer; indx binary_integer;
1213 begin
1214
1215 -- copy data to the local IN or IN-OUT args, if any
1216
1217
1218
1219
1220
1221 okl_sfe_pvt_w.rosetta_table_copy_in_p5(ddp_sfev_tbl, p5_a0
1222 , p5_a1
1223 , p5_a2
1224 , p5_a3
1225 , p5_a4
1226 , p5_a5
1227 , p5_a6
1228 , p5_a7
1229 , p5_a8
1230 , p5_a9
1231 , p5_a10
1232 , p5_a11
1233 , p5_a12
1234 , p5_a13
1235 , p5_a14
1236 , p5_a15
1237 , p5_a16
1238 , p5_a17
1239 , p5_a18
1240 , p5_a19
1241 , p5_a20
1242 , p5_a21
1243 , p5_a22
1244 , p5_a23
1245 , p5_a24
1246 , p5_a25
1247 , p5_a26
1248 , p5_a27
1249 , p5_a28
1250 , p5_a29
1251 , p5_a30
1252 , p5_a31
1253 , p5_a32
1254 , p5_a33
1255 , p5_a34
1256 , p5_a35
1257 , p5_a36
1258 , p5_a37
1259 , p5_a38
1260 , p5_a39
1261 , p5_a40
1262 , p5_a41
1263 , p5_a42
1264 , p5_a43
1265 , p5_a44
1266 , p5_a45
1267 , p5_a46
1268 , p5_a47
1269 , p5_a48
1270 , p5_a49
1271 , p5_a50
1272 , p5_a51
1273 , p5_a52
1274 , p5_a53
1275 , p5_a54
1276 );
1277
1278
1279 -- here's the delegated call to the old PL/SQL routine
1280 okl_sif_fees_pub.update_sif_fees(p_api_version,
1281 p_init_msg_list,
1282 x_return_status,
1283 x_msg_count,
1284 x_msg_data,
1285 ddp_sfev_tbl,
1286 ddx_sfev_tbl);
1287
1288 -- copy data back from the local variables to OUT or IN-OUT args, if any
1289
1290
1291
1292
1293
1294
1295 okl_sfe_pvt_w.rosetta_table_copy_out_p5(ddx_sfev_tbl, p6_a0
1296 , p6_a1
1297 , p6_a2
1298 , p6_a3
1299 , p6_a4
1300 , p6_a5
1301 , p6_a6
1302 , p6_a7
1303 , p6_a8
1304 , p6_a9
1305 , p6_a10
1306 , p6_a11
1307 , p6_a12
1308 , p6_a13
1309 , p6_a14
1310 , p6_a15
1311 , p6_a16
1312 , p6_a17
1313 , p6_a18
1314 , p6_a19
1315 , p6_a20
1316 , p6_a21
1317 , p6_a22
1318 , p6_a23
1319 , p6_a24
1320 , p6_a25
1321 , p6_a26
1322 , p6_a27
1323 , p6_a28
1324 , p6_a29
1325 , p6_a30
1326 , p6_a31
1327 , p6_a32
1328 , p6_a33
1329 , p6_a34
1330 , p6_a35
1331 , p6_a36
1332 , p6_a37
1333 , p6_a38
1334 , p6_a39
1335 , p6_a40
1336 , p6_a41
1337 , p6_a42
1338 , p6_a43
1339 , p6_a44
1340 , p6_a45
1341 , p6_a46
1342 , p6_a47
1343 , p6_a48
1344 , p6_a49
1345 , p6_a50
1346 , p6_a51
1347 , p6_a52
1348 , p6_a53
1349 , p6_a54
1350 );
1351 end;
1352
1353 procedure delete_sif_fees(p_api_version NUMBER
1354 , p_init_msg_list VARCHAR2
1355 , x_return_status out nocopy VARCHAR2
1356 , x_msg_count out nocopy NUMBER
1357 , x_msg_data out nocopy VARCHAR2
1358 , p6_a0 out nocopy NUMBER
1359 , p6_a1 out nocopy VARCHAR2
1360 , p6_a2 out nocopy DATE
1361 , p6_a3 out nocopy DATE
1362 , p6_a4 out nocopy NUMBER
1363 , p6_a5 out nocopy VARCHAR2
1364 , p6_a6 out nocopy VARCHAR2
1365 , p6_a7 out nocopy VARCHAR2
1366 , p6_a8 out nocopy NUMBER
1367 , p6_a9 out nocopy NUMBER
1368 , p6_a10 out nocopy VARCHAR2
1369 , p6_a11 out nocopy VARCHAR2
1370 , p6_a12 out nocopy VARCHAR2
1371 , p6_a13 out nocopy VARCHAR2
1372 , p6_a14 out nocopy NUMBER
1373 , p6_a15 out nocopy NUMBER
1374 , p6_a16 out nocopy NUMBER
1375 , p6_a17 out nocopy NUMBER
1376 , p6_a18 out nocopy NUMBER
1377 , p6_a19 out nocopy NUMBER
1378 , p6_a20 out nocopy VARCHAR2
1379 , p6_a21 out nocopy VARCHAR2
1380 , p6_a22 out nocopy NUMBER
1381 , p6_a23 out nocopy NUMBER
1382 , p6_a24 out nocopy VARCHAR2
1383 , p6_a25 out nocopy VARCHAR2
1384 , p6_a26 out nocopy VARCHAR2
1385 , p6_a27 out nocopy VARCHAR2
1386 , p6_a28 out nocopy VARCHAR2
1387 , p6_a29 out nocopy VARCHAR2
1388 , p6_a30 out nocopy VARCHAR2
1389 , p6_a31 out nocopy VARCHAR2
1390 , p6_a32 out nocopy VARCHAR2
1391 , p6_a33 out nocopy VARCHAR2
1392 , p6_a34 out nocopy VARCHAR2
1393 , p6_a35 out nocopy VARCHAR2
1394 , p6_a36 out nocopy VARCHAR2
1395 , p6_a37 out nocopy VARCHAR2
1396 , p6_a38 out nocopy VARCHAR2
1397 , p6_a39 out nocopy VARCHAR2
1398 , p6_a40 out nocopy VARCHAR2
1399 , p6_a41 out nocopy VARCHAR2
1400 , p6_a42 out nocopy VARCHAR2
1401 , p6_a43 out nocopy VARCHAR2
1402 , p6_a44 out nocopy VARCHAR2
1403 , p6_a45 out nocopy VARCHAR2
1404 , p6_a46 out nocopy VARCHAR2
1405 , p6_a47 out nocopy VARCHAR2
1406 , p6_a48 out nocopy VARCHAR2
1407 , p6_a49 out nocopy NUMBER
1408 , p6_a50 out nocopy NUMBER
1409 , p6_a51 out nocopy DATE
1410 , p6_a52 out nocopy DATE
1411 , p6_a53 out nocopy NUMBER
1412 , p6_a54 out nocopy NUMBER
1413 , p5_a0 NUMBER := 0-1962.0724
1414 , p5_a1 VARCHAR2 := fnd_api.g_miss_char
1415 , p5_a2 DATE := fnd_api.g_miss_date
1416 , p5_a3 DATE := fnd_api.g_miss_date
1417 , p5_a4 NUMBER := 0-1962.0724
1418 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1419 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1420 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1421 , p5_a8 NUMBER := 0-1962.0724
1422 , p5_a9 NUMBER := 0-1962.0724
1423 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1424 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1425 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1426 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1427 , p5_a14 NUMBER := 0-1962.0724
1428 , p5_a15 NUMBER := 0-1962.0724
1429 , p5_a16 NUMBER := 0-1962.0724
1430 , p5_a17 NUMBER := 0-1962.0724
1431 , p5_a18 NUMBER := 0-1962.0724
1432 , p5_a19 NUMBER := 0-1962.0724
1433 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1434 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1435 , p5_a22 NUMBER := 0-1962.0724
1436 , p5_a23 NUMBER := 0-1962.0724
1437 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1438 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1439 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1440 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1441 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1442 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
1443 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1444 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1445 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
1446 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
1447 , p5_a34 VARCHAR2 := fnd_api.g_miss_char
1448 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
1449 , p5_a36 VARCHAR2 := fnd_api.g_miss_char
1450 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
1451 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1452 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
1453 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
1454 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
1455 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
1456 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
1457 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
1458 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
1459 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
1460 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
1461 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
1462 , p5_a49 NUMBER := 0-1962.0724
1463 , p5_a50 NUMBER := 0-1962.0724
1464 , p5_a51 DATE := fnd_api.g_miss_date
1465 , p5_a52 DATE := fnd_api.g_miss_date
1466 , p5_a53 NUMBER := 0-1962.0724
1467 , p5_a54 NUMBER := 0-1962.0724
1468 )
1469
1470 as
1471 ddp_sfev_rec okl_sif_fees_pub.sfev_rec_type;
1472 ddx_sfev_rec okl_sif_fees_pub.sfev_rec_type;
1473 ddindx binary_integer; indx binary_integer;
1474 begin
1475
1476 -- copy data to the local IN or IN-OUT args, if any
1477
1478
1479
1480
1481
1482 ddp_sfev_rec.id := rosetta_g_miss_num_map(p5_a0);
1483 ddp_sfev_rec.sfe_type := p5_a1;
1484 ddp_sfev_rec.date_start := rosetta_g_miss_date_in_map(p5_a2);
1485 ddp_sfev_rec.date_paid := rosetta_g_miss_date_in_map(p5_a3);
1486 ddp_sfev_rec.amount := rosetta_g_miss_num_map(p5_a4);
1487 ddp_sfev_rec.idc_accounting_flag := p5_a5;
1488 ddp_sfev_rec.income_or_expense := p5_a6;
1489 ddp_sfev_rec.description := p5_a7;
1490 ddp_sfev_rec.fee_index_number := rosetta_g_miss_num_map(p5_a8);
1491 ddp_sfev_rec.level_index_number := rosetta_g_miss_num_map(p5_a9);
1492 ddp_sfev_rec.advance_or_arrears := p5_a10;
1493 ddp_sfev_rec.level_type := p5_a11;
1494 ddp_sfev_rec.lock_level_step := p5_a12;
1495 ddp_sfev_rec.period := p5_a13;
1496 ddp_sfev_rec.number_of_periods := rosetta_g_miss_num_map(p5_a14);
1497 ddp_sfev_rec.level_line_number := rosetta_g_miss_num_map(p5_a15);
1498 ddp_sfev_rec.sif_id := rosetta_g_miss_num_map(p5_a16);
1499 ddp_sfev_rec.kle_id := rosetta_g_miss_num_map(p5_a17);
1500 ddp_sfev_rec.sil_id := rosetta_g_miss_num_map(p5_a18);
1501 ddp_sfev_rec.rate := rosetta_g_miss_num_map(p5_a19);
1502 ddp_sfev_rec.query_level_yn := p5_a20;
1503 ddp_sfev_rec.structure := p5_a21;
1504 ddp_sfev_rec.days_in_period := rosetta_g_miss_num_map(p5_a22);
1505 ddp_sfev_rec.object_version_number := rosetta_g_miss_num_map(p5_a23);
1506 ddp_sfev_rec.cash_effect_yn := p5_a24;
1507 ddp_sfev_rec.tax_effect_yn := p5_a25;
1508 ddp_sfev_rec.days_in_month := p5_a26;
1509 ddp_sfev_rec.days_in_year := p5_a27;
1510 ddp_sfev_rec.balance_type_code := p5_a28;
1511 ddp_sfev_rec.stream_interface_attribute01 := p5_a29;
1512 ddp_sfev_rec.stream_interface_attribute02 := p5_a30;
1513 ddp_sfev_rec.stream_interface_attribute03 := p5_a31;
1514 ddp_sfev_rec.stream_interface_attribute04 := p5_a32;
1515 ddp_sfev_rec.stream_interface_attribute05 := p5_a33;
1516 ddp_sfev_rec.stream_interface_attribute06 := p5_a34;
1517 ddp_sfev_rec.stream_interface_attribute07 := p5_a35;
1518 ddp_sfev_rec.stream_interface_attribute08 := p5_a36;
1519 ddp_sfev_rec.stream_interface_attribute09 := p5_a37;
1520 ddp_sfev_rec.stream_interface_attribute10 := p5_a38;
1521 ddp_sfev_rec.stream_interface_attribute11 := p5_a39;
1522 ddp_sfev_rec.stream_interface_attribute12 := p5_a40;
1523 ddp_sfev_rec.stream_interface_attribute13 := p5_a41;
1524 ddp_sfev_rec.stream_interface_attribute14 := p5_a42;
1525 ddp_sfev_rec.stream_interface_attribute15 := p5_a43;
1526 ddp_sfev_rec.stream_interface_attribute16 := p5_a44;
1527 ddp_sfev_rec.stream_interface_attribute17 := p5_a45;
1528 ddp_sfev_rec.stream_interface_attribute18 := p5_a46;
1529 ddp_sfev_rec.stream_interface_attribute19 := p5_a47;
1530 ddp_sfev_rec.stream_interface_attribute20 := p5_a48;
1531 ddp_sfev_rec.created_by := rosetta_g_miss_num_map(p5_a49);
1532 ddp_sfev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a50);
1533 ddp_sfev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
1534 ddp_sfev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
1535 ddp_sfev_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
1536 ddp_sfev_rec.down_payment_amount := rosetta_g_miss_num_map(p5_a54);
1537
1538
1539 -- here's the delegated call to the old PL/SQL routine
1540 okl_sif_fees_pub.delete_sif_fees(p_api_version,
1541 p_init_msg_list,
1542 x_return_status,
1543 x_msg_count,
1544 x_msg_data,
1545 ddp_sfev_rec,
1546 ddx_sfev_rec);
1547
1548 -- copy data back from the local variables to OUT or IN-OUT args, if any
1549
1550
1551
1552
1553
1554
1555 p6_a0 := rosetta_g_miss_num_map(ddx_sfev_rec.id);
1556 p6_a1 := ddx_sfev_rec.sfe_type;
1557 p6_a2 := ddx_sfev_rec.date_start;
1558 p6_a3 := ddx_sfev_rec.date_paid;
1559 p6_a4 := rosetta_g_miss_num_map(ddx_sfev_rec.amount);
1560 p6_a5 := ddx_sfev_rec.idc_accounting_flag;
1561 p6_a6 := ddx_sfev_rec.income_or_expense;
1562 p6_a7 := ddx_sfev_rec.description;
1563 p6_a8 := rosetta_g_miss_num_map(ddx_sfev_rec.fee_index_number);
1564 p6_a9 := rosetta_g_miss_num_map(ddx_sfev_rec.level_index_number);
1565 p6_a10 := ddx_sfev_rec.advance_or_arrears;
1566 p6_a11 := ddx_sfev_rec.level_type;
1567 p6_a12 := ddx_sfev_rec.lock_level_step;
1568 p6_a13 := ddx_sfev_rec.period;
1569 p6_a14 := rosetta_g_miss_num_map(ddx_sfev_rec.number_of_periods);
1570 p6_a15 := rosetta_g_miss_num_map(ddx_sfev_rec.level_line_number);
1571 p6_a16 := rosetta_g_miss_num_map(ddx_sfev_rec.sif_id);
1572 p6_a17 := rosetta_g_miss_num_map(ddx_sfev_rec.kle_id);
1573 p6_a18 := rosetta_g_miss_num_map(ddx_sfev_rec.sil_id);
1574 p6_a19 := rosetta_g_miss_num_map(ddx_sfev_rec.rate);
1575 p6_a20 := ddx_sfev_rec.query_level_yn;
1576 p6_a21 := ddx_sfev_rec.structure;
1577 p6_a22 := rosetta_g_miss_num_map(ddx_sfev_rec.days_in_period);
1578 p6_a23 := rosetta_g_miss_num_map(ddx_sfev_rec.object_version_number);
1579 p6_a24 := ddx_sfev_rec.cash_effect_yn;
1580 p6_a25 := ddx_sfev_rec.tax_effect_yn;
1581 p6_a26 := ddx_sfev_rec.days_in_month;
1582 p6_a27 := ddx_sfev_rec.days_in_year;
1583 p6_a28 := ddx_sfev_rec.balance_type_code;
1584 p6_a29 := ddx_sfev_rec.stream_interface_attribute01;
1585 p6_a30 := ddx_sfev_rec.stream_interface_attribute02;
1586 p6_a31 := ddx_sfev_rec.stream_interface_attribute03;
1587 p6_a32 := ddx_sfev_rec.stream_interface_attribute04;
1588 p6_a33 := ddx_sfev_rec.stream_interface_attribute05;
1589 p6_a34 := ddx_sfev_rec.stream_interface_attribute06;
1590 p6_a35 := ddx_sfev_rec.stream_interface_attribute07;
1591 p6_a36 := ddx_sfev_rec.stream_interface_attribute08;
1592 p6_a37 := ddx_sfev_rec.stream_interface_attribute09;
1593 p6_a38 := ddx_sfev_rec.stream_interface_attribute10;
1594 p6_a39 := ddx_sfev_rec.stream_interface_attribute11;
1595 p6_a40 := ddx_sfev_rec.stream_interface_attribute12;
1596 p6_a41 := ddx_sfev_rec.stream_interface_attribute13;
1597 p6_a42 := ddx_sfev_rec.stream_interface_attribute14;
1598 p6_a43 := ddx_sfev_rec.stream_interface_attribute15;
1599 p6_a44 := ddx_sfev_rec.stream_interface_attribute16;
1600 p6_a45 := ddx_sfev_rec.stream_interface_attribute17;
1601 p6_a46 := ddx_sfev_rec.stream_interface_attribute18;
1602 p6_a47 := ddx_sfev_rec.stream_interface_attribute19;
1603 p6_a48 := ddx_sfev_rec.stream_interface_attribute20;
1604 p6_a49 := rosetta_g_miss_num_map(ddx_sfev_rec.created_by);
1605 p6_a50 := rosetta_g_miss_num_map(ddx_sfev_rec.last_updated_by);
1606 p6_a51 := ddx_sfev_rec.creation_date;
1607 p6_a52 := ddx_sfev_rec.last_update_date;
1608 p6_a53 := rosetta_g_miss_num_map(ddx_sfev_rec.last_update_login);
1609 p6_a54 := rosetta_g_miss_num_map(ddx_sfev_rec.down_payment_amount);
1610 end;
1611
1612 procedure delete_sif_fees(p_api_version NUMBER
1613 , p_init_msg_list VARCHAR2
1614 , x_return_status out nocopy VARCHAR2
1615 , x_msg_count out nocopy NUMBER
1616 , x_msg_data out nocopy VARCHAR2
1617 , p5_a0 JTF_NUMBER_TABLE
1618 , p5_a1 JTF_VARCHAR2_TABLE_100
1619 , p5_a2 JTF_DATE_TABLE
1620 , p5_a3 JTF_DATE_TABLE
1621 , p5_a4 JTF_NUMBER_TABLE
1622 , p5_a5 JTF_VARCHAR2_TABLE_100
1623 , p5_a6 JTF_VARCHAR2_TABLE_100
1624 , p5_a7 JTF_VARCHAR2_TABLE_2000
1625 , p5_a8 JTF_NUMBER_TABLE
1626 , p5_a9 JTF_NUMBER_TABLE
1627 , p5_a10 JTF_VARCHAR2_TABLE_100
1628 , p5_a11 JTF_VARCHAR2_TABLE_100
1629 , p5_a12 JTF_VARCHAR2_TABLE_100
1630 , p5_a13 JTF_VARCHAR2_TABLE_100
1631 , p5_a14 JTF_NUMBER_TABLE
1632 , p5_a15 JTF_NUMBER_TABLE
1633 , p5_a16 JTF_NUMBER_TABLE
1634 , p5_a17 JTF_NUMBER_TABLE
1635 , p5_a18 JTF_NUMBER_TABLE
1636 , p5_a19 JTF_NUMBER_TABLE
1637 , p5_a20 JTF_VARCHAR2_TABLE_100
1638 , p5_a21 JTF_VARCHAR2_TABLE_200
1639 , p5_a22 JTF_NUMBER_TABLE
1640 , p5_a23 JTF_NUMBER_TABLE
1641 , p5_a24 JTF_VARCHAR2_TABLE_100
1642 , p5_a25 JTF_VARCHAR2_TABLE_100
1643 , p5_a26 JTF_VARCHAR2_TABLE_100
1644 , p5_a27 JTF_VARCHAR2_TABLE_100
1645 , p5_a28 JTF_VARCHAR2_TABLE_100
1646 , p5_a29 JTF_VARCHAR2_TABLE_500
1647 , p5_a30 JTF_VARCHAR2_TABLE_500
1648 , p5_a31 JTF_VARCHAR2_TABLE_500
1649 , p5_a32 JTF_VARCHAR2_TABLE_500
1650 , p5_a33 JTF_VARCHAR2_TABLE_500
1651 , p5_a34 JTF_VARCHAR2_TABLE_500
1652 , p5_a35 JTF_VARCHAR2_TABLE_500
1653 , p5_a36 JTF_VARCHAR2_TABLE_500
1654 , p5_a37 JTF_VARCHAR2_TABLE_500
1655 , p5_a38 JTF_VARCHAR2_TABLE_500
1656 , p5_a39 JTF_VARCHAR2_TABLE_500
1657 , p5_a40 JTF_VARCHAR2_TABLE_500
1658 , p5_a41 JTF_VARCHAR2_TABLE_500
1659 , p5_a42 JTF_VARCHAR2_TABLE_500
1660 , p5_a43 JTF_VARCHAR2_TABLE_500
1661 , p5_a44 JTF_VARCHAR2_TABLE_500
1662 , p5_a45 JTF_VARCHAR2_TABLE_500
1663 , p5_a46 JTF_VARCHAR2_TABLE_500
1664 , p5_a47 JTF_VARCHAR2_TABLE_500
1665 , p5_a48 JTF_VARCHAR2_TABLE_500
1666 , p5_a49 JTF_NUMBER_TABLE
1667 , p5_a50 JTF_NUMBER_TABLE
1668 , p5_a51 JTF_DATE_TABLE
1669 , p5_a52 JTF_DATE_TABLE
1670 , p5_a53 JTF_NUMBER_TABLE
1671 , p5_a54 JTF_NUMBER_TABLE
1672 , p6_a0 out nocopy JTF_NUMBER_TABLE
1673 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
1674 , p6_a2 out nocopy JTF_DATE_TABLE
1675 , p6_a3 out nocopy JTF_DATE_TABLE
1676 , p6_a4 out nocopy JTF_NUMBER_TABLE
1677 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1678 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1679 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
1680 , p6_a8 out nocopy JTF_NUMBER_TABLE
1681 , p6_a9 out nocopy JTF_NUMBER_TABLE
1682 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
1683 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
1684 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
1685 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1686 , p6_a14 out nocopy JTF_NUMBER_TABLE
1687 , p6_a15 out nocopy JTF_NUMBER_TABLE
1688 , p6_a16 out nocopy JTF_NUMBER_TABLE
1689 , p6_a17 out nocopy JTF_NUMBER_TABLE
1690 , p6_a18 out nocopy JTF_NUMBER_TABLE
1691 , p6_a19 out nocopy JTF_NUMBER_TABLE
1692 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
1693 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
1694 , p6_a22 out nocopy JTF_NUMBER_TABLE
1695 , p6_a23 out nocopy JTF_NUMBER_TABLE
1696 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_100
1697 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_100
1698 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_100
1699 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
1700 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_100
1701 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
1702 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
1703 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
1704 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
1705 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
1706 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
1707 , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
1708 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
1709 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
1710 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
1711 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
1712 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
1713 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
1714 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
1715 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
1716 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
1717 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
1718 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
1719 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
1720 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
1721 , p6_a49 out nocopy JTF_NUMBER_TABLE
1722 , p6_a50 out nocopy JTF_NUMBER_TABLE
1723 , p6_a51 out nocopy JTF_DATE_TABLE
1724 , p6_a52 out nocopy JTF_DATE_TABLE
1725 , p6_a53 out nocopy JTF_NUMBER_TABLE
1726 , p6_a54 out nocopy JTF_NUMBER_TABLE
1727 )
1728
1729 as
1730 ddp_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
1731 ddx_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
1732 ddindx binary_integer; indx binary_integer;
1733 begin
1734
1735 -- copy data to the local IN or IN-OUT args, if any
1736
1737
1738
1739
1740
1741 okl_sfe_pvt_w.rosetta_table_copy_in_p5(ddp_sfev_tbl, p5_a0
1742 , p5_a1
1743 , p5_a2
1744 , p5_a3
1745 , p5_a4
1746 , p5_a5
1747 , p5_a6
1748 , p5_a7
1749 , p5_a8
1750 , p5_a9
1751 , p5_a10
1752 , p5_a11
1753 , p5_a12
1754 , p5_a13
1755 , p5_a14
1756 , p5_a15
1757 , p5_a16
1758 , p5_a17
1759 , p5_a18
1760 , p5_a19
1761 , p5_a20
1762 , p5_a21
1763 , p5_a22
1764 , p5_a23
1765 , p5_a24
1766 , p5_a25
1767 , p5_a26
1768 , p5_a27
1769 , p5_a28
1770 , p5_a29
1771 , p5_a30
1772 , p5_a31
1773 , p5_a32
1774 , p5_a33
1775 , p5_a34
1776 , p5_a35
1777 , p5_a36
1778 , p5_a37
1779 , p5_a38
1780 , p5_a39
1781 , p5_a40
1782 , p5_a41
1783 , p5_a42
1784 , p5_a43
1785 , p5_a44
1786 , p5_a45
1787 , p5_a46
1788 , p5_a47
1789 , p5_a48
1790 , p5_a49
1791 , p5_a50
1792 , p5_a51
1793 , p5_a52
1794 , p5_a53
1795 , p5_a54
1796 );
1797
1798
1799 -- here's the delegated call to the old PL/SQL routine
1800 okl_sif_fees_pub.delete_sif_fees(p_api_version,
1801 p_init_msg_list,
1802 x_return_status,
1803 x_msg_count,
1804 x_msg_data,
1805 ddp_sfev_tbl,
1806 ddx_sfev_tbl);
1807
1808 -- copy data back from the local variables to OUT or IN-OUT args, if any
1809
1810
1811
1812
1813
1814
1815 okl_sfe_pvt_w.rosetta_table_copy_out_p5(ddx_sfev_tbl, p6_a0
1816 , p6_a1
1817 , p6_a2
1818 , p6_a3
1819 , p6_a4
1820 , p6_a5
1821 , p6_a6
1822 , p6_a7
1823 , p6_a8
1824 , p6_a9
1825 , p6_a10
1826 , p6_a11
1827 , p6_a12
1828 , p6_a13
1829 , p6_a14
1830 , p6_a15
1831 , p6_a16
1832 , p6_a17
1833 , p6_a18
1834 , p6_a19
1835 , p6_a20
1836 , p6_a21
1837 , p6_a22
1838 , p6_a23
1839 , p6_a24
1840 , p6_a25
1841 , p6_a26
1842 , p6_a27
1843 , p6_a28
1844 , p6_a29
1845 , p6_a30
1846 , p6_a31
1847 , p6_a32
1848 , p6_a33
1849 , p6_a34
1850 , p6_a35
1851 , p6_a36
1852 , p6_a37
1853 , p6_a38
1854 , p6_a39
1855 , p6_a40
1856 , p6_a41
1857 , p6_a42
1858 , p6_a43
1859 , p6_a44
1860 , p6_a45
1861 , p6_a46
1862 , p6_a47
1863 , p6_a48
1864 , p6_a49
1865 , p6_a50
1866 , p6_a51
1867 , p6_a52
1868 , p6_a53
1869 , p6_a54
1870 );
1871 end;
1872
1873 procedure validate_sif_fees(p_api_version NUMBER
1874 , p_init_msg_list VARCHAR2
1875 , x_return_status out nocopy VARCHAR2
1876 , x_msg_count out nocopy NUMBER
1877 , x_msg_data out nocopy VARCHAR2
1878 , p6_a0 out nocopy NUMBER
1879 , p6_a1 out nocopy VARCHAR2
1880 , p6_a2 out nocopy DATE
1881 , p6_a3 out nocopy DATE
1882 , p6_a4 out nocopy NUMBER
1883 , p6_a5 out nocopy VARCHAR2
1884 , p6_a6 out nocopy VARCHAR2
1885 , p6_a7 out nocopy VARCHAR2
1886 , p6_a8 out nocopy NUMBER
1887 , p6_a9 out nocopy NUMBER
1888 , p6_a10 out nocopy VARCHAR2
1889 , p6_a11 out nocopy VARCHAR2
1890 , p6_a12 out nocopy VARCHAR2
1891 , p6_a13 out nocopy VARCHAR2
1892 , p6_a14 out nocopy NUMBER
1893 , p6_a15 out nocopy NUMBER
1894 , p6_a16 out nocopy NUMBER
1895 , p6_a17 out nocopy NUMBER
1896 , p6_a18 out nocopy NUMBER
1897 , p6_a19 out nocopy NUMBER
1898 , p6_a20 out nocopy VARCHAR2
1899 , p6_a21 out nocopy VARCHAR2
1900 , p6_a22 out nocopy NUMBER
1901 , p6_a23 out nocopy NUMBER
1902 , p6_a24 out nocopy VARCHAR2
1903 , p6_a25 out nocopy VARCHAR2
1904 , p6_a26 out nocopy VARCHAR2
1905 , p6_a27 out nocopy VARCHAR2
1906 , p6_a28 out nocopy VARCHAR2
1907 , p6_a29 out nocopy VARCHAR2
1908 , p6_a30 out nocopy VARCHAR2
1909 , p6_a31 out nocopy VARCHAR2
1910 , p6_a32 out nocopy VARCHAR2
1911 , p6_a33 out nocopy VARCHAR2
1912 , p6_a34 out nocopy VARCHAR2
1913 , p6_a35 out nocopy VARCHAR2
1914 , p6_a36 out nocopy VARCHAR2
1915 , p6_a37 out nocopy VARCHAR2
1916 , p6_a38 out nocopy VARCHAR2
1917 , p6_a39 out nocopy VARCHAR2
1918 , p6_a40 out nocopy VARCHAR2
1919 , p6_a41 out nocopy VARCHAR2
1920 , p6_a42 out nocopy VARCHAR2
1921 , p6_a43 out nocopy VARCHAR2
1922 , p6_a44 out nocopy VARCHAR2
1923 , p6_a45 out nocopy VARCHAR2
1924 , p6_a46 out nocopy VARCHAR2
1925 , p6_a47 out nocopy VARCHAR2
1926 , p6_a48 out nocopy VARCHAR2
1927 , p6_a49 out nocopy NUMBER
1928 , p6_a50 out nocopy NUMBER
1929 , p6_a51 out nocopy DATE
1930 , p6_a52 out nocopy DATE
1931 , p6_a53 out nocopy NUMBER
1932 , p6_a54 out nocopy NUMBER
1933 , p5_a0 NUMBER := 0-1962.0724
1934 , p5_a1 VARCHAR2 := fnd_api.g_miss_char
1935 , p5_a2 DATE := fnd_api.g_miss_date
1936 , p5_a3 DATE := fnd_api.g_miss_date
1937 , p5_a4 NUMBER := 0-1962.0724
1938 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1939 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1940 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1941 , p5_a8 NUMBER := 0-1962.0724
1942 , p5_a9 NUMBER := 0-1962.0724
1943 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1944 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1945 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1946 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1947 , p5_a14 NUMBER := 0-1962.0724
1948 , p5_a15 NUMBER := 0-1962.0724
1949 , p5_a16 NUMBER := 0-1962.0724
1950 , p5_a17 NUMBER := 0-1962.0724
1951 , p5_a18 NUMBER := 0-1962.0724
1952 , p5_a19 NUMBER := 0-1962.0724
1953 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1954 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1955 , p5_a22 NUMBER := 0-1962.0724
1956 , p5_a23 NUMBER := 0-1962.0724
1957 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1958 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1959 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1960 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1961 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1962 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
1963 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1964 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1965 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
1966 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
1967 , p5_a34 VARCHAR2 := fnd_api.g_miss_char
1968 , p5_a35 VARCHAR2 := fnd_api.g_miss_char
1969 , p5_a36 VARCHAR2 := fnd_api.g_miss_char
1970 , p5_a37 VARCHAR2 := fnd_api.g_miss_char
1971 , p5_a38 VARCHAR2 := fnd_api.g_miss_char
1972 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
1973 , p5_a40 VARCHAR2 := fnd_api.g_miss_char
1974 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
1975 , p5_a42 VARCHAR2 := fnd_api.g_miss_char
1976 , p5_a43 VARCHAR2 := fnd_api.g_miss_char
1977 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
1978 , p5_a45 VARCHAR2 := fnd_api.g_miss_char
1979 , p5_a46 VARCHAR2 := fnd_api.g_miss_char
1980 , p5_a47 VARCHAR2 := fnd_api.g_miss_char
1981 , p5_a48 VARCHAR2 := fnd_api.g_miss_char
1982 , p5_a49 NUMBER := 0-1962.0724
1983 , p5_a50 NUMBER := 0-1962.0724
1984 , p5_a51 DATE := fnd_api.g_miss_date
1985 , p5_a52 DATE := fnd_api.g_miss_date
1986 , p5_a53 NUMBER := 0-1962.0724
1987 , p5_a54 NUMBER := 0-1962.0724
1988 )
1989
1990 as
1991 ddp_sfev_rec okl_sif_fees_pub.sfev_rec_type;
1992 ddx_sfev_rec okl_sif_fees_pub.sfev_rec_type;
1993 ddindx binary_integer; indx binary_integer;
1994 begin
1995
1996 -- copy data to the local IN or IN-OUT args, if any
1997
1998
1999
2000
2001
2002 ddp_sfev_rec.id := rosetta_g_miss_num_map(p5_a0);
2003 ddp_sfev_rec.sfe_type := p5_a1;
2004 ddp_sfev_rec.date_start := rosetta_g_miss_date_in_map(p5_a2);
2005 ddp_sfev_rec.date_paid := rosetta_g_miss_date_in_map(p5_a3);
2006 ddp_sfev_rec.amount := rosetta_g_miss_num_map(p5_a4);
2007 ddp_sfev_rec.idc_accounting_flag := p5_a5;
2008 ddp_sfev_rec.income_or_expense := p5_a6;
2009 ddp_sfev_rec.description := p5_a7;
2010 ddp_sfev_rec.fee_index_number := rosetta_g_miss_num_map(p5_a8);
2011 ddp_sfev_rec.level_index_number := rosetta_g_miss_num_map(p5_a9);
2012 ddp_sfev_rec.advance_or_arrears := p5_a10;
2013 ddp_sfev_rec.level_type := p5_a11;
2014 ddp_sfev_rec.lock_level_step := p5_a12;
2015 ddp_sfev_rec.period := p5_a13;
2016 ddp_sfev_rec.number_of_periods := rosetta_g_miss_num_map(p5_a14);
2017 ddp_sfev_rec.level_line_number := rosetta_g_miss_num_map(p5_a15);
2018 ddp_sfev_rec.sif_id := rosetta_g_miss_num_map(p5_a16);
2019 ddp_sfev_rec.kle_id := rosetta_g_miss_num_map(p5_a17);
2020 ddp_sfev_rec.sil_id := rosetta_g_miss_num_map(p5_a18);
2021 ddp_sfev_rec.rate := rosetta_g_miss_num_map(p5_a19);
2022 ddp_sfev_rec.query_level_yn := p5_a20;
2023 ddp_sfev_rec.structure := p5_a21;
2024 ddp_sfev_rec.days_in_period := rosetta_g_miss_num_map(p5_a22);
2025 ddp_sfev_rec.object_version_number := rosetta_g_miss_num_map(p5_a23);
2026 ddp_sfev_rec.cash_effect_yn := p5_a24;
2027 ddp_sfev_rec.tax_effect_yn := p5_a25;
2028 ddp_sfev_rec.days_in_month := p5_a26;
2029 ddp_sfev_rec.days_in_year := p5_a27;
2030 ddp_sfev_rec.balance_type_code := p5_a28;
2031 ddp_sfev_rec.stream_interface_attribute01 := p5_a29;
2032 ddp_sfev_rec.stream_interface_attribute02 := p5_a30;
2033 ddp_sfev_rec.stream_interface_attribute03 := p5_a31;
2034 ddp_sfev_rec.stream_interface_attribute04 := p5_a32;
2035 ddp_sfev_rec.stream_interface_attribute05 := p5_a33;
2036 ddp_sfev_rec.stream_interface_attribute06 := p5_a34;
2037 ddp_sfev_rec.stream_interface_attribute07 := p5_a35;
2038 ddp_sfev_rec.stream_interface_attribute08 := p5_a36;
2039 ddp_sfev_rec.stream_interface_attribute09 := p5_a37;
2040 ddp_sfev_rec.stream_interface_attribute10 := p5_a38;
2041 ddp_sfev_rec.stream_interface_attribute11 := p5_a39;
2042 ddp_sfev_rec.stream_interface_attribute12 := p5_a40;
2043 ddp_sfev_rec.stream_interface_attribute13 := p5_a41;
2044 ddp_sfev_rec.stream_interface_attribute14 := p5_a42;
2045 ddp_sfev_rec.stream_interface_attribute15 := p5_a43;
2046 ddp_sfev_rec.stream_interface_attribute16 := p5_a44;
2047 ddp_sfev_rec.stream_interface_attribute17 := p5_a45;
2048 ddp_sfev_rec.stream_interface_attribute18 := p5_a46;
2049 ddp_sfev_rec.stream_interface_attribute19 := p5_a47;
2050 ddp_sfev_rec.stream_interface_attribute20 := p5_a48;
2051 ddp_sfev_rec.created_by := rosetta_g_miss_num_map(p5_a49);
2052 ddp_sfev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a50);
2053 ddp_sfev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
2054 ddp_sfev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a52);
2055 ddp_sfev_rec.last_update_login := rosetta_g_miss_num_map(p5_a53);
2056 ddp_sfev_rec.down_payment_amount := rosetta_g_miss_num_map(p5_a54);
2057
2058
2059 -- here's the delegated call to the old PL/SQL routine
2060 okl_sif_fees_pub.validate_sif_fees(p_api_version,
2061 p_init_msg_list,
2062 x_return_status,
2063 x_msg_count,
2064 x_msg_data,
2065 ddp_sfev_rec,
2066 ddx_sfev_rec);
2067
2068 -- copy data back from the local variables to OUT or IN-OUT args, if any
2069
2070
2071
2072
2073
2074
2075 p6_a0 := rosetta_g_miss_num_map(ddx_sfev_rec.id);
2076 p6_a1 := ddx_sfev_rec.sfe_type;
2077 p6_a2 := ddx_sfev_rec.date_start;
2078 p6_a3 := ddx_sfev_rec.date_paid;
2079 p6_a4 := rosetta_g_miss_num_map(ddx_sfev_rec.amount);
2080 p6_a5 := ddx_sfev_rec.idc_accounting_flag;
2081 p6_a6 := ddx_sfev_rec.income_or_expense;
2082 p6_a7 := ddx_sfev_rec.description;
2083 p6_a8 := rosetta_g_miss_num_map(ddx_sfev_rec.fee_index_number);
2084 p6_a9 := rosetta_g_miss_num_map(ddx_sfev_rec.level_index_number);
2085 p6_a10 := ddx_sfev_rec.advance_or_arrears;
2086 p6_a11 := ddx_sfev_rec.level_type;
2087 p6_a12 := ddx_sfev_rec.lock_level_step;
2088 p6_a13 := ddx_sfev_rec.period;
2089 p6_a14 := rosetta_g_miss_num_map(ddx_sfev_rec.number_of_periods);
2090 p6_a15 := rosetta_g_miss_num_map(ddx_sfev_rec.level_line_number);
2091 p6_a16 := rosetta_g_miss_num_map(ddx_sfev_rec.sif_id);
2092 p6_a17 := rosetta_g_miss_num_map(ddx_sfev_rec.kle_id);
2093 p6_a18 := rosetta_g_miss_num_map(ddx_sfev_rec.sil_id);
2094 p6_a19 := rosetta_g_miss_num_map(ddx_sfev_rec.rate);
2095 p6_a20 := ddx_sfev_rec.query_level_yn;
2096 p6_a21 := ddx_sfev_rec.structure;
2097 p6_a22 := rosetta_g_miss_num_map(ddx_sfev_rec.days_in_period);
2098 p6_a23 := rosetta_g_miss_num_map(ddx_sfev_rec.object_version_number);
2099 p6_a24 := ddx_sfev_rec.cash_effect_yn;
2100 p6_a25 := ddx_sfev_rec.tax_effect_yn;
2101 p6_a26 := ddx_sfev_rec.days_in_month;
2102 p6_a27 := ddx_sfev_rec.days_in_year;
2103 p6_a28 := ddx_sfev_rec.balance_type_code;
2104 p6_a29 := ddx_sfev_rec.stream_interface_attribute01;
2105 p6_a30 := ddx_sfev_rec.stream_interface_attribute02;
2106 p6_a31 := ddx_sfev_rec.stream_interface_attribute03;
2107 p6_a32 := ddx_sfev_rec.stream_interface_attribute04;
2108 p6_a33 := ddx_sfev_rec.stream_interface_attribute05;
2109 p6_a34 := ddx_sfev_rec.stream_interface_attribute06;
2110 p6_a35 := ddx_sfev_rec.stream_interface_attribute07;
2111 p6_a36 := ddx_sfev_rec.stream_interface_attribute08;
2112 p6_a37 := ddx_sfev_rec.stream_interface_attribute09;
2113 p6_a38 := ddx_sfev_rec.stream_interface_attribute10;
2114 p6_a39 := ddx_sfev_rec.stream_interface_attribute11;
2115 p6_a40 := ddx_sfev_rec.stream_interface_attribute12;
2116 p6_a41 := ddx_sfev_rec.stream_interface_attribute13;
2117 p6_a42 := ddx_sfev_rec.stream_interface_attribute14;
2118 p6_a43 := ddx_sfev_rec.stream_interface_attribute15;
2119 p6_a44 := ddx_sfev_rec.stream_interface_attribute16;
2120 p6_a45 := ddx_sfev_rec.stream_interface_attribute17;
2121 p6_a46 := ddx_sfev_rec.stream_interface_attribute18;
2122 p6_a47 := ddx_sfev_rec.stream_interface_attribute19;
2123 p6_a48 := ddx_sfev_rec.stream_interface_attribute20;
2124 p6_a49 := rosetta_g_miss_num_map(ddx_sfev_rec.created_by);
2125 p6_a50 := rosetta_g_miss_num_map(ddx_sfev_rec.last_updated_by);
2126 p6_a51 := ddx_sfev_rec.creation_date;
2127 p6_a52 := ddx_sfev_rec.last_update_date;
2128 p6_a53 := rosetta_g_miss_num_map(ddx_sfev_rec.last_update_login);
2129 p6_a54 := rosetta_g_miss_num_map(ddx_sfev_rec.down_payment_amount);
2130 end;
2131
2132 procedure validate_sif_fees(p_api_version NUMBER
2133 , p_init_msg_list VARCHAR2
2134 , x_return_status out nocopy VARCHAR2
2135 , x_msg_count out nocopy NUMBER
2136 , x_msg_data out nocopy VARCHAR2
2137 , p5_a0 JTF_NUMBER_TABLE
2138 , p5_a1 JTF_VARCHAR2_TABLE_100
2139 , p5_a2 JTF_DATE_TABLE
2140 , p5_a3 JTF_DATE_TABLE
2141 , p5_a4 JTF_NUMBER_TABLE
2142 , p5_a5 JTF_VARCHAR2_TABLE_100
2143 , p5_a6 JTF_VARCHAR2_TABLE_100
2144 , p5_a7 JTF_VARCHAR2_TABLE_2000
2145 , p5_a8 JTF_NUMBER_TABLE
2146 , p5_a9 JTF_NUMBER_TABLE
2147 , p5_a10 JTF_VARCHAR2_TABLE_100
2148 , p5_a11 JTF_VARCHAR2_TABLE_100
2149 , p5_a12 JTF_VARCHAR2_TABLE_100
2150 , p5_a13 JTF_VARCHAR2_TABLE_100
2151 , p5_a14 JTF_NUMBER_TABLE
2152 , p5_a15 JTF_NUMBER_TABLE
2153 , p5_a16 JTF_NUMBER_TABLE
2154 , p5_a17 JTF_NUMBER_TABLE
2155 , p5_a18 JTF_NUMBER_TABLE
2156 , p5_a19 JTF_NUMBER_TABLE
2157 , p5_a20 JTF_VARCHAR2_TABLE_100
2158 , p5_a21 JTF_VARCHAR2_TABLE_200
2159 , p5_a22 JTF_NUMBER_TABLE
2160 , p5_a23 JTF_NUMBER_TABLE
2161 , p5_a24 JTF_VARCHAR2_TABLE_100
2162 , p5_a25 JTF_VARCHAR2_TABLE_100
2163 , p5_a26 JTF_VARCHAR2_TABLE_100
2164 , p5_a27 JTF_VARCHAR2_TABLE_100
2165 , p5_a28 JTF_VARCHAR2_TABLE_100
2166 , p5_a29 JTF_VARCHAR2_TABLE_500
2167 , p5_a30 JTF_VARCHAR2_TABLE_500
2168 , p5_a31 JTF_VARCHAR2_TABLE_500
2169 , p5_a32 JTF_VARCHAR2_TABLE_500
2170 , p5_a33 JTF_VARCHAR2_TABLE_500
2171 , p5_a34 JTF_VARCHAR2_TABLE_500
2172 , p5_a35 JTF_VARCHAR2_TABLE_500
2173 , p5_a36 JTF_VARCHAR2_TABLE_500
2174 , p5_a37 JTF_VARCHAR2_TABLE_500
2175 , p5_a38 JTF_VARCHAR2_TABLE_500
2176 , p5_a39 JTF_VARCHAR2_TABLE_500
2177 , p5_a40 JTF_VARCHAR2_TABLE_500
2178 , p5_a41 JTF_VARCHAR2_TABLE_500
2179 , p5_a42 JTF_VARCHAR2_TABLE_500
2180 , p5_a43 JTF_VARCHAR2_TABLE_500
2181 , p5_a44 JTF_VARCHAR2_TABLE_500
2182 , p5_a45 JTF_VARCHAR2_TABLE_500
2183 , p5_a46 JTF_VARCHAR2_TABLE_500
2184 , p5_a47 JTF_VARCHAR2_TABLE_500
2185 , p5_a48 JTF_VARCHAR2_TABLE_500
2186 , p5_a49 JTF_NUMBER_TABLE
2187 , p5_a50 JTF_NUMBER_TABLE
2188 , p5_a51 JTF_DATE_TABLE
2189 , p5_a52 JTF_DATE_TABLE
2190 , p5_a53 JTF_NUMBER_TABLE
2191 , p5_a54 JTF_NUMBER_TABLE
2192 , p6_a0 out nocopy JTF_NUMBER_TABLE
2193 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_100
2194 , p6_a2 out nocopy JTF_DATE_TABLE
2195 , p6_a3 out nocopy JTF_DATE_TABLE
2196 , p6_a4 out nocopy JTF_NUMBER_TABLE
2197 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
2198 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
2199 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
2200 , p6_a8 out nocopy JTF_NUMBER_TABLE
2201 , p6_a9 out nocopy JTF_NUMBER_TABLE
2202 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
2203 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
2204 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
2205 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
2206 , p6_a14 out nocopy JTF_NUMBER_TABLE
2207 , p6_a15 out nocopy JTF_NUMBER_TABLE
2208 , p6_a16 out nocopy JTF_NUMBER_TABLE
2209 , p6_a17 out nocopy JTF_NUMBER_TABLE
2210 , p6_a18 out nocopy JTF_NUMBER_TABLE
2211 , p6_a19 out nocopy JTF_NUMBER_TABLE
2212 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_100
2213 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_200
2214 , p6_a22 out nocopy JTF_NUMBER_TABLE
2215 , p6_a23 out nocopy JTF_NUMBER_TABLE
2216 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_100
2217 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_100
2218 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_100
2219 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_100
2220 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_100
2221 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
2222 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
2223 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
2224 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
2225 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
2226 , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
2227 , p6_a35 out nocopy JTF_VARCHAR2_TABLE_500
2228 , p6_a36 out nocopy JTF_VARCHAR2_TABLE_500
2229 , p6_a37 out nocopy JTF_VARCHAR2_TABLE_500
2230 , p6_a38 out nocopy JTF_VARCHAR2_TABLE_500
2231 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_500
2232 , p6_a40 out nocopy JTF_VARCHAR2_TABLE_500
2233 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_500
2234 , p6_a42 out nocopy JTF_VARCHAR2_TABLE_500
2235 , p6_a43 out nocopy JTF_VARCHAR2_TABLE_500
2236 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_500
2237 , p6_a45 out nocopy JTF_VARCHAR2_TABLE_500
2238 , p6_a46 out nocopy JTF_VARCHAR2_TABLE_500
2239 , p6_a47 out nocopy JTF_VARCHAR2_TABLE_500
2240 , p6_a48 out nocopy JTF_VARCHAR2_TABLE_500
2241 , p6_a49 out nocopy JTF_NUMBER_TABLE
2242 , p6_a50 out nocopy JTF_NUMBER_TABLE
2243 , p6_a51 out nocopy JTF_DATE_TABLE
2244 , p6_a52 out nocopy JTF_DATE_TABLE
2245 , p6_a53 out nocopy JTF_NUMBER_TABLE
2246 , p6_a54 out nocopy JTF_NUMBER_TABLE
2247 )
2248
2249 as
2250 ddp_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
2251 ddx_sfev_tbl okl_sif_fees_pub.sfev_tbl_type;
2252 ddindx binary_integer; indx binary_integer;
2253 begin
2254
2255 -- copy data to the local IN or IN-OUT args, if any
2256
2257
2258
2259
2260
2261 okl_sfe_pvt_w.rosetta_table_copy_in_p5(ddp_sfev_tbl, p5_a0
2262 , p5_a1
2263 , p5_a2
2264 , p5_a3
2265 , p5_a4
2266 , p5_a5
2267 , p5_a6
2268 , p5_a7
2269 , p5_a8
2270 , p5_a9
2271 , p5_a10
2272 , p5_a11
2273 , p5_a12
2274 , p5_a13
2275 , p5_a14
2276 , p5_a15
2277 , p5_a16
2278 , p5_a17
2279 , p5_a18
2280 , p5_a19
2281 , p5_a20
2282 , p5_a21
2283 , p5_a22
2284 , p5_a23
2285 , p5_a24
2286 , p5_a25
2287 , p5_a26
2288 , p5_a27
2289 , p5_a28
2290 , p5_a29
2291 , p5_a30
2292 , p5_a31
2293 , p5_a32
2294 , p5_a33
2295 , p5_a34
2296 , p5_a35
2297 , p5_a36
2298 , p5_a37
2299 , p5_a38
2300 , p5_a39
2301 , p5_a40
2302 , p5_a41
2303 , p5_a42
2304 , p5_a43
2305 , p5_a44
2306 , p5_a45
2307 , p5_a46
2308 , p5_a47
2309 , p5_a48
2310 , p5_a49
2311 , p5_a50
2312 , p5_a51
2313 , p5_a52
2314 , p5_a53
2315 , p5_a54
2316 );
2317
2318
2319 -- here's the delegated call to the old PL/SQL routine
2320 okl_sif_fees_pub.validate_sif_fees(p_api_version,
2321 p_init_msg_list,
2322 x_return_status,
2323 x_msg_count,
2324 x_msg_data,
2325 ddp_sfev_tbl,
2326 ddx_sfev_tbl);
2327
2328 -- copy data back from the local variables to OUT or IN-OUT args, if any
2329
2330
2331
2332
2333
2334
2335 okl_sfe_pvt_w.rosetta_table_copy_out_p5(ddx_sfev_tbl, p6_a0
2336 , p6_a1
2337 , p6_a2
2338 , p6_a3
2339 , p6_a4
2340 , p6_a5
2341 , p6_a6
2342 , p6_a7
2343 , p6_a8
2344 , p6_a9
2345 , p6_a10
2346 , p6_a11
2347 , p6_a12
2348 , p6_a13
2349 , p6_a14
2350 , p6_a15
2351 , p6_a16
2352 , p6_a17
2353 , p6_a18
2354 , p6_a19
2355 , p6_a20
2356 , p6_a21
2357 , p6_a22
2358 , p6_a23
2359 , p6_a24
2360 , p6_a25
2361 , p6_a26
2362 , p6_a27
2363 , p6_a28
2364 , p6_a29
2365 , p6_a30
2366 , p6_a31
2367 , p6_a32
2368 , p6_a33
2369 , p6_a34
2370 , p6_a35
2371 , p6_a36
2372 , p6_a37
2373 , p6_a38
2374 , p6_a39
2375 , p6_a40
2376 , p6_a41
2377 , p6_a42
2378 , p6_a43
2379 , p6_a44
2380 , p6_a45
2381 , p6_a46
2382 , p6_a47
2383 , p6_a48
2384 , p6_a49
2385 , p6_a50
2386 , p6_a51
2387 , p6_a52
2388 , p6_a53
2389 , p6_a54
2390 );
2391 end;
2392
2393 end okl_sif_fees_pub_w;