DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_TXL_ITM_INSTS_PUB_W

Source


1 package body okl_txl_itm_insts_pub_w as
2   /* $Header: OKLUITIB.pls 115.5 2002/12/20 19:24:27 avsingh 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 create_txl_itm_insts(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  NUMBER
31     , p6_a4 out nocopy  NUMBER
32     , p6_a5 out nocopy  VARCHAR2
33     , p6_a6 out nocopy  NUMBER
34     , p6_a7 out nocopy  VARCHAR2
35     , p6_a8 out nocopy  VARCHAR2
36     , p6_a9 out nocopy  VARCHAR2
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  VARCHAR2
43     , p6_a16 out nocopy  VARCHAR2
44     , p6_a17 out nocopy  NUMBER
45     , p6_a18 out nocopy  NUMBER
46     , p6_a19 out nocopy  VARCHAR2
47     , p6_a20 out nocopy  VARCHAR2
48     , p6_a21 out nocopy  VARCHAR2
49     , p6_a22 out nocopy  VARCHAR2
50     , p6_a23 out nocopy  VARCHAR2
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  NUMBER
63     , p6_a36 out nocopy  DATE
64     , p6_a37 out nocopy  NUMBER
65     , p6_a38 out nocopy  DATE
66     , p6_a39 out nocopy  NUMBER
67     , p6_a40 out nocopy  NUMBER
68     , p6_a41 out nocopy  NUMBER
69     , p6_a42 out nocopy  VARCHAR2
70     , p6_a43 out nocopy  NUMBER
71     , p5_a0  NUMBER := 0-1962.0724
72     , p5_a1  NUMBER := 0-1962.0724
73     , p5_a2  NUMBER := 0-1962.0724
74     , p5_a3  NUMBER := 0-1962.0724
75     , p5_a4  NUMBER := 0-1962.0724
76     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
77     , p5_a6  NUMBER := 0-1962.0724
78     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
79     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
80     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
81     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
82     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
83     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
84     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
85     , p5_a14  NUMBER := 0-1962.0724
86     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
87     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
88     , p5_a17  NUMBER := 0-1962.0724
89     , p5_a18  NUMBER := 0-1962.0724
90     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
91     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
92     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
93     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
94     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
95     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
96     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
97     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
98     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
99     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
100     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
101     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
102     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
103     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
104     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
105     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
106     , p5_a35  NUMBER := 0-1962.0724
107     , p5_a36  DATE := fnd_api.g_miss_date
108     , p5_a37  NUMBER := 0-1962.0724
109     , p5_a38  DATE := fnd_api.g_miss_date
110     , p5_a39  NUMBER := 0-1962.0724
111     , p5_a40  NUMBER := 0-1962.0724
112     , p5_a41  NUMBER := 0-1962.0724
113     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
114     , p5_a43  NUMBER := 0-1962.0724
115   )
116 
117   as
118     ddp_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
119     ddx_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
120     ddindx binary_integer; indx binary_integer;
121   begin
122 
123     -- copy data to the local IN or IN-OUT args, if any
124 
125 
126 
127 
128 
129     ddp_iipv_rec.id := rosetta_g_miss_num_map(p5_a0);
130     ddp_iipv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
131     ddp_iipv_rec.tas_id := rosetta_g_miss_num_map(p5_a2);
132     ddp_iipv_rec.tal_id := rosetta_g_miss_num_map(p5_a3);
133     ddp_iipv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
134     ddp_iipv_rec.tal_type := p5_a5;
135     ddp_iipv_rec.line_number := rosetta_g_miss_num_map(p5_a6);
136     ddp_iipv_rec.instance_number_ib := p5_a7;
137     ddp_iipv_rec.object_id1_new := p5_a8;
138     ddp_iipv_rec.object_id2_new := p5_a9;
139     ddp_iipv_rec.jtot_object_code_new := p5_a10;
140     ddp_iipv_rec.object_id1_old := p5_a11;
141     ddp_iipv_rec.object_id2_old := p5_a12;
142     ddp_iipv_rec.jtot_object_code_old := p5_a13;
143     ddp_iipv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a14);
144     ddp_iipv_rec.serial_number := p5_a15;
145     ddp_iipv_rec.mfg_serial_number_yn := p5_a16;
146     ddp_iipv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a17);
147     ddp_iipv_rec.inv_master_org_id := rosetta_g_miss_num_map(p5_a18);
148     ddp_iipv_rec.attribute_category := p5_a19;
149     ddp_iipv_rec.attribute1 := p5_a20;
150     ddp_iipv_rec.attribute2 := p5_a21;
151     ddp_iipv_rec.attribute3 := p5_a22;
152     ddp_iipv_rec.attribute4 := p5_a23;
153     ddp_iipv_rec.attribute5 := p5_a24;
154     ddp_iipv_rec.attribute6 := p5_a25;
155     ddp_iipv_rec.attribute7 := p5_a26;
156     ddp_iipv_rec.attribute8 := p5_a27;
157     ddp_iipv_rec.attribute9 := p5_a28;
158     ddp_iipv_rec.attribute10 := p5_a29;
159     ddp_iipv_rec.attribute11 := p5_a30;
160     ddp_iipv_rec.attribute12 := p5_a31;
161     ddp_iipv_rec.attribute13 := p5_a32;
162     ddp_iipv_rec.attribute14 := p5_a33;
163     ddp_iipv_rec.attribute15 := p5_a34;
164     ddp_iipv_rec.created_by := rosetta_g_miss_num_map(p5_a35);
165     ddp_iipv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
166     ddp_iipv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a37);
167     ddp_iipv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a38);
168     ddp_iipv_rec.last_update_login := rosetta_g_miss_num_map(p5_a39);
169     ddp_iipv_rec.dnz_cle_id := rosetta_g_miss_num_map(p5_a40);
170     ddp_iipv_rec.instance_id := rosetta_g_miss_num_map(p5_a41);
171     ddp_iipv_rec.selected_for_split_flag := p5_a42;
172     ddp_iipv_rec.asd_id := rosetta_g_miss_num_map(p5_a43);
173 
174 
175     -- here's the delegated call to the old PL/SQL routine
176     okl_txl_itm_insts_pub.create_txl_itm_insts(p_api_version,
177       p_init_msg_list,
178       x_return_status,
179       x_msg_count,
180       x_msg_data,
181       ddp_iipv_rec,
182       ddx_iipv_rec);
183 
184     -- copy data back from the local variables to OUT or IN-OUT args, if any
185 
186 
187 
188 
189 
190 
191     p6_a0 := rosetta_g_miss_num_map(ddx_iipv_rec.id);
192     p6_a1 := rosetta_g_miss_num_map(ddx_iipv_rec.object_version_number);
193     p6_a2 := rosetta_g_miss_num_map(ddx_iipv_rec.tas_id);
194     p6_a3 := rosetta_g_miss_num_map(ddx_iipv_rec.tal_id);
195     p6_a4 := rosetta_g_miss_num_map(ddx_iipv_rec.kle_id);
196     p6_a5 := ddx_iipv_rec.tal_type;
197     p6_a6 := rosetta_g_miss_num_map(ddx_iipv_rec.line_number);
198     p6_a7 := ddx_iipv_rec.instance_number_ib;
199     p6_a8 := ddx_iipv_rec.object_id1_new;
200     p6_a9 := ddx_iipv_rec.object_id2_new;
201     p6_a10 := ddx_iipv_rec.jtot_object_code_new;
202     p6_a11 := ddx_iipv_rec.object_id1_old;
203     p6_a12 := ddx_iipv_rec.object_id2_old;
204     p6_a13 := ddx_iipv_rec.jtot_object_code_old;
205     p6_a14 := rosetta_g_miss_num_map(ddx_iipv_rec.inventory_org_id);
206     p6_a15 := ddx_iipv_rec.serial_number;
207     p6_a16 := ddx_iipv_rec.mfg_serial_number_yn;
208     p6_a17 := rosetta_g_miss_num_map(ddx_iipv_rec.inventory_item_id);
209     p6_a18 := rosetta_g_miss_num_map(ddx_iipv_rec.inv_master_org_id);
210     p6_a19 := ddx_iipv_rec.attribute_category;
211     p6_a20 := ddx_iipv_rec.attribute1;
212     p6_a21 := ddx_iipv_rec.attribute2;
213     p6_a22 := ddx_iipv_rec.attribute3;
214     p6_a23 := ddx_iipv_rec.attribute4;
215     p6_a24 := ddx_iipv_rec.attribute5;
216     p6_a25 := ddx_iipv_rec.attribute6;
217     p6_a26 := ddx_iipv_rec.attribute7;
218     p6_a27 := ddx_iipv_rec.attribute8;
219     p6_a28 := ddx_iipv_rec.attribute9;
220     p6_a29 := ddx_iipv_rec.attribute10;
221     p6_a30 := ddx_iipv_rec.attribute11;
222     p6_a31 := ddx_iipv_rec.attribute12;
223     p6_a32 := ddx_iipv_rec.attribute13;
224     p6_a33 := ddx_iipv_rec.attribute14;
225     p6_a34 := ddx_iipv_rec.attribute15;
226     p6_a35 := rosetta_g_miss_num_map(ddx_iipv_rec.created_by);
227     p6_a36 := ddx_iipv_rec.creation_date;
228     p6_a37 := rosetta_g_miss_num_map(ddx_iipv_rec.last_updated_by);
229     p6_a38 := ddx_iipv_rec.last_update_date;
230     p6_a39 := rosetta_g_miss_num_map(ddx_iipv_rec.last_update_login);
231     p6_a40 := rosetta_g_miss_num_map(ddx_iipv_rec.dnz_cle_id);
232     p6_a41 := rosetta_g_miss_num_map(ddx_iipv_rec.instance_id);
233     p6_a42 := ddx_iipv_rec.selected_for_split_flag;
234     p6_a43 := rosetta_g_miss_num_map(ddx_iipv_rec.asd_id);
235   end;
236 
237   procedure create_txl_itm_insts(p_api_version  NUMBER
238     , p_init_msg_list  VARCHAR2
239     , x_return_status out nocopy  VARCHAR2
240     , x_msg_count out nocopy  NUMBER
241     , x_msg_data out nocopy  VARCHAR2
242     , p5_a0 JTF_NUMBER_TABLE
243     , p5_a1 JTF_NUMBER_TABLE
244     , p5_a2 JTF_NUMBER_TABLE
245     , p5_a3 JTF_NUMBER_TABLE
246     , p5_a4 JTF_NUMBER_TABLE
247     , p5_a5 JTF_VARCHAR2_TABLE_100
248     , p5_a6 JTF_NUMBER_TABLE
249     , p5_a7 JTF_VARCHAR2_TABLE_100
250     , p5_a8 JTF_VARCHAR2_TABLE_100
251     , p5_a9 JTF_VARCHAR2_TABLE_200
252     , p5_a10 JTF_VARCHAR2_TABLE_100
253     , p5_a11 JTF_VARCHAR2_TABLE_100
254     , p5_a12 JTF_VARCHAR2_TABLE_200
255     , p5_a13 JTF_VARCHAR2_TABLE_100
256     , p5_a14 JTF_NUMBER_TABLE
257     , p5_a15 JTF_VARCHAR2_TABLE_100
258     , p5_a16 JTF_VARCHAR2_TABLE_100
259     , p5_a17 JTF_NUMBER_TABLE
260     , p5_a18 JTF_NUMBER_TABLE
261     , p5_a19 JTF_VARCHAR2_TABLE_100
262     , p5_a20 JTF_VARCHAR2_TABLE_500
263     , p5_a21 JTF_VARCHAR2_TABLE_500
264     , p5_a22 JTF_VARCHAR2_TABLE_500
265     , p5_a23 JTF_VARCHAR2_TABLE_500
266     , p5_a24 JTF_VARCHAR2_TABLE_500
267     , p5_a25 JTF_VARCHAR2_TABLE_500
268     , p5_a26 JTF_VARCHAR2_TABLE_500
269     , p5_a27 JTF_VARCHAR2_TABLE_500
270     , p5_a28 JTF_VARCHAR2_TABLE_500
271     , p5_a29 JTF_VARCHAR2_TABLE_500
272     , p5_a30 JTF_VARCHAR2_TABLE_500
273     , p5_a31 JTF_VARCHAR2_TABLE_500
274     , p5_a32 JTF_VARCHAR2_TABLE_500
275     , p5_a33 JTF_VARCHAR2_TABLE_500
276     , p5_a34 JTF_VARCHAR2_TABLE_500
277     , p5_a35 JTF_NUMBER_TABLE
278     , p5_a36 JTF_DATE_TABLE
279     , p5_a37 JTF_NUMBER_TABLE
280     , p5_a38 JTF_DATE_TABLE
281     , p5_a39 JTF_NUMBER_TABLE
282     , p5_a40 JTF_NUMBER_TABLE
283     , p5_a41 JTF_NUMBER_TABLE
284     , p5_a42 JTF_VARCHAR2_TABLE_100
285     , p5_a43 JTF_NUMBER_TABLE
286     , p6_a0 out nocopy JTF_NUMBER_TABLE
287     , p6_a1 out nocopy JTF_NUMBER_TABLE
288     , p6_a2 out nocopy JTF_NUMBER_TABLE
289     , p6_a3 out nocopy JTF_NUMBER_TABLE
290     , p6_a4 out nocopy JTF_NUMBER_TABLE
291     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
292     , p6_a6 out nocopy JTF_NUMBER_TABLE
293     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
294     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
295     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_200
296     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
297     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
298     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
299     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
300     , p6_a14 out nocopy JTF_NUMBER_TABLE
301     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
302     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
303     , p6_a17 out nocopy JTF_NUMBER_TABLE
304     , p6_a18 out nocopy JTF_NUMBER_TABLE
305     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
306     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
307     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
308     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
309     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
310     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
311     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
312     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
313     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
314     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
315     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
316     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
317     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
318     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
319     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
320     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
321     , p6_a35 out nocopy JTF_NUMBER_TABLE
322     , p6_a36 out nocopy JTF_DATE_TABLE
323     , p6_a37 out nocopy JTF_NUMBER_TABLE
324     , p6_a38 out nocopy JTF_DATE_TABLE
325     , p6_a39 out nocopy JTF_NUMBER_TABLE
326     , p6_a40 out nocopy JTF_NUMBER_TABLE
327     , p6_a41 out nocopy JTF_NUMBER_TABLE
328     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_100
329     , p6_a43 out nocopy JTF_NUMBER_TABLE
330   )
331 
332   as
333     ddp_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
334     ddx_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
335     ddindx binary_integer; indx binary_integer;
336   begin
337 
338     -- copy data to the local IN or IN-OUT args, if any
339 
340 
341 
342 
343 
344     okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_iipv_tbl, p5_a0
345       , p5_a1
346       , p5_a2
347       , p5_a3
348       , p5_a4
349       , p5_a5
350       , p5_a6
351       , p5_a7
352       , p5_a8
353       , p5_a9
354       , p5_a10
355       , p5_a11
356       , p5_a12
357       , p5_a13
358       , p5_a14
359       , p5_a15
360       , p5_a16
361       , p5_a17
362       , p5_a18
363       , p5_a19
364       , p5_a20
365       , p5_a21
366       , p5_a22
367       , p5_a23
368       , p5_a24
369       , p5_a25
370       , p5_a26
371       , p5_a27
372       , p5_a28
373       , p5_a29
374       , p5_a30
375       , p5_a31
376       , p5_a32
377       , p5_a33
378       , p5_a34
379       , p5_a35
380       , p5_a36
381       , p5_a37
382       , p5_a38
383       , p5_a39
384       , p5_a40
385       , p5_a41
386       , p5_a42
387       , p5_a43
388       );
389 
390 
391     -- here's the delegated call to the old PL/SQL routine
392     okl_txl_itm_insts_pub.create_txl_itm_insts(p_api_version,
393       p_init_msg_list,
394       x_return_status,
395       x_msg_count,
396       x_msg_data,
397       ddp_iipv_tbl,
398       ddx_iipv_tbl);
399 
400     -- copy data back from the local variables to OUT or IN-OUT args, if any
401 
402 
403 
404 
405 
406 
407     okl_iti_pvt_w.rosetta_table_copy_out_p5(ddx_iipv_tbl, p6_a0
408       , p6_a1
409       , p6_a2
410       , p6_a3
411       , p6_a4
412       , p6_a5
413       , p6_a6
414       , p6_a7
415       , p6_a8
416       , p6_a9
417       , p6_a10
418       , p6_a11
419       , p6_a12
420       , p6_a13
421       , p6_a14
422       , p6_a15
423       , p6_a16
424       , p6_a17
425       , p6_a18
426       , p6_a19
427       , p6_a20
428       , p6_a21
429       , p6_a22
430       , p6_a23
431       , p6_a24
432       , p6_a25
433       , p6_a26
434       , p6_a27
435       , p6_a28
436       , p6_a29
437       , p6_a30
438       , p6_a31
439       , p6_a32
440       , p6_a33
441       , p6_a34
442       , p6_a35
443       , p6_a36
444       , p6_a37
445       , p6_a38
446       , p6_a39
447       , p6_a40
448       , p6_a41
449       , p6_a42
450       , p6_a43
451       );
452   end;
453 
454   procedure update_txl_itm_insts(p_api_version  NUMBER
455     , p_init_msg_list  VARCHAR2
456     , x_return_status out nocopy  VARCHAR2
457     , x_msg_count out nocopy  NUMBER
458     , x_msg_data out nocopy  VARCHAR2
459     , p6_a0 out nocopy  NUMBER
460     , p6_a1 out nocopy  NUMBER
461     , p6_a2 out nocopy  NUMBER
462     , p6_a3 out nocopy  NUMBER
463     , p6_a4 out nocopy  NUMBER
464     , p6_a5 out nocopy  VARCHAR2
465     , p6_a6 out nocopy  NUMBER
466     , p6_a7 out nocopy  VARCHAR2
467     , p6_a8 out nocopy  VARCHAR2
468     , p6_a9 out nocopy  VARCHAR2
469     , p6_a10 out nocopy  VARCHAR2
470     , p6_a11 out nocopy  VARCHAR2
471     , p6_a12 out nocopy  VARCHAR2
472     , p6_a13 out nocopy  VARCHAR2
473     , p6_a14 out nocopy  NUMBER
474     , p6_a15 out nocopy  VARCHAR2
475     , p6_a16 out nocopy  VARCHAR2
476     , p6_a17 out nocopy  NUMBER
477     , p6_a18 out nocopy  NUMBER
478     , p6_a19 out nocopy  VARCHAR2
479     , p6_a20 out nocopy  VARCHAR2
480     , p6_a21 out nocopy  VARCHAR2
481     , p6_a22 out nocopy  VARCHAR2
482     , p6_a23 out nocopy  VARCHAR2
483     , p6_a24 out nocopy  VARCHAR2
484     , p6_a25 out nocopy  VARCHAR2
485     , p6_a26 out nocopy  VARCHAR2
486     , p6_a27 out nocopy  VARCHAR2
487     , p6_a28 out nocopy  VARCHAR2
488     , p6_a29 out nocopy  VARCHAR2
489     , p6_a30 out nocopy  VARCHAR2
490     , p6_a31 out nocopy  VARCHAR2
491     , p6_a32 out nocopy  VARCHAR2
492     , p6_a33 out nocopy  VARCHAR2
493     , p6_a34 out nocopy  VARCHAR2
494     , p6_a35 out nocopy  NUMBER
495     , p6_a36 out nocopy  DATE
496     , p6_a37 out nocopy  NUMBER
497     , p6_a38 out nocopy  DATE
498     , p6_a39 out nocopy  NUMBER
499     , p6_a40 out nocopy  NUMBER
500     , p6_a41 out nocopy  NUMBER
501     , p6_a42 out nocopy  VARCHAR2
502     , p6_a43 out nocopy  NUMBER
503     , p5_a0  NUMBER := 0-1962.0724
504     , p5_a1  NUMBER := 0-1962.0724
505     , p5_a2  NUMBER := 0-1962.0724
506     , p5_a3  NUMBER := 0-1962.0724
507     , p5_a4  NUMBER := 0-1962.0724
508     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
509     , p5_a6  NUMBER := 0-1962.0724
510     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
511     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
512     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
513     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
514     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
515     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
516     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
517     , p5_a14  NUMBER := 0-1962.0724
518     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
519     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
520     , p5_a17  NUMBER := 0-1962.0724
521     , p5_a18  NUMBER := 0-1962.0724
522     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
523     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
524     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
525     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
526     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
527     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
528     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
529     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
530     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
531     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
532     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
533     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
534     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
535     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
536     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
537     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
538     , p5_a35  NUMBER := 0-1962.0724
539     , p5_a36  DATE := fnd_api.g_miss_date
540     , p5_a37  NUMBER := 0-1962.0724
541     , p5_a38  DATE := fnd_api.g_miss_date
542     , p5_a39  NUMBER := 0-1962.0724
543     , p5_a40  NUMBER := 0-1962.0724
544     , p5_a41  NUMBER := 0-1962.0724
545     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
546     , p5_a43  NUMBER := 0-1962.0724
547   )
548 
549   as
550     ddp_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
551     ddx_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
552     ddindx binary_integer; indx binary_integer;
553   begin
554 
555     -- copy data to the local IN or IN-OUT args, if any
556 
557 
558 
559 
560 
561     ddp_iipv_rec.id := rosetta_g_miss_num_map(p5_a0);
562     ddp_iipv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
563     ddp_iipv_rec.tas_id := rosetta_g_miss_num_map(p5_a2);
564     ddp_iipv_rec.tal_id := rosetta_g_miss_num_map(p5_a3);
565     ddp_iipv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
566     ddp_iipv_rec.tal_type := p5_a5;
567     ddp_iipv_rec.line_number := rosetta_g_miss_num_map(p5_a6);
568     ddp_iipv_rec.instance_number_ib := p5_a7;
569     ddp_iipv_rec.object_id1_new := p5_a8;
570     ddp_iipv_rec.object_id2_new := p5_a9;
571     ddp_iipv_rec.jtot_object_code_new := p5_a10;
572     ddp_iipv_rec.object_id1_old := p5_a11;
573     ddp_iipv_rec.object_id2_old := p5_a12;
574     ddp_iipv_rec.jtot_object_code_old := p5_a13;
575     ddp_iipv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a14);
576     ddp_iipv_rec.serial_number := p5_a15;
577     ddp_iipv_rec.mfg_serial_number_yn := p5_a16;
578     ddp_iipv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a17);
579     ddp_iipv_rec.inv_master_org_id := rosetta_g_miss_num_map(p5_a18);
580     ddp_iipv_rec.attribute_category := p5_a19;
581     ddp_iipv_rec.attribute1 := p5_a20;
582     ddp_iipv_rec.attribute2 := p5_a21;
583     ddp_iipv_rec.attribute3 := p5_a22;
584     ddp_iipv_rec.attribute4 := p5_a23;
585     ddp_iipv_rec.attribute5 := p5_a24;
586     ddp_iipv_rec.attribute6 := p5_a25;
587     ddp_iipv_rec.attribute7 := p5_a26;
588     ddp_iipv_rec.attribute8 := p5_a27;
589     ddp_iipv_rec.attribute9 := p5_a28;
590     ddp_iipv_rec.attribute10 := p5_a29;
591     ddp_iipv_rec.attribute11 := p5_a30;
592     ddp_iipv_rec.attribute12 := p5_a31;
593     ddp_iipv_rec.attribute13 := p5_a32;
594     ddp_iipv_rec.attribute14 := p5_a33;
595     ddp_iipv_rec.attribute15 := p5_a34;
596     ddp_iipv_rec.created_by := rosetta_g_miss_num_map(p5_a35);
597     ddp_iipv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
598     ddp_iipv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a37);
599     ddp_iipv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a38);
600     ddp_iipv_rec.last_update_login := rosetta_g_miss_num_map(p5_a39);
601     ddp_iipv_rec.dnz_cle_id := rosetta_g_miss_num_map(p5_a40);
602     ddp_iipv_rec.instance_id := rosetta_g_miss_num_map(p5_a41);
603     ddp_iipv_rec.selected_for_split_flag := p5_a42;
604     ddp_iipv_rec.asd_id := rosetta_g_miss_num_map(p5_a43);
605 
606 
607     -- here's the delegated call to the old PL/SQL routine
608     okl_txl_itm_insts_pub.update_txl_itm_insts(p_api_version,
609       p_init_msg_list,
610       x_return_status,
611       x_msg_count,
612       x_msg_data,
613       ddp_iipv_rec,
614       ddx_iipv_rec);
615 
616     -- copy data back from the local variables to OUT or IN-OUT args, if any
617 
618 
619 
620 
621 
622 
623     p6_a0 := rosetta_g_miss_num_map(ddx_iipv_rec.id);
624     p6_a1 := rosetta_g_miss_num_map(ddx_iipv_rec.object_version_number);
625     p6_a2 := rosetta_g_miss_num_map(ddx_iipv_rec.tas_id);
626     p6_a3 := rosetta_g_miss_num_map(ddx_iipv_rec.tal_id);
627     p6_a4 := rosetta_g_miss_num_map(ddx_iipv_rec.kle_id);
628     p6_a5 := ddx_iipv_rec.tal_type;
629     p6_a6 := rosetta_g_miss_num_map(ddx_iipv_rec.line_number);
630     p6_a7 := ddx_iipv_rec.instance_number_ib;
631     p6_a8 := ddx_iipv_rec.object_id1_new;
632     p6_a9 := ddx_iipv_rec.object_id2_new;
633     p6_a10 := ddx_iipv_rec.jtot_object_code_new;
634     p6_a11 := ddx_iipv_rec.object_id1_old;
635     p6_a12 := ddx_iipv_rec.object_id2_old;
636     p6_a13 := ddx_iipv_rec.jtot_object_code_old;
637     p6_a14 := rosetta_g_miss_num_map(ddx_iipv_rec.inventory_org_id);
638     p6_a15 := ddx_iipv_rec.serial_number;
639     p6_a16 := ddx_iipv_rec.mfg_serial_number_yn;
640     p6_a17 := rosetta_g_miss_num_map(ddx_iipv_rec.inventory_item_id);
641     p6_a18 := rosetta_g_miss_num_map(ddx_iipv_rec.inv_master_org_id);
642     p6_a19 := ddx_iipv_rec.attribute_category;
643     p6_a20 := ddx_iipv_rec.attribute1;
644     p6_a21 := ddx_iipv_rec.attribute2;
645     p6_a22 := ddx_iipv_rec.attribute3;
646     p6_a23 := ddx_iipv_rec.attribute4;
647     p6_a24 := ddx_iipv_rec.attribute5;
648     p6_a25 := ddx_iipv_rec.attribute6;
649     p6_a26 := ddx_iipv_rec.attribute7;
650     p6_a27 := ddx_iipv_rec.attribute8;
651     p6_a28 := ddx_iipv_rec.attribute9;
652     p6_a29 := ddx_iipv_rec.attribute10;
653     p6_a30 := ddx_iipv_rec.attribute11;
654     p6_a31 := ddx_iipv_rec.attribute12;
655     p6_a32 := ddx_iipv_rec.attribute13;
656     p6_a33 := ddx_iipv_rec.attribute14;
657     p6_a34 := ddx_iipv_rec.attribute15;
658     p6_a35 := rosetta_g_miss_num_map(ddx_iipv_rec.created_by);
659     p6_a36 := ddx_iipv_rec.creation_date;
660     p6_a37 := rosetta_g_miss_num_map(ddx_iipv_rec.last_updated_by);
661     p6_a38 := ddx_iipv_rec.last_update_date;
662     p6_a39 := rosetta_g_miss_num_map(ddx_iipv_rec.last_update_login);
663     p6_a40 := rosetta_g_miss_num_map(ddx_iipv_rec.dnz_cle_id);
664     p6_a41 := rosetta_g_miss_num_map(ddx_iipv_rec.instance_id);
665     p6_a42 := ddx_iipv_rec.selected_for_split_flag;
666     p6_a43 := rosetta_g_miss_num_map(ddx_iipv_rec.asd_id);
667   end;
668 
669   procedure update_txl_itm_insts(p_api_version  NUMBER
670     , p_init_msg_list  VARCHAR2
671     , x_return_status out nocopy  VARCHAR2
672     , x_msg_count out nocopy  NUMBER
673     , x_msg_data out nocopy  VARCHAR2
674     , p5_a0 JTF_NUMBER_TABLE
675     , p5_a1 JTF_NUMBER_TABLE
676     , p5_a2 JTF_NUMBER_TABLE
677     , p5_a3 JTF_NUMBER_TABLE
678     , p5_a4 JTF_NUMBER_TABLE
679     , p5_a5 JTF_VARCHAR2_TABLE_100
680     , p5_a6 JTF_NUMBER_TABLE
681     , p5_a7 JTF_VARCHAR2_TABLE_100
682     , p5_a8 JTF_VARCHAR2_TABLE_100
683     , p5_a9 JTF_VARCHAR2_TABLE_200
684     , p5_a10 JTF_VARCHAR2_TABLE_100
685     , p5_a11 JTF_VARCHAR2_TABLE_100
686     , p5_a12 JTF_VARCHAR2_TABLE_200
687     , p5_a13 JTF_VARCHAR2_TABLE_100
688     , p5_a14 JTF_NUMBER_TABLE
689     , p5_a15 JTF_VARCHAR2_TABLE_100
690     , p5_a16 JTF_VARCHAR2_TABLE_100
691     , p5_a17 JTF_NUMBER_TABLE
692     , p5_a18 JTF_NUMBER_TABLE
693     , p5_a19 JTF_VARCHAR2_TABLE_100
694     , p5_a20 JTF_VARCHAR2_TABLE_500
695     , p5_a21 JTF_VARCHAR2_TABLE_500
696     , p5_a22 JTF_VARCHAR2_TABLE_500
697     , p5_a23 JTF_VARCHAR2_TABLE_500
698     , p5_a24 JTF_VARCHAR2_TABLE_500
699     , p5_a25 JTF_VARCHAR2_TABLE_500
700     , p5_a26 JTF_VARCHAR2_TABLE_500
701     , p5_a27 JTF_VARCHAR2_TABLE_500
702     , p5_a28 JTF_VARCHAR2_TABLE_500
703     , p5_a29 JTF_VARCHAR2_TABLE_500
704     , p5_a30 JTF_VARCHAR2_TABLE_500
705     , p5_a31 JTF_VARCHAR2_TABLE_500
706     , p5_a32 JTF_VARCHAR2_TABLE_500
707     , p5_a33 JTF_VARCHAR2_TABLE_500
708     , p5_a34 JTF_VARCHAR2_TABLE_500
709     , p5_a35 JTF_NUMBER_TABLE
710     , p5_a36 JTF_DATE_TABLE
711     , p5_a37 JTF_NUMBER_TABLE
712     , p5_a38 JTF_DATE_TABLE
713     , p5_a39 JTF_NUMBER_TABLE
714     , p5_a40 JTF_NUMBER_TABLE
715     , p5_a41 JTF_NUMBER_TABLE
716     , p5_a42 JTF_VARCHAR2_TABLE_100
717     , p5_a43 JTF_NUMBER_TABLE
718     , p6_a0 out nocopy JTF_NUMBER_TABLE
719     , p6_a1 out nocopy JTF_NUMBER_TABLE
720     , p6_a2 out nocopy JTF_NUMBER_TABLE
721     , p6_a3 out nocopy JTF_NUMBER_TABLE
722     , p6_a4 out nocopy JTF_NUMBER_TABLE
723     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
724     , p6_a6 out nocopy JTF_NUMBER_TABLE
725     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
726     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
727     , p6_a9 out nocopy JTF_VARCHAR2_TABLE_200
728     , p6_a10 out nocopy JTF_VARCHAR2_TABLE_100
729     , p6_a11 out nocopy JTF_VARCHAR2_TABLE_100
730     , p6_a12 out nocopy JTF_VARCHAR2_TABLE_200
731     , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
732     , p6_a14 out nocopy JTF_NUMBER_TABLE
733     , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
734     , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
735     , p6_a17 out nocopy JTF_NUMBER_TABLE
736     , p6_a18 out nocopy JTF_NUMBER_TABLE
737     , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
738     , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
739     , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
740     , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
741     , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
742     , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
743     , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
744     , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
745     , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
746     , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
747     , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
748     , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
749     , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
750     , p6_a32 out nocopy JTF_VARCHAR2_TABLE_500
751     , p6_a33 out nocopy JTF_VARCHAR2_TABLE_500
752     , p6_a34 out nocopy JTF_VARCHAR2_TABLE_500
753     , p6_a35 out nocopy JTF_NUMBER_TABLE
754     , p6_a36 out nocopy JTF_DATE_TABLE
755     , p6_a37 out nocopy JTF_NUMBER_TABLE
756     , p6_a38 out nocopy JTF_DATE_TABLE
757     , p6_a39 out nocopy JTF_NUMBER_TABLE
758     , p6_a40 out nocopy JTF_NUMBER_TABLE
759     , p6_a41 out nocopy JTF_NUMBER_TABLE
760     , p6_a42 out nocopy JTF_VARCHAR2_TABLE_100
761     , p6_a43 out nocopy JTF_NUMBER_TABLE
762   )
763 
764   as
765     ddp_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
766     ddx_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
767     ddindx binary_integer; indx binary_integer;
768   begin
769 
770     -- copy data to the local IN or IN-OUT args, if any
771 
772 
773 
774 
775 
776     okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_iipv_tbl, p5_a0
777       , p5_a1
778       , p5_a2
779       , p5_a3
780       , p5_a4
781       , p5_a5
782       , p5_a6
783       , p5_a7
784       , p5_a8
785       , p5_a9
786       , p5_a10
787       , p5_a11
788       , p5_a12
789       , p5_a13
790       , p5_a14
791       , p5_a15
792       , p5_a16
793       , p5_a17
794       , p5_a18
795       , p5_a19
796       , p5_a20
797       , p5_a21
798       , p5_a22
799       , p5_a23
800       , p5_a24
801       , p5_a25
802       , p5_a26
803       , p5_a27
804       , p5_a28
805       , p5_a29
806       , p5_a30
807       , p5_a31
808       , p5_a32
809       , p5_a33
810       , p5_a34
811       , p5_a35
812       , p5_a36
813       , p5_a37
814       , p5_a38
815       , p5_a39
816       , p5_a40
817       , p5_a41
818       , p5_a42
819       , p5_a43
820       );
821 
822 
823     -- here's the delegated call to the old PL/SQL routine
824     okl_txl_itm_insts_pub.update_txl_itm_insts(p_api_version,
825       p_init_msg_list,
826       x_return_status,
827       x_msg_count,
828       x_msg_data,
829       ddp_iipv_tbl,
830       ddx_iipv_tbl);
831 
832     -- copy data back from the local variables to OUT or IN-OUT args, if any
833 
834 
835 
836 
837 
838 
839     okl_iti_pvt_w.rosetta_table_copy_out_p5(ddx_iipv_tbl, p6_a0
840       , p6_a1
841       , p6_a2
842       , p6_a3
843       , p6_a4
844       , p6_a5
845       , p6_a6
846       , p6_a7
847       , p6_a8
848       , p6_a9
849       , p6_a10
850       , p6_a11
851       , p6_a12
852       , p6_a13
853       , p6_a14
854       , p6_a15
855       , p6_a16
856       , p6_a17
857       , p6_a18
858       , p6_a19
859       , p6_a20
860       , p6_a21
861       , p6_a22
862       , p6_a23
863       , p6_a24
864       , p6_a25
865       , p6_a26
866       , p6_a27
867       , p6_a28
868       , p6_a29
869       , p6_a30
870       , p6_a31
871       , p6_a32
872       , p6_a33
873       , p6_a34
874       , p6_a35
875       , p6_a36
876       , p6_a37
877       , p6_a38
878       , p6_a39
879       , p6_a40
880       , p6_a41
881       , p6_a42
882       , p6_a43
883       );
884   end;
885 
886   procedure delete_txl_itm_insts(p_api_version  NUMBER
887     , p_init_msg_list  VARCHAR2
888     , x_return_status out nocopy  VARCHAR2
889     , x_msg_count out nocopy  NUMBER
890     , x_msg_data out nocopy  VARCHAR2
891     , p5_a0  NUMBER := 0-1962.0724
892     , p5_a1  NUMBER := 0-1962.0724
893     , p5_a2  NUMBER := 0-1962.0724
894     , p5_a3  NUMBER := 0-1962.0724
895     , p5_a4  NUMBER := 0-1962.0724
896     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
897     , p5_a6  NUMBER := 0-1962.0724
898     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
899     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
900     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
901     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
902     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
903     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
904     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
905     , p5_a14  NUMBER := 0-1962.0724
906     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
907     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
908     , p5_a17  NUMBER := 0-1962.0724
909     , p5_a18  NUMBER := 0-1962.0724
910     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
911     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
912     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
913     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
914     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
915     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
916     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
917     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
918     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
919     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
920     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
921     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
922     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
923     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
924     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
925     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
926     , p5_a35  NUMBER := 0-1962.0724
927     , p5_a36  DATE := fnd_api.g_miss_date
928     , p5_a37  NUMBER := 0-1962.0724
929     , p5_a38  DATE := fnd_api.g_miss_date
930     , p5_a39  NUMBER := 0-1962.0724
931     , p5_a40  NUMBER := 0-1962.0724
932     , p5_a41  NUMBER := 0-1962.0724
933     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
934     , p5_a43  NUMBER := 0-1962.0724
935   )
936 
937   as
938     ddp_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
939     ddindx binary_integer; indx binary_integer;
940   begin
941 
942     -- copy data to the local IN or IN-OUT args, if any
943 
944 
945 
946 
947 
948     ddp_iipv_rec.id := rosetta_g_miss_num_map(p5_a0);
949     ddp_iipv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
950     ddp_iipv_rec.tas_id := rosetta_g_miss_num_map(p5_a2);
951     ddp_iipv_rec.tal_id := rosetta_g_miss_num_map(p5_a3);
952     ddp_iipv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
953     ddp_iipv_rec.tal_type := p5_a5;
954     ddp_iipv_rec.line_number := rosetta_g_miss_num_map(p5_a6);
955     ddp_iipv_rec.instance_number_ib := p5_a7;
956     ddp_iipv_rec.object_id1_new := p5_a8;
957     ddp_iipv_rec.object_id2_new := p5_a9;
958     ddp_iipv_rec.jtot_object_code_new := p5_a10;
959     ddp_iipv_rec.object_id1_old := p5_a11;
960     ddp_iipv_rec.object_id2_old := p5_a12;
961     ddp_iipv_rec.jtot_object_code_old := p5_a13;
962     ddp_iipv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a14);
963     ddp_iipv_rec.serial_number := p5_a15;
964     ddp_iipv_rec.mfg_serial_number_yn := p5_a16;
965     ddp_iipv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a17);
966     ddp_iipv_rec.inv_master_org_id := rosetta_g_miss_num_map(p5_a18);
967     ddp_iipv_rec.attribute_category := p5_a19;
968     ddp_iipv_rec.attribute1 := p5_a20;
969     ddp_iipv_rec.attribute2 := p5_a21;
970     ddp_iipv_rec.attribute3 := p5_a22;
971     ddp_iipv_rec.attribute4 := p5_a23;
972     ddp_iipv_rec.attribute5 := p5_a24;
973     ddp_iipv_rec.attribute6 := p5_a25;
974     ddp_iipv_rec.attribute7 := p5_a26;
975     ddp_iipv_rec.attribute8 := p5_a27;
976     ddp_iipv_rec.attribute9 := p5_a28;
977     ddp_iipv_rec.attribute10 := p5_a29;
978     ddp_iipv_rec.attribute11 := p5_a30;
979     ddp_iipv_rec.attribute12 := p5_a31;
980     ddp_iipv_rec.attribute13 := p5_a32;
981     ddp_iipv_rec.attribute14 := p5_a33;
982     ddp_iipv_rec.attribute15 := p5_a34;
983     ddp_iipv_rec.created_by := rosetta_g_miss_num_map(p5_a35);
984     ddp_iipv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
985     ddp_iipv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a37);
986     ddp_iipv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a38);
987     ddp_iipv_rec.last_update_login := rosetta_g_miss_num_map(p5_a39);
988     ddp_iipv_rec.dnz_cle_id := rosetta_g_miss_num_map(p5_a40);
989     ddp_iipv_rec.instance_id := rosetta_g_miss_num_map(p5_a41);
990     ddp_iipv_rec.selected_for_split_flag := p5_a42;
991     ddp_iipv_rec.asd_id := rosetta_g_miss_num_map(p5_a43);
992 
993     -- here's the delegated call to the old PL/SQL routine
994     okl_txl_itm_insts_pub.delete_txl_itm_insts(p_api_version,
995       p_init_msg_list,
996       x_return_status,
997       x_msg_count,
998       x_msg_data,
999       ddp_iipv_rec);
1000 
1001     -- copy data back from the local variables to OUT or IN-OUT args, if any
1002 
1003 
1004 
1005 
1006 
1007   end;
1008 
1009   procedure delete_txl_itm_insts(p_api_version  NUMBER
1010     , p_init_msg_list  VARCHAR2
1011     , x_return_status out nocopy  VARCHAR2
1012     , x_msg_count out nocopy  NUMBER
1013     , x_msg_data out nocopy  VARCHAR2
1014     , p5_a0 JTF_NUMBER_TABLE
1015     , p5_a1 JTF_NUMBER_TABLE
1016     , p5_a2 JTF_NUMBER_TABLE
1017     , p5_a3 JTF_NUMBER_TABLE
1018     , p5_a4 JTF_NUMBER_TABLE
1019     , p5_a5 JTF_VARCHAR2_TABLE_100
1020     , p5_a6 JTF_NUMBER_TABLE
1021     , p5_a7 JTF_VARCHAR2_TABLE_100
1022     , p5_a8 JTF_VARCHAR2_TABLE_100
1023     , p5_a9 JTF_VARCHAR2_TABLE_200
1024     , p5_a10 JTF_VARCHAR2_TABLE_100
1025     , p5_a11 JTF_VARCHAR2_TABLE_100
1026     , p5_a12 JTF_VARCHAR2_TABLE_200
1027     , p5_a13 JTF_VARCHAR2_TABLE_100
1028     , p5_a14 JTF_NUMBER_TABLE
1029     , p5_a15 JTF_VARCHAR2_TABLE_100
1030     , p5_a16 JTF_VARCHAR2_TABLE_100
1031     , p5_a17 JTF_NUMBER_TABLE
1032     , p5_a18 JTF_NUMBER_TABLE
1033     , p5_a19 JTF_VARCHAR2_TABLE_100
1034     , p5_a20 JTF_VARCHAR2_TABLE_500
1035     , p5_a21 JTF_VARCHAR2_TABLE_500
1036     , p5_a22 JTF_VARCHAR2_TABLE_500
1037     , p5_a23 JTF_VARCHAR2_TABLE_500
1038     , p5_a24 JTF_VARCHAR2_TABLE_500
1039     , p5_a25 JTF_VARCHAR2_TABLE_500
1040     , p5_a26 JTF_VARCHAR2_TABLE_500
1041     , p5_a27 JTF_VARCHAR2_TABLE_500
1042     , p5_a28 JTF_VARCHAR2_TABLE_500
1043     , p5_a29 JTF_VARCHAR2_TABLE_500
1044     , p5_a30 JTF_VARCHAR2_TABLE_500
1045     , p5_a31 JTF_VARCHAR2_TABLE_500
1046     , p5_a32 JTF_VARCHAR2_TABLE_500
1047     , p5_a33 JTF_VARCHAR2_TABLE_500
1048     , p5_a34 JTF_VARCHAR2_TABLE_500
1049     , p5_a35 JTF_NUMBER_TABLE
1050     , p5_a36 JTF_DATE_TABLE
1051     , p5_a37 JTF_NUMBER_TABLE
1052     , p5_a38 JTF_DATE_TABLE
1053     , p5_a39 JTF_NUMBER_TABLE
1054     , p5_a40 JTF_NUMBER_TABLE
1055     , p5_a41 JTF_NUMBER_TABLE
1056     , p5_a42 JTF_VARCHAR2_TABLE_100
1057     , p5_a43 JTF_NUMBER_TABLE
1058   )
1059 
1060   as
1061     ddp_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
1062     ddindx binary_integer; indx binary_integer;
1063   begin
1064 
1065     -- copy data to the local IN or IN-OUT args, if any
1066 
1067 
1068 
1069 
1070 
1071     okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_iipv_tbl, p5_a0
1072       , p5_a1
1073       , p5_a2
1074       , p5_a3
1075       , p5_a4
1076       , p5_a5
1077       , p5_a6
1078       , p5_a7
1079       , p5_a8
1080       , p5_a9
1081       , p5_a10
1082       , p5_a11
1083       , p5_a12
1084       , p5_a13
1085       , p5_a14
1086       , p5_a15
1087       , p5_a16
1088       , p5_a17
1089       , p5_a18
1090       , p5_a19
1091       , p5_a20
1092       , p5_a21
1093       , p5_a22
1094       , p5_a23
1095       , p5_a24
1096       , p5_a25
1097       , p5_a26
1098       , p5_a27
1099       , p5_a28
1100       , p5_a29
1101       , p5_a30
1102       , p5_a31
1103       , p5_a32
1104       , p5_a33
1105       , p5_a34
1106       , p5_a35
1107       , p5_a36
1108       , p5_a37
1109       , p5_a38
1110       , p5_a39
1111       , p5_a40
1112       , p5_a41
1113       , p5_a42
1114       , p5_a43
1115       );
1116 
1117     -- here's the delegated call to the old PL/SQL routine
1118     okl_txl_itm_insts_pub.delete_txl_itm_insts(p_api_version,
1119       p_init_msg_list,
1120       x_return_status,
1121       x_msg_count,
1122       x_msg_data,
1123       ddp_iipv_tbl);
1124 
1125     -- copy data back from the local variables to OUT or IN-OUT args, if any
1126 
1127 
1128 
1129 
1130 
1131   end;
1132 
1133   procedure lock_txl_itm_insts(p_api_version  NUMBER
1134     , p_init_msg_list  VARCHAR2
1135     , x_return_status out nocopy  VARCHAR2
1136     , x_msg_count out nocopy  NUMBER
1137     , x_msg_data out nocopy  VARCHAR2
1138     , p5_a0  NUMBER := 0-1962.0724
1139     , p5_a1  NUMBER := 0-1962.0724
1140     , p5_a2  NUMBER := 0-1962.0724
1141     , p5_a3  NUMBER := 0-1962.0724
1142     , p5_a4  NUMBER := 0-1962.0724
1143     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
1144     , p5_a6  NUMBER := 0-1962.0724
1145     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1146     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
1147     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1148     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
1149     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1150     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1151     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1152     , p5_a14  NUMBER := 0-1962.0724
1153     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1154     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1155     , p5_a17  NUMBER := 0-1962.0724
1156     , p5_a18  NUMBER := 0-1962.0724
1157     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1158     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1159     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1160     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1161     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1162     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1163     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1164     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1165     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1166     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1167     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1168     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1169     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1170     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1171     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1172     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1173     , p5_a35  NUMBER := 0-1962.0724
1174     , p5_a36  DATE := fnd_api.g_miss_date
1175     , p5_a37  NUMBER := 0-1962.0724
1176     , p5_a38  DATE := fnd_api.g_miss_date
1177     , p5_a39  NUMBER := 0-1962.0724
1178     , p5_a40  NUMBER := 0-1962.0724
1179     , p5_a41  NUMBER := 0-1962.0724
1180     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1181     , p5_a43  NUMBER := 0-1962.0724
1182   )
1183 
1184   as
1185     ddp_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
1186     ddindx binary_integer; indx binary_integer;
1187   begin
1188 
1189     -- copy data to the local IN or IN-OUT args, if any
1190 
1191 
1192 
1193 
1194 
1195     ddp_iipv_rec.id := rosetta_g_miss_num_map(p5_a0);
1196     ddp_iipv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1197     ddp_iipv_rec.tas_id := rosetta_g_miss_num_map(p5_a2);
1198     ddp_iipv_rec.tal_id := rosetta_g_miss_num_map(p5_a3);
1199     ddp_iipv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1200     ddp_iipv_rec.tal_type := p5_a5;
1201     ddp_iipv_rec.line_number := rosetta_g_miss_num_map(p5_a6);
1202     ddp_iipv_rec.instance_number_ib := p5_a7;
1203     ddp_iipv_rec.object_id1_new := p5_a8;
1204     ddp_iipv_rec.object_id2_new := p5_a9;
1205     ddp_iipv_rec.jtot_object_code_new := p5_a10;
1206     ddp_iipv_rec.object_id1_old := p5_a11;
1207     ddp_iipv_rec.object_id2_old := p5_a12;
1208     ddp_iipv_rec.jtot_object_code_old := p5_a13;
1209     ddp_iipv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a14);
1210     ddp_iipv_rec.serial_number := p5_a15;
1211     ddp_iipv_rec.mfg_serial_number_yn := p5_a16;
1212     ddp_iipv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a17);
1213     ddp_iipv_rec.inv_master_org_id := rosetta_g_miss_num_map(p5_a18);
1214     ddp_iipv_rec.attribute_category := p5_a19;
1215     ddp_iipv_rec.attribute1 := p5_a20;
1216     ddp_iipv_rec.attribute2 := p5_a21;
1217     ddp_iipv_rec.attribute3 := p5_a22;
1218     ddp_iipv_rec.attribute4 := p5_a23;
1219     ddp_iipv_rec.attribute5 := p5_a24;
1220     ddp_iipv_rec.attribute6 := p5_a25;
1221     ddp_iipv_rec.attribute7 := p5_a26;
1222     ddp_iipv_rec.attribute8 := p5_a27;
1223     ddp_iipv_rec.attribute9 := p5_a28;
1224     ddp_iipv_rec.attribute10 := p5_a29;
1225     ddp_iipv_rec.attribute11 := p5_a30;
1226     ddp_iipv_rec.attribute12 := p5_a31;
1227     ddp_iipv_rec.attribute13 := p5_a32;
1228     ddp_iipv_rec.attribute14 := p5_a33;
1229     ddp_iipv_rec.attribute15 := p5_a34;
1230     ddp_iipv_rec.created_by := rosetta_g_miss_num_map(p5_a35);
1231     ddp_iipv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
1232     ddp_iipv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a37);
1233     ddp_iipv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a38);
1234     ddp_iipv_rec.last_update_login := rosetta_g_miss_num_map(p5_a39);
1235     ddp_iipv_rec.dnz_cle_id := rosetta_g_miss_num_map(p5_a40);
1236     ddp_iipv_rec.instance_id := rosetta_g_miss_num_map(p5_a41);
1237     ddp_iipv_rec.selected_for_split_flag := p5_a42;
1238     ddp_iipv_rec.asd_id := rosetta_g_miss_num_map(p5_a43);
1239 
1240     -- here's the delegated call to the old PL/SQL routine
1241     okl_txl_itm_insts_pub.lock_txl_itm_insts(p_api_version,
1242       p_init_msg_list,
1243       x_return_status,
1244       x_msg_count,
1245       x_msg_data,
1246       ddp_iipv_rec);
1247 
1248     -- copy data back from the local variables to OUT or IN-OUT args, if any
1249 
1250 
1251 
1252 
1253 
1254   end;
1255 
1256   procedure lock_txl_itm_insts(p_api_version  NUMBER
1257     , p_init_msg_list  VARCHAR2
1258     , x_return_status out nocopy  VARCHAR2
1259     , x_msg_count out nocopy  NUMBER
1260     , x_msg_data out nocopy  VARCHAR2
1261     , p5_a0 JTF_NUMBER_TABLE
1262     , p5_a1 JTF_NUMBER_TABLE
1263     , p5_a2 JTF_NUMBER_TABLE
1264     , p5_a3 JTF_NUMBER_TABLE
1265     , p5_a4 JTF_NUMBER_TABLE
1266     , p5_a5 JTF_VARCHAR2_TABLE_100
1267     , p5_a6 JTF_NUMBER_TABLE
1268     , p5_a7 JTF_VARCHAR2_TABLE_100
1269     , p5_a8 JTF_VARCHAR2_TABLE_100
1270     , p5_a9 JTF_VARCHAR2_TABLE_200
1271     , p5_a10 JTF_VARCHAR2_TABLE_100
1272     , p5_a11 JTF_VARCHAR2_TABLE_100
1273     , p5_a12 JTF_VARCHAR2_TABLE_200
1274     , p5_a13 JTF_VARCHAR2_TABLE_100
1275     , p5_a14 JTF_NUMBER_TABLE
1276     , p5_a15 JTF_VARCHAR2_TABLE_100
1277     , p5_a16 JTF_VARCHAR2_TABLE_100
1278     , p5_a17 JTF_NUMBER_TABLE
1279     , p5_a18 JTF_NUMBER_TABLE
1280     , p5_a19 JTF_VARCHAR2_TABLE_100
1281     , p5_a20 JTF_VARCHAR2_TABLE_500
1282     , p5_a21 JTF_VARCHAR2_TABLE_500
1283     , p5_a22 JTF_VARCHAR2_TABLE_500
1284     , p5_a23 JTF_VARCHAR2_TABLE_500
1285     , p5_a24 JTF_VARCHAR2_TABLE_500
1286     , p5_a25 JTF_VARCHAR2_TABLE_500
1287     , p5_a26 JTF_VARCHAR2_TABLE_500
1288     , p5_a27 JTF_VARCHAR2_TABLE_500
1289     , p5_a28 JTF_VARCHAR2_TABLE_500
1290     , p5_a29 JTF_VARCHAR2_TABLE_500
1291     , p5_a30 JTF_VARCHAR2_TABLE_500
1292     , p5_a31 JTF_VARCHAR2_TABLE_500
1293     , p5_a32 JTF_VARCHAR2_TABLE_500
1294     , p5_a33 JTF_VARCHAR2_TABLE_500
1295     , p5_a34 JTF_VARCHAR2_TABLE_500
1296     , p5_a35 JTF_NUMBER_TABLE
1297     , p5_a36 JTF_DATE_TABLE
1298     , p5_a37 JTF_NUMBER_TABLE
1299     , p5_a38 JTF_DATE_TABLE
1300     , p5_a39 JTF_NUMBER_TABLE
1301     , p5_a40 JTF_NUMBER_TABLE
1302     , p5_a41 JTF_NUMBER_TABLE
1303     , p5_a42 JTF_VARCHAR2_TABLE_100
1304     , p5_a43 JTF_NUMBER_TABLE
1305   )
1306 
1307   as
1308     ddp_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
1309     ddindx binary_integer; indx binary_integer;
1310   begin
1311 
1312     -- copy data to the local IN or IN-OUT args, if any
1313 
1314 
1315 
1316 
1317 
1318     okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_iipv_tbl, p5_a0
1319       , p5_a1
1320       , p5_a2
1321       , p5_a3
1322       , p5_a4
1323       , p5_a5
1324       , p5_a6
1325       , p5_a7
1326       , p5_a8
1327       , p5_a9
1328       , p5_a10
1329       , p5_a11
1330       , p5_a12
1331       , p5_a13
1332       , p5_a14
1333       , p5_a15
1334       , p5_a16
1335       , p5_a17
1336       , p5_a18
1337       , p5_a19
1338       , p5_a20
1339       , p5_a21
1340       , p5_a22
1341       , p5_a23
1342       , p5_a24
1343       , p5_a25
1344       , p5_a26
1345       , p5_a27
1346       , p5_a28
1347       , p5_a29
1348       , p5_a30
1349       , p5_a31
1350       , p5_a32
1351       , p5_a33
1352       , p5_a34
1353       , p5_a35
1354       , p5_a36
1355       , p5_a37
1356       , p5_a38
1357       , p5_a39
1358       , p5_a40
1359       , p5_a41
1360       , p5_a42
1361       , p5_a43
1362       );
1363 
1364     -- here's the delegated call to the old PL/SQL routine
1365     okl_txl_itm_insts_pub.lock_txl_itm_insts(p_api_version,
1366       p_init_msg_list,
1367       x_return_status,
1368       x_msg_count,
1369       x_msg_data,
1370       ddp_iipv_tbl);
1371 
1372     -- copy data back from the local variables to OUT or IN-OUT args, if any
1373 
1374 
1375 
1376 
1377 
1378   end;
1379 
1380   procedure validate_txl_itm_insts(p_api_version  NUMBER
1381     , p_init_msg_list  VARCHAR2
1382     , x_return_status out nocopy  VARCHAR2
1383     , x_msg_count out nocopy  NUMBER
1384     , x_msg_data out nocopy  VARCHAR2
1385     , p5_a0  NUMBER := 0-1962.0724
1386     , p5_a1  NUMBER := 0-1962.0724
1387     , p5_a2  NUMBER := 0-1962.0724
1388     , p5_a3  NUMBER := 0-1962.0724
1389     , p5_a4  NUMBER := 0-1962.0724
1390     , p5_a5  VARCHAR2 := fnd_api.g_miss_char
1391     , p5_a6  NUMBER := 0-1962.0724
1392     , p5_a7  VARCHAR2 := fnd_api.g_miss_char
1393     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
1394     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1395     , p5_a10  VARCHAR2 := fnd_api.g_miss_char
1396     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1397     , p5_a12  VARCHAR2 := fnd_api.g_miss_char
1398     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1399     , p5_a14  NUMBER := 0-1962.0724
1400     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1401     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1402     , p5_a17  NUMBER := 0-1962.0724
1403     , p5_a18  NUMBER := 0-1962.0724
1404     , p5_a19  VARCHAR2 := fnd_api.g_miss_char
1405     , p5_a20  VARCHAR2 := fnd_api.g_miss_char
1406     , p5_a21  VARCHAR2 := fnd_api.g_miss_char
1407     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1408     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1409     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1410     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1411     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1412     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1413     , p5_a28  VARCHAR2 := fnd_api.g_miss_char
1414     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1415     , p5_a30  VARCHAR2 := fnd_api.g_miss_char
1416     , p5_a31  VARCHAR2 := fnd_api.g_miss_char
1417     , p5_a32  VARCHAR2 := fnd_api.g_miss_char
1418     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1419     , p5_a34  VARCHAR2 := fnd_api.g_miss_char
1420     , p5_a35  NUMBER := 0-1962.0724
1421     , p5_a36  DATE := fnd_api.g_miss_date
1422     , p5_a37  NUMBER := 0-1962.0724
1423     , p5_a38  DATE := fnd_api.g_miss_date
1424     , p5_a39  NUMBER := 0-1962.0724
1425     , p5_a40  NUMBER := 0-1962.0724
1426     , p5_a41  NUMBER := 0-1962.0724
1427     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1428     , p5_a43  NUMBER := 0-1962.0724
1429   )
1430 
1431   as
1432     ddp_iipv_rec okl_txl_itm_insts_pub.iipv_rec_type;
1433     ddindx binary_integer; indx binary_integer;
1434   begin
1435 
1436     -- copy data to the local IN or IN-OUT args, if any
1437 
1438 
1439 
1440 
1441 
1442     ddp_iipv_rec.id := rosetta_g_miss_num_map(p5_a0);
1443     ddp_iipv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1444     ddp_iipv_rec.tas_id := rosetta_g_miss_num_map(p5_a2);
1445     ddp_iipv_rec.tal_id := rosetta_g_miss_num_map(p5_a3);
1446     ddp_iipv_rec.kle_id := rosetta_g_miss_num_map(p5_a4);
1447     ddp_iipv_rec.tal_type := p5_a5;
1448     ddp_iipv_rec.line_number := rosetta_g_miss_num_map(p5_a6);
1449     ddp_iipv_rec.instance_number_ib := p5_a7;
1450     ddp_iipv_rec.object_id1_new := p5_a8;
1451     ddp_iipv_rec.object_id2_new := p5_a9;
1452     ddp_iipv_rec.jtot_object_code_new := p5_a10;
1453     ddp_iipv_rec.object_id1_old := p5_a11;
1454     ddp_iipv_rec.object_id2_old := p5_a12;
1455     ddp_iipv_rec.jtot_object_code_old := p5_a13;
1456     ddp_iipv_rec.inventory_org_id := rosetta_g_miss_num_map(p5_a14);
1457     ddp_iipv_rec.serial_number := p5_a15;
1458     ddp_iipv_rec.mfg_serial_number_yn := p5_a16;
1459     ddp_iipv_rec.inventory_item_id := rosetta_g_miss_num_map(p5_a17);
1460     ddp_iipv_rec.inv_master_org_id := rosetta_g_miss_num_map(p5_a18);
1461     ddp_iipv_rec.attribute_category := p5_a19;
1462     ddp_iipv_rec.attribute1 := p5_a20;
1463     ddp_iipv_rec.attribute2 := p5_a21;
1464     ddp_iipv_rec.attribute3 := p5_a22;
1465     ddp_iipv_rec.attribute4 := p5_a23;
1466     ddp_iipv_rec.attribute5 := p5_a24;
1467     ddp_iipv_rec.attribute6 := p5_a25;
1468     ddp_iipv_rec.attribute7 := p5_a26;
1469     ddp_iipv_rec.attribute8 := p5_a27;
1470     ddp_iipv_rec.attribute9 := p5_a28;
1471     ddp_iipv_rec.attribute10 := p5_a29;
1472     ddp_iipv_rec.attribute11 := p5_a30;
1473     ddp_iipv_rec.attribute12 := p5_a31;
1474     ddp_iipv_rec.attribute13 := p5_a32;
1475     ddp_iipv_rec.attribute14 := p5_a33;
1476     ddp_iipv_rec.attribute15 := p5_a34;
1477     ddp_iipv_rec.created_by := rosetta_g_miss_num_map(p5_a35);
1478     ddp_iipv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a36);
1479     ddp_iipv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a37);
1480     ddp_iipv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a38);
1481     ddp_iipv_rec.last_update_login := rosetta_g_miss_num_map(p5_a39);
1482     ddp_iipv_rec.dnz_cle_id := rosetta_g_miss_num_map(p5_a40);
1483     ddp_iipv_rec.instance_id := rosetta_g_miss_num_map(p5_a41);
1484     ddp_iipv_rec.selected_for_split_flag := p5_a42;
1485     ddp_iipv_rec.asd_id := rosetta_g_miss_num_map(p5_a43);
1486 
1487     -- here's the delegated call to the old PL/SQL routine
1488     okl_txl_itm_insts_pub.validate_txl_itm_insts(p_api_version,
1489       p_init_msg_list,
1490       x_return_status,
1491       x_msg_count,
1492       x_msg_data,
1493       ddp_iipv_rec);
1494 
1495     -- copy data back from the local variables to OUT or IN-OUT args, if any
1496 
1497 
1498 
1499 
1500 
1501   end;
1502 
1503   procedure validate_txl_itm_insts(p_api_version  NUMBER
1504     , p_init_msg_list  VARCHAR2
1505     , x_return_status out nocopy  VARCHAR2
1506     , x_msg_count out nocopy  NUMBER
1507     , x_msg_data out nocopy  VARCHAR2
1508     , p5_a0 JTF_NUMBER_TABLE
1509     , p5_a1 JTF_NUMBER_TABLE
1510     , p5_a2 JTF_NUMBER_TABLE
1511     , p5_a3 JTF_NUMBER_TABLE
1512     , p5_a4 JTF_NUMBER_TABLE
1513     , p5_a5 JTF_VARCHAR2_TABLE_100
1514     , p5_a6 JTF_NUMBER_TABLE
1515     , p5_a7 JTF_VARCHAR2_TABLE_100
1516     , p5_a8 JTF_VARCHAR2_TABLE_100
1517     , p5_a9 JTF_VARCHAR2_TABLE_200
1518     , p5_a10 JTF_VARCHAR2_TABLE_100
1519     , p5_a11 JTF_VARCHAR2_TABLE_100
1520     , p5_a12 JTF_VARCHAR2_TABLE_200
1521     , p5_a13 JTF_VARCHAR2_TABLE_100
1522     , p5_a14 JTF_NUMBER_TABLE
1523     , p5_a15 JTF_VARCHAR2_TABLE_100
1524     , p5_a16 JTF_VARCHAR2_TABLE_100
1525     , p5_a17 JTF_NUMBER_TABLE
1526     , p5_a18 JTF_NUMBER_TABLE
1527     , p5_a19 JTF_VARCHAR2_TABLE_100
1528     , p5_a20 JTF_VARCHAR2_TABLE_500
1529     , p5_a21 JTF_VARCHAR2_TABLE_500
1530     , p5_a22 JTF_VARCHAR2_TABLE_500
1531     , p5_a23 JTF_VARCHAR2_TABLE_500
1532     , p5_a24 JTF_VARCHAR2_TABLE_500
1533     , p5_a25 JTF_VARCHAR2_TABLE_500
1534     , p5_a26 JTF_VARCHAR2_TABLE_500
1535     , p5_a27 JTF_VARCHAR2_TABLE_500
1536     , p5_a28 JTF_VARCHAR2_TABLE_500
1537     , p5_a29 JTF_VARCHAR2_TABLE_500
1538     , p5_a30 JTF_VARCHAR2_TABLE_500
1539     , p5_a31 JTF_VARCHAR2_TABLE_500
1540     , p5_a32 JTF_VARCHAR2_TABLE_500
1541     , p5_a33 JTF_VARCHAR2_TABLE_500
1542     , p5_a34 JTF_VARCHAR2_TABLE_500
1543     , p5_a35 JTF_NUMBER_TABLE
1544     , p5_a36 JTF_DATE_TABLE
1545     , p5_a37 JTF_NUMBER_TABLE
1546     , p5_a38 JTF_DATE_TABLE
1547     , p5_a39 JTF_NUMBER_TABLE
1548     , p5_a40 JTF_NUMBER_TABLE
1549     , p5_a41 JTF_NUMBER_TABLE
1550     , p5_a42 JTF_VARCHAR2_TABLE_100
1551     , p5_a43 JTF_NUMBER_TABLE
1552   )
1553 
1554   as
1555     ddp_iipv_tbl okl_txl_itm_insts_pub.iipv_tbl_type;
1556     ddindx binary_integer; indx binary_integer;
1557   begin
1558 
1559     -- copy data to the local IN or IN-OUT args, if any
1560 
1561 
1562 
1563 
1564 
1565     okl_iti_pvt_w.rosetta_table_copy_in_p5(ddp_iipv_tbl, p5_a0
1566       , p5_a1
1567       , p5_a2
1568       , p5_a3
1569       , p5_a4
1570       , p5_a5
1571       , p5_a6
1572       , p5_a7
1573       , p5_a8
1574       , p5_a9
1575       , p5_a10
1576       , p5_a11
1577       , p5_a12
1578       , p5_a13
1579       , p5_a14
1580       , p5_a15
1581       , p5_a16
1582       , p5_a17
1583       , p5_a18
1584       , p5_a19
1585       , p5_a20
1586       , p5_a21
1587       , p5_a22
1588       , p5_a23
1589       , p5_a24
1590       , p5_a25
1591       , p5_a26
1592       , p5_a27
1593       , p5_a28
1594       , p5_a29
1595       , p5_a30
1596       , p5_a31
1597       , p5_a32
1598       , p5_a33
1599       , p5_a34
1600       , p5_a35
1601       , p5_a36
1602       , p5_a37
1603       , p5_a38
1604       , p5_a39
1605       , p5_a40
1606       , p5_a41
1607       , p5_a42
1608       , p5_a43
1609       );
1610 
1611     -- here's the delegated call to the old PL/SQL routine
1612     okl_txl_itm_insts_pub.validate_txl_itm_insts(p_api_version,
1613       p_init_msg_list,
1614       x_return_status,
1615       x_msg_count,
1616       x_msg_data,
1617       ddp_iipv_tbl);
1618 
1619     -- copy data back from the local variables to OUT or IN-OUT args, if any
1620 
1621 
1622 
1623 
1624 
1625   end;
1626 
1627 end okl_txl_itm_insts_pub_w;