DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_INVC_FRMT_STRMS_PUB_W

Source


1 package body okl_invc_frmt_strms_pub_w as
2   /* $Header: OKLUILSB.pls 120.1 2005/07/14 12:02:35 asawanka 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_invc_frmt_strms(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     , p5_a0 JTF_NUMBER_TABLE
28     , p5_a1 JTF_NUMBER_TABLE
29     , p5_a2 JTF_NUMBER_TABLE
30     , p5_a3 JTF_NUMBER_TABLE
31     , p5_a4 JTF_NUMBER_TABLE
32     , p5_a5 JTF_VARCHAR2_TABLE_100
33     , p5_a6 JTF_VARCHAR2_TABLE_500
34     , p5_a7 JTF_VARCHAR2_TABLE_500
35     , p5_a8 JTF_VARCHAR2_TABLE_500
36     , p5_a9 JTF_VARCHAR2_TABLE_500
37     , p5_a10 JTF_VARCHAR2_TABLE_500
38     , p5_a11 JTF_VARCHAR2_TABLE_500
39     , p5_a12 JTF_VARCHAR2_TABLE_500
40     , p5_a13 JTF_VARCHAR2_TABLE_500
41     , p5_a14 JTF_VARCHAR2_TABLE_500
42     , p5_a15 JTF_VARCHAR2_TABLE_500
43     , p5_a16 JTF_VARCHAR2_TABLE_500
44     , p5_a17 JTF_VARCHAR2_TABLE_500
45     , p5_a18 JTF_VARCHAR2_TABLE_500
46     , p5_a19 JTF_VARCHAR2_TABLE_500
47     , p5_a20 JTF_VARCHAR2_TABLE_500
48     , p5_a21 JTF_NUMBER_TABLE
49     , p5_a22 JTF_DATE_TABLE
50     , p5_a23 JTF_NUMBER_TABLE
51     , p5_a24 JTF_DATE_TABLE
52     , p5_a25 JTF_NUMBER_TABLE
53     , p6_a0 out nocopy JTF_NUMBER_TABLE
54     , p6_a1 out nocopy JTF_NUMBER_TABLE
55     , p6_a2 out nocopy JTF_NUMBER_TABLE
56     , p6_a3 out nocopy JTF_NUMBER_TABLE
57     , p6_a4 out nocopy JTF_NUMBER_TABLE
58     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
59     , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
60     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
61     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
62     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
63     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
64     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
65     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
66     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
67     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
68     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
69     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
70     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
71     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
72     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
73     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
74     , p6_a21 out nocopy JTF_NUMBER_TABLE
75     , p6_a22 out nocopy JTF_DATE_TABLE
76     , p6_a23 out nocopy JTF_NUMBER_TABLE
77     , p6_a24 out nocopy JTF_DATE_TABLE
78     , p6_a25 out nocopy JTF_NUMBER_TABLE
79   )
80 
81   as
82     ddp_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
83     ddx_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
84     ddindx binary_integer; indx binary_integer;
85   begin
86 
87     -- copy data to the local IN or IN-OUT args, if any
88 
89 
90 
91 
92 
93     okl_ils_pvt_w.rosetta_table_copy_in_p5(ddp_ilsv_tbl, p5_a0
94       , p5_a1
95       , p5_a2
96       , p5_a3
97       , p5_a4
98       , p5_a5
99       , p5_a6
100       , p5_a7
101       , p5_a8
102       , p5_a9
103       , p5_a10
104       , p5_a11
105       , p5_a12
106       , p5_a13
107       , p5_a14
108       , p5_a15
109       , p5_a16
110       , p5_a17
111       , p5_a18
112       , p5_a19
113       , p5_a20
114       , p5_a21
115       , p5_a22
116       , p5_a23
117       , p5_a24
118       , p5_a25
119       );
120 
121 
122     -- here's the delegated call to the old PL/SQL routine
123     okl_invc_frmt_strms_pub.insert_invc_frmt_strms(p_api_version,
124       p_init_msg_list,
125       x_return_status,
126       x_msg_count,
127       x_msg_data,
128       ddp_ilsv_tbl,
129       ddx_ilsv_tbl);
130 
131     -- copy data back from the local variables to OUT or IN-OUT args, if any
132 
133 
134 
135 
136 
137 
138     okl_ils_pvt_w.rosetta_table_copy_out_p5(ddx_ilsv_tbl, p6_a0
139       , p6_a1
140       , p6_a2
141       , p6_a3
142       , p6_a4
143       , p6_a5
144       , p6_a6
145       , p6_a7
146       , p6_a8
147       , p6_a9
148       , p6_a10
149       , p6_a11
150       , p6_a12
151       , p6_a13
152       , p6_a14
153       , p6_a15
154       , p6_a16
155       , p6_a17
156       , p6_a18
157       , p6_a19
158       , p6_a20
159       , p6_a21
160       , p6_a22
161       , p6_a23
162       , p6_a24
163       , p6_a25
164       );
165   end;
166 
167   procedure insert_invc_frmt_strms(p_api_version  NUMBER
168     , p_init_msg_list  VARCHAR2
169     , x_return_status out nocopy  VARCHAR2
170     , x_msg_count out nocopy  NUMBER
171     , x_msg_data out nocopy  VARCHAR2
172     , p6_a0 out nocopy  NUMBER
173     , p6_a1 out nocopy  NUMBER
174     , p6_a2 out nocopy  NUMBER
175     , p6_a3 out nocopy  NUMBER
176     , p6_a4 out nocopy  NUMBER
177     , p6_a5 out nocopy  VARCHAR2
178     , p6_a6 out nocopy  VARCHAR2
179     , p6_a7 out nocopy  VARCHAR2
180     , p6_a8 out nocopy  VARCHAR2
181     , p6_a9 out nocopy  VARCHAR2
182     , p6_a10 out nocopy  VARCHAR2
183     , p6_a11 out nocopy  VARCHAR2
184     , p6_a12 out nocopy  VARCHAR2
185     , p6_a13 out nocopy  VARCHAR2
186     , p6_a14 out nocopy  VARCHAR2
187     , p6_a15 out nocopy  VARCHAR2
188     , p6_a16 out nocopy  VARCHAR2
189     , p6_a17 out nocopy  VARCHAR2
190     , p6_a18 out nocopy  VARCHAR2
191     , p6_a19 out nocopy  VARCHAR2
192     , p6_a20 out nocopy  VARCHAR2
193     , p6_a21 out nocopy  NUMBER
194     , p6_a22 out nocopy  DATE
195     , p6_a23 out nocopy  NUMBER
196     , p6_a24 out nocopy  DATE
197     , p6_a25 out nocopy  NUMBER
198     , p5_a0  NUMBER := 0-1962.0724
199     , p5_a1  NUMBER := 0-1962.0724
200     , p5_a2  NUMBER := 0-1962.0724
201     , p5_a3  NUMBER := 0-1962.0724
202     , p5_a4  NUMBER := 0-1962.0724
203     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
204     , p5_a6  VARCHAR2 := fnd_api.g_miss_char
205     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
206     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
207     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
208     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
209     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
210     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
211     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
212     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
213     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
214     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
215     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
216     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
217     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
218     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
219     , p5_a21  NUMBER := 0-1962.0724
220     , p5_a22  DATE := fnd_api.g_miss_date
221     , p5_a23  NUMBER := 0-1962.0724
222     , p5_a24  DATE := fnd_api.g_miss_date
223     , p5_a25  NUMBER := 0-1962.0724
224   )
225 
226   as
227     ddp_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
228     ddx_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
229     ddindx binary_integer; indx binary_integer;
230   begin
231 
232     -- copy data to the local IN or IN-OUT args, if any
233 
234 
235 
236 
237 
238     ddp_ilsv_rec.id := rosetta_g_miss_num_map(p5_a0);
239     ddp_ilsv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
240     ddp_ilsv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
241     ddp_ilsv_rec.inf_id := rosetta_g_miss_num_map(p5_a3);
242     ddp_ilsv_rec.ilt_id := rosetta_g_miss_num_map(p5_a4);
243     ddp_ilsv_rec.attribute_category := p5_a5;
244     ddp_ilsv_rec.attribute1 := p5_a6;
245     ddp_ilsv_rec.attribute2 := p5_a7;
246     ddp_ilsv_rec.attribute3 := p5_a8;
247     ddp_ilsv_rec.attribute4 := p5_a9;
248     ddp_ilsv_rec.attribute5 := p5_a10;
249     ddp_ilsv_rec.attribute6 := p5_a11;
250     ddp_ilsv_rec.attribute7 := p5_a12;
251     ddp_ilsv_rec.attribute8 := p5_a13;
252     ddp_ilsv_rec.attribute9 := p5_a14;
253     ddp_ilsv_rec.attribute10 := p5_a15;
254     ddp_ilsv_rec.attribute11 := p5_a16;
255     ddp_ilsv_rec.attribute12 := p5_a17;
256     ddp_ilsv_rec.attribute13 := p5_a18;
257     ddp_ilsv_rec.attribute14 := p5_a19;
258     ddp_ilsv_rec.attribute15 := p5_a20;
259     ddp_ilsv_rec.created_by := rosetta_g_miss_num_map(p5_a21);
260     ddp_ilsv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a22);
261     ddp_ilsv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a23);
262     ddp_ilsv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a24);
263     ddp_ilsv_rec.last_update_login := rosetta_g_miss_num_map(p5_a25);
264 
265 
266     -- here's the delegated call to the old PL/SQL routine
267     okl_invc_frmt_strms_pub.insert_invc_frmt_strms(p_api_version,
268       p_init_msg_list,
269       x_return_status,
270       x_msg_count,
271       x_msg_data,
272       ddp_ilsv_rec,
273       ddx_ilsv_rec);
274 
275     -- copy data back from the local variables to OUT or IN-OUT args, if any
276 
277 
278 
279 
280 
281 
282     p6_a0 := rosetta_g_miss_num_map(ddx_ilsv_rec.id);
283     p6_a1 := rosetta_g_miss_num_map(ddx_ilsv_rec.object_version_number);
284     p6_a2 := rosetta_g_miss_num_map(ddx_ilsv_rec.sty_id);
285     p6_a3 := rosetta_g_miss_num_map(ddx_ilsv_rec.inf_id);
286     p6_a4 := rosetta_g_miss_num_map(ddx_ilsv_rec.ilt_id);
287     p6_a5 := ddx_ilsv_rec.attribute_category;
288     p6_a6 := ddx_ilsv_rec.attribute1;
289     p6_a7 := ddx_ilsv_rec.attribute2;
290     p6_a8 := ddx_ilsv_rec.attribute3;
291     p6_a9 := ddx_ilsv_rec.attribute4;
292     p6_a10 := ddx_ilsv_rec.attribute5;
293     p6_a11 := ddx_ilsv_rec.attribute6;
294     p6_a12 := ddx_ilsv_rec.attribute7;
295     p6_a13 := ddx_ilsv_rec.attribute8;
296     p6_a14 := ddx_ilsv_rec.attribute9;
297     p6_a15 := ddx_ilsv_rec.attribute10;
298     p6_a16 := ddx_ilsv_rec.attribute11;
299     p6_a17 := ddx_ilsv_rec.attribute12;
300     p6_a18 := ddx_ilsv_rec.attribute13;
301     p6_a19 := ddx_ilsv_rec.attribute14;
302     p6_a20 := ddx_ilsv_rec.attribute15;
303     p6_a21 := rosetta_g_miss_num_map(ddx_ilsv_rec.created_by);
304     p6_a22 := ddx_ilsv_rec.creation_date;
305     p6_a23 := rosetta_g_miss_num_map(ddx_ilsv_rec.last_updated_by);
306     p6_a24 := ddx_ilsv_rec.last_update_date;
307     p6_a25 := rosetta_g_miss_num_map(ddx_ilsv_rec.last_update_login);
308   end;
309 
310   procedure lock_invc_frmt_strms(p_api_version  NUMBER
311     , p_init_msg_list  VARCHAR2
312     , x_return_status out nocopy  VARCHAR2
313     , x_msg_count out nocopy  NUMBER
314     , x_msg_data out nocopy  VARCHAR2
315     , p5_a0 JTF_NUMBER_TABLE
316     , p5_a1 JTF_NUMBER_TABLE
317     , p5_a2 JTF_NUMBER_TABLE
318     , p5_a3 JTF_NUMBER_TABLE
319     , p5_a4 JTF_NUMBER_TABLE
320     , p5_a5 JTF_VARCHAR2_TABLE_100
321     , p5_a6 JTF_VARCHAR2_TABLE_500
322     , p5_a7 JTF_VARCHAR2_TABLE_500
323     , p5_a8 JTF_VARCHAR2_TABLE_500
324     , p5_a9 JTF_VARCHAR2_TABLE_500
325     , p5_a10 JTF_VARCHAR2_TABLE_500
326     , p5_a11 JTF_VARCHAR2_TABLE_500
327     , p5_a12 JTF_VARCHAR2_TABLE_500
328     , p5_a13 JTF_VARCHAR2_TABLE_500
329     , p5_a14 JTF_VARCHAR2_TABLE_500
330     , p5_a15 JTF_VARCHAR2_TABLE_500
331     , p5_a16 JTF_VARCHAR2_TABLE_500
332     , p5_a17 JTF_VARCHAR2_TABLE_500
333     , p5_a18 JTF_VARCHAR2_TABLE_500
334     , p5_a19 JTF_VARCHAR2_TABLE_500
335     , p5_a20 JTF_VARCHAR2_TABLE_500
336     , p5_a21 JTF_NUMBER_TABLE
337     , p5_a22 JTF_DATE_TABLE
338     , p5_a23 JTF_NUMBER_TABLE
339     , p5_a24 JTF_DATE_TABLE
340     , p5_a25 JTF_NUMBER_TABLE
341   )
342 
343   as
344     ddp_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
345     ddindx binary_integer; indx binary_integer;
346   begin
347 
348     -- copy data to the local IN or IN-OUT args, if any
349 
350 
351 
352 
353 
354     okl_ils_pvt_w.rosetta_table_copy_in_p5(ddp_ilsv_tbl, p5_a0
355       , p5_a1
356       , p5_a2
357       , p5_a3
358       , p5_a4
359       , p5_a5
360       , p5_a6
361       , p5_a7
362       , p5_a8
363       , p5_a9
364       , p5_a10
365       , p5_a11
366       , p5_a12
367       , p5_a13
368       , p5_a14
369       , p5_a15
370       , p5_a16
371       , p5_a17
372       , p5_a18
373       , p5_a19
374       , p5_a20
375       , p5_a21
376       , p5_a22
377       , p5_a23
378       , p5_a24
379       , p5_a25
380       );
381 
382     -- here's the delegated call to the old PL/SQL routine
383     okl_invc_frmt_strms_pub.lock_invc_frmt_strms(p_api_version,
384       p_init_msg_list,
385       x_return_status,
386       x_msg_count,
387       x_msg_data,
388       ddp_ilsv_tbl);
389 
390     -- copy data back from the local variables to OUT or IN-OUT args, if any
391 
392 
393 
394 
395 
396   end;
397 
398   procedure lock_invc_frmt_strms(p_api_version  NUMBER
399     , p_init_msg_list  VARCHAR2
400     , x_return_status out nocopy  VARCHAR2
401     , x_msg_count out nocopy  NUMBER
402     , x_msg_data out nocopy  VARCHAR2
403     , p5_a0  NUMBER := 0-1962.0724
404     , p5_a1  NUMBER := 0-1962.0724
405     , p5_a2  NUMBER := 0-1962.0724
406     , p5_a3  NUMBER := 0-1962.0724
407     , p5_a4  NUMBER := 0-1962.0724
408     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
409     , p5_a6  VARCHAR2 := fnd_api.g_miss_char
410     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
411     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
412     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
413     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
414     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
415     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
416     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
417     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
418     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
419     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
420     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
421     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
422     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
423     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
424     , p5_a21  NUMBER := 0-1962.0724
425     , p5_a22  DATE := fnd_api.g_miss_date
426     , p5_a23  NUMBER := 0-1962.0724
427     , p5_a24  DATE := fnd_api.g_miss_date
428     , p5_a25  NUMBER := 0-1962.0724
429   )
430 
431   as
432     ddp_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
433     ddindx binary_integer; indx binary_integer;
434   begin
435 
436     -- copy data to the local IN or IN-OUT args, if any
437 
438 
439 
440 
441 
442     ddp_ilsv_rec.id := rosetta_g_miss_num_map(p5_a0);
443     ddp_ilsv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
444     ddp_ilsv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
445     ddp_ilsv_rec.inf_id := rosetta_g_miss_num_map(p5_a3);
446     ddp_ilsv_rec.ilt_id := rosetta_g_miss_num_map(p5_a4);
447     ddp_ilsv_rec.attribute_category := p5_a5;
448     ddp_ilsv_rec.attribute1 := p5_a6;
449     ddp_ilsv_rec.attribute2 := p5_a7;
450     ddp_ilsv_rec.attribute3 := p5_a8;
451     ddp_ilsv_rec.attribute4 := p5_a9;
452     ddp_ilsv_rec.attribute5 := p5_a10;
453     ddp_ilsv_rec.attribute6 := p5_a11;
454     ddp_ilsv_rec.attribute7 := p5_a12;
455     ddp_ilsv_rec.attribute8 := p5_a13;
456     ddp_ilsv_rec.attribute9 := p5_a14;
457     ddp_ilsv_rec.attribute10 := p5_a15;
458     ddp_ilsv_rec.attribute11 := p5_a16;
459     ddp_ilsv_rec.attribute12 := p5_a17;
460     ddp_ilsv_rec.attribute13 := p5_a18;
461     ddp_ilsv_rec.attribute14 := p5_a19;
462     ddp_ilsv_rec.attribute15 := p5_a20;
463     ddp_ilsv_rec.created_by := rosetta_g_miss_num_map(p5_a21);
464     ddp_ilsv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a22);
465     ddp_ilsv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a23);
466     ddp_ilsv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a24);
467     ddp_ilsv_rec.last_update_login := rosetta_g_miss_num_map(p5_a25);
468 
469     -- here's the delegated call to the old PL/SQL routine
470     okl_invc_frmt_strms_pub.lock_invc_frmt_strms(p_api_version,
471       p_init_msg_list,
472       x_return_status,
473       x_msg_count,
474       x_msg_data,
475       ddp_ilsv_rec);
476 
477     -- copy data back from the local variables to OUT or IN-OUT args, if any
478 
479 
480 
481 
482 
483   end;
484 
485   procedure update_invc_frmt_strms(p_api_version  NUMBER
486     , p_init_msg_list  VARCHAR2
487     , x_return_status out nocopy  VARCHAR2
488     , x_msg_count out nocopy  NUMBER
489     , x_msg_data out nocopy  VARCHAR2
490     , p5_a0 JTF_NUMBER_TABLE
491     , p5_a1 JTF_NUMBER_TABLE
492     , p5_a2 JTF_NUMBER_TABLE
493     , p5_a3 JTF_NUMBER_TABLE
494     , p5_a4 JTF_NUMBER_TABLE
495     , p5_a5 JTF_VARCHAR2_TABLE_100
496     , p5_a6 JTF_VARCHAR2_TABLE_500
497     , p5_a7 JTF_VARCHAR2_TABLE_500
498     , p5_a8 JTF_VARCHAR2_TABLE_500
499     , p5_a9 JTF_VARCHAR2_TABLE_500
500     , p5_a10 JTF_VARCHAR2_TABLE_500
501     , p5_a11 JTF_VARCHAR2_TABLE_500
502     , p5_a12 JTF_VARCHAR2_TABLE_500
503     , p5_a13 JTF_VARCHAR2_TABLE_500
504     , p5_a14 JTF_VARCHAR2_TABLE_500
505     , p5_a15 JTF_VARCHAR2_TABLE_500
506     , p5_a16 JTF_VARCHAR2_TABLE_500
507     , p5_a17 JTF_VARCHAR2_TABLE_500
508     , p5_a18 JTF_VARCHAR2_TABLE_500
509     , p5_a19 JTF_VARCHAR2_TABLE_500
510     , p5_a20 JTF_VARCHAR2_TABLE_500
511     , p5_a21 JTF_NUMBER_TABLE
512     , p5_a22 JTF_DATE_TABLE
513     , p5_a23 JTF_NUMBER_TABLE
514     , p5_a24 JTF_DATE_TABLE
515     , p5_a25 JTF_NUMBER_TABLE
516     , p6_a0 out nocopy JTF_NUMBER_TABLE
517     , p6_a1 out nocopy JTF_NUMBER_TABLE
518     , p6_a2 out nocopy JTF_NUMBER_TABLE
519     , p6_a3 out nocopy JTF_NUMBER_TABLE
520     , p6_a4 out nocopy JTF_NUMBER_TABLE
521     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
522     , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
523     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
524     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
525     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
526     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
527     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
528     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
529     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
530     , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
531     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
532     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
533     , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
534     , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
535     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
536     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
537     , p6_a21 out nocopy JTF_NUMBER_TABLE
538     , p6_a22 out nocopy JTF_DATE_TABLE
539     , p6_a23 out nocopy JTF_NUMBER_TABLE
540     , p6_a24 out nocopy JTF_DATE_TABLE
541     , p6_a25 out nocopy JTF_NUMBER_TABLE
542   )
543 
544   as
545     ddp_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
546     ddx_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
547     ddindx binary_integer; indx binary_integer;
548   begin
549 
550     -- copy data to the local IN or IN-OUT args, if any
551 
552 
553 
554 
555 
556     okl_ils_pvt_w.rosetta_table_copy_in_p5(ddp_ilsv_tbl, p5_a0
557       , p5_a1
558       , p5_a2
559       , p5_a3
560       , p5_a4
561       , p5_a5
562       , p5_a6
563       , p5_a7
564       , p5_a8
565       , p5_a9
566       , p5_a10
567       , p5_a11
568       , p5_a12
569       , p5_a13
570       , p5_a14
571       , p5_a15
572       , p5_a16
573       , p5_a17
574       , p5_a18
575       , p5_a19
576       , p5_a20
577       , p5_a21
578       , p5_a22
579       , p5_a23
580       , p5_a24
581       , p5_a25
582       );
583 
584 
585     -- here's the delegated call to the old PL/SQL routine
586     okl_invc_frmt_strms_pub.update_invc_frmt_strms(p_api_version,
587       p_init_msg_list,
588       x_return_status,
589       x_msg_count,
590       x_msg_data,
591       ddp_ilsv_tbl,
592       ddx_ilsv_tbl);
593 
594     -- copy data back from the local variables to OUT or IN-OUT args, if any
595 
596 
597 
598 
599 
600 
601     okl_ils_pvt_w.rosetta_table_copy_out_p5(ddx_ilsv_tbl, p6_a0
602       , p6_a1
603       , p6_a2
604       , p6_a3
605       , p6_a4
606       , p6_a5
607       , p6_a6
608       , p6_a7
609       , p6_a8
610       , p6_a9
611       , p6_a10
612       , p6_a11
613       , p6_a12
614       , p6_a13
615       , p6_a14
616       , p6_a15
617       , p6_a16
618       , p6_a17
619       , p6_a18
620       , p6_a19
621       , p6_a20
622       , p6_a21
623       , p6_a22
624       , p6_a23
625       , p6_a24
626       , p6_a25
627       );
628   end;
629 
630   procedure update_invc_frmt_strms(p_api_version  NUMBER
631     , p_init_msg_list  VARCHAR2
632     , x_return_status out nocopy  VARCHAR2
633     , x_msg_count out nocopy  NUMBER
634     , x_msg_data out nocopy  VARCHAR2
635     , p6_a0 out nocopy  NUMBER
636     , p6_a1 out nocopy  NUMBER
637     , p6_a2 out nocopy  NUMBER
638     , p6_a3 out nocopy  NUMBER
639     , p6_a4 out nocopy  NUMBER
640     , p6_a5 out nocopy  VARCHAR2
641     , p6_a6 out nocopy  VARCHAR2
642     , p6_a7 out nocopy  VARCHAR2
643     , p6_a8 out nocopy  VARCHAR2
644     , p6_a9 out nocopy  VARCHAR2
645     , p6_a10 out nocopy  VARCHAR2
646     , p6_a11 out nocopy  VARCHAR2
647     , p6_a12 out nocopy  VARCHAR2
648     , p6_a13 out nocopy  VARCHAR2
649     , p6_a14 out nocopy  VARCHAR2
650     , p6_a15 out nocopy  VARCHAR2
651     , p6_a16 out nocopy  VARCHAR2
652     , p6_a17 out nocopy  VARCHAR2
653     , p6_a18 out nocopy  VARCHAR2
654     , p6_a19 out nocopy  VARCHAR2
655     , p6_a20 out nocopy  VARCHAR2
656     , p6_a21 out nocopy  NUMBER
657     , p6_a22 out nocopy  DATE
658     , p6_a23 out nocopy  NUMBER
659     , p6_a24 out nocopy  DATE
660     , p6_a25 out nocopy  NUMBER
661     , p5_a0  NUMBER := 0-1962.0724
662     , p5_a1  NUMBER := 0-1962.0724
663     , p5_a2  NUMBER := 0-1962.0724
664     , p5_a3  NUMBER := 0-1962.0724
665     , p5_a4  NUMBER := 0-1962.0724
666     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
667     , p5_a6  VARCHAR2 := fnd_api.g_miss_char
668     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
669     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
670     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
671     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
672     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
673     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
674     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
675     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
676     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
677     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
678     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
679     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
680     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
681     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
682     , p5_a21  NUMBER := 0-1962.0724
683     , p5_a22  DATE := fnd_api.g_miss_date
684     , p5_a23  NUMBER := 0-1962.0724
685     , p5_a24  DATE := fnd_api.g_miss_date
686     , p5_a25  NUMBER := 0-1962.0724
687   )
688 
689   as
690     ddp_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
691     ddx_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
692     ddindx binary_integer; indx binary_integer;
693   begin
694 
695     -- copy data to the local IN or IN-OUT args, if any
696 
697 
698 
699 
700 
701     ddp_ilsv_rec.id := rosetta_g_miss_num_map(p5_a0);
702     ddp_ilsv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
703     ddp_ilsv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
704     ddp_ilsv_rec.inf_id := rosetta_g_miss_num_map(p5_a3);
705     ddp_ilsv_rec.ilt_id := rosetta_g_miss_num_map(p5_a4);
706     ddp_ilsv_rec.attribute_category := p5_a5;
707     ddp_ilsv_rec.attribute1 := p5_a6;
708     ddp_ilsv_rec.attribute2 := p5_a7;
709     ddp_ilsv_rec.attribute3 := p5_a8;
710     ddp_ilsv_rec.attribute4 := p5_a9;
711     ddp_ilsv_rec.attribute5 := p5_a10;
712     ddp_ilsv_rec.attribute6 := p5_a11;
713     ddp_ilsv_rec.attribute7 := p5_a12;
714     ddp_ilsv_rec.attribute8 := p5_a13;
715     ddp_ilsv_rec.attribute9 := p5_a14;
716     ddp_ilsv_rec.attribute10 := p5_a15;
717     ddp_ilsv_rec.attribute11 := p5_a16;
718     ddp_ilsv_rec.attribute12 := p5_a17;
719     ddp_ilsv_rec.attribute13 := p5_a18;
720     ddp_ilsv_rec.attribute14 := p5_a19;
721     ddp_ilsv_rec.attribute15 := p5_a20;
722     ddp_ilsv_rec.created_by := rosetta_g_miss_num_map(p5_a21);
723     ddp_ilsv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a22);
724     ddp_ilsv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a23);
725     ddp_ilsv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a24);
726     ddp_ilsv_rec.last_update_login := rosetta_g_miss_num_map(p5_a25);
727 
728 
729     -- here's the delegated call to the old PL/SQL routine
730     okl_invc_frmt_strms_pub.update_invc_frmt_strms(p_api_version,
731       p_init_msg_list,
732       x_return_status,
733       x_msg_count,
734       x_msg_data,
735       ddp_ilsv_rec,
736       ddx_ilsv_rec);
737 
738     -- copy data back from the local variables to OUT or IN-OUT args, if any
739 
740 
741 
742 
743 
744 
745     p6_a0 := rosetta_g_miss_num_map(ddx_ilsv_rec.id);
746     p6_a1 := rosetta_g_miss_num_map(ddx_ilsv_rec.object_version_number);
747     p6_a2 := rosetta_g_miss_num_map(ddx_ilsv_rec.sty_id);
748     p6_a3 := rosetta_g_miss_num_map(ddx_ilsv_rec.inf_id);
749     p6_a4 := rosetta_g_miss_num_map(ddx_ilsv_rec.ilt_id);
750     p6_a5 := ddx_ilsv_rec.attribute_category;
751     p6_a6 := ddx_ilsv_rec.attribute1;
752     p6_a7 := ddx_ilsv_rec.attribute2;
753     p6_a8 := ddx_ilsv_rec.attribute3;
754     p6_a9 := ddx_ilsv_rec.attribute4;
755     p6_a10 := ddx_ilsv_rec.attribute5;
756     p6_a11 := ddx_ilsv_rec.attribute6;
757     p6_a12 := ddx_ilsv_rec.attribute7;
758     p6_a13 := ddx_ilsv_rec.attribute8;
759     p6_a14 := ddx_ilsv_rec.attribute9;
760     p6_a15 := ddx_ilsv_rec.attribute10;
761     p6_a16 := ddx_ilsv_rec.attribute11;
762     p6_a17 := ddx_ilsv_rec.attribute12;
763     p6_a18 := ddx_ilsv_rec.attribute13;
764     p6_a19 := ddx_ilsv_rec.attribute14;
765     p6_a20 := ddx_ilsv_rec.attribute15;
766     p6_a21 := rosetta_g_miss_num_map(ddx_ilsv_rec.created_by);
767     p6_a22 := ddx_ilsv_rec.creation_date;
768     p6_a23 := rosetta_g_miss_num_map(ddx_ilsv_rec.last_updated_by);
769     p6_a24 := ddx_ilsv_rec.last_update_date;
770     p6_a25 := rosetta_g_miss_num_map(ddx_ilsv_rec.last_update_login);
771   end;
772 
773   procedure delete_invc_frmt_strms(p_api_version  NUMBER
774     , p_init_msg_list  VARCHAR2
775     , x_return_status out nocopy  VARCHAR2
776     , x_msg_count out nocopy  NUMBER
777     , x_msg_data out nocopy  VARCHAR2
778     , p5_a0 JTF_NUMBER_TABLE
779     , p5_a1 JTF_NUMBER_TABLE
780     , p5_a2 JTF_NUMBER_TABLE
781     , p5_a3 JTF_NUMBER_TABLE
782     , p5_a4 JTF_NUMBER_TABLE
783     , p5_a5 JTF_VARCHAR2_TABLE_100
784     , p5_a6 JTF_VARCHAR2_TABLE_500
785     , p5_a7 JTF_VARCHAR2_TABLE_500
786     , p5_a8 JTF_VARCHAR2_TABLE_500
787     , p5_a9 JTF_VARCHAR2_TABLE_500
788     , p5_a10 JTF_VARCHAR2_TABLE_500
789     , p5_a11 JTF_VARCHAR2_TABLE_500
790     , p5_a12 JTF_VARCHAR2_TABLE_500
791     , p5_a13 JTF_VARCHAR2_TABLE_500
792     , p5_a14 JTF_VARCHAR2_TABLE_500
793     , p5_a15 JTF_VARCHAR2_TABLE_500
794     , p5_a16 JTF_VARCHAR2_TABLE_500
795     , p5_a17 JTF_VARCHAR2_TABLE_500
796     , p5_a18 JTF_VARCHAR2_TABLE_500
797     , p5_a19 JTF_VARCHAR2_TABLE_500
798     , p5_a20 JTF_VARCHAR2_TABLE_500
799     , p5_a21 JTF_NUMBER_TABLE
800     , p5_a22 JTF_DATE_TABLE
801     , p5_a23 JTF_NUMBER_TABLE
802     , p5_a24 JTF_DATE_TABLE
803     , p5_a25 JTF_NUMBER_TABLE
804   )
805 
806   as
807     ddp_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
808     ddindx binary_integer; indx binary_integer;
809   begin
810 
811     -- copy data to the local IN or IN-OUT args, if any
812 
813 
814 
815 
816 
817     okl_ils_pvt_w.rosetta_table_copy_in_p5(ddp_ilsv_tbl, p5_a0
818       , p5_a1
819       , p5_a2
820       , p5_a3
821       , p5_a4
822       , p5_a5
823       , p5_a6
824       , p5_a7
825       , p5_a8
826       , p5_a9
827       , p5_a10
828       , p5_a11
829       , p5_a12
830       , p5_a13
831       , p5_a14
832       , p5_a15
833       , p5_a16
834       , p5_a17
835       , p5_a18
836       , p5_a19
837       , p5_a20
838       , p5_a21
839       , p5_a22
840       , p5_a23
841       , p5_a24
842       , p5_a25
843       );
844 
845     -- here's the delegated call to the old PL/SQL routine
846     okl_invc_frmt_strms_pub.delete_invc_frmt_strms(p_api_version,
847       p_init_msg_list,
848       x_return_status,
849       x_msg_count,
850       x_msg_data,
851       ddp_ilsv_tbl);
852 
853     -- copy data back from the local variables to OUT or IN-OUT args, if any
854 
855 
856 
857 
858 
859   end;
860 
861   procedure delete_invc_frmt_strms(p_api_version  NUMBER
862     , p_init_msg_list  VARCHAR2
863     , x_return_status out nocopy  VARCHAR2
864     , x_msg_count out nocopy  NUMBER
865     , x_msg_data out nocopy  VARCHAR2
866     , p5_a0  NUMBER := 0-1962.0724
867     , p5_a1  NUMBER := 0-1962.0724
868     , p5_a2  NUMBER := 0-1962.0724
869     , p5_a3  NUMBER := 0-1962.0724
870     , p5_a4  NUMBER := 0-1962.0724
871     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
872     , p5_a6  VARCHAR2 := fnd_api.g_miss_char
873     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
874     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
875     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
876     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
877     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
878     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
879     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
880     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
881     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
882     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
883     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
884     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
885     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
886     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
887     , p5_a21  NUMBER := 0-1962.0724
888     , p5_a22  DATE := fnd_api.g_miss_date
889     , p5_a23  NUMBER := 0-1962.0724
890     , p5_a24  DATE := fnd_api.g_miss_date
891     , p5_a25  NUMBER := 0-1962.0724
892   )
893 
894   as
895     ddp_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
896     ddindx binary_integer; indx binary_integer;
897   begin
898 
899     -- copy data to the local IN or IN-OUT args, if any
900 
901 
902 
903 
904 
905     ddp_ilsv_rec.id := rosetta_g_miss_num_map(p5_a0);
906     ddp_ilsv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
907     ddp_ilsv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
908     ddp_ilsv_rec.inf_id := rosetta_g_miss_num_map(p5_a3);
909     ddp_ilsv_rec.ilt_id := rosetta_g_miss_num_map(p5_a4);
910     ddp_ilsv_rec.attribute_category := p5_a5;
911     ddp_ilsv_rec.attribute1 := p5_a6;
912     ddp_ilsv_rec.attribute2 := p5_a7;
913     ddp_ilsv_rec.attribute3 := p5_a8;
914     ddp_ilsv_rec.attribute4 := p5_a9;
915     ddp_ilsv_rec.attribute5 := p5_a10;
916     ddp_ilsv_rec.attribute6 := p5_a11;
917     ddp_ilsv_rec.attribute7 := p5_a12;
918     ddp_ilsv_rec.attribute8 := p5_a13;
919     ddp_ilsv_rec.attribute9 := p5_a14;
920     ddp_ilsv_rec.attribute10 := p5_a15;
921     ddp_ilsv_rec.attribute11 := p5_a16;
922     ddp_ilsv_rec.attribute12 := p5_a17;
923     ddp_ilsv_rec.attribute13 := p5_a18;
924     ddp_ilsv_rec.attribute14 := p5_a19;
925     ddp_ilsv_rec.attribute15 := p5_a20;
926     ddp_ilsv_rec.created_by := rosetta_g_miss_num_map(p5_a21);
927     ddp_ilsv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a22);
928     ddp_ilsv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a23);
929     ddp_ilsv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a24);
930     ddp_ilsv_rec.last_update_login := rosetta_g_miss_num_map(p5_a25);
931 
932     -- here's the delegated call to the old PL/SQL routine
933     okl_invc_frmt_strms_pub.delete_invc_frmt_strms(p_api_version,
934       p_init_msg_list,
935       x_return_status,
936       x_msg_count,
937       x_msg_data,
938       ddp_ilsv_rec);
939 
940     -- copy data back from the local variables to OUT or IN-OUT args, if any
941 
942 
943 
944 
945 
946   end;
947 
948   procedure validate_invc_frmt_strms(p_api_version  NUMBER
949     , p_init_msg_list  VARCHAR2
950     , x_return_status out nocopy  VARCHAR2
951     , x_msg_count out nocopy  NUMBER
952     , x_msg_data out nocopy  VARCHAR2
953     , p5_a0 JTF_NUMBER_TABLE
954     , p5_a1 JTF_NUMBER_TABLE
955     , p5_a2 JTF_NUMBER_TABLE
956     , p5_a3 JTF_NUMBER_TABLE
957     , p5_a4 JTF_NUMBER_TABLE
958     , p5_a5 JTF_VARCHAR2_TABLE_100
959     , p5_a6 JTF_VARCHAR2_TABLE_500
960     , p5_a7 JTF_VARCHAR2_TABLE_500
961     , p5_a8 JTF_VARCHAR2_TABLE_500
962     , p5_a9 JTF_VARCHAR2_TABLE_500
963     , p5_a10 JTF_VARCHAR2_TABLE_500
964     , p5_a11 JTF_VARCHAR2_TABLE_500
965     , p5_a12 JTF_VARCHAR2_TABLE_500
966     , p5_a13 JTF_VARCHAR2_TABLE_500
967     , p5_a14 JTF_VARCHAR2_TABLE_500
968     , p5_a15 JTF_VARCHAR2_TABLE_500
969     , p5_a16 JTF_VARCHAR2_TABLE_500
970     , p5_a17 JTF_VARCHAR2_TABLE_500
971     , p5_a18 JTF_VARCHAR2_TABLE_500
972     , p5_a19 JTF_VARCHAR2_TABLE_500
973     , p5_a20 JTF_VARCHAR2_TABLE_500
974     , p5_a21 JTF_NUMBER_TABLE
975     , p5_a22 JTF_DATE_TABLE
976     , p5_a23 JTF_NUMBER_TABLE
977     , p5_a24 JTF_DATE_TABLE
978     , p5_a25 JTF_NUMBER_TABLE
979   )
980 
981   as
982     ddp_ilsv_tbl okl_invc_frmt_strms_pub.ilsv_tbl_type;
983     ddindx binary_integer; indx binary_integer;
984   begin
985 
986     -- copy data to the local IN or IN-OUT args, if any
987 
988 
989 
990 
991 
992     okl_ils_pvt_w.rosetta_table_copy_in_p5(ddp_ilsv_tbl, p5_a0
993       , p5_a1
994       , p5_a2
995       , p5_a3
996       , p5_a4
997       , p5_a5
998       , p5_a6
999       , p5_a7
1000       , p5_a8
1001       , p5_a9
1002       , p5_a10
1003       , p5_a11
1004       , p5_a12
1005       , p5_a13
1006       , p5_a14
1007       , p5_a15
1008       , p5_a16
1009       , p5_a17
1010       , p5_a18
1011       , p5_a19
1012       , p5_a20
1013       , p5_a21
1014       , p5_a22
1015       , p5_a23
1016       , p5_a24
1017       , p5_a25
1018       );
1019 
1020     -- here's the delegated call to the old PL/SQL routine
1021     okl_invc_frmt_strms_pub.validate_invc_frmt_strms(p_api_version,
1022       p_init_msg_list,
1023       x_return_status,
1024       x_msg_count,
1025       x_msg_data,
1026       ddp_ilsv_tbl);
1027 
1028     -- copy data back from the local variables to OUT or IN-OUT args, if any
1029 
1030 
1031 
1032 
1033 
1034   end;
1035 
1036   procedure validate_invc_frmt_strms(p_api_version  NUMBER
1037     , p_init_msg_list  VARCHAR2
1038     , x_return_status out nocopy  VARCHAR2
1039     , x_msg_count out nocopy  NUMBER
1040     , x_msg_data out nocopy  VARCHAR2
1041     , p5_a0  NUMBER := 0-1962.0724
1042     , p5_a1  NUMBER := 0-1962.0724
1043     , p5_a2  NUMBER := 0-1962.0724
1044     , p5_a3  NUMBER := 0-1962.0724
1045     , p5_a4  NUMBER := 0-1962.0724
1046     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
1047     , p5_a6  VARCHAR2 := fnd_api.g_miss_char
1048     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1049     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
1050     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1051     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
1052     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1053     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1054     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1055     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1056     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1057     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1058     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1059     , p5_a18  VARCHAR2 := fnd_api.g_miss_char
1060     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1061     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1062     , p5_a21  NUMBER := 0-1962.0724
1063     , p5_a22  DATE := fnd_api.g_miss_date
1064     , p5_a23  NUMBER := 0-1962.0724
1065     , p5_a24  DATE := fnd_api.g_miss_date
1066     , p5_a25  NUMBER := 0-1962.0724
1067   )
1068 
1069   as
1070     ddp_ilsv_rec okl_invc_frmt_strms_pub.ilsv_rec_type;
1071     ddindx binary_integer; indx binary_integer;
1072   begin
1073 
1074     -- copy data to the local IN or IN-OUT args, if any
1075 
1076 
1077 
1078 
1079 
1080     ddp_ilsv_rec.id := rosetta_g_miss_num_map(p5_a0);
1081     ddp_ilsv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1082     ddp_ilsv_rec.sty_id := rosetta_g_miss_num_map(p5_a2);
1083     ddp_ilsv_rec.inf_id := rosetta_g_miss_num_map(p5_a3);
1084     ddp_ilsv_rec.ilt_id := rosetta_g_miss_num_map(p5_a4);
1085     ddp_ilsv_rec.attribute_category := p5_a5;
1086     ddp_ilsv_rec.attribute1 := p5_a6;
1087     ddp_ilsv_rec.attribute2 := p5_a7;
1088     ddp_ilsv_rec.attribute3 := p5_a8;
1089     ddp_ilsv_rec.attribute4 := p5_a9;
1090     ddp_ilsv_rec.attribute5 := p5_a10;
1091     ddp_ilsv_rec.attribute6 := p5_a11;
1092     ddp_ilsv_rec.attribute7 := p5_a12;
1093     ddp_ilsv_rec.attribute8 := p5_a13;
1094     ddp_ilsv_rec.attribute9 := p5_a14;
1095     ddp_ilsv_rec.attribute10 := p5_a15;
1096     ddp_ilsv_rec.attribute11 := p5_a16;
1097     ddp_ilsv_rec.attribute12 := p5_a17;
1098     ddp_ilsv_rec.attribute13 := p5_a18;
1099     ddp_ilsv_rec.attribute14 := p5_a19;
1100     ddp_ilsv_rec.attribute15 := p5_a20;
1101     ddp_ilsv_rec.created_by := rosetta_g_miss_num_map(p5_a21);
1102     ddp_ilsv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a22);
1103     ddp_ilsv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a23);
1104     ddp_ilsv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a24);
1105     ddp_ilsv_rec.last_update_login := rosetta_g_miss_num_map(p5_a25);
1106 
1107     -- here's the delegated call to the old PL/SQL routine
1108     okl_invc_frmt_strms_pub.validate_invc_frmt_strms(p_api_version,
1109       p_init_msg_list,
1110       x_return_status,
1111       x_msg_count,
1112       x_msg_data,
1113       ddp_ilsv_rec);
1114 
1115     -- copy data back from the local variables to OUT or IN-OUT args, if any
1116 
1117 
1118 
1119 
1120 
1121   end;
1122 
1123 end okl_invc_frmt_strms_pub_w;