eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.OKL_SIF_TRX_PARMS_PUB_W

Source


1 package body okl_sif_trx_parms_pub_w as
2   /* $Header: OKLUSXPB.pls 120.1 2005/07/19 09:45:55 viselvar 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_trx_parms(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  NUMBER
29     , p6_a2 out nocopy  NUMBER
30     , p6_a3 out nocopy  VARCHAR2
31     , p6_a4 out nocopy  NUMBER
32     , p6_a5 out nocopy  NUMBER
33     , p6_a6 out nocopy  NUMBER
34     , p6_a7 out nocopy  NUMBER
35     , p6_a8 out nocopy  NUMBER
36     , p6_a9 out nocopy  NUMBER
37     , p6_a10 out nocopy  NUMBER
38     , p6_a11 out nocopy  DATE
39     , p6_a12 out nocopy  DATE
40     , p6_a13 out nocopy  NUMBER
41     , p5_a0  NUMBER := 0-1962.0724
42     , p5_a1  NUMBER := 0-1962.0724
43     , p5_a2  NUMBER := 0-1962.0724
44     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
45     , p5_a4  NUMBER := 0-1962.0724
46     , p5_a5  NUMBER := 0-1962.0724
47     , p5_a6  NUMBER := 0-1962.0724
48     , p5_a7  NUMBER := 0-1962.0724
49     , p5_a8  NUMBER := 0-1962.0724
50     , p5_a9  NUMBER := 0-1962.0724
51     , p5_a10  NUMBER := 0-1962.0724
52     , p5_a11  DATE := fnd_api.g_miss_date
53     , p5_a12  DATE := fnd_api.g_miss_date
54     , p5_a13  NUMBER := 0-1962.0724
55   )
56 
57   as
58     ddp_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
59     ddx_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
60     ddindx binary_integer; indx binary_integer;
61   begin
62 
63     -- copy data to the local IN or IN-OUT args, if any
64 
65 
66 
67 
68 
69     ddp_sxpv_rec.id := rosetta_g_miss_num_map(p5_a0);
70     ddp_sxpv_rec.index_number1 := rosetta_g_miss_num_map(p5_a1);
71     ddp_sxpv_rec.index_number2 := rosetta_g_miss_num_map(p5_a2);
72     ddp_sxpv_rec.value := p5_a3;
73     ddp_sxpv_rec.khr_id := rosetta_g_miss_num_map(p5_a4);
74     ddp_sxpv_rec.kle_id := rosetta_g_miss_num_map(p5_a5);
75     ddp_sxpv_rec.sif_id := rosetta_g_miss_num_map(p5_a6);
76     ddp_sxpv_rec.spp_id := rosetta_g_miss_num_map(p5_a7);
77     ddp_sxpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
78     ddp_sxpv_rec.created_by := rosetta_g_miss_num_map(p5_a9);
79     ddp_sxpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
80     ddp_sxpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a11);
81     ddp_sxpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
82     ddp_sxpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
83 
84 
85     -- here's the delegated call to the old PL/SQL routine
86     okl_sif_trx_parms_pub.insert_sif_trx_parms(p_api_version,
87       p_init_msg_list,
88       x_return_status,
89       x_msg_count,
90       x_msg_data,
91       ddp_sxpv_rec,
92       ddx_sxpv_rec);
93 
94     -- copy data back from the local variables to OUT or IN-OUT args, if any
95 
96 
97 
98 
99 
100 
101     p6_a0 := rosetta_g_miss_num_map(ddx_sxpv_rec.id);
102     p6_a1 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number1);
103     p6_a2 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number2);
104     p6_a3 := ddx_sxpv_rec.value;
105     p6_a4 := rosetta_g_miss_num_map(ddx_sxpv_rec.khr_id);
106     p6_a5 := rosetta_g_miss_num_map(ddx_sxpv_rec.kle_id);
107     p6_a6 := rosetta_g_miss_num_map(ddx_sxpv_rec.sif_id);
108     p6_a7 := rosetta_g_miss_num_map(ddx_sxpv_rec.spp_id);
109     p6_a8 := rosetta_g_miss_num_map(ddx_sxpv_rec.object_version_number);
110     p6_a9 := rosetta_g_miss_num_map(ddx_sxpv_rec.created_by);
111     p6_a10 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_updated_by);
112     p6_a11 := ddx_sxpv_rec.creation_date;
113     p6_a12 := ddx_sxpv_rec.last_update_date;
114     p6_a13 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_update_login);
115   end;
116 
117   procedure insert_sif_trx_parms(p_api_version  NUMBER
118     , p_init_msg_list  VARCHAR2
119     , x_return_status out nocopy  VARCHAR2
120     , x_msg_count out nocopy  NUMBER
121     , x_msg_data out nocopy  VARCHAR2
122     , p5_a0 JTF_NUMBER_TABLE
123     , p5_a1 JTF_NUMBER_TABLE
124     , p5_a2 JTF_NUMBER_TABLE
125     , p5_a3 JTF_VARCHAR2_TABLE_300
126     , p5_a4 JTF_NUMBER_TABLE
127     , p5_a5 JTF_NUMBER_TABLE
128     , p5_a6 JTF_NUMBER_TABLE
129     , p5_a7 JTF_NUMBER_TABLE
130     , p5_a8 JTF_NUMBER_TABLE
131     , p5_a9 JTF_NUMBER_TABLE
132     , p5_a10 JTF_NUMBER_TABLE
133     , p5_a11 JTF_DATE_TABLE
134     , p5_a12 JTF_DATE_TABLE
135     , p5_a13 JTF_NUMBER_TABLE
136     , p6_a0 out nocopy JTF_NUMBER_TABLE
137     , p6_a1 out nocopy JTF_NUMBER_TABLE
138     , p6_a2 out nocopy JTF_NUMBER_TABLE
139     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_300
140     , p6_a4 out nocopy JTF_NUMBER_TABLE
141     , p6_a5 out nocopy JTF_NUMBER_TABLE
142     , p6_a6 out nocopy JTF_NUMBER_TABLE
143     , p6_a7 out nocopy JTF_NUMBER_TABLE
144     , p6_a8 out nocopy JTF_NUMBER_TABLE
145     , p6_a9 out nocopy JTF_NUMBER_TABLE
146     , p6_a10 out nocopy JTF_NUMBER_TABLE
147     , p6_a11 out nocopy JTF_DATE_TABLE
148     , p6_a12 out nocopy JTF_DATE_TABLE
149     , p6_a13 out nocopy JTF_NUMBER_TABLE
150   )
151 
152   as
153     ddp_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
154     ddx_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
155     ddindx binary_integer; indx binary_integer;
156   begin
157 
158     -- copy data to the local IN or IN-OUT args, if any
159 
160 
161 
162 
163 
164     okl_sxp_pvt_w.rosetta_table_copy_in_p5(ddp_sxpv_tbl, p5_a0
165       , p5_a1
166       , p5_a2
167       , p5_a3
168       , p5_a4
169       , p5_a5
170       , p5_a6
171       , p5_a7
172       , p5_a8
173       , p5_a9
174       , p5_a10
175       , p5_a11
176       , p5_a12
177       , p5_a13
178       );
179 
180 
181     -- here's the delegated call to the old PL/SQL routine
182     okl_sif_trx_parms_pub.insert_sif_trx_parms(p_api_version,
183       p_init_msg_list,
184       x_return_status,
185       x_msg_count,
186       x_msg_data,
187       ddp_sxpv_tbl,
188       ddx_sxpv_tbl);
189 
190     -- copy data back from the local variables to OUT or IN-OUT args, if any
191 
192 
193 
194 
195 
196 
197     okl_sxp_pvt_w.rosetta_table_copy_out_p5(ddx_sxpv_tbl, p6_a0
198       , p6_a1
199       , p6_a2
200       , p6_a3
201       , p6_a4
202       , p6_a5
203       , p6_a6
204       , p6_a7
205       , p6_a8
206       , p6_a9
207       , p6_a10
208       , p6_a11
209       , p6_a12
210       , p6_a13
211       );
212   end;
213 
214   procedure lock_sif_trx_parms(p_api_version  NUMBER
215     , p_init_msg_list  VARCHAR2
216     , x_return_status out nocopy  VARCHAR2
217     , x_msg_count out nocopy  NUMBER
218     , x_msg_data out nocopy  VARCHAR2
219     , p5_a0  NUMBER := 0-1962.0724
220     , p5_a1  NUMBER := 0-1962.0724
221     , p5_a2  NUMBER := 0-1962.0724
222     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
223     , p5_a4  NUMBER := 0-1962.0724
224     , p5_a5  NUMBER := 0-1962.0724
225     , p5_a6  NUMBER := 0-1962.0724
226     , p5_a7  NUMBER := 0-1962.0724
227     , p5_a8  NUMBER := 0-1962.0724
228     , p5_a9  NUMBER := 0-1962.0724
229     , p5_a10  NUMBER := 0-1962.0724
230     , p5_a11  DATE := fnd_api.g_miss_date
231     , p5_a12  DATE := fnd_api.g_miss_date
232     , p5_a13  NUMBER := 0-1962.0724
233   )
234 
235   as
236     ddp_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
237     ddindx binary_integer; indx binary_integer;
238   begin
239 
240     -- copy data to the local IN or IN-OUT args, if any
241 
242 
243 
244 
245 
246     ddp_sxpv_rec.id := rosetta_g_miss_num_map(p5_a0);
247     ddp_sxpv_rec.index_number1 := rosetta_g_miss_num_map(p5_a1);
248     ddp_sxpv_rec.index_number2 := rosetta_g_miss_num_map(p5_a2);
249     ddp_sxpv_rec.value := p5_a3;
250     ddp_sxpv_rec.khr_id := rosetta_g_miss_num_map(p5_a4);
251     ddp_sxpv_rec.kle_id := rosetta_g_miss_num_map(p5_a5);
252     ddp_sxpv_rec.sif_id := rosetta_g_miss_num_map(p5_a6);
253     ddp_sxpv_rec.spp_id := rosetta_g_miss_num_map(p5_a7);
254     ddp_sxpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
255     ddp_sxpv_rec.created_by := rosetta_g_miss_num_map(p5_a9);
256     ddp_sxpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
257     ddp_sxpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a11);
258     ddp_sxpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
259     ddp_sxpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
260 
261     -- here's the delegated call to the old PL/SQL routine
262     okl_sif_trx_parms_pub.lock_sif_trx_parms(p_api_version,
263       p_init_msg_list,
264       x_return_status,
265       x_msg_count,
266       x_msg_data,
267       ddp_sxpv_rec);
268 
269     -- copy data back from the local variables to OUT or IN-OUT args, if any
270 
271 
272 
273 
274 
275   end;
276 
277   procedure lock_sif_trx_parms(p_api_version  NUMBER
278     , p_init_msg_list  VARCHAR2
279     , x_return_status out nocopy  VARCHAR2
280     , x_msg_count out nocopy  NUMBER
281     , x_msg_data out nocopy  VARCHAR2
282     , p5_a0 JTF_NUMBER_TABLE
283     , p5_a1 JTF_NUMBER_TABLE
284     , p5_a2 JTF_NUMBER_TABLE
285     , p5_a3 JTF_VARCHAR2_TABLE_300
286     , p5_a4 JTF_NUMBER_TABLE
287     , p5_a5 JTF_NUMBER_TABLE
288     , p5_a6 JTF_NUMBER_TABLE
289     , p5_a7 JTF_NUMBER_TABLE
290     , p5_a8 JTF_NUMBER_TABLE
291     , p5_a9 JTF_NUMBER_TABLE
292     , p5_a10 JTF_NUMBER_TABLE
293     , p5_a11 JTF_DATE_TABLE
294     , p5_a12 JTF_DATE_TABLE
295     , p5_a13 JTF_NUMBER_TABLE
296   )
297 
298   as
299     ddp_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
300     ddindx binary_integer; indx binary_integer;
301   begin
302 
303     -- copy data to the local IN or IN-OUT args, if any
304 
305 
306 
307 
308 
309     okl_sxp_pvt_w.rosetta_table_copy_in_p5(ddp_sxpv_tbl, p5_a0
310       , p5_a1
311       , p5_a2
312       , p5_a3
313       , p5_a4
314       , p5_a5
315       , p5_a6
316       , p5_a7
317       , p5_a8
318       , p5_a9
319       , p5_a10
320       , p5_a11
321       , p5_a12
322       , p5_a13
323       );
324 
325     -- here's the delegated call to the old PL/SQL routine
326     okl_sif_trx_parms_pub.lock_sif_trx_parms(p_api_version,
327       p_init_msg_list,
328       x_return_status,
329       x_msg_count,
330       x_msg_data,
331       ddp_sxpv_tbl);
332 
333     -- copy data back from the local variables to OUT or IN-OUT args, if any
334 
335 
336 
337 
338 
339   end;
340 
341   procedure update_sif_trx_parms(p_api_version  NUMBER
342     , p_init_msg_list  VARCHAR2
343     , x_return_status out nocopy  VARCHAR2
344     , x_msg_count out nocopy  NUMBER
345     , x_msg_data out nocopy  VARCHAR2
346     , p6_a0 out nocopy  NUMBER
347     , p6_a1 out nocopy  NUMBER
348     , p6_a2 out nocopy  NUMBER
349     , p6_a3 out nocopy  VARCHAR2
350     , p6_a4 out nocopy  NUMBER
351     , p6_a5 out nocopy  NUMBER
352     , p6_a6 out nocopy  NUMBER
353     , p6_a7 out nocopy  NUMBER
354     , p6_a8 out nocopy  NUMBER
355     , p6_a9 out nocopy  NUMBER
356     , p6_a10 out nocopy  NUMBER
357     , p6_a11 out nocopy  DATE
358     , p6_a12 out nocopy  DATE
359     , p6_a13 out nocopy  NUMBER
360     , p5_a0  NUMBER := 0-1962.0724
361     , p5_a1  NUMBER := 0-1962.0724
362     , p5_a2  NUMBER := 0-1962.0724
363     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
364     , p5_a4  NUMBER := 0-1962.0724
365     , p5_a5  NUMBER := 0-1962.0724
366     , p5_a6  NUMBER := 0-1962.0724
367     , p5_a7  NUMBER := 0-1962.0724
368     , p5_a8  NUMBER := 0-1962.0724
369     , p5_a9  NUMBER := 0-1962.0724
370     , p5_a10  NUMBER := 0-1962.0724
371     , p5_a11  DATE := fnd_api.g_miss_date
372     , p5_a12  DATE := fnd_api.g_miss_date
373     , p5_a13  NUMBER := 0-1962.0724
374   )
375 
376   as
377     ddp_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
378     ddx_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
379     ddindx binary_integer; indx binary_integer;
380   begin
381 
382     -- copy data to the local IN or IN-OUT args, if any
383 
384 
385 
386 
387 
388     ddp_sxpv_rec.id := rosetta_g_miss_num_map(p5_a0);
389     ddp_sxpv_rec.index_number1 := rosetta_g_miss_num_map(p5_a1);
390     ddp_sxpv_rec.index_number2 := rosetta_g_miss_num_map(p5_a2);
391     ddp_sxpv_rec.value := p5_a3;
392     ddp_sxpv_rec.khr_id := rosetta_g_miss_num_map(p5_a4);
393     ddp_sxpv_rec.kle_id := rosetta_g_miss_num_map(p5_a5);
394     ddp_sxpv_rec.sif_id := rosetta_g_miss_num_map(p5_a6);
395     ddp_sxpv_rec.spp_id := rosetta_g_miss_num_map(p5_a7);
396     ddp_sxpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
397     ddp_sxpv_rec.created_by := rosetta_g_miss_num_map(p5_a9);
398     ddp_sxpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
399     ddp_sxpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a11);
400     ddp_sxpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
401     ddp_sxpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
402 
403 
404     -- here's the delegated call to the old PL/SQL routine
405     okl_sif_trx_parms_pub.update_sif_trx_parms(p_api_version,
406       p_init_msg_list,
407       x_return_status,
408       x_msg_count,
409       x_msg_data,
410       ddp_sxpv_rec,
411       ddx_sxpv_rec);
412 
413     -- copy data back from the local variables to OUT or IN-OUT args, if any
414 
415 
416 
417 
418 
419 
420     p6_a0 := rosetta_g_miss_num_map(ddx_sxpv_rec.id);
421     p6_a1 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number1);
422     p6_a2 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number2);
423     p6_a3 := ddx_sxpv_rec.value;
424     p6_a4 := rosetta_g_miss_num_map(ddx_sxpv_rec.khr_id);
425     p6_a5 := rosetta_g_miss_num_map(ddx_sxpv_rec.kle_id);
426     p6_a6 := rosetta_g_miss_num_map(ddx_sxpv_rec.sif_id);
427     p6_a7 := rosetta_g_miss_num_map(ddx_sxpv_rec.spp_id);
428     p6_a8 := rosetta_g_miss_num_map(ddx_sxpv_rec.object_version_number);
429     p6_a9 := rosetta_g_miss_num_map(ddx_sxpv_rec.created_by);
430     p6_a10 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_updated_by);
431     p6_a11 := ddx_sxpv_rec.creation_date;
432     p6_a12 := ddx_sxpv_rec.last_update_date;
433     p6_a13 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_update_login);
434   end;
435 
436   procedure update_sif_trx_parms(p_api_version  NUMBER
437     , p_init_msg_list  VARCHAR2
438     , x_return_status out nocopy  VARCHAR2
439     , x_msg_count out nocopy  NUMBER
440     , x_msg_data out nocopy  VARCHAR2
441     , p5_a0 JTF_NUMBER_TABLE
442     , p5_a1 JTF_NUMBER_TABLE
443     , p5_a2 JTF_NUMBER_TABLE
444     , p5_a3 JTF_VARCHAR2_TABLE_300
445     , p5_a4 JTF_NUMBER_TABLE
446     , p5_a5 JTF_NUMBER_TABLE
447     , p5_a6 JTF_NUMBER_TABLE
448     , p5_a7 JTF_NUMBER_TABLE
449     , p5_a8 JTF_NUMBER_TABLE
450     , p5_a9 JTF_NUMBER_TABLE
451     , p5_a10 JTF_NUMBER_TABLE
452     , p5_a11 JTF_DATE_TABLE
453     , p5_a12 JTF_DATE_TABLE
454     , p5_a13 JTF_NUMBER_TABLE
455     , p6_a0 out nocopy JTF_NUMBER_TABLE
456     , p6_a1 out nocopy JTF_NUMBER_TABLE
457     , p6_a2 out nocopy JTF_NUMBER_TABLE
458     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_300
459     , p6_a4 out nocopy JTF_NUMBER_TABLE
460     , p6_a5 out nocopy JTF_NUMBER_TABLE
461     , p6_a6 out nocopy JTF_NUMBER_TABLE
462     , p6_a7 out nocopy JTF_NUMBER_TABLE
463     , p6_a8 out nocopy JTF_NUMBER_TABLE
464     , p6_a9 out nocopy JTF_NUMBER_TABLE
465     , p6_a10 out nocopy JTF_NUMBER_TABLE
466     , p6_a11 out nocopy JTF_DATE_TABLE
467     , p6_a12 out nocopy JTF_DATE_TABLE
468     , p6_a13 out nocopy JTF_NUMBER_TABLE
469   )
470 
471   as
472     ddp_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
473     ddx_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
474     ddindx binary_integer; indx binary_integer;
475   begin
476 
477     -- copy data to the local IN or IN-OUT args, if any
478 
479 
480 
481 
482 
483     okl_sxp_pvt_w.rosetta_table_copy_in_p5(ddp_sxpv_tbl, p5_a0
484       , p5_a1
485       , p5_a2
486       , p5_a3
487       , p5_a4
488       , p5_a5
489       , p5_a6
490       , p5_a7
491       , p5_a8
492       , p5_a9
493       , p5_a10
494       , p5_a11
495       , p5_a12
496       , p5_a13
497       );
498 
499 
500     -- here's the delegated call to the old PL/SQL routine
501     okl_sif_trx_parms_pub.update_sif_trx_parms(p_api_version,
502       p_init_msg_list,
503       x_return_status,
504       x_msg_count,
505       x_msg_data,
506       ddp_sxpv_tbl,
507       ddx_sxpv_tbl);
508 
509     -- copy data back from the local variables to OUT or IN-OUT args, if any
510 
511 
512 
513 
514 
515 
516     okl_sxp_pvt_w.rosetta_table_copy_out_p5(ddx_sxpv_tbl, p6_a0
517       , p6_a1
518       , p6_a2
519       , p6_a3
520       , p6_a4
521       , p6_a5
522       , p6_a6
523       , p6_a7
524       , p6_a8
525       , p6_a9
526       , p6_a10
527       , p6_a11
528       , p6_a12
529       , p6_a13
530       );
531   end;
532 
533   procedure delete_sif_trx_parms(p_api_version  NUMBER
534     , p_init_msg_list  VARCHAR2
535     , x_return_status out nocopy  VARCHAR2
536     , x_msg_count out nocopy  NUMBER
537     , x_msg_data out nocopy  VARCHAR2
538     , p6_a0 out nocopy  NUMBER
539     , p6_a1 out nocopy  NUMBER
540     , p6_a2 out nocopy  NUMBER
541     , p6_a3 out nocopy  VARCHAR2
542     , p6_a4 out nocopy  NUMBER
543     , p6_a5 out nocopy  NUMBER
544     , p6_a6 out nocopy  NUMBER
545     , p6_a7 out nocopy  NUMBER
546     , p6_a8 out nocopy  NUMBER
547     , p6_a9 out nocopy  NUMBER
548     , p6_a10 out nocopy  NUMBER
549     , p6_a11 out nocopy  DATE
550     , p6_a12 out nocopy  DATE
551     , p6_a13 out nocopy  NUMBER
552     , p5_a0  NUMBER := 0-1962.0724
553     , p5_a1  NUMBER := 0-1962.0724
554     , p5_a2  NUMBER := 0-1962.0724
555     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
556     , p5_a4  NUMBER := 0-1962.0724
557     , p5_a5  NUMBER := 0-1962.0724
558     , p5_a6  NUMBER := 0-1962.0724
559     , p5_a7  NUMBER := 0-1962.0724
560     , p5_a8  NUMBER := 0-1962.0724
561     , p5_a9  NUMBER := 0-1962.0724
562     , p5_a10  NUMBER := 0-1962.0724
563     , p5_a11  DATE := fnd_api.g_miss_date
564     , p5_a12  DATE := fnd_api.g_miss_date
565     , p5_a13  NUMBER := 0-1962.0724
566   )
567 
568   as
569     ddp_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
570     ddx_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
571     ddindx binary_integer; indx binary_integer;
572   begin
573 
574     -- copy data to the local IN or IN-OUT args, if any
575 
576 
577 
578 
579 
580     ddp_sxpv_rec.id := rosetta_g_miss_num_map(p5_a0);
581     ddp_sxpv_rec.index_number1 := rosetta_g_miss_num_map(p5_a1);
582     ddp_sxpv_rec.index_number2 := rosetta_g_miss_num_map(p5_a2);
583     ddp_sxpv_rec.value := p5_a3;
584     ddp_sxpv_rec.khr_id := rosetta_g_miss_num_map(p5_a4);
585     ddp_sxpv_rec.kle_id := rosetta_g_miss_num_map(p5_a5);
586     ddp_sxpv_rec.sif_id := rosetta_g_miss_num_map(p5_a6);
587     ddp_sxpv_rec.spp_id := rosetta_g_miss_num_map(p5_a7);
588     ddp_sxpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
589     ddp_sxpv_rec.created_by := rosetta_g_miss_num_map(p5_a9);
590     ddp_sxpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
591     ddp_sxpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a11);
592     ddp_sxpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
593     ddp_sxpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
594 
595 
596     -- here's the delegated call to the old PL/SQL routine
597     okl_sif_trx_parms_pub.delete_sif_trx_parms(p_api_version,
598       p_init_msg_list,
599       x_return_status,
600       x_msg_count,
601       x_msg_data,
602       ddp_sxpv_rec,
603       ddx_sxpv_rec);
604 
605     -- copy data back from the local variables to OUT or IN-OUT args, if any
606 
607 
608 
609 
610 
611 
612     p6_a0 := rosetta_g_miss_num_map(ddx_sxpv_rec.id);
613     p6_a1 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number1);
614     p6_a2 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number2);
615     p6_a3 := ddx_sxpv_rec.value;
616     p6_a4 := rosetta_g_miss_num_map(ddx_sxpv_rec.khr_id);
617     p6_a5 := rosetta_g_miss_num_map(ddx_sxpv_rec.kle_id);
618     p6_a6 := rosetta_g_miss_num_map(ddx_sxpv_rec.sif_id);
619     p6_a7 := rosetta_g_miss_num_map(ddx_sxpv_rec.spp_id);
620     p6_a8 := rosetta_g_miss_num_map(ddx_sxpv_rec.object_version_number);
621     p6_a9 := rosetta_g_miss_num_map(ddx_sxpv_rec.created_by);
622     p6_a10 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_updated_by);
623     p6_a11 := ddx_sxpv_rec.creation_date;
624     p6_a12 := ddx_sxpv_rec.last_update_date;
625     p6_a13 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_update_login);
626   end;
627 
628   procedure delete_sif_trx_parms(p_api_version  NUMBER
629     , p_init_msg_list  VARCHAR2
630     , x_return_status out nocopy  VARCHAR2
631     , x_msg_count out nocopy  NUMBER
632     , x_msg_data out nocopy  VARCHAR2
633     , p5_a0 JTF_NUMBER_TABLE
634     , p5_a1 JTF_NUMBER_TABLE
635     , p5_a2 JTF_NUMBER_TABLE
636     , p5_a3 JTF_VARCHAR2_TABLE_300
637     , p5_a4 JTF_NUMBER_TABLE
638     , p5_a5 JTF_NUMBER_TABLE
639     , p5_a6 JTF_NUMBER_TABLE
640     , p5_a7 JTF_NUMBER_TABLE
641     , p5_a8 JTF_NUMBER_TABLE
642     , p5_a9 JTF_NUMBER_TABLE
643     , p5_a10 JTF_NUMBER_TABLE
644     , p5_a11 JTF_DATE_TABLE
645     , p5_a12 JTF_DATE_TABLE
646     , p5_a13 JTF_NUMBER_TABLE
647     , p6_a0 out nocopy JTF_NUMBER_TABLE
648     , p6_a1 out nocopy JTF_NUMBER_TABLE
649     , p6_a2 out nocopy JTF_NUMBER_TABLE
650     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_300
651     , p6_a4 out nocopy JTF_NUMBER_TABLE
652     , p6_a5 out nocopy JTF_NUMBER_TABLE
653     , p6_a6 out nocopy JTF_NUMBER_TABLE
654     , p6_a7 out nocopy JTF_NUMBER_TABLE
655     , p6_a8 out nocopy JTF_NUMBER_TABLE
656     , p6_a9 out nocopy JTF_NUMBER_TABLE
657     , p6_a10 out nocopy JTF_NUMBER_TABLE
658     , p6_a11 out nocopy JTF_DATE_TABLE
659     , p6_a12 out nocopy JTF_DATE_TABLE
660     , p6_a13 out nocopy JTF_NUMBER_TABLE
661   )
662 
663   as
664     ddp_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
665     ddx_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
666     ddindx binary_integer; indx binary_integer;
667   begin
668 
669     -- copy data to the local IN or IN-OUT args, if any
670 
671 
672 
673 
674 
675     okl_sxp_pvt_w.rosetta_table_copy_in_p5(ddp_sxpv_tbl, p5_a0
676       , p5_a1
677       , p5_a2
678       , p5_a3
679       , p5_a4
680       , p5_a5
681       , p5_a6
682       , p5_a7
683       , p5_a8
684       , p5_a9
685       , p5_a10
686       , p5_a11
687       , p5_a12
688       , p5_a13
689       );
690 
691 
692     -- here's the delegated call to the old PL/SQL routine
693     okl_sif_trx_parms_pub.delete_sif_trx_parms(p_api_version,
694       p_init_msg_list,
695       x_return_status,
696       x_msg_count,
697       x_msg_data,
698       ddp_sxpv_tbl,
699       ddx_sxpv_tbl);
700 
701     -- copy data back from the local variables to OUT or IN-OUT args, if any
702 
703 
704 
705 
706 
707 
708     okl_sxp_pvt_w.rosetta_table_copy_out_p5(ddx_sxpv_tbl, p6_a0
709       , p6_a1
710       , p6_a2
711       , p6_a3
712       , p6_a4
713       , p6_a5
714       , p6_a6
715       , p6_a7
716       , p6_a8
717       , p6_a9
718       , p6_a10
719       , p6_a11
720       , p6_a12
721       , p6_a13
722       );
723   end;
724 
725   procedure validate_sif_trx_parms(p_api_version  NUMBER
726     , p_init_msg_list  VARCHAR2
727     , x_return_status out nocopy  VARCHAR2
728     , x_msg_count out nocopy  NUMBER
729     , x_msg_data out nocopy  VARCHAR2
730     , p6_a0 out nocopy  NUMBER
731     , p6_a1 out nocopy  NUMBER
732     , p6_a2 out nocopy  NUMBER
733     , p6_a3 out nocopy  VARCHAR2
734     , p6_a4 out nocopy  NUMBER
735     , p6_a5 out nocopy  NUMBER
736     , p6_a6 out nocopy  NUMBER
737     , p6_a7 out nocopy  NUMBER
738     , p6_a8 out nocopy  NUMBER
739     , p6_a9 out nocopy  NUMBER
740     , p6_a10 out nocopy  NUMBER
741     , p6_a11 out nocopy  DATE
742     , p6_a12 out nocopy  DATE
743     , p6_a13 out nocopy  NUMBER
744     , p5_a0  NUMBER := 0-1962.0724
745     , p5_a1  NUMBER := 0-1962.0724
746     , p5_a2  NUMBER := 0-1962.0724
747     , p5_a3  VARCHAR2 := fnd_api.g_miss_char
748     , p5_a4  NUMBER := 0-1962.0724
749     , p5_a5  NUMBER := 0-1962.0724
750     , p5_a6  NUMBER := 0-1962.0724
751     , p5_a7  NUMBER := 0-1962.0724
752     , p5_a8  NUMBER := 0-1962.0724
753     , p5_a9  NUMBER := 0-1962.0724
754     , p5_a10  NUMBER := 0-1962.0724
755     , p5_a11  DATE := fnd_api.g_miss_date
756     , p5_a12  DATE := fnd_api.g_miss_date
757     , p5_a13  NUMBER := 0-1962.0724
758   )
759 
760   as
761     ddp_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
762     ddx_sxpv_rec okl_sif_trx_parms_pub.sxpv_rec_type;
763     ddindx binary_integer; indx binary_integer;
764   begin
765 
766     -- copy data to the local IN or IN-OUT args, if any
767 
768 
769 
770 
771 
772     ddp_sxpv_rec.id := rosetta_g_miss_num_map(p5_a0);
773     ddp_sxpv_rec.index_number1 := rosetta_g_miss_num_map(p5_a1);
774     ddp_sxpv_rec.index_number2 := rosetta_g_miss_num_map(p5_a2);
775     ddp_sxpv_rec.value := p5_a3;
776     ddp_sxpv_rec.khr_id := rosetta_g_miss_num_map(p5_a4);
777     ddp_sxpv_rec.kle_id := rosetta_g_miss_num_map(p5_a5);
778     ddp_sxpv_rec.sif_id := rosetta_g_miss_num_map(p5_a6);
779     ddp_sxpv_rec.spp_id := rosetta_g_miss_num_map(p5_a7);
780     ddp_sxpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a8);
781     ddp_sxpv_rec.created_by := rosetta_g_miss_num_map(p5_a9);
782     ddp_sxpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a10);
783     ddp_sxpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a11);
784     ddp_sxpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a12);
785     ddp_sxpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a13);
786 
787 
788     -- here's the delegated call to the old PL/SQL routine
789     okl_sif_trx_parms_pub.validate_sif_trx_parms(p_api_version,
790       p_init_msg_list,
791       x_return_status,
792       x_msg_count,
793       x_msg_data,
794       ddp_sxpv_rec,
795       ddx_sxpv_rec);
796 
797     -- copy data back from the local variables to OUT or IN-OUT args, if any
798 
799 
800 
801 
802 
803 
804     p6_a0 := rosetta_g_miss_num_map(ddx_sxpv_rec.id);
805     p6_a1 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number1);
806     p6_a2 := rosetta_g_miss_num_map(ddx_sxpv_rec.index_number2);
807     p6_a3 := ddx_sxpv_rec.value;
808     p6_a4 := rosetta_g_miss_num_map(ddx_sxpv_rec.khr_id);
809     p6_a5 := rosetta_g_miss_num_map(ddx_sxpv_rec.kle_id);
810     p6_a6 := rosetta_g_miss_num_map(ddx_sxpv_rec.sif_id);
811     p6_a7 := rosetta_g_miss_num_map(ddx_sxpv_rec.spp_id);
812     p6_a8 := rosetta_g_miss_num_map(ddx_sxpv_rec.object_version_number);
813     p6_a9 := rosetta_g_miss_num_map(ddx_sxpv_rec.created_by);
814     p6_a10 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_updated_by);
815     p6_a11 := ddx_sxpv_rec.creation_date;
816     p6_a12 := ddx_sxpv_rec.last_update_date;
817     p6_a13 := rosetta_g_miss_num_map(ddx_sxpv_rec.last_update_login);
818   end;
819 
820   procedure validate_sif_trx_parms(p_api_version  NUMBER
821     , p_init_msg_list  VARCHAR2
822     , x_return_status out nocopy  VARCHAR2
823     , x_msg_count out nocopy  NUMBER
824     , x_msg_data out nocopy  VARCHAR2
825     , p5_a0 JTF_NUMBER_TABLE
826     , p5_a1 JTF_NUMBER_TABLE
827     , p5_a2 JTF_NUMBER_TABLE
828     , p5_a3 JTF_VARCHAR2_TABLE_300
829     , p5_a4 JTF_NUMBER_TABLE
830     , p5_a5 JTF_NUMBER_TABLE
831     , p5_a6 JTF_NUMBER_TABLE
832     , p5_a7 JTF_NUMBER_TABLE
833     , p5_a8 JTF_NUMBER_TABLE
834     , p5_a9 JTF_NUMBER_TABLE
835     , p5_a10 JTF_NUMBER_TABLE
836     , p5_a11 JTF_DATE_TABLE
837     , p5_a12 JTF_DATE_TABLE
838     , p5_a13 JTF_NUMBER_TABLE
839     , p6_a0 out nocopy JTF_NUMBER_TABLE
840     , p6_a1 out nocopy JTF_NUMBER_TABLE
841     , p6_a2 out nocopy JTF_NUMBER_TABLE
842     , p6_a3 out nocopy JTF_VARCHAR2_TABLE_300
843     , p6_a4 out nocopy JTF_NUMBER_TABLE
844     , p6_a5 out nocopy JTF_NUMBER_TABLE
845     , p6_a6 out nocopy JTF_NUMBER_TABLE
846     , p6_a7 out nocopy JTF_NUMBER_TABLE
847     , p6_a8 out nocopy JTF_NUMBER_TABLE
848     , p6_a9 out nocopy JTF_NUMBER_TABLE
849     , p6_a10 out nocopy JTF_NUMBER_TABLE
850     , p6_a11 out nocopy JTF_DATE_TABLE
851     , p6_a12 out nocopy JTF_DATE_TABLE
852     , p6_a13 out nocopy JTF_NUMBER_TABLE
853   )
854 
855   as
856     ddp_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
857     ddx_sxpv_tbl okl_sif_trx_parms_pub.sxpv_tbl_type;
858     ddindx binary_integer; indx binary_integer;
859   begin
860 
861     -- copy data to the local IN or IN-OUT args, if any
862 
863 
864 
865 
866 
867     okl_sxp_pvt_w.rosetta_table_copy_in_p5(ddp_sxpv_tbl, p5_a0
868       , p5_a1
869       , p5_a2
870       , p5_a3
871       , p5_a4
872       , p5_a5
873       , p5_a6
874       , p5_a7
875       , p5_a8
876       , p5_a9
877       , p5_a10
878       , p5_a11
879       , p5_a12
880       , p5_a13
881       );
882 
883 
884     -- here's the delegated call to the old PL/SQL routine
885     okl_sif_trx_parms_pub.validate_sif_trx_parms(p_api_version,
886       p_init_msg_list,
887       x_return_status,
888       x_msg_count,
889       x_msg_data,
890       ddp_sxpv_tbl,
891       ddx_sxpv_tbl);
892 
893     -- copy data back from the local variables to OUT or IN-OUT args, if any
894 
895 
896 
897 
898 
899 
900     okl_sxp_pvt_w.rosetta_table_copy_out_p5(ddx_sxpv_tbl, p6_a0
901       , p6_a1
902       , p6_a2
903       , p6_a3
904       , p6_a4
905       , p6_a5
906       , p6_a6
907       , p6_a7
908       , p6_a8
909       , p6_a9
910       , p6_a10
911       , p6_a11
912       , p6_a12
913       , p6_a13
914       );
915   end;
916 
917 end okl_sif_trx_parms_pub_w;