DBA Data[Home] [Help]

PACKAGE BODY: APPS.OKL_CONTRACT_LINE_ITEM_PUB_W

Source


1 package body okl_contract_line_item_pub_w as
2   /* $Header: OKLUCLIB.pls 115.2 2003/10/16 01:15:36 smereddy 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_contract_line_item(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_VARCHAR2_TABLE_100
32     , p5_a5 JTF_VARCHAR2_TABLE_200
33     , p5_a6 JTF_VARCHAR2_TABLE_100
34     , p5_a7 JTF_VARCHAR2_TABLE_2000
35     , p5_a8 JTF_VARCHAR2_TABLE_200
36     , p5_a9 JTF_NUMBER_TABLE
37     , p5_a10 JTF_NUMBER_TABLE
38     , p6_a0 out nocopy JTF_NUMBER_TABLE
39     , p6_a1 out nocopy JTF_NUMBER_TABLE
40     , p6_a2 out nocopy JTF_NUMBER_TABLE
41     , p6_a3 out nocopy JTF_NUMBER_TABLE
42     , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
43     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
44     , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
45     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
46     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_200
47     , p6_a9 out nocopy JTF_NUMBER_TABLE
48     , p6_a10 out nocopy JTF_NUMBER_TABLE
49   )
50 
51   as
52     ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
53     ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
54     ddindx binary_integer; indx binary_integer;
55   begin
56 
57     -- copy data to the local IN or IN-OUT args, if any
58 
59 
60 
61 
62 
63     okl_contract_line_item_pvt_w.rosetta_table_copy_in_p11(ddp_line_item_tbl, p5_a0
64       , p5_a1
65       , p5_a2
66       , p5_a3
67       , p5_a4
68       , p5_a5
69       , p5_a6
70       , p5_a7
71       , p5_a8
72       , p5_a9
73       , p5_a10
74       );
75 
76 
77     -- here's the delegated call to the old PL/SQL routine
78     okl_contract_line_item_pub.create_contract_line_item(p_api_version,
79       p_init_msg_list,
80       x_return_status,
81       x_msg_count,
82       x_msg_data,
83       ddp_line_item_tbl,
84       ddx_line_item_tbl);
85 
86     -- copy data back from the local variables to OUT or IN-OUT args, if any
87 
88 
89 
90 
91 
92 
93     okl_contract_line_item_pvt_w.rosetta_table_copy_out_p11(ddx_line_item_tbl, p6_a0
94       , p6_a1
95       , p6_a2
96       , p6_a3
97       , p6_a4
98       , p6_a5
99       , p6_a6
100       , p6_a7
101       , p6_a8
102       , p6_a9
103       , p6_a10
104       );
105   end;
106 
107   procedure update_contract_line_item(p_api_version  NUMBER
108     , p_init_msg_list  VARCHAR2
109     , x_return_status out nocopy  VARCHAR2
110     , x_msg_count out nocopy  NUMBER
111     , x_msg_data out nocopy  VARCHAR2
112     , p5_a0 JTF_NUMBER_TABLE
113     , p5_a1 JTF_NUMBER_TABLE
114     , p5_a2 JTF_NUMBER_TABLE
115     , p5_a3 JTF_NUMBER_TABLE
116     , p5_a4 JTF_VARCHAR2_TABLE_100
117     , p5_a5 JTF_VARCHAR2_TABLE_200
118     , p5_a6 JTF_VARCHAR2_TABLE_100
119     , p5_a7 JTF_VARCHAR2_TABLE_2000
120     , p5_a8 JTF_VARCHAR2_TABLE_200
121     , p5_a9 JTF_NUMBER_TABLE
122     , p5_a10 JTF_NUMBER_TABLE
123     , p6_a0 out nocopy JTF_NUMBER_TABLE
124     , p6_a1 out nocopy JTF_NUMBER_TABLE
125     , p6_a2 out nocopy JTF_NUMBER_TABLE
126     , p6_a3 out nocopy JTF_NUMBER_TABLE
127     , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
128     , p6_a5 out nocopy JTF_VARCHAR2_TABLE_200
129     , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
130     , p6_a7 out nocopy JTF_VARCHAR2_TABLE_2000
131     , p6_a8 out nocopy JTF_VARCHAR2_TABLE_200
132     , p6_a9 out nocopy JTF_NUMBER_TABLE
133     , p6_a10 out nocopy JTF_NUMBER_TABLE
134   )
135 
136   as
137     ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
138     ddx_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
139     ddindx binary_integer; indx binary_integer;
140   begin
141 
142     -- copy data to the local IN or IN-OUT args, if any
143 
144 
145 
146 
147 
148     okl_contract_line_item_pvt_w.rosetta_table_copy_in_p11(ddp_line_item_tbl, p5_a0
149       , p5_a1
150       , p5_a2
151       , p5_a3
152       , p5_a4
153       , p5_a5
154       , p5_a6
155       , p5_a7
156       , p5_a8
157       , p5_a9
158       , p5_a10
159       );
160 
161 
162     -- here's the delegated call to the old PL/SQL routine
163     okl_contract_line_item_pub.update_contract_line_item(p_api_version,
164       p_init_msg_list,
165       x_return_status,
166       x_msg_count,
167       x_msg_data,
168       ddp_line_item_tbl,
169       ddx_line_item_tbl);
170 
171     -- copy data back from the local variables to OUT or IN-OUT args, if any
172 
173 
174 
175 
176 
177 
178     okl_contract_line_item_pvt_w.rosetta_table_copy_out_p11(ddx_line_item_tbl, p6_a0
179       , p6_a1
180       , p6_a2
181       , p6_a3
182       , p6_a4
183       , p6_a5
184       , p6_a6
185       , p6_a7
186       , p6_a8
187       , p6_a9
188       , p6_a10
189       );
190   end;
191 
192   procedure delete_contract_line_item(p_api_version  NUMBER
193     , p_init_msg_list  VARCHAR2
194     , x_return_status out nocopy  VARCHAR2
195     , x_msg_count out nocopy  NUMBER
196     , x_msg_data out nocopy  VARCHAR2
197     , p5_a0 JTF_NUMBER_TABLE
198     , p5_a1 JTF_NUMBER_TABLE
199     , p5_a2 JTF_NUMBER_TABLE
200     , p5_a3 JTF_NUMBER_TABLE
201     , p5_a4 JTF_VARCHAR2_TABLE_100
202     , p5_a5 JTF_VARCHAR2_TABLE_200
203     , p5_a6 JTF_VARCHAR2_TABLE_100
204     , p5_a7 JTF_VARCHAR2_TABLE_2000
205     , p5_a8 JTF_VARCHAR2_TABLE_200
206     , p5_a9 JTF_NUMBER_TABLE
207     , p5_a10 JTF_NUMBER_TABLE
208   )
209 
210   as
211     ddp_line_item_tbl okl_contract_line_item_pub.line_item_tbl_type;
212     ddindx binary_integer; indx binary_integer;
213   begin
214 
215     -- copy data to the local IN or IN-OUT args, if any
216 
217 
218 
219 
220 
221     okl_contract_line_item_pvt_w.rosetta_table_copy_in_p11(ddp_line_item_tbl, p5_a0
222       , p5_a1
223       , p5_a2
224       , p5_a3
225       , p5_a4
226       , p5_a5
227       , p5_a6
228       , p5_a7
229       , p5_a8
230       , p5_a9
231       , p5_a10
232       );
233 
234     -- here's the delegated call to the old PL/SQL routine
235     okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
236       p_init_msg_list,
237       x_return_status,
238       x_msg_count,
239       x_msg_data,
240       ddp_line_item_tbl);
241 
242     -- copy data back from the local variables to OUT or IN-OUT args, if any
243 
244 
245 
246 
247 
248   end;
249 
250   procedure create_contract_line_item(p_api_version  NUMBER
251     , p_init_msg_list  VARCHAR2
252     , x_return_status out nocopy  VARCHAR2
253     , x_msg_count out nocopy  NUMBER
254     , x_msg_data out nocopy  VARCHAR2
255     , p8_a0 out nocopy  NUMBER
256     , p8_a1 out nocopy  NUMBER
257     , p8_a2 out nocopy  VARCHAR2
258     , p8_a3 out nocopy  NUMBER
259     , p8_a4 out nocopy  NUMBER
260     , p8_a5 out nocopy  NUMBER
261     , p8_a6 out nocopy  NUMBER
262     , p8_a7 out nocopy  NUMBER
263     , p8_a8 out nocopy  VARCHAR2
264     , p8_a9 out nocopy  VARCHAR2
265     , p8_a10 out nocopy  NUMBER
266     , p8_a11 out nocopy  VARCHAR2
267     , p8_a12 out nocopy  NUMBER
268     , p8_a13 out nocopy  VARCHAR2
269     , p8_a14 out nocopy  VARCHAR2
270     , p8_a15 out nocopy  VARCHAR2
271     , p8_a16 out nocopy  VARCHAR2
272     , p8_a17 out nocopy  VARCHAR2
273     , p8_a18 out nocopy  NUMBER
274     , p8_a19 out nocopy  NUMBER
275     , p8_a20 out nocopy  NUMBER
276     , p8_a21 out nocopy  NUMBER
277     , p8_a22 out nocopy  VARCHAR2
278     , p8_a23 out nocopy  VARCHAR2
279     , p8_a24 out nocopy  VARCHAR2
280     , p8_a25 out nocopy  VARCHAR2
281     , p8_a26 out nocopy  VARCHAR2
282     , p8_a27 out nocopy  VARCHAR2
283     , p8_a28 out nocopy  DATE
284     , p8_a29 out nocopy  VARCHAR2
285     , p8_a30 out nocopy  DATE
286     , p8_a31 out nocopy  DATE
287     , p8_a32 out nocopy  DATE
288     , p8_a33 out nocopy  VARCHAR2
289     , p8_a34 out nocopy  NUMBER
290     , p8_a35 out nocopy  VARCHAR2
291     , p8_a36 out nocopy  NUMBER
292     , p8_a37 out nocopy  VARCHAR2
293     , p8_a38 out nocopy  VARCHAR2
294     , p8_a39 out nocopy  VARCHAR2
295     , p8_a40 out nocopy  VARCHAR2
296     , p8_a41 out nocopy  VARCHAR2
297     , p8_a42 out nocopy  VARCHAR2
298     , p8_a43 out nocopy  VARCHAR2
299     , p8_a44 out nocopy  VARCHAR2
300     , p8_a45 out nocopy  VARCHAR2
301     , p8_a46 out nocopy  VARCHAR2
302     , p8_a47 out nocopy  VARCHAR2
303     , p8_a48 out nocopy  VARCHAR2
304     , p8_a49 out nocopy  VARCHAR2
305     , p8_a50 out nocopy  VARCHAR2
306     , p8_a51 out nocopy  VARCHAR2
307     , p8_a52 out nocopy  VARCHAR2
308     , p8_a53 out nocopy  VARCHAR2
309     , p8_a54 out nocopy  NUMBER
310     , p8_a55 out nocopy  DATE
311     , p8_a56 out nocopy  NUMBER
312     , p8_a57 out nocopy  DATE
313     , p8_a58 out nocopy  VARCHAR2
314     , p8_a59 out nocopy  VARCHAR2
315     , p8_a60 out nocopy  VARCHAR2
316     , p8_a61 out nocopy  NUMBER
317     , p8_a62 out nocopy  VARCHAR2
318     , p8_a63 out nocopy  VARCHAR2
319     , p8_a64 out nocopy  VARCHAR2
320     , p8_a65 out nocopy  VARCHAR2
321     , p8_a66 out nocopy  VARCHAR2
322     , p8_a67 out nocopy  NUMBER
323     , p8_a68 out nocopy  NUMBER
324     , p8_a69 out nocopy  NUMBER
325     , p8_a70 out nocopy  DATE
326     , p8_a71 out nocopy  NUMBER
327     , p8_a72 out nocopy  DATE
328     , p8_a73 out nocopy  NUMBER
329     , p8_a74 out nocopy  NUMBER
330     , p8_a75 out nocopy  VARCHAR2
331     , p8_a76 out nocopy  VARCHAR2
332     , p8_a77 out nocopy  NUMBER
333     , p8_a78 out nocopy  NUMBER
334     , p8_a79 out nocopy  VARCHAR2
335     , p8_a80 out nocopy  VARCHAR2
336     , p8_a81 out nocopy  NUMBER
337     , p8_a82 out nocopy  VARCHAR2
338     , p8_a83 out nocopy  NUMBER
339     , p8_a84 out nocopy  NUMBER
340     , p8_a85 out nocopy  NUMBER
341     , p8_a86 out nocopy  NUMBER
342     , p8_a87 out nocopy  VARCHAR2
343     , p8_a88 out nocopy  NUMBER
344     , p8_a89 out nocopy  NUMBER
345     , p9_a0 out nocopy  NUMBER
346     , p9_a1 out nocopy  NUMBER
347     , p9_a2 out nocopy  NUMBER
348     , p9_a3 out nocopy  NUMBER
349     , p9_a4 out nocopy  VARCHAR2
350     , p9_a5 out nocopy  VARCHAR2
351     , p9_a6 out nocopy  VARCHAR2
352     , p9_a7 out nocopy  NUMBER
353     , p9_a8 out nocopy  NUMBER
354     , p9_a9 out nocopy  DATE
355     , p9_a10 out nocopy  NUMBER
356     , p9_a11 out nocopy  NUMBER
357     , p9_a12 out nocopy  NUMBER
358     , p9_a13 out nocopy  NUMBER
359     , p9_a14 out nocopy  NUMBER
360     , p9_a15 out nocopy  NUMBER
361     , p9_a16 out nocopy  NUMBER
362     , p9_a17 out nocopy  NUMBER
363     , p9_a18 out nocopy  NUMBER
364     , p9_a19 out nocopy  NUMBER
365     , p9_a20 out nocopy  DATE
366     , p9_a21 out nocopy  DATE
367     , p9_a22 out nocopy  NUMBER
368     , p9_a23 out nocopy  NUMBER
369     , p9_a24 out nocopy  DATE
370     , p9_a25 out nocopy  DATE
371     , p9_a26 out nocopy  DATE
372     , p9_a27 out nocopy  NUMBER
373     , p9_a28 out nocopy  NUMBER
374     , p9_a29 out nocopy  NUMBER
375     , p9_a30 out nocopy  NUMBER
376     , p9_a31 out nocopy  NUMBER
377     , p9_a32 out nocopy  NUMBER
378     , p9_a33 out nocopy  NUMBER
379     , p9_a34 out nocopy  DATE
380     , p9_a35 out nocopy  VARCHAR2
381     , p9_a36 out nocopy  DATE
382     , p9_a37 out nocopy  VARCHAR2
383     , p9_a38 out nocopy  NUMBER
384     , p9_a39 out nocopy  NUMBER
385     , p9_a40 out nocopy  NUMBER
386     , p9_a41 out nocopy  VARCHAR2
387     , p9_a42 out nocopy  DATE
388     , p9_a43 out nocopy  NUMBER
389     , p9_a44 out nocopy  NUMBER
390     , p9_a45 out nocopy  DATE
391     , p9_a46 out nocopy  NUMBER
392     , p9_a47 out nocopy  DATE
393     , p9_a48 out nocopy  DATE
394     , p9_a49 out nocopy  DATE
395     , p9_a50 out nocopy  NUMBER
396     , p9_a51 out nocopy  NUMBER
397     , p9_a52 out nocopy  VARCHAR2
398     , p9_a53 out nocopy  NUMBER
399     , p9_a54 out nocopy  NUMBER
400     , p9_a55 out nocopy  VARCHAR2
401     , p9_a56 out nocopy  VARCHAR2
402     , p9_a57 out nocopy  NUMBER
403     , p9_a58 out nocopy  DATE
404     , p9_a59 out nocopy  NUMBER
405     , p9_a60 out nocopy  VARCHAR2
406     , p9_a61 out nocopy  VARCHAR2
407     , p9_a62 out nocopy  VARCHAR2
408     , p9_a63 out nocopy  VARCHAR2
409     , p9_a64 out nocopy  VARCHAR2
410     , p9_a65 out nocopy  VARCHAR2
411     , p9_a66 out nocopy  VARCHAR2
412     , p9_a67 out nocopy  VARCHAR2
413     , p9_a68 out nocopy  VARCHAR2
414     , p9_a69 out nocopy  VARCHAR2
415     , p9_a70 out nocopy  VARCHAR2
416     , p9_a71 out nocopy  VARCHAR2
417     , p9_a72 out nocopy  VARCHAR2
418     , p9_a73 out nocopy  VARCHAR2
419     , p9_a74 out nocopy  VARCHAR2
420     , p9_a75 out nocopy  VARCHAR2
421     , p9_a76 out nocopy  NUMBER
422     , p9_a77 out nocopy  NUMBER
423     , p9_a78 out nocopy  NUMBER
424     , p9_a79 out nocopy  DATE
425     , p9_a80 out nocopy  NUMBER
426     , p9_a81 out nocopy  DATE
427     , p9_a82 out nocopy  NUMBER
428     , p9_a83 out nocopy  DATE
429     , p9_a84 out nocopy  DATE
430     , p9_a85 out nocopy  DATE
431     , p9_a86 out nocopy  DATE
432     , p9_a87 out nocopy  NUMBER
433     , p9_a88 out nocopy  NUMBER
434     , p9_a89 out nocopy  NUMBER
435     , p9_a90 out nocopy  VARCHAR2
436     , p9_a91 out nocopy  NUMBER
437     , p9_a92 out nocopy  VARCHAR2
438     , p9_a93 out nocopy  NUMBER
439     , p9_a94 out nocopy  NUMBER
440     , p9_a95 out nocopy  DATE
441     , p9_a96 out nocopy  VARCHAR2
442     , p9_a97 out nocopy  VARCHAR2
443     , p9_a98 out nocopy  NUMBER
444     , p10_a0 out nocopy  NUMBER
445     , p10_a1 out nocopy  NUMBER
446     , p10_a2 out nocopy  NUMBER
447     , p10_a3 out nocopy  NUMBER
448     , p10_a4 out nocopy  NUMBER
449     , p10_a5 out nocopy  NUMBER
450     , p10_a6 out nocopy  VARCHAR2
451     , p10_a7 out nocopy  VARCHAR2
452     , p10_a8 out nocopy  VARCHAR2
453     , p10_a9 out nocopy  VARCHAR2
454     , p10_a10 out nocopy  VARCHAR2
455     , p10_a11 out nocopy  NUMBER
456     , p10_a12 out nocopy  VARCHAR2
457     , p10_a13 out nocopy  NUMBER
458     , p10_a14 out nocopy  VARCHAR2
459     , p10_a15 out nocopy  NUMBER
460     , p10_a16 out nocopy  DATE
461     , p10_a17 out nocopy  NUMBER
462     , p10_a18 out nocopy  DATE
463     , p10_a19 out nocopy  NUMBER
464     , p5_a0  NUMBER := 0-1962.0724
465     , p5_a1  NUMBER := 0-1962.0724
466     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
467     , p5_a3  NUMBER := 0-1962.0724
468     , p5_a4  NUMBER := 0-1962.0724
469     , p5_a5  NUMBER := 0-1962.0724
470     , p5_a6  NUMBER := 0-1962.0724
471     , p5_a7  NUMBER := 0-1962.0724
472     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
473     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
474     , p5_a10  NUMBER := 0-1962.0724
475     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
476     , p5_a12  NUMBER := 0-1962.0724
477     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
478     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
479     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
480     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
481     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
482     , p5_a18  NUMBER := 0-1962.0724
483     , p5_a19  NUMBER := 0-1962.0724
484     , p5_a20  NUMBER := 0-1962.0724
485     , p5_a21  NUMBER := 0-1962.0724
486     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
487     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
488     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
489     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
490     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
491     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
492     , p5_a28  DATE := fnd_api.g_miss_date
493     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
494     , p5_a30  DATE := fnd_api.g_miss_date
495     , p5_a31  DATE := fnd_api.g_miss_date
496     , p5_a32  DATE := fnd_api.g_miss_date
497     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
498     , p5_a34  NUMBER := 0-1962.0724
499     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
500     , p5_a36  NUMBER := 0-1962.0724
501     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
502     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
503     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
504     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
505     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
506     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
507     , p5_a43  VARCHAR2 := fnd_api.g_miss_char
508     , p5_a44  VARCHAR2 := fnd_api.g_miss_char
509     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
510     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
511     , p5_a47  VARCHAR2 := fnd_api.g_miss_char
512     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
513     , p5_a49  VARCHAR2 := fnd_api.g_miss_char
514     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
515     , p5_a51  VARCHAR2 := fnd_api.g_miss_char
516     , p5_a52  VARCHAR2 := fnd_api.g_miss_char
517     , p5_a53  VARCHAR2 := fnd_api.g_miss_char
518     , p5_a54  NUMBER := 0-1962.0724
519     , p5_a55  DATE := fnd_api.g_miss_date
520     , p5_a56  NUMBER := 0-1962.0724
521     , p5_a57  DATE := fnd_api.g_miss_date
522     , p5_a58  VARCHAR2 := fnd_api.g_miss_char
523     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
524     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
525     , p5_a61  NUMBER := 0-1962.0724
526     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
527     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
528     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
529     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
530     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
531     , p5_a67  NUMBER := 0-1962.0724
532     , p5_a68  NUMBER := 0-1962.0724
533     , p5_a69  NUMBER := 0-1962.0724
534     , p5_a70  DATE := fnd_api.g_miss_date
535     , p5_a71  NUMBER := 0-1962.0724
536     , p5_a72  DATE := fnd_api.g_miss_date
537     , p5_a73  NUMBER := 0-1962.0724
538     , p5_a74  NUMBER := 0-1962.0724
539     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
540     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
541     , p5_a77  NUMBER := 0-1962.0724
542     , p5_a78  NUMBER := 0-1962.0724
543     , p5_a79  VARCHAR2 := fnd_api.g_miss_char
544     , p5_a80  VARCHAR2 := fnd_api.g_miss_char
545     , p5_a81  NUMBER := 0-1962.0724
546     , p5_a82  VARCHAR2 := fnd_api.g_miss_char
547     , p5_a83  NUMBER := 0-1962.0724
548     , p5_a84  NUMBER := 0-1962.0724
549     , p5_a85  NUMBER := 0-1962.0724
550     , p5_a86  NUMBER := 0-1962.0724
551     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
552     , p5_a88  NUMBER := 0-1962.0724
553     , p5_a89  NUMBER := 0-1962.0724
554     , p6_a0  NUMBER := 0-1962.0724
555     , p6_a1  NUMBER := 0-1962.0724
556     , p6_a2  NUMBER := 0-1962.0724
557     , p6_a3  NUMBER := 0-1962.0724
558     , p6_a4  VARCHAR2 := fnd_api.g_miss_char
559     , p6_a5  VARCHAR2 := fnd_api.g_miss_char
560     , p6_a6  VARCHAR2 := fnd_api.g_miss_char
561     , p6_a7  NUMBER := 0-1962.0724
562     , p6_a8  NUMBER := 0-1962.0724
563     , p6_a9  DATE := fnd_api.g_miss_date
564     , p6_a10  NUMBER := 0-1962.0724
565     , p6_a11  NUMBER := 0-1962.0724
566     , p6_a12  NUMBER := 0-1962.0724
567     , p6_a13  NUMBER := 0-1962.0724
568     , p6_a14  NUMBER := 0-1962.0724
569     , p6_a15  NUMBER := 0-1962.0724
570     , p6_a16  NUMBER := 0-1962.0724
571     , p6_a17  NUMBER := 0-1962.0724
572     , p6_a18  NUMBER := 0-1962.0724
573     , p6_a19  NUMBER := 0-1962.0724
574     , p6_a20  DATE := fnd_api.g_miss_date
575     , p6_a21  DATE := fnd_api.g_miss_date
576     , p6_a22  NUMBER := 0-1962.0724
577     , p6_a23  NUMBER := 0-1962.0724
578     , p6_a24  DATE := fnd_api.g_miss_date
579     , p6_a25  DATE := fnd_api.g_miss_date
580     , p6_a26  DATE := fnd_api.g_miss_date
581     , p6_a27  NUMBER := 0-1962.0724
582     , p6_a28  NUMBER := 0-1962.0724
583     , p6_a29  NUMBER := 0-1962.0724
584     , p6_a30  NUMBER := 0-1962.0724
585     , p6_a31  NUMBER := 0-1962.0724
586     , p6_a32  NUMBER := 0-1962.0724
587     , p6_a33  NUMBER := 0-1962.0724
588     , p6_a34  DATE := fnd_api.g_miss_date
589     , p6_a35  VARCHAR2 := fnd_api.g_miss_char
590     , p6_a36  DATE := fnd_api.g_miss_date
591     , p6_a37  VARCHAR2 := fnd_api.g_miss_char
592     , p6_a38  NUMBER := 0-1962.0724
593     , p6_a39  NUMBER := 0-1962.0724
594     , p6_a40  NUMBER := 0-1962.0724
595     , p6_a41  VARCHAR2 := fnd_api.g_miss_char
596     , p6_a42  DATE := fnd_api.g_miss_date
597     , p6_a43  NUMBER := 0-1962.0724
598     , p6_a44  NUMBER := 0-1962.0724
599     , p6_a45  DATE := fnd_api.g_miss_date
600     , p6_a46  NUMBER := 0-1962.0724
601     , p6_a47  DATE := fnd_api.g_miss_date
602     , p6_a48  DATE := fnd_api.g_miss_date
603     , p6_a49  DATE := fnd_api.g_miss_date
604     , p6_a50  NUMBER := 0-1962.0724
605     , p6_a51  NUMBER := 0-1962.0724
606     , p6_a52  VARCHAR2 := fnd_api.g_miss_char
607     , p6_a53  NUMBER := 0-1962.0724
608     , p6_a54  NUMBER := 0-1962.0724
609     , p6_a55  VARCHAR2 := fnd_api.g_miss_char
610     , p6_a56  VARCHAR2 := fnd_api.g_miss_char
611     , p6_a57  NUMBER := 0-1962.0724
612     , p6_a58  DATE := fnd_api.g_miss_date
613     , p6_a59  NUMBER := 0-1962.0724
614     , p6_a60  VARCHAR2 := fnd_api.g_miss_char
615     , p6_a61  VARCHAR2 := fnd_api.g_miss_char
616     , p6_a62  VARCHAR2 := fnd_api.g_miss_char
617     , p6_a63  VARCHAR2 := fnd_api.g_miss_char
618     , p6_a64  VARCHAR2 := fnd_api.g_miss_char
619     , p6_a65  VARCHAR2 := fnd_api.g_miss_char
620     , p6_a66  VARCHAR2 := fnd_api.g_miss_char
621     , p6_a67  VARCHAR2 := fnd_api.g_miss_char
622     , p6_a68  VARCHAR2 := fnd_api.g_miss_char
623     , p6_a69  VARCHAR2 := fnd_api.g_miss_char
624     , p6_a70  VARCHAR2 := fnd_api.g_miss_char
625     , p6_a71  VARCHAR2 := fnd_api.g_miss_char
626     , p6_a72  VARCHAR2 := fnd_api.g_miss_char
627     , p6_a73  VARCHAR2 := fnd_api.g_miss_char
628     , p6_a74  VARCHAR2 := fnd_api.g_miss_char
629     , p6_a75  VARCHAR2 := fnd_api.g_miss_char
630     , p6_a76  NUMBER := 0-1962.0724
631     , p6_a77  NUMBER := 0-1962.0724
632     , p6_a78  NUMBER := 0-1962.0724
633     , p6_a79  DATE := fnd_api.g_miss_date
634     , p6_a80  NUMBER := 0-1962.0724
635     , p6_a81  DATE := fnd_api.g_miss_date
636     , p6_a82  NUMBER := 0-1962.0724
637     , p6_a83  DATE := fnd_api.g_miss_date
638     , p6_a84  DATE := fnd_api.g_miss_date
639     , p6_a85  DATE := fnd_api.g_miss_date
640     , p6_a86  DATE := fnd_api.g_miss_date
641     , p6_a87  NUMBER := 0-1962.0724
642     , p6_a88  NUMBER := 0-1962.0724
643     , p6_a89  NUMBER := 0-1962.0724
644     , p6_a90  VARCHAR2 := fnd_api.g_miss_char
645     , p6_a91  NUMBER := 0-1962.0724
646     , p6_a92  VARCHAR2 := fnd_api.g_miss_char
647     , p6_a93  NUMBER := 0-1962.0724
648     , p6_a94  NUMBER := 0-1962.0724
649     , p6_a95  DATE := fnd_api.g_miss_date
650     , p6_a96  VARCHAR2 := fnd_api.g_miss_char
651     , p6_a97  VARCHAR2 := fnd_api.g_miss_char
652     , p6_a98  NUMBER := 0-1962.0724
653     , p7_a0  NUMBER := 0-1962.0724
654     , p7_a1  NUMBER := 0-1962.0724
655     , p7_a2  NUMBER := 0-1962.0724
656     , p7_a3  NUMBER := 0-1962.0724
657     , p7_a4  NUMBER := 0-1962.0724
658     , p7_a5  NUMBER := 0-1962.0724
659     , p7_a6  VARCHAR2 := fnd_api.g_miss_char
660     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
661     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
662     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
663     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
664     , p7_a11  NUMBER := 0-1962.0724
665     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
666     , p7_a13  NUMBER := 0-1962.0724
667     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
668     , p7_a15  NUMBER := 0-1962.0724
669     , p7_a16  DATE := fnd_api.g_miss_date
670     , p7_a17  NUMBER := 0-1962.0724
671     , p7_a18  DATE := fnd_api.g_miss_date
672     , p7_a19  NUMBER := 0-1962.0724
673   )
674 
675   as
676     ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
677     ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
678     ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
679     ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
680     ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
681     ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
682     ddindx binary_integer; indx binary_integer;
683   begin
684 
685     -- copy data to the local IN or IN-OUT args, if any
686 
687 
688 
689 
690 
691     ddp_clev_rec.id := rosetta_g_miss_num_map(p5_a0);
692     ddp_clev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
693     ddp_clev_rec.sfwt_flag := p5_a2;
694     ddp_clev_rec.chr_id := rosetta_g_miss_num_map(p5_a3);
695     ddp_clev_rec.cle_id := rosetta_g_miss_num_map(p5_a4);
696     ddp_clev_rec.cle_id_renewed := rosetta_g_miss_num_map(p5_a5);
697     ddp_clev_rec.cle_id_renewed_to := rosetta_g_miss_num_map(p5_a6);
698     ddp_clev_rec.lse_id := rosetta_g_miss_num_map(p5_a7);
699     ddp_clev_rec.line_number := p5_a8;
700     ddp_clev_rec.sts_code := p5_a9;
701     ddp_clev_rec.display_sequence := rosetta_g_miss_num_map(p5_a10);
702     ddp_clev_rec.trn_code := p5_a11;
703     ddp_clev_rec.dnz_chr_id := rosetta_g_miss_num_map(p5_a12);
704     ddp_clev_rec.comments := p5_a13;
705     ddp_clev_rec.item_description := p5_a14;
706     ddp_clev_rec.oke_boe_description := p5_a15;
707     ddp_clev_rec.cognomen := p5_a16;
708     ddp_clev_rec.hidden_ind := p5_a17;
709     ddp_clev_rec.price_unit := rosetta_g_miss_num_map(p5_a18);
710     ddp_clev_rec.price_unit_percent := rosetta_g_miss_num_map(p5_a19);
711     ddp_clev_rec.price_negotiated := rosetta_g_miss_num_map(p5_a20);
712     ddp_clev_rec.price_negotiated_renewed := rosetta_g_miss_num_map(p5_a21);
713     ddp_clev_rec.price_level_ind := p5_a22;
714     ddp_clev_rec.invoice_line_level_ind := p5_a23;
715     ddp_clev_rec.dpas_rating := p5_a24;
716     ddp_clev_rec.block23text := p5_a25;
717     ddp_clev_rec.exception_yn := p5_a26;
718     ddp_clev_rec.template_used := p5_a27;
719     ddp_clev_rec.date_terminated := rosetta_g_miss_date_in_map(p5_a28);
720     ddp_clev_rec.name := p5_a29;
721     ddp_clev_rec.start_date := rosetta_g_miss_date_in_map(p5_a30);
722     ddp_clev_rec.end_date := rosetta_g_miss_date_in_map(p5_a31);
723     ddp_clev_rec.date_renewed := rosetta_g_miss_date_in_map(p5_a32);
724     ddp_clev_rec.upg_orig_system_ref := p5_a33;
725     ddp_clev_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p5_a34);
726     ddp_clev_rec.orig_system_source_code := p5_a35;
727     ddp_clev_rec.orig_system_id1 := rosetta_g_miss_num_map(p5_a36);
728     ddp_clev_rec.orig_system_reference1 := p5_a37;
729     ddp_clev_rec.attribute_category := p5_a38;
730     ddp_clev_rec.attribute1 := p5_a39;
731     ddp_clev_rec.attribute2 := p5_a40;
732     ddp_clev_rec.attribute3 := p5_a41;
733     ddp_clev_rec.attribute4 := p5_a42;
734     ddp_clev_rec.attribute5 := p5_a43;
735     ddp_clev_rec.attribute6 := p5_a44;
736     ddp_clev_rec.attribute7 := p5_a45;
737     ddp_clev_rec.attribute8 := p5_a46;
738     ddp_clev_rec.attribute9 := p5_a47;
739     ddp_clev_rec.attribute10 := p5_a48;
740     ddp_clev_rec.attribute11 := p5_a49;
741     ddp_clev_rec.attribute12 := p5_a50;
742     ddp_clev_rec.attribute13 := p5_a51;
743     ddp_clev_rec.attribute14 := p5_a52;
744     ddp_clev_rec.attribute15 := p5_a53;
745     ddp_clev_rec.created_by := rosetta_g_miss_num_map(p5_a54);
746     ddp_clev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a55);
747     ddp_clev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a56);
748     ddp_clev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a57);
749     ddp_clev_rec.price_type := p5_a58;
750     ddp_clev_rec.currency_code := p5_a59;
751     ddp_clev_rec.currency_code_renewed := p5_a60;
752     ddp_clev_rec.last_update_login := rosetta_g_miss_num_map(p5_a61);
753     ddp_clev_rec.old_sts_code := p5_a62;
754     ddp_clev_rec.new_sts_code := p5_a63;
755     ddp_clev_rec.old_ste_code := p5_a64;
756     ddp_clev_rec.new_ste_code := p5_a65;
757     ddp_clev_rec.call_action_asmblr := p5_a66;
758     ddp_clev_rec.request_id := rosetta_g_miss_num_map(p5_a67);
759     ddp_clev_rec.program_application_id := rosetta_g_miss_num_map(p5_a68);
760     ddp_clev_rec.program_id := rosetta_g_miss_num_map(p5_a69);
761     ddp_clev_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a70);
762     ddp_clev_rec.price_list_id := rosetta_g_miss_num_map(p5_a71);
763     ddp_clev_rec.pricing_date := rosetta_g_miss_date_in_map(p5_a72);
764     ddp_clev_rec.price_list_line_id := rosetta_g_miss_num_map(p5_a73);
765     ddp_clev_rec.line_list_price := rosetta_g_miss_num_map(p5_a74);
766     ddp_clev_rec.item_to_price_yn := p5_a75;
767     ddp_clev_rec.price_basis_yn := p5_a76;
768     ddp_clev_rec.config_header_id := rosetta_g_miss_num_map(p5_a77);
769     ddp_clev_rec.config_revision_number := rosetta_g_miss_num_map(p5_a78);
770     ddp_clev_rec.config_complete_yn := p5_a79;
771     ddp_clev_rec.config_valid_yn := p5_a80;
772     ddp_clev_rec.config_top_model_line_id := rosetta_g_miss_num_map(p5_a81);
773     ddp_clev_rec.config_item_type := p5_a82;
774     ddp_clev_rec.config_item_id := rosetta_g_miss_num_map(p5_a83);
775     ddp_clev_rec.cust_acct_id := rosetta_g_miss_num_map(p5_a84);
776     ddp_clev_rec.bill_to_site_use_id := rosetta_g_miss_num_map(p5_a85);
777     ddp_clev_rec.inv_rule_id := rosetta_g_miss_num_map(p5_a86);
778     ddp_clev_rec.line_renewal_type_code := p5_a87;
779     ddp_clev_rec.ship_to_site_use_id := rosetta_g_miss_num_map(p5_a88);
780     ddp_clev_rec.payment_term_id := rosetta_g_miss_num_map(p5_a89);
781 
782     ddp_klev_rec.id := rosetta_g_miss_num_map(p6_a0);
783     ddp_klev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
784     ddp_klev_rec.kle_id := rosetta_g_miss_num_map(p6_a2);
785     ddp_klev_rec.sty_id := rosetta_g_miss_num_map(p6_a3);
786     ddp_klev_rec.prc_code := p6_a4;
787     ddp_klev_rec.fcg_code := p6_a5;
788     ddp_klev_rec.nty_code := p6_a6;
789     ddp_klev_rec.estimated_oec := rosetta_g_miss_num_map(p6_a7);
790     ddp_klev_rec.lao_amount := rosetta_g_miss_num_map(p6_a8);
791     ddp_klev_rec.title_date := rosetta_g_miss_date_in_map(p6_a9);
792     ddp_klev_rec.fee_charge := rosetta_g_miss_num_map(p6_a10);
793     ddp_klev_rec.lrs_percent := rosetta_g_miss_num_map(p6_a11);
794     ddp_klev_rec.initial_direct_cost := rosetta_g_miss_num_map(p6_a12);
795     ddp_klev_rec.percent_stake := rosetta_g_miss_num_map(p6_a13);
796     ddp_klev_rec.percent := rosetta_g_miss_num_map(p6_a14);
797     ddp_klev_rec.evergreen_percent := rosetta_g_miss_num_map(p6_a15);
798     ddp_klev_rec.amount_stake := rosetta_g_miss_num_map(p6_a16);
799     ddp_klev_rec.occupancy := rosetta_g_miss_num_map(p6_a17);
800     ddp_klev_rec.coverage := rosetta_g_miss_num_map(p6_a18);
801     ddp_klev_rec.residual_percentage := rosetta_g_miss_num_map(p6_a19);
802     ddp_klev_rec.date_last_inspection := rosetta_g_miss_date_in_map(p6_a20);
803     ddp_klev_rec.date_sold := rosetta_g_miss_date_in_map(p6_a21);
804     ddp_klev_rec.lrv_amount := rosetta_g_miss_num_map(p6_a22);
805     ddp_klev_rec.capital_reduction := rosetta_g_miss_num_map(p6_a23);
806     ddp_klev_rec.date_next_inspection_due := rosetta_g_miss_date_in_map(p6_a24);
807     ddp_klev_rec.date_residual_last_review := rosetta_g_miss_date_in_map(p6_a25);
808     ddp_klev_rec.date_last_reamortisation := rosetta_g_miss_date_in_map(p6_a26);
809     ddp_klev_rec.vendor_advance_paid := rosetta_g_miss_num_map(p6_a27);
810     ddp_klev_rec.weighted_average_life := rosetta_g_miss_num_map(p6_a28);
811     ddp_klev_rec.tradein_amount := rosetta_g_miss_num_map(p6_a29);
812     ddp_klev_rec.bond_equivalent_yield := rosetta_g_miss_num_map(p6_a30);
813     ddp_klev_rec.termination_purchase_amount := rosetta_g_miss_num_map(p6_a31);
814     ddp_klev_rec.refinance_amount := rosetta_g_miss_num_map(p6_a32);
815     ddp_klev_rec.year_built := rosetta_g_miss_num_map(p6_a33);
816     ddp_klev_rec.delivered_date := rosetta_g_miss_date_in_map(p6_a34);
817     ddp_klev_rec.credit_tenant_yn := p6_a35;
818     ddp_klev_rec.date_last_cleanup := rosetta_g_miss_date_in_map(p6_a36);
819     ddp_klev_rec.year_of_manufacture := p6_a37;
820     ddp_klev_rec.coverage_ratio := rosetta_g_miss_num_map(p6_a38);
821     ddp_klev_rec.remarketed_amount := rosetta_g_miss_num_map(p6_a39);
822     ddp_klev_rec.gross_square_footage := rosetta_g_miss_num_map(p6_a40);
823     ddp_klev_rec.prescribed_asset_yn := p6_a41;
824     ddp_klev_rec.date_remarketed := rosetta_g_miss_date_in_map(p6_a42);
825     ddp_klev_rec.net_rentable := rosetta_g_miss_num_map(p6_a43);
826     ddp_klev_rec.remarket_margin := rosetta_g_miss_num_map(p6_a44);
827     ddp_klev_rec.date_letter_acceptance := rosetta_g_miss_date_in_map(p6_a45);
828     ddp_klev_rec.repurchased_amount := rosetta_g_miss_num_map(p6_a46);
829     ddp_klev_rec.date_commitment_expiration := rosetta_g_miss_date_in_map(p6_a47);
830     ddp_klev_rec.date_repurchased := rosetta_g_miss_date_in_map(p6_a48);
831     ddp_klev_rec.date_appraisal := rosetta_g_miss_date_in_map(p6_a49);
832     ddp_klev_rec.residual_value := rosetta_g_miss_num_map(p6_a50);
833     ddp_klev_rec.appraisal_value := rosetta_g_miss_num_map(p6_a51);
834     ddp_klev_rec.secured_deal_yn := p6_a52;
835     ddp_klev_rec.gain_loss := rosetta_g_miss_num_map(p6_a53);
836     ddp_klev_rec.floor_amount := rosetta_g_miss_num_map(p6_a54);
837     ddp_klev_rec.re_lease_yn := p6_a55;
838     ddp_klev_rec.previous_contract := p6_a56;
839     ddp_klev_rec.tracked_residual := rosetta_g_miss_num_map(p6_a57);
840     ddp_klev_rec.date_title_received := rosetta_g_miss_date_in_map(p6_a58);
841     ddp_klev_rec.amount := rosetta_g_miss_num_map(p6_a59);
842     ddp_klev_rec.attribute_category := p6_a60;
843     ddp_klev_rec.attribute1 := p6_a61;
844     ddp_klev_rec.attribute2 := p6_a62;
845     ddp_klev_rec.attribute3 := p6_a63;
846     ddp_klev_rec.attribute4 := p6_a64;
847     ddp_klev_rec.attribute5 := p6_a65;
848     ddp_klev_rec.attribute6 := p6_a66;
849     ddp_klev_rec.attribute7 := p6_a67;
850     ddp_klev_rec.attribute8 := p6_a68;
851     ddp_klev_rec.attribute9 := p6_a69;
852     ddp_klev_rec.attribute10 := p6_a70;
853     ddp_klev_rec.attribute11 := p6_a71;
854     ddp_klev_rec.attribute12 := p6_a72;
855     ddp_klev_rec.attribute13 := p6_a73;
856     ddp_klev_rec.attribute14 := p6_a74;
857     ddp_klev_rec.attribute15 := p6_a75;
858     ddp_klev_rec.sty_id_for := rosetta_g_miss_num_map(p6_a76);
859     ddp_klev_rec.clg_id := rosetta_g_miss_num_map(p6_a77);
860     ddp_klev_rec.created_by := rosetta_g_miss_num_map(p6_a78);
861     ddp_klev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a79);
862     ddp_klev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a80);
863     ddp_klev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a81);
864     ddp_klev_rec.last_update_login := rosetta_g_miss_num_map(p6_a82);
865     ddp_klev_rec.date_funding := rosetta_g_miss_date_in_map(p6_a83);
866     ddp_klev_rec.date_funding_required := rosetta_g_miss_date_in_map(p6_a84);
867     ddp_klev_rec.date_accepted := rosetta_g_miss_date_in_map(p6_a85);
868     ddp_klev_rec.date_delivery_expected := rosetta_g_miss_date_in_map(p6_a86);
869     ddp_klev_rec.oec := rosetta_g_miss_num_map(p6_a87);
870     ddp_klev_rec.capital_amount := rosetta_g_miss_num_map(p6_a88);
871     ddp_klev_rec.residual_grnty_amount := rosetta_g_miss_num_map(p6_a89);
872     ddp_klev_rec.residual_code := p6_a90;
873     ddp_klev_rec.rvi_premium := rosetta_g_miss_num_map(p6_a91);
874     ddp_klev_rec.credit_nature := p6_a92;
875     ddp_klev_rec.capitalized_interest := rosetta_g_miss_num_map(p6_a93);
876     ddp_klev_rec.capital_reduction_percent := rosetta_g_miss_num_map(p6_a94);
877     ddp_klev_rec.date_pay_investor_start := rosetta_g_miss_date_in_map(p6_a95);
878     ddp_klev_rec.pay_investor_frequency := p6_a96;
879     ddp_klev_rec.pay_investor_event := p6_a97;
880     ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
881 
882     ddp_cimv_rec.id := rosetta_g_miss_num_map(p7_a0);
883     ddp_cimv_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
884     ddp_cimv_rec.cle_id := rosetta_g_miss_num_map(p7_a2);
885     ddp_cimv_rec.chr_id := rosetta_g_miss_num_map(p7_a3);
886     ddp_cimv_rec.cle_id_for := rosetta_g_miss_num_map(p7_a4);
887     ddp_cimv_rec.dnz_chr_id := rosetta_g_miss_num_map(p7_a5);
888     ddp_cimv_rec.object1_id1 := p7_a6;
889     ddp_cimv_rec.object1_id2 := p7_a7;
890     ddp_cimv_rec.jtot_object1_code := p7_a8;
891     ddp_cimv_rec.uom_code := p7_a9;
892     ddp_cimv_rec.exception_yn := p7_a10;
893     ddp_cimv_rec.number_of_items := rosetta_g_miss_num_map(p7_a11);
894     ddp_cimv_rec.upg_orig_system_ref := p7_a12;
895     ddp_cimv_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p7_a13);
896     ddp_cimv_rec.priced_item_yn := p7_a14;
897     ddp_cimv_rec.created_by := rosetta_g_miss_num_map(p7_a15);
898     ddp_cimv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a16);
899     ddp_cimv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
900     ddp_cimv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
901     ddp_cimv_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
902 
903 
904 
905 
906     -- here's the delegated call to the old PL/SQL routine
907     okl_contract_line_item_pub.create_contract_line_item(p_api_version,
908       p_init_msg_list,
909       x_return_status,
910       x_msg_count,
911       x_msg_data,
912       ddp_clev_rec,
913       ddp_klev_rec,
914       ddp_cimv_rec,
915       ddx_clev_rec,
916       ddx_klev_rec,
917       ddx_cimv_rec);
918 
919     -- copy data back from the local variables to OUT or IN-OUT args, if any
920 
921 
922 
923 
924 
925 
926 
927 
928     p8_a0 := rosetta_g_miss_num_map(ddx_clev_rec.id);
929     p8_a1 := rosetta_g_miss_num_map(ddx_clev_rec.object_version_number);
930     p8_a2 := ddx_clev_rec.sfwt_flag;
931     p8_a3 := rosetta_g_miss_num_map(ddx_clev_rec.chr_id);
932     p8_a4 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id);
933     p8_a5 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id_renewed);
934     p8_a6 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id_renewed_to);
935     p8_a7 := rosetta_g_miss_num_map(ddx_clev_rec.lse_id);
936     p8_a8 := ddx_clev_rec.line_number;
937     p8_a9 := ddx_clev_rec.sts_code;
938     p8_a10 := rosetta_g_miss_num_map(ddx_clev_rec.display_sequence);
939     p8_a11 := ddx_clev_rec.trn_code;
940     p8_a12 := rosetta_g_miss_num_map(ddx_clev_rec.dnz_chr_id);
941     p8_a13 := ddx_clev_rec.comments;
942     p8_a14 := ddx_clev_rec.item_description;
943     p8_a15 := ddx_clev_rec.oke_boe_description;
944     p8_a16 := ddx_clev_rec.cognomen;
945     p8_a17 := ddx_clev_rec.hidden_ind;
946     p8_a18 := rosetta_g_miss_num_map(ddx_clev_rec.price_unit);
947     p8_a19 := rosetta_g_miss_num_map(ddx_clev_rec.price_unit_percent);
948     p8_a20 := rosetta_g_miss_num_map(ddx_clev_rec.price_negotiated);
949     p8_a21 := rosetta_g_miss_num_map(ddx_clev_rec.price_negotiated_renewed);
950     p8_a22 := ddx_clev_rec.price_level_ind;
951     p8_a23 := ddx_clev_rec.invoice_line_level_ind;
952     p8_a24 := ddx_clev_rec.dpas_rating;
953     p8_a25 := ddx_clev_rec.block23text;
954     p8_a26 := ddx_clev_rec.exception_yn;
955     p8_a27 := ddx_clev_rec.template_used;
956     p8_a28 := ddx_clev_rec.date_terminated;
957     p8_a29 := ddx_clev_rec.name;
958     p8_a30 := ddx_clev_rec.start_date;
959     p8_a31 := ddx_clev_rec.end_date;
960     p8_a32 := ddx_clev_rec.date_renewed;
961     p8_a33 := ddx_clev_rec.upg_orig_system_ref;
962     p8_a34 := rosetta_g_miss_num_map(ddx_clev_rec.upg_orig_system_ref_id);
963     p8_a35 := ddx_clev_rec.orig_system_source_code;
964     p8_a36 := rosetta_g_miss_num_map(ddx_clev_rec.orig_system_id1);
965     p8_a37 := ddx_clev_rec.orig_system_reference1;
966     p8_a38 := ddx_clev_rec.attribute_category;
967     p8_a39 := ddx_clev_rec.attribute1;
968     p8_a40 := ddx_clev_rec.attribute2;
969     p8_a41 := ddx_clev_rec.attribute3;
970     p8_a42 := ddx_clev_rec.attribute4;
971     p8_a43 := ddx_clev_rec.attribute5;
972     p8_a44 := ddx_clev_rec.attribute6;
973     p8_a45 := ddx_clev_rec.attribute7;
974     p8_a46 := ddx_clev_rec.attribute8;
975     p8_a47 := ddx_clev_rec.attribute9;
976     p8_a48 := ddx_clev_rec.attribute10;
977     p8_a49 := ddx_clev_rec.attribute11;
978     p8_a50 := ddx_clev_rec.attribute12;
979     p8_a51 := ddx_clev_rec.attribute13;
980     p8_a52 := ddx_clev_rec.attribute14;
981     p8_a53 := ddx_clev_rec.attribute15;
982     p8_a54 := rosetta_g_miss_num_map(ddx_clev_rec.created_by);
983     p8_a55 := ddx_clev_rec.creation_date;
984     p8_a56 := rosetta_g_miss_num_map(ddx_clev_rec.last_updated_by);
985     p8_a57 := ddx_clev_rec.last_update_date;
986     p8_a58 := ddx_clev_rec.price_type;
987     p8_a59 := ddx_clev_rec.currency_code;
988     p8_a60 := ddx_clev_rec.currency_code_renewed;
989     p8_a61 := rosetta_g_miss_num_map(ddx_clev_rec.last_update_login);
990     p8_a62 := ddx_clev_rec.old_sts_code;
991     p8_a63 := ddx_clev_rec.new_sts_code;
992     p8_a64 := ddx_clev_rec.old_ste_code;
993     p8_a65 := ddx_clev_rec.new_ste_code;
994     p8_a66 := ddx_clev_rec.call_action_asmblr;
995     p8_a67 := rosetta_g_miss_num_map(ddx_clev_rec.request_id);
996     p8_a68 := rosetta_g_miss_num_map(ddx_clev_rec.program_application_id);
997     p8_a69 := rosetta_g_miss_num_map(ddx_clev_rec.program_id);
998     p8_a70 := ddx_clev_rec.program_update_date;
999     p8_a71 := rosetta_g_miss_num_map(ddx_clev_rec.price_list_id);
1000     p8_a72 := ddx_clev_rec.pricing_date;
1001     p8_a73 := rosetta_g_miss_num_map(ddx_clev_rec.price_list_line_id);
1002     p8_a74 := rosetta_g_miss_num_map(ddx_clev_rec.line_list_price);
1003     p8_a75 := ddx_clev_rec.item_to_price_yn;
1004     p8_a76 := ddx_clev_rec.price_basis_yn;
1005     p8_a77 := rosetta_g_miss_num_map(ddx_clev_rec.config_header_id);
1006     p8_a78 := rosetta_g_miss_num_map(ddx_clev_rec.config_revision_number);
1007     p8_a79 := ddx_clev_rec.config_complete_yn;
1008     p8_a80 := ddx_clev_rec.config_valid_yn;
1009     p8_a81 := rosetta_g_miss_num_map(ddx_clev_rec.config_top_model_line_id);
1010     p8_a82 := ddx_clev_rec.config_item_type;
1011     p8_a83 := rosetta_g_miss_num_map(ddx_clev_rec.config_item_id);
1012     p8_a84 := rosetta_g_miss_num_map(ddx_clev_rec.cust_acct_id);
1013     p8_a85 := rosetta_g_miss_num_map(ddx_clev_rec.bill_to_site_use_id);
1014     p8_a86 := rosetta_g_miss_num_map(ddx_clev_rec.inv_rule_id);
1015     p8_a87 := ddx_clev_rec.line_renewal_type_code;
1016     p8_a88 := rosetta_g_miss_num_map(ddx_clev_rec.ship_to_site_use_id);
1017     p8_a89 := rosetta_g_miss_num_map(ddx_clev_rec.payment_term_id);
1018 
1019     p9_a0 := rosetta_g_miss_num_map(ddx_klev_rec.id);
1020     p9_a1 := rosetta_g_miss_num_map(ddx_klev_rec.object_version_number);
1021     p9_a2 := rosetta_g_miss_num_map(ddx_klev_rec.kle_id);
1022     p9_a3 := rosetta_g_miss_num_map(ddx_klev_rec.sty_id);
1023     p9_a4 := ddx_klev_rec.prc_code;
1024     p9_a5 := ddx_klev_rec.fcg_code;
1025     p9_a6 := ddx_klev_rec.nty_code;
1026     p9_a7 := rosetta_g_miss_num_map(ddx_klev_rec.estimated_oec);
1027     p9_a8 := rosetta_g_miss_num_map(ddx_klev_rec.lao_amount);
1028     p9_a9 := ddx_klev_rec.title_date;
1029     p9_a10 := rosetta_g_miss_num_map(ddx_klev_rec.fee_charge);
1030     p9_a11 := rosetta_g_miss_num_map(ddx_klev_rec.lrs_percent);
1031     p9_a12 := rosetta_g_miss_num_map(ddx_klev_rec.initial_direct_cost);
1032     p9_a13 := rosetta_g_miss_num_map(ddx_klev_rec.percent_stake);
1033     p9_a14 := rosetta_g_miss_num_map(ddx_klev_rec.percent);
1034     p9_a15 := rosetta_g_miss_num_map(ddx_klev_rec.evergreen_percent);
1035     p9_a16 := rosetta_g_miss_num_map(ddx_klev_rec.amount_stake);
1036     p9_a17 := rosetta_g_miss_num_map(ddx_klev_rec.occupancy);
1037     p9_a18 := rosetta_g_miss_num_map(ddx_klev_rec.coverage);
1038     p9_a19 := rosetta_g_miss_num_map(ddx_klev_rec.residual_percentage);
1039     p9_a20 := ddx_klev_rec.date_last_inspection;
1040     p9_a21 := ddx_klev_rec.date_sold;
1041     p9_a22 := rosetta_g_miss_num_map(ddx_klev_rec.lrv_amount);
1042     p9_a23 := rosetta_g_miss_num_map(ddx_klev_rec.capital_reduction);
1043     p9_a24 := ddx_klev_rec.date_next_inspection_due;
1044     p9_a25 := ddx_klev_rec.date_residual_last_review;
1045     p9_a26 := ddx_klev_rec.date_last_reamortisation;
1046     p9_a27 := rosetta_g_miss_num_map(ddx_klev_rec.vendor_advance_paid);
1047     p9_a28 := rosetta_g_miss_num_map(ddx_klev_rec.weighted_average_life);
1048     p9_a29 := rosetta_g_miss_num_map(ddx_klev_rec.tradein_amount);
1049     p9_a30 := rosetta_g_miss_num_map(ddx_klev_rec.bond_equivalent_yield);
1050     p9_a31 := rosetta_g_miss_num_map(ddx_klev_rec.termination_purchase_amount);
1051     p9_a32 := rosetta_g_miss_num_map(ddx_klev_rec.refinance_amount);
1052     p9_a33 := rosetta_g_miss_num_map(ddx_klev_rec.year_built);
1053     p9_a34 := ddx_klev_rec.delivered_date;
1054     p9_a35 := ddx_klev_rec.credit_tenant_yn;
1055     p9_a36 := ddx_klev_rec.date_last_cleanup;
1056     p9_a37 := ddx_klev_rec.year_of_manufacture;
1057     p9_a38 := rosetta_g_miss_num_map(ddx_klev_rec.coverage_ratio);
1058     p9_a39 := rosetta_g_miss_num_map(ddx_klev_rec.remarketed_amount);
1059     p9_a40 := rosetta_g_miss_num_map(ddx_klev_rec.gross_square_footage);
1060     p9_a41 := ddx_klev_rec.prescribed_asset_yn;
1061     p9_a42 := ddx_klev_rec.date_remarketed;
1062     p9_a43 := rosetta_g_miss_num_map(ddx_klev_rec.net_rentable);
1063     p9_a44 := rosetta_g_miss_num_map(ddx_klev_rec.remarket_margin);
1064     p9_a45 := ddx_klev_rec.date_letter_acceptance;
1065     p9_a46 := rosetta_g_miss_num_map(ddx_klev_rec.repurchased_amount);
1066     p9_a47 := ddx_klev_rec.date_commitment_expiration;
1067     p9_a48 := ddx_klev_rec.date_repurchased;
1068     p9_a49 := ddx_klev_rec.date_appraisal;
1069     p9_a50 := rosetta_g_miss_num_map(ddx_klev_rec.residual_value);
1070     p9_a51 := rosetta_g_miss_num_map(ddx_klev_rec.appraisal_value);
1071     p9_a52 := ddx_klev_rec.secured_deal_yn;
1072     p9_a53 := rosetta_g_miss_num_map(ddx_klev_rec.gain_loss);
1073     p9_a54 := rosetta_g_miss_num_map(ddx_klev_rec.floor_amount);
1074     p9_a55 := ddx_klev_rec.re_lease_yn;
1075     p9_a56 := ddx_klev_rec.previous_contract;
1076     p9_a57 := rosetta_g_miss_num_map(ddx_klev_rec.tracked_residual);
1077     p9_a58 := ddx_klev_rec.date_title_received;
1078     p9_a59 := rosetta_g_miss_num_map(ddx_klev_rec.amount);
1079     p9_a60 := ddx_klev_rec.attribute_category;
1080     p9_a61 := ddx_klev_rec.attribute1;
1081     p9_a62 := ddx_klev_rec.attribute2;
1082     p9_a63 := ddx_klev_rec.attribute3;
1083     p9_a64 := ddx_klev_rec.attribute4;
1084     p9_a65 := ddx_klev_rec.attribute5;
1085     p9_a66 := ddx_klev_rec.attribute6;
1086     p9_a67 := ddx_klev_rec.attribute7;
1087     p9_a68 := ddx_klev_rec.attribute8;
1088     p9_a69 := ddx_klev_rec.attribute9;
1089     p9_a70 := ddx_klev_rec.attribute10;
1090     p9_a71 := ddx_klev_rec.attribute11;
1091     p9_a72 := ddx_klev_rec.attribute12;
1092     p9_a73 := ddx_klev_rec.attribute13;
1093     p9_a74 := ddx_klev_rec.attribute14;
1094     p9_a75 := ddx_klev_rec.attribute15;
1095     p9_a76 := rosetta_g_miss_num_map(ddx_klev_rec.sty_id_for);
1096     p9_a77 := rosetta_g_miss_num_map(ddx_klev_rec.clg_id);
1097     p9_a78 := rosetta_g_miss_num_map(ddx_klev_rec.created_by);
1098     p9_a79 := ddx_klev_rec.creation_date;
1099     p9_a80 := rosetta_g_miss_num_map(ddx_klev_rec.last_updated_by);
1100     p9_a81 := ddx_klev_rec.last_update_date;
1101     p9_a82 := rosetta_g_miss_num_map(ddx_klev_rec.last_update_login);
1102     p9_a83 := ddx_klev_rec.date_funding;
1103     p9_a84 := ddx_klev_rec.date_funding_required;
1104     p9_a85 := ddx_klev_rec.date_accepted;
1105     p9_a86 := ddx_klev_rec.date_delivery_expected;
1106     p9_a87 := rosetta_g_miss_num_map(ddx_klev_rec.oec);
1107     p9_a88 := rosetta_g_miss_num_map(ddx_klev_rec.capital_amount);
1108     p9_a89 := rosetta_g_miss_num_map(ddx_klev_rec.residual_grnty_amount);
1109     p9_a90 := ddx_klev_rec.residual_code;
1110     p9_a91 := rosetta_g_miss_num_map(ddx_klev_rec.rvi_premium);
1111     p9_a92 := ddx_klev_rec.credit_nature;
1112     p9_a93 := rosetta_g_miss_num_map(ddx_klev_rec.capitalized_interest);
1113     p9_a94 := rosetta_g_miss_num_map(ddx_klev_rec.capital_reduction_percent);
1114     p9_a95 := ddx_klev_rec.date_pay_investor_start;
1115     p9_a96 := ddx_klev_rec.pay_investor_frequency;
1116     p9_a97 := ddx_klev_rec.pay_investor_event;
1117     p9_a98 := rosetta_g_miss_num_map(ddx_klev_rec.pay_investor_remittance_days);
1118 
1119     p10_a0 := rosetta_g_miss_num_map(ddx_cimv_rec.id);
1120     p10_a1 := rosetta_g_miss_num_map(ddx_cimv_rec.object_version_number);
1121     p10_a2 := rosetta_g_miss_num_map(ddx_cimv_rec.cle_id);
1122     p10_a3 := rosetta_g_miss_num_map(ddx_cimv_rec.chr_id);
1123     p10_a4 := rosetta_g_miss_num_map(ddx_cimv_rec.cle_id_for);
1124     p10_a5 := rosetta_g_miss_num_map(ddx_cimv_rec.dnz_chr_id);
1125     p10_a6 := ddx_cimv_rec.object1_id1;
1126     p10_a7 := ddx_cimv_rec.object1_id2;
1127     p10_a8 := ddx_cimv_rec.jtot_object1_code;
1128     p10_a9 := ddx_cimv_rec.uom_code;
1129     p10_a10 := ddx_cimv_rec.exception_yn;
1130     p10_a11 := rosetta_g_miss_num_map(ddx_cimv_rec.number_of_items);
1131     p10_a12 := ddx_cimv_rec.upg_orig_system_ref;
1132     p10_a13 := rosetta_g_miss_num_map(ddx_cimv_rec.upg_orig_system_ref_id);
1133     p10_a14 := ddx_cimv_rec.priced_item_yn;
1134     p10_a15 := rosetta_g_miss_num_map(ddx_cimv_rec.created_by);
1135     p10_a16 := ddx_cimv_rec.creation_date;
1136     p10_a17 := rosetta_g_miss_num_map(ddx_cimv_rec.last_updated_by);
1137     p10_a18 := ddx_cimv_rec.last_update_date;
1138     p10_a19 := rosetta_g_miss_num_map(ddx_cimv_rec.last_update_login);
1139   end;
1140 
1141   procedure update_contract_line_item(p_api_version  NUMBER
1142     , p_init_msg_list  VARCHAR2
1143     , x_return_status out nocopy  VARCHAR2
1144     , x_msg_count out nocopy  NUMBER
1145     , x_msg_data out nocopy  VARCHAR2
1146     , p8_a0 out nocopy  NUMBER
1147     , p8_a1 out nocopy  NUMBER
1148     , p8_a2 out nocopy  VARCHAR2
1149     , p8_a3 out nocopy  NUMBER
1150     , p8_a4 out nocopy  NUMBER
1151     , p8_a5 out nocopy  NUMBER
1152     , p8_a6 out nocopy  NUMBER
1153     , p8_a7 out nocopy  NUMBER
1154     , p8_a8 out nocopy  VARCHAR2
1155     , p8_a9 out nocopy  VARCHAR2
1156     , p8_a10 out nocopy  NUMBER
1157     , p8_a11 out nocopy  VARCHAR2
1158     , p8_a12 out nocopy  NUMBER
1159     , p8_a13 out nocopy  VARCHAR2
1160     , p8_a14 out nocopy  VARCHAR2
1161     , p8_a15 out nocopy  VARCHAR2
1162     , p8_a16 out nocopy  VARCHAR2
1163     , p8_a17 out nocopy  VARCHAR2
1164     , p8_a18 out nocopy  NUMBER
1165     , p8_a19 out nocopy  NUMBER
1166     , p8_a20 out nocopy  NUMBER
1167     , p8_a21 out nocopy  NUMBER
1168     , p8_a22 out nocopy  VARCHAR2
1169     , p8_a23 out nocopy  VARCHAR2
1170     , p8_a24 out nocopy  VARCHAR2
1171     , p8_a25 out nocopy  VARCHAR2
1172     , p8_a26 out nocopy  VARCHAR2
1173     , p8_a27 out nocopy  VARCHAR2
1174     , p8_a28 out nocopy  DATE
1175     , p8_a29 out nocopy  VARCHAR2
1176     , p8_a30 out nocopy  DATE
1177     , p8_a31 out nocopy  DATE
1178     , p8_a32 out nocopy  DATE
1179     , p8_a33 out nocopy  VARCHAR2
1180     , p8_a34 out nocopy  NUMBER
1181     , p8_a35 out nocopy  VARCHAR2
1182     , p8_a36 out nocopy  NUMBER
1183     , p8_a37 out nocopy  VARCHAR2
1184     , p8_a38 out nocopy  VARCHAR2
1185     , p8_a39 out nocopy  VARCHAR2
1186     , p8_a40 out nocopy  VARCHAR2
1187     , p8_a41 out nocopy  VARCHAR2
1188     , p8_a42 out nocopy  VARCHAR2
1189     , p8_a43 out nocopy  VARCHAR2
1190     , p8_a44 out nocopy  VARCHAR2
1191     , p8_a45 out nocopy  VARCHAR2
1192     , p8_a46 out nocopy  VARCHAR2
1193     , p8_a47 out nocopy  VARCHAR2
1194     , p8_a48 out nocopy  VARCHAR2
1195     , p8_a49 out nocopy  VARCHAR2
1196     , p8_a50 out nocopy  VARCHAR2
1197     , p8_a51 out nocopy  VARCHAR2
1198     , p8_a52 out nocopy  VARCHAR2
1199     , p8_a53 out nocopy  VARCHAR2
1200     , p8_a54 out nocopy  NUMBER
1201     , p8_a55 out nocopy  DATE
1202     , p8_a56 out nocopy  NUMBER
1203     , p8_a57 out nocopy  DATE
1204     , p8_a58 out nocopy  VARCHAR2
1205     , p8_a59 out nocopy  VARCHAR2
1206     , p8_a60 out nocopy  VARCHAR2
1207     , p8_a61 out nocopy  NUMBER
1208     , p8_a62 out nocopy  VARCHAR2
1209     , p8_a63 out nocopy  VARCHAR2
1210     , p8_a64 out nocopy  VARCHAR2
1211     , p8_a65 out nocopy  VARCHAR2
1212     , p8_a66 out nocopy  VARCHAR2
1213     , p8_a67 out nocopy  NUMBER
1214     , p8_a68 out nocopy  NUMBER
1215     , p8_a69 out nocopy  NUMBER
1216     , p8_a70 out nocopy  DATE
1217     , p8_a71 out nocopy  NUMBER
1218     , p8_a72 out nocopy  DATE
1219     , p8_a73 out nocopy  NUMBER
1220     , p8_a74 out nocopy  NUMBER
1221     , p8_a75 out nocopy  VARCHAR2
1222     , p8_a76 out nocopy  VARCHAR2
1223     , p8_a77 out nocopy  NUMBER
1224     , p8_a78 out nocopy  NUMBER
1225     , p8_a79 out nocopy  VARCHAR2
1226     , p8_a80 out nocopy  VARCHAR2
1227     , p8_a81 out nocopy  NUMBER
1228     , p8_a82 out nocopy  VARCHAR2
1229     , p8_a83 out nocopy  NUMBER
1230     , p8_a84 out nocopy  NUMBER
1231     , p8_a85 out nocopy  NUMBER
1232     , p8_a86 out nocopy  NUMBER
1233     , p8_a87 out nocopy  VARCHAR2
1234     , p8_a88 out nocopy  NUMBER
1235     , p8_a89 out nocopy  NUMBER
1236     , p9_a0 out nocopy  NUMBER
1237     , p9_a1 out nocopy  NUMBER
1238     , p9_a2 out nocopy  NUMBER
1239     , p9_a3 out nocopy  NUMBER
1240     , p9_a4 out nocopy  VARCHAR2
1241     , p9_a5 out nocopy  VARCHAR2
1242     , p9_a6 out nocopy  VARCHAR2
1243     , p9_a7 out nocopy  NUMBER
1244     , p9_a8 out nocopy  NUMBER
1245     , p9_a9 out nocopy  DATE
1246     , p9_a10 out nocopy  NUMBER
1247     , p9_a11 out nocopy  NUMBER
1248     , p9_a12 out nocopy  NUMBER
1249     , p9_a13 out nocopy  NUMBER
1250     , p9_a14 out nocopy  NUMBER
1251     , p9_a15 out nocopy  NUMBER
1252     , p9_a16 out nocopy  NUMBER
1253     , p9_a17 out nocopy  NUMBER
1254     , p9_a18 out nocopy  NUMBER
1255     , p9_a19 out nocopy  NUMBER
1256     , p9_a20 out nocopy  DATE
1257     , p9_a21 out nocopy  DATE
1258     , p9_a22 out nocopy  NUMBER
1259     , p9_a23 out nocopy  NUMBER
1260     , p9_a24 out nocopy  DATE
1261     , p9_a25 out nocopy  DATE
1262     , p9_a26 out nocopy  DATE
1263     , p9_a27 out nocopy  NUMBER
1264     , p9_a28 out nocopy  NUMBER
1265     , p9_a29 out nocopy  NUMBER
1266     , p9_a30 out nocopy  NUMBER
1267     , p9_a31 out nocopy  NUMBER
1268     , p9_a32 out nocopy  NUMBER
1269     , p9_a33 out nocopy  NUMBER
1270     , p9_a34 out nocopy  DATE
1271     , p9_a35 out nocopy  VARCHAR2
1272     , p9_a36 out nocopy  DATE
1273     , p9_a37 out nocopy  VARCHAR2
1274     , p9_a38 out nocopy  NUMBER
1275     , p9_a39 out nocopy  NUMBER
1276     , p9_a40 out nocopy  NUMBER
1277     , p9_a41 out nocopy  VARCHAR2
1278     , p9_a42 out nocopy  DATE
1279     , p9_a43 out nocopy  NUMBER
1280     , p9_a44 out nocopy  NUMBER
1281     , p9_a45 out nocopy  DATE
1282     , p9_a46 out nocopy  NUMBER
1283     , p9_a47 out nocopy  DATE
1284     , p9_a48 out nocopy  DATE
1285     , p9_a49 out nocopy  DATE
1286     , p9_a50 out nocopy  NUMBER
1287     , p9_a51 out nocopy  NUMBER
1288     , p9_a52 out nocopy  VARCHAR2
1289     , p9_a53 out nocopy  NUMBER
1290     , p9_a54 out nocopy  NUMBER
1291     , p9_a55 out nocopy  VARCHAR2
1292     , p9_a56 out nocopy  VARCHAR2
1293     , p9_a57 out nocopy  NUMBER
1294     , p9_a58 out nocopy  DATE
1295     , p9_a59 out nocopy  NUMBER
1296     , p9_a60 out nocopy  VARCHAR2
1297     , p9_a61 out nocopy  VARCHAR2
1298     , p9_a62 out nocopy  VARCHAR2
1299     , p9_a63 out nocopy  VARCHAR2
1300     , p9_a64 out nocopy  VARCHAR2
1301     , p9_a65 out nocopy  VARCHAR2
1302     , p9_a66 out nocopy  VARCHAR2
1303     , p9_a67 out nocopy  VARCHAR2
1304     , p9_a68 out nocopy  VARCHAR2
1305     , p9_a69 out nocopy  VARCHAR2
1306     , p9_a70 out nocopy  VARCHAR2
1307     , p9_a71 out nocopy  VARCHAR2
1308     , p9_a72 out nocopy  VARCHAR2
1309     , p9_a73 out nocopy  VARCHAR2
1310     , p9_a74 out nocopy  VARCHAR2
1311     , p9_a75 out nocopy  VARCHAR2
1312     , p9_a76 out nocopy  NUMBER
1313     , p9_a77 out nocopy  NUMBER
1314     , p9_a78 out nocopy  NUMBER
1315     , p9_a79 out nocopy  DATE
1316     , p9_a80 out nocopy  NUMBER
1317     , p9_a81 out nocopy  DATE
1318     , p9_a82 out nocopy  NUMBER
1319     , p9_a83 out nocopy  DATE
1320     , p9_a84 out nocopy  DATE
1321     , p9_a85 out nocopy  DATE
1322     , p9_a86 out nocopy  DATE
1323     , p9_a87 out nocopy  NUMBER
1324     , p9_a88 out nocopy  NUMBER
1325     , p9_a89 out nocopy  NUMBER
1326     , p9_a90 out nocopy  VARCHAR2
1327     , p9_a91 out nocopy  NUMBER
1328     , p9_a92 out nocopy  VARCHAR2
1329     , p9_a93 out nocopy  NUMBER
1330     , p9_a94 out nocopy  NUMBER
1331     , p9_a95 out nocopy  DATE
1332     , p9_a96 out nocopy  VARCHAR2
1333     , p9_a97 out nocopy  VARCHAR2
1334     , p9_a98 out nocopy  NUMBER
1335     , p10_a0 out nocopy  NUMBER
1336     , p10_a1 out nocopy  NUMBER
1337     , p10_a2 out nocopy  NUMBER
1338     , p10_a3 out nocopy  NUMBER
1339     , p10_a4 out nocopy  NUMBER
1340     , p10_a5 out nocopy  NUMBER
1341     , p10_a6 out nocopy  VARCHAR2
1342     , p10_a7 out nocopy  VARCHAR2
1343     , p10_a8 out nocopy  VARCHAR2
1344     , p10_a9 out nocopy  VARCHAR2
1345     , p10_a10 out nocopy  VARCHAR2
1346     , p10_a11 out nocopy  NUMBER
1347     , p10_a12 out nocopy  VARCHAR2
1348     , p10_a13 out nocopy  NUMBER
1349     , p10_a14 out nocopy  VARCHAR2
1350     , p10_a15 out nocopy  NUMBER
1351     , p10_a16 out nocopy  DATE
1352     , p10_a17 out nocopy  NUMBER
1353     , p10_a18 out nocopy  DATE
1354     , p10_a19 out nocopy  NUMBER
1355     , p5_a0  NUMBER := 0-1962.0724
1356     , p5_a1  NUMBER := 0-1962.0724
1357     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
1358     , p5_a3  NUMBER := 0-1962.0724
1359     , p5_a4  NUMBER := 0-1962.0724
1360     , p5_a5  NUMBER := 0-1962.0724
1361     , p5_a6  NUMBER := 0-1962.0724
1362     , p5_a7  NUMBER := 0-1962.0724
1363     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
1364     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
1365     , p5_a10  NUMBER := 0-1962.0724
1366     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
1367     , p5_a12  NUMBER := 0-1962.0724
1368     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
1369     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
1370     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
1371     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
1372     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
1373     , p5_a18  NUMBER := 0-1962.0724
1374     , p5_a19  NUMBER := 0-1962.0724
1375     , p5_a20  NUMBER := 0-1962.0724
1376     , p5_a21  NUMBER := 0-1962.0724
1377     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
1378     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
1379     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
1380     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
1381     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
1382     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
1383     , p5_a28  DATE := fnd_api.g_miss_date
1384     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
1385     , p5_a30  DATE := fnd_api.g_miss_date
1386     , p5_a31  DATE := fnd_api.g_miss_date
1387     , p5_a32  DATE := fnd_api.g_miss_date
1388     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
1389     , p5_a34  NUMBER := 0-1962.0724
1390     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
1391     , p5_a36  NUMBER := 0-1962.0724
1392     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
1393     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
1394     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
1395     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
1396     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
1397     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
1398     , p5_a43  VARCHAR2 := fnd_api.g_miss_char
1399     , p5_a44  VARCHAR2 := fnd_api.g_miss_char
1400     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
1401     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
1402     , p5_a47  VARCHAR2 := fnd_api.g_miss_char
1403     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
1404     , p5_a49  VARCHAR2 := fnd_api.g_miss_char
1405     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
1406     , p5_a51  VARCHAR2 := fnd_api.g_miss_char
1407     , p5_a52  VARCHAR2 := fnd_api.g_miss_char
1408     , p5_a53  VARCHAR2 := fnd_api.g_miss_char
1409     , p5_a54  NUMBER := 0-1962.0724
1410     , p5_a55  DATE := fnd_api.g_miss_date
1411     , p5_a56  NUMBER := 0-1962.0724
1412     , p5_a57  DATE := fnd_api.g_miss_date
1413     , p5_a58  VARCHAR2 := fnd_api.g_miss_char
1414     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
1415     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
1416     , p5_a61  NUMBER := 0-1962.0724
1417     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
1418     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
1419     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
1420     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
1421     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
1422     , p5_a67  NUMBER := 0-1962.0724
1423     , p5_a68  NUMBER := 0-1962.0724
1424     , p5_a69  NUMBER := 0-1962.0724
1425     , p5_a70  DATE := fnd_api.g_miss_date
1426     , p5_a71  NUMBER := 0-1962.0724
1427     , p5_a72  DATE := fnd_api.g_miss_date
1428     , p5_a73  NUMBER := 0-1962.0724
1429     , p5_a74  NUMBER := 0-1962.0724
1430     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
1431     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
1432     , p5_a77  NUMBER := 0-1962.0724
1433     , p5_a78  NUMBER := 0-1962.0724
1434     , p5_a79  VARCHAR2 := fnd_api.g_miss_char
1435     , p5_a80  VARCHAR2 := fnd_api.g_miss_char
1436     , p5_a81  NUMBER := 0-1962.0724
1437     , p5_a82  VARCHAR2 := fnd_api.g_miss_char
1438     , p5_a83  NUMBER := 0-1962.0724
1439     , p5_a84  NUMBER := 0-1962.0724
1440     , p5_a85  NUMBER := 0-1962.0724
1441     , p5_a86  NUMBER := 0-1962.0724
1442     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
1443     , p5_a88  NUMBER := 0-1962.0724
1444     , p5_a89  NUMBER := 0-1962.0724
1445     , p6_a0  NUMBER := 0-1962.0724
1446     , p6_a1  NUMBER := 0-1962.0724
1447     , p6_a2  NUMBER := 0-1962.0724
1448     , p6_a3  NUMBER := 0-1962.0724
1449     , p6_a4  VARCHAR2 := fnd_api.g_miss_char
1450     , p6_a5  VARCHAR2 := fnd_api.g_miss_char
1451     , p6_a6  VARCHAR2 := fnd_api.g_miss_char
1452     , p6_a7  NUMBER := 0-1962.0724
1453     , p6_a8  NUMBER := 0-1962.0724
1454     , p6_a9  DATE := fnd_api.g_miss_date
1455     , p6_a10  NUMBER := 0-1962.0724
1456     , p6_a11  NUMBER := 0-1962.0724
1457     , p6_a12  NUMBER := 0-1962.0724
1458     , p6_a13  NUMBER := 0-1962.0724
1459     , p6_a14  NUMBER := 0-1962.0724
1460     , p6_a15  NUMBER := 0-1962.0724
1461     , p6_a16  NUMBER := 0-1962.0724
1462     , p6_a17  NUMBER := 0-1962.0724
1463     , p6_a18  NUMBER := 0-1962.0724
1464     , p6_a19  NUMBER := 0-1962.0724
1465     , p6_a20  DATE := fnd_api.g_miss_date
1466     , p6_a21  DATE := fnd_api.g_miss_date
1467     , p6_a22  NUMBER := 0-1962.0724
1468     , p6_a23  NUMBER := 0-1962.0724
1469     , p6_a24  DATE := fnd_api.g_miss_date
1470     , p6_a25  DATE := fnd_api.g_miss_date
1471     , p6_a26  DATE := fnd_api.g_miss_date
1472     , p6_a27  NUMBER := 0-1962.0724
1473     , p6_a28  NUMBER := 0-1962.0724
1474     , p6_a29  NUMBER := 0-1962.0724
1475     , p6_a30  NUMBER := 0-1962.0724
1476     , p6_a31  NUMBER := 0-1962.0724
1477     , p6_a32  NUMBER := 0-1962.0724
1478     , p6_a33  NUMBER := 0-1962.0724
1479     , p6_a34  DATE := fnd_api.g_miss_date
1480     , p6_a35  VARCHAR2 := fnd_api.g_miss_char
1481     , p6_a36  DATE := fnd_api.g_miss_date
1482     , p6_a37  VARCHAR2 := fnd_api.g_miss_char
1483     , p6_a38  NUMBER := 0-1962.0724
1484     , p6_a39  NUMBER := 0-1962.0724
1485     , p6_a40  NUMBER := 0-1962.0724
1486     , p6_a41  VARCHAR2 := fnd_api.g_miss_char
1487     , p6_a42  DATE := fnd_api.g_miss_date
1488     , p6_a43  NUMBER := 0-1962.0724
1489     , p6_a44  NUMBER := 0-1962.0724
1490     , p6_a45  DATE := fnd_api.g_miss_date
1491     , p6_a46  NUMBER := 0-1962.0724
1492     , p6_a47  DATE := fnd_api.g_miss_date
1493     , p6_a48  DATE := fnd_api.g_miss_date
1494     , p6_a49  DATE := fnd_api.g_miss_date
1495     , p6_a50  NUMBER := 0-1962.0724
1496     , p6_a51  NUMBER := 0-1962.0724
1497     , p6_a52  VARCHAR2 := fnd_api.g_miss_char
1498     , p6_a53  NUMBER := 0-1962.0724
1499     , p6_a54  NUMBER := 0-1962.0724
1500     , p6_a55  VARCHAR2 := fnd_api.g_miss_char
1501     , p6_a56  VARCHAR2 := fnd_api.g_miss_char
1502     , p6_a57  NUMBER := 0-1962.0724
1503     , p6_a58  DATE := fnd_api.g_miss_date
1504     , p6_a59  NUMBER := 0-1962.0724
1505     , p6_a60  VARCHAR2 := fnd_api.g_miss_char
1506     , p6_a61  VARCHAR2 := fnd_api.g_miss_char
1507     , p6_a62  VARCHAR2 := fnd_api.g_miss_char
1508     , p6_a63  VARCHAR2 := fnd_api.g_miss_char
1509     , p6_a64  VARCHAR2 := fnd_api.g_miss_char
1510     , p6_a65  VARCHAR2 := fnd_api.g_miss_char
1511     , p6_a66  VARCHAR2 := fnd_api.g_miss_char
1512     , p6_a67  VARCHAR2 := fnd_api.g_miss_char
1513     , p6_a68  VARCHAR2 := fnd_api.g_miss_char
1514     , p6_a69  VARCHAR2 := fnd_api.g_miss_char
1515     , p6_a70  VARCHAR2 := fnd_api.g_miss_char
1516     , p6_a71  VARCHAR2 := fnd_api.g_miss_char
1517     , p6_a72  VARCHAR2 := fnd_api.g_miss_char
1518     , p6_a73  VARCHAR2 := fnd_api.g_miss_char
1519     , p6_a74  VARCHAR2 := fnd_api.g_miss_char
1520     , p6_a75  VARCHAR2 := fnd_api.g_miss_char
1521     , p6_a76  NUMBER := 0-1962.0724
1522     , p6_a77  NUMBER := 0-1962.0724
1523     , p6_a78  NUMBER := 0-1962.0724
1524     , p6_a79  DATE := fnd_api.g_miss_date
1525     , p6_a80  NUMBER := 0-1962.0724
1526     , p6_a81  DATE := fnd_api.g_miss_date
1527     , p6_a82  NUMBER := 0-1962.0724
1528     , p6_a83  DATE := fnd_api.g_miss_date
1529     , p6_a84  DATE := fnd_api.g_miss_date
1530     , p6_a85  DATE := fnd_api.g_miss_date
1531     , p6_a86  DATE := fnd_api.g_miss_date
1532     , p6_a87  NUMBER := 0-1962.0724
1533     , p6_a88  NUMBER := 0-1962.0724
1534     , p6_a89  NUMBER := 0-1962.0724
1535     , p6_a90  VARCHAR2 := fnd_api.g_miss_char
1536     , p6_a91  NUMBER := 0-1962.0724
1537     , p6_a92  VARCHAR2 := fnd_api.g_miss_char
1538     , p6_a93  NUMBER := 0-1962.0724
1539     , p6_a94  NUMBER := 0-1962.0724
1540     , p6_a95  DATE := fnd_api.g_miss_date
1541     , p6_a96  VARCHAR2 := fnd_api.g_miss_char
1542     , p6_a97  VARCHAR2 := fnd_api.g_miss_char
1543     , p6_a98  NUMBER := 0-1962.0724
1544     , p7_a0  NUMBER := 0-1962.0724
1545     , p7_a1  NUMBER := 0-1962.0724
1546     , p7_a2  NUMBER := 0-1962.0724
1547     , p7_a3  NUMBER := 0-1962.0724
1548     , p7_a4  NUMBER := 0-1962.0724
1549     , p7_a5  NUMBER := 0-1962.0724
1550     , p7_a6  VARCHAR2 := fnd_api.g_miss_char
1551     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
1552     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
1553     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
1554     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
1555     , p7_a11  NUMBER := 0-1962.0724
1556     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
1557     , p7_a13  NUMBER := 0-1962.0724
1558     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
1559     , p7_a15  NUMBER := 0-1962.0724
1560     , p7_a16  DATE := fnd_api.g_miss_date
1561     , p7_a17  NUMBER := 0-1962.0724
1562     , p7_a18  DATE := fnd_api.g_miss_date
1563     , p7_a19  NUMBER := 0-1962.0724
1564   )
1565 
1566   as
1567     ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
1568     ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
1569     ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1570     ddx_clev_rec okl_contract_line_item_pub.clev_rec_type;
1571     ddx_klev_rec okl_contract_line_item_pub.klev_rec_type;
1572     ddx_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
1573     ddindx binary_integer; indx binary_integer;
1574   begin
1575 
1576     -- copy data to the local IN or IN-OUT args, if any
1577 
1578 
1579 
1580 
1581 
1582     ddp_clev_rec.id := rosetta_g_miss_num_map(p5_a0);
1583     ddp_clev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1584     ddp_clev_rec.sfwt_flag := p5_a2;
1585     ddp_clev_rec.chr_id := rosetta_g_miss_num_map(p5_a3);
1586     ddp_clev_rec.cle_id := rosetta_g_miss_num_map(p5_a4);
1587     ddp_clev_rec.cle_id_renewed := rosetta_g_miss_num_map(p5_a5);
1588     ddp_clev_rec.cle_id_renewed_to := rosetta_g_miss_num_map(p5_a6);
1589     ddp_clev_rec.lse_id := rosetta_g_miss_num_map(p5_a7);
1590     ddp_clev_rec.line_number := p5_a8;
1591     ddp_clev_rec.sts_code := p5_a9;
1592     ddp_clev_rec.display_sequence := rosetta_g_miss_num_map(p5_a10);
1593     ddp_clev_rec.trn_code := p5_a11;
1594     ddp_clev_rec.dnz_chr_id := rosetta_g_miss_num_map(p5_a12);
1595     ddp_clev_rec.comments := p5_a13;
1596     ddp_clev_rec.item_description := p5_a14;
1597     ddp_clev_rec.oke_boe_description := p5_a15;
1598     ddp_clev_rec.cognomen := p5_a16;
1599     ddp_clev_rec.hidden_ind := p5_a17;
1600     ddp_clev_rec.price_unit := rosetta_g_miss_num_map(p5_a18);
1601     ddp_clev_rec.price_unit_percent := rosetta_g_miss_num_map(p5_a19);
1602     ddp_clev_rec.price_negotiated := rosetta_g_miss_num_map(p5_a20);
1603     ddp_clev_rec.price_negotiated_renewed := rosetta_g_miss_num_map(p5_a21);
1604     ddp_clev_rec.price_level_ind := p5_a22;
1605     ddp_clev_rec.invoice_line_level_ind := p5_a23;
1606     ddp_clev_rec.dpas_rating := p5_a24;
1607     ddp_clev_rec.block23text := p5_a25;
1608     ddp_clev_rec.exception_yn := p5_a26;
1609     ddp_clev_rec.template_used := p5_a27;
1610     ddp_clev_rec.date_terminated := rosetta_g_miss_date_in_map(p5_a28);
1611     ddp_clev_rec.name := p5_a29;
1612     ddp_clev_rec.start_date := rosetta_g_miss_date_in_map(p5_a30);
1613     ddp_clev_rec.end_date := rosetta_g_miss_date_in_map(p5_a31);
1614     ddp_clev_rec.date_renewed := rosetta_g_miss_date_in_map(p5_a32);
1615     ddp_clev_rec.upg_orig_system_ref := p5_a33;
1616     ddp_clev_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p5_a34);
1617     ddp_clev_rec.orig_system_source_code := p5_a35;
1618     ddp_clev_rec.orig_system_id1 := rosetta_g_miss_num_map(p5_a36);
1619     ddp_clev_rec.orig_system_reference1 := p5_a37;
1620     ddp_clev_rec.attribute_category := p5_a38;
1621     ddp_clev_rec.attribute1 := p5_a39;
1622     ddp_clev_rec.attribute2 := p5_a40;
1623     ddp_clev_rec.attribute3 := p5_a41;
1624     ddp_clev_rec.attribute4 := p5_a42;
1625     ddp_clev_rec.attribute5 := p5_a43;
1626     ddp_clev_rec.attribute6 := p5_a44;
1627     ddp_clev_rec.attribute7 := p5_a45;
1628     ddp_clev_rec.attribute8 := p5_a46;
1629     ddp_clev_rec.attribute9 := p5_a47;
1630     ddp_clev_rec.attribute10 := p5_a48;
1631     ddp_clev_rec.attribute11 := p5_a49;
1632     ddp_clev_rec.attribute12 := p5_a50;
1633     ddp_clev_rec.attribute13 := p5_a51;
1634     ddp_clev_rec.attribute14 := p5_a52;
1635     ddp_clev_rec.attribute15 := p5_a53;
1636     ddp_clev_rec.created_by := rosetta_g_miss_num_map(p5_a54);
1637     ddp_clev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a55);
1638     ddp_clev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a56);
1639     ddp_clev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a57);
1640     ddp_clev_rec.price_type := p5_a58;
1641     ddp_clev_rec.currency_code := p5_a59;
1642     ddp_clev_rec.currency_code_renewed := p5_a60;
1643     ddp_clev_rec.last_update_login := rosetta_g_miss_num_map(p5_a61);
1644     ddp_clev_rec.old_sts_code := p5_a62;
1645     ddp_clev_rec.new_sts_code := p5_a63;
1646     ddp_clev_rec.old_ste_code := p5_a64;
1647     ddp_clev_rec.new_ste_code := p5_a65;
1648     ddp_clev_rec.call_action_asmblr := p5_a66;
1649     ddp_clev_rec.request_id := rosetta_g_miss_num_map(p5_a67);
1650     ddp_clev_rec.program_application_id := rosetta_g_miss_num_map(p5_a68);
1651     ddp_clev_rec.program_id := rosetta_g_miss_num_map(p5_a69);
1652     ddp_clev_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a70);
1653     ddp_clev_rec.price_list_id := rosetta_g_miss_num_map(p5_a71);
1654     ddp_clev_rec.pricing_date := rosetta_g_miss_date_in_map(p5_a72);
1655     ddp_clev_rec.price_list_line_id := rosetta_g_miss_num_map(p5_a73);
1656     ddp_clev_rec.line_list_price := rosetta_g_miss_num_map(p5_a74);
1657     ddp_clev_rec.item_to_price_yn := p5_a75;
1658     ddp_clev_rec.price_basis_yn := p5_a76;
1659     ddp_clev_rec.config_header_id := rosetta_g_miss_num_map(p5_a77);
1660     ddp_clev_rec.config_revision_number := rosetta_g_miss_num_map(p5_a78);
1661     ddp_clev_rec.config_complete_yn := p5_a79;
1662     ddp_clev_rec.config_valid_yn := p5_a80;
1663     ddp_clev_rec.config_top_model_line_id := rosetta_g_miss_num_map(p5_a81);
1664     ddp_clev_rec.config_item_type := p5_a82;
1665     ddp_clev_rec.config_item_id := rosetta_g_miss_num_map(p5_a83);
1666     ddp_clev_rec.cust_acct_id := rosetta_g_miss_num_map(p5_a84);
1667     ddp_clev_rec.bill_to_site_use_id := rosetta_g_miss_num_map(p5_a85);
1668     ddp_clev_rec.inv_rule_id := rosetta_g_miss_num_map(p5_a86);
1669     ddp_clev_rec.line_renewal_type_code := p5_a87;
1670     ddp_clev_rec.ship_to_site_use_id := rosetta_g_miss_num_map(p5_a88);
1671     ddp_clev_rec.payment_term_id := rosetta_g_miss_num_map(p5_a89);
1672 
1673     ddp_klev_rec.id := rosetta_g_miss_num_map(p6_a0);
1674     ddp_klev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
1675     ddp_klev_rec.kle_id := rosetta_g_miss_num_map(p6_a2);
1676     ddp_klev_rec.sty_id := rosetta_g_miss_num_map(p6_a3);
1677     ddp_klev_rec.prc_code := p6_a4;
1678     ddp_klev_rec.fcg_code := p6_a5;
1679     ddp_klev_rec.nty_code := p6_a6;
1680     ddp_klev_rec.estimated_oec := rosetta_g_miss_num_map(p6_a7);
1681     ddp_klev_rec.lao_amount := rosetta_g_miss_num_map(p6_a8);
1682     ddp_klev_rec.title_date := rosetta_g_miss_date_in_map(p6_a9);
1683     ddp_klev_rec.fee_charge := rosetta_g_miss_num_map(p6_a10);
1684     ddp_klev_rec.lrs_percent := rosetta_g_miss_num_map(p6_a11);
1685     ddp_klev_rec.initial_direct_cost := rosetta_g_miss_num_map(p6_a12);
1686     ddp_klev_rec.percent_stake := rosetta_g_miss_num_map(p6_a13);
1687     ddp_klev_rec.percent := rosetta_g_miss_num_map(p6_a14);
1688     ddp_klev_rec.evergreen_percent := rosetta_g_miss_num_map(p6_a15);
1689     ddp_klev_rec.amount_stake := rosetta_g_miss_num_map(p6_a16);
1690     ddp_klev_rec.occupancy := rosetta_g_miss_num_map(p6_a17);
1691     ddp_klev_rec.coverage := rosetta_g_miss_num_map(p6_a18);
1692     ddp_klev_rec.residual_percentage := rosetta_g_miss_num_map(p6_a19);
1693     ddp_klev_rec.date_last_inspection := rosetta_g_miss_date_in_map(p6_a20);
1694     ddp_klev_rec.date_sold := rosetta_g_miss_date_in_map(p6_a21);
1695     ddp_klev_rec.lrv_amount := rosetta_g_miss_num_map(p6_a22);
1696     ddp_klev_rec.capital_reduction := rosetta_g_miss_num_map(p6_a23);
1697     ddp_klev_rec.date_next_inspection_due := rosetta_g_miss_date_in_map(p6_a24);
1698     ddp_klev_rec.date_residual_last_review := rosetta_g_miss_date_in_map(p6_a25);
1699     ddp_klev_rec.date_last_reamortisation := rosetta_g_miss_date_in_map(p6_a26);
1700     ddp_klev_rec.vendor_advance_paid := rosetta_g_miss_num_map(p6_a27);
1701     ddp_klev_rec.weighted_average_life := rosetta_g_miss_num_map(p6_a28);
1702     ddp_klev_rec.tradein_amount := rosetta_g_miss_num_map(p6_a29);
1703     ddp_klev_rec.bond_equivalent_yield := rosetta_g_miss_num_map(p6_a30);
1704     ddp_klev_rec.termination_purchase_amount := rosetta_g_miss_num_map(p6_a31);
1705     ddp_klev_rec.refinance_amount := rosetta_g_miss_num_map(p6_a32);
1706     ddp_klev_rec.year_built := rosetta_g_miss_num_map(p6_a33);
1707     ddp_klev_rec.delivered_date := rosetta_g_miss_date_in_map(p6_a34);
1708     ddp_klev_rec.credit_tenant_yn := p6_a35;
1709     ddp_klev_rec.date_last_cleanup := rosetta_g_miss_date_in_map(p6_a36);
1710     ddp_klev_rec.year_of_manufacture := p6_a37;
1711     ddp_klev_rec.coverage_ratio := rosetta_g_miss_num_map(p6_a38);
1712     ddp_klev_rec.remarketed_amount := rosetta_g_miss_num_map(p6_a39);
1713     ddp_klev_rec.gross_square_footage := rosetta_g_miss_num_map(p6_a40);
1714     ddp_klev_rec.prescribed_asset_yn := p6_a41;
1715     ddp_klev_rec.date_remarketed := rosetta_g_miss_date_in_map(p6_a42);
1716     ddp_klev_rec.net_rentable := rosetta_g_miss_num_map(p6_a43);
1717     ddp_klev_rec.remarket_margin := rosetta_g_miss_num_map(p6_a44);
1718     ddp_klev_rec.date_letter_acceptance := rosetta_g_miss_date_in_map(p6_a45);
1719     ddp_klev_rec.repurchased_amount := rosetta_g_miss_num_map(p6_a46);
1720     ddp_klev_rec.date_commitment_expiration := rosetta_g_miss_date_in_map(p6_a47);
1721     ddp_klev_rec.date_repurchased := rosetta_g_miss_date_in_map(p6_a48);
1722     ddp_klev_rec.date_appraisal := rosetta_g_miss_date_in_map(p6_a49);
1723     ddp_klev_rec.residual_value := rosetta_g_miss_num_map(p6_a50);
1724     ddp_klev_rec.appraisal_value := rosetta_g_miss_num_map(p6_a51);
1725     ddp_klev_rec.secured_deal_yn := p6_a52;
1726     ddp_klev_rec.gain_loss := rosetta_g_miss_num_map(p6_a53);
1727     ddp_klev_rec.floor_amount := rosetta_g_miss_num_map(p6_a54);
1728     ddp_klev_rec.re_lease_yn := p6_a55;
1729     ddp_klev_rec.previous_contract := p6_a56;
1730     ddp_klev_rec.tracked_residual := rosetta_g_miss_num_map(p6_a57);
1731     ddp_klev_rec.date_title_received := rosetta_g_miss_date_in_map(p6_a58);
1732     ddp_klev_rec.amount := rosetta_g_miss_num_map(p6_a59);
1733     ddp_klev_rec.attribute_category := p6_a60;
1734     ddp_klev_rec.attribute1 := p6_a61;
1735     ddp_klev_rec.attribute2 := p6_a62;
1736     ddp_klev_rec.attribute3 := p6_a63;
1737     ddp_klev_rec.attribute4 := p6_a64;
1738     ddp_klev_rec.attribute5 := p6_a65;
1739     ddp_klev_rec.attribute6 := p6_a66;
1740     ddp_klev_rec.attribute7 := p6_a67;
1741     ddp_klev_rec.attribute8 := p6_a68;
1742     ddp_klev_rec.attribute9 := p6_a69;
1743     ddp_klev_rec.attribute10 := p6_a70;
1744     ddp_klev_rec.attribute11 := p6_a71;
1745     ddp_klev_rec.attribute12 := p6_a72;
1746     ddp_klev_rec.attribute13 := p6_a73;
1747     ddp_klev_rec.attribute14 := p6_a74;
1748     ddp_klev_rec.attribute15 := p6_a75;
1749     ddp_klev_rec.sty_id_for := rosetta_g_miss_num_map(p6_a76);
1750     ddp_klev_rec.clg_id := rosetta_g_miss_num_map(p6_a77);
1751     ddp_klev_rec.created_by := rosetta_g_miss_num_map(p6_a78);
1752     ddp_klev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a79);
1753     ddp_klev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a80);
1754     ddp_klev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a81);
1755     ddp_klev_rec.last_update_login := rosetta_g_miss_num_map(p6_a82);
1756     ddp_klev_rec.date_funding := rosetta_g_miss_date_in_map(p6_a83);
1757     ddp_klev_rec.date_funding_required := rosetta_g_miss_date_in_map(p6_a84);
1758     ddp_klev_rec.date_accepted := rosetta_g_miss_date_in_map(p6_a85);
1759     ddp_klev_rec.date_delivery_expected := rosetta_g_miss_date_in_map(p6_a86);
1760     ddp_klev_rec.oec := rosetta_g_miss_num_map(p6_a87);
1761     ddp_klev_rec.capital_amount := rosetta_g_miss_num_map(p6_a88);
1762     ddp_klev_rec.residual_grnty_amount := rosetta_g_miss_num_map(p6_a89);
1763     ddp_klev_rec.residual_code := p6_a90;
1764     ddp_klev_rec.rvi_premium := rosetta_g_miss_num_map(p6_a91);
1765     ddp_klev_rec.credit_nature := p6_a92;
1766     ddp_klev_rec.capitalized_interest := rosetta_g_miss_num_map(p6_a93);
1767     ddp_klev_rec.capital_reduction_percent := rosetta_g_miss_num_map(p6_a94);
1768     ddp_klev_rec.date_pay_investor_start := rosetta_g_miss_date_in_map(p6_a95);
1769     ddp_klev_rec.pay_investor_frequency := p6_a96;
1770     ddp_klev_rec.pay_investor_event := p6_a97;
1771     ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
1772 
1773     ddp_cimv_rec.id := rosetta_g_miss_num_map(p7_a0);
1774     ddp_cimv_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
1775     ddp_cimv_rec.cle_id := rosetta_g_miss_num_map(p7_a2);
1776     ddp_cimv_rec.chr_id := rosetta_g_miss_num_map(p7_a3);
1777     ddp_cimv_rec.cle_id_for := rosetta_g_miss_num_map(p7_a4);
1778     ddp_cimv_rec.dnz_chr_id := rosetta_g_miss_num_map(p7_a5);
1779     ddp_cimv_rec.object1_id1 := p7_a6;
1780     ddp_cimv_rec.object1_id2 := p7_a7;
1781     ddp_cimv_rec.jtot_object1_code := p7_a8;
1782     ddp_cimv_rec.uom_code := p7_a9;
1783     ddp_cimv_rec.exception_yn := p7_a10;
1784     ddp_cimv_rec.number_of_items := rosetta_g_miss_num_map(p7_a11);
1785     ddp_cimv_rec.upg_orig_system_ref := p7_a12;
1786     ddp_cimv_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p7_a13);
1787     ddp_cimv_rec.priced_item_yn := p7_a14;
1788     ddp_cimv_rec.created_by := rosetta_g_miss_num_map(p7_a15);
1789     ddp_cimv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a16);
1790     ddp_cimv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
1791     ddp_cimv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
1792     ddp_cimv_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
1793 
1794 
1795 
1796 
1797     -- here's the delegated call to the old PL/SQL routine
1798     okl_contract_line_item_pub.update_contract_line_item(p_api_version,
1799       p_init_msg_list,
1800       x_return_status,
1801       x_msg_count,
1802       x_msg_data,
1803       ddp_clev_rec,
1804       ddp_klev_rec,
1805       ddp_cimv_rec,
1806       ddx_clev_rec,
1807       ddx_klev_rec,
1808       ddx_cimv_rec);
1809 
1810     -- copy data back from the local variables to OUT or IN-OUT args, if any
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1819     p8_a0 := rosetta_g_miss_num_map(ddx_clev_rec.id);
1820     p8_a1 := rosetta_g_miss_num_map(ddx_clev_rec.object_version_number);
1821     p8_a2 := ddx_clev_rec.sfwt_flag;
1822     p8_a3 := rosetta_g_miss_num_map(ddx_clev_rec.chr_id);
1823     p8_a4 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id);
1824     p8_a5 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id_renewed);
1825     p8_a6 := rosetta_g_miss_num_map(ddx_clev_rec.cle_id_renewed_to);
1826     p8_a7 := rosetta_g_miss_num_map(ddx_clev_rec.lse_id);
1827     p8_a8 := ddx_clev_rec.line_number;
1828     p8_a9 := ddx_clev_rec.sts_code;
1829     p8_a10 := rosetta_g_miss_num_map(ddx_clev_rec.display_sequence);
1830     p8_a11 := ddx_clev_rec.trn_code;
1831     p8_a12 := rosetta_g_miss_num_map(ddx_clev_rec.dnz_chr_id);
1832     p8_a13 := ddx_clev_rec.comments;
1833     p8_a14 := ddx_clev_rec.item_description;
1834     p8_a15 := ddx_clev_rec.oke_boe_description;
1835     p8_a16 := ddx_clev_rec.cognomen;
1836     p8_a17 := ddx_clev_rec.hidden_ind;
1837     p8_a18 := rosetta_g_miss_num_map(ddx_clev_rec.price_unit);
1838     p8_a19 := rosetta_g_miss_num_map(ddx_clev_rec.price_unit_percent);
1839     p8_a20 := rosetta_g_miss_num_map(ddx_clev_rec.price_negotiated);
1840     p8_a21 := rosetta_g_miss_num_map(ddx_clev_rec.price_negotiated_renewed);
1841     p8_a22 := ddx_clev_rec.price_level_ind;
1842     p8_a23 := ddx_clev_rec.invoice_line_level_ind;
1843     p8_a24 := ddx_clev_rec.dpas_rating;
1844     p8_a25 := ddx_clev_rec.block23text;
1845     p8_a26 := ddx_clev_rec.exception_yn;
1846     p8_a27 := ddx_clev_rec.template_used;
1847     p8_a28 := ddx_clev_rec.date_terminated;
1848     p8_a29 := ddx_clev_rec.name;
1849     p8_a30 := ddx_clev_rec.start_date;
1850     p8_a31 := ddx_clev_rec.end_date;
1851     p8_a32 := ddx_clev_rec.date_renewed;
1852     p8_a33 := ddx_clev_rec.upg_orig_system_ref;
1853     p8_a34 := rosetta_g_miss_num_map(ddx_clev_rec.upg_orig_system_ref_id);
1854     p8_a35 := ddx_clev_rec.orig_system_source_code;
1855     p8_a36 := rosetta_g_miss_num_map(ddx_clev_rec.orig_system_id1);
1856     p8_a37 := ddx_clev_rec.orig_system_reference1;
1857     p8_a38 := ddx_clev_rec.attribute_category;
1858     p8_a39 := ddx_clev_rec.attribute1;
1859     p8_a40 := ddx_clev_rec.attribute2;
1860     p8_a41 := ddx_clev_rec.attribute3;
1861     p8_a42 := ddx_clev_rec.attribute4;
1862     p8_a43 := ddx_clev_rec.attribute5;
1863     p8_a44 := ddx_clev_rec.attribute6;
1864     p8_a45 := ddx_clev_rec.attribute7;
1865     p8_a46 := ddx_clev_rec.attribute8;
1866     p8_a47 := ddx_clev_rec.attribute9;
1867     p8_a48 := ddx_clev_rec.attribute10;
1868     p8_a49 := ddx_clev_rec.attribute11;
1869     p8_a50 := ddx_clev_rec.attribute12;
1870     p8_a51 := ddx_clev_rec.attribute13;
1871     p8_a52 := ddx_clev_rec.attribute14;
1872     p8_a53 := ddx_clev_rec.attribute15;
1873     p8_a54 := rosetta_g_miss_num_map(ddx_clev_rec.created_by);
1874     p8_a55 := ddx_clev_rec.creation_date;
1875     p8_a56 := rosetta_g_miss_num_map(ddx_clev_rec.last_updated_by);
1876     p8_a57 := ddx_clev_rec.last_update_date;
1877     p8_a58 := ddx_clev_rec.price_type;
1878     p8_a59 := ddx_clev_rec.currency_code;
1879     p8_a60 := ddx_clev_rec.currency_code_renewed;
1880     p8_a61 := rosetta_g_miss_num_map(ddx_clev_rec.last_update_login);
1881     p8_a62 := ddx_clev_rec.old_sts_code;
1882     p8_a63 := ddx_clev_rec.new_sts_code;
1883     p8_a64 := ddx_clev_rec.old_ste_code;
1884     p8_a65 := ddx_clev_rec.new_ste_code;
1885     p8_a66 := ddx_clev_rec.call_action_asmblr;
1886     p8_a67 := rosetta_g_miss_num_map(ddx_clev_rec.request_id);
1887     p8_a68 := rosetta_g_miss_num_map(ddx_clev_rec.program_application_id);
1888     p8_a69 := rosetta_g_miss_num_map(ddx_clev_rec.program_id);
1889     p8_a70 := ddx_clev_rec.program_update_date;
1890     p8_a71 := rosetta_g_miss_num_map(ddx_clev_rec.price_list_id);
1891     p8_a72 := ddx_clev_rec.pricing_date;
1892     p8_a73 := rosetta_g_miss_num_map(ddx_clev_rec.price_list_line_id);
1893     p8_a74 := rosetta_g_miss_num_map(ddx_clev_rec.line_list_price);
1894     p8_a75 := ddx_clev_rec.item_to_price_yn;
1895     p8_a76 := ddx_clev_rec.price_basis_yn;
1896     p8_a77 := rosetta_g_miss_num_map(ddx_clev_rec.config_header_id);
1897     p8_a78 := rosetta_g_miss_num_map(ddx_clev_rec.config_revision_number);
1898     p8_a79 := ddx_clev_rec.config_complete_yn;
1899     p8_a80 := ddx_clev_rec.config_valid_yn;
1900     p8_a81 := rosetta_g_miss_num_map(ddx_clev_rec.config_top_model_line_id);
1901     p8_a82 := ddx_clev_rec.config_item_type;
1902     p8_a83 := rosetta_g_miss_num_map(ddx_clev_rec.config_item_id);
1903     p8_a84 := rosetta_g_miss_num_map(ddx_clev_rec.cust_acct_id);
1904     p8_a85 := rosetta_g_miss_num_map(ddx_clev_rec.bill_to_site_use_id);
1905     p8_a86 := rosetta_g_miss_num_map(ddx_clev_rec.inv_rule_id);
1906     p8_a87 := ddx_clev_rec.line_renewal_type_code;
1907     p8_a88 := rosetta_g_miss_num_map(ddx_clev_rec.ship_to_site_use_id);
1908     p8_a89 := rosetta_g_miss_num_map(ddx_clev_rec.payment_term_id);
1909 
1910     p9_a0 := rosetta_g_miss_num_map(ddx_klev_rec.id);
1911     p9_a1 := rosetta_g_miss_num_map(ddx_klev_rec.object_version_number);
1912     p9_a2 := rosetta_g_miss_num_map(ddx_klev_rec.kle_id);
1913     p9_a3 := rosetta_g_miss_num_map(ddx_klev_rec.sty_id);
1914     p9_a4 := ddx_klev_rec.prc_code;
1915     p9_a5 := ddx_klev_rec.fcg_code;
1916     p9_a6 := ddx_klev_rec.nty_code;
1917     p9_a7 := rosetta_g_miss_num_map(ddx_klev_rec.estimated_oec);
1918     p9_a8 := rosetta_g_miss_num_map(ddx_klev_rec.lao_amount);
1919     p9_a9 := ddx_klev_rec.title_date;
1920     p9_a10 := rosetta_g_miss_num_map(ddx_klev_rec.fee_charge);
1921     p9_a11 := rosetta_g_miss_num_map(ddx_klev_rec.lrs_percent);
1922     p9_a12 := rosetta_g_miss_num_map(ddx_klev_rec.initial_direct_cost);
1923     p9_a13 := rosetta_g_miss_num_map(ddx_klev_rec.percent_stake);
1924     p9_a14 := rosetta_g_miss_num_map(ddx_klev_rec.percent);
1925     p9_a15 := rosetta_g_miss_num_map(ddx_klev_rec.evergreen_percent);
1926     p9_a16 := rosetta_g_miss_num_map(ddx_klev_rec.amount_stake);
1927     p9_a17 := rosetta_g_miss_num_map(ddx_klev_rec.occupancy);
1928     p9_a18 := rosetta_g_miss_num_map(ddx_klev_rec.coverage);
1929     p9_a19 := rosetta_g_miss_num_map(ddx_klev_rec.residual_percentage);
1930     p9_a20 := ddx_klev_rec.date_last_inspection;
1931     p9_a21 := ddx_klev_rec.date_sold;
1932     p9_a22 := rosetta_g_miss_num_map(ddx_klev_rec.lrv_amount);
1933     p9_a23 := rosetta_g_miss_num_map(ddx_klev_rec.capital_reduction);
1934     p9_a24 := ddx_klev_rec.date_next_inspection_due;
1935     p9_a25 := ddx_klev_rec.date_residual_last_review;
1936     p9_a26 := ddx_klev_rec.date_last_reamortisation;
1937     p9_a27 := rosetta_g_miss_num_map(ddx_klev_rec.vendor_advance_paid);
1938     p9_a28 := rosetta_g_miss_num_map(ddx_klev_rec.weighted_average_life);
1939     p9_a29 := rosetta_g_miss_num_map(ddx_klev_rec.tradein_amount);
1940     p9_a30 := rosetta_g_miss_num_map(ddx_klev_rec.bond_equivalent_yield);
1941     p9_a31 := rosetta_g_miss_num_map(ddx_klev_rec.termination_purchase_amount);
1942     p9_a32 := rosetta_g_miss_num_map(ddx_klev_rec.refinance_amount);
1943     p9_a33 := rosetta_g_miss_num_map(ddx_klev_rec.year_built);
1944     p9_a34 := ddx_klev_rec.delivered_date;
1945     p9_a35 := ddx_klev_rec.credit_tenant_yn;
1946     p9_a36 := ddx_klev_rec.date_last_cleanup;
1947     p9_a37 := ddx_klev_rec.year_of_manufacture;
1948     p9_a38 := rosetta_g_miss_num_map(ddx_klev_rec.coverage_ratio);
1949     p9_a39 := rosetta_g_miss_num_map(ddx_klev_rec.remarketed_amount);
1950     p9_a40 := rosetta_g_miss_num_map(ddx_klev_rec.gross_square_footage);
1951     p9_a41 := ddx_klev_rec.prescribed_asset_yn;
1952     p9_a42 := ddx_klev_rec.date_remarketed;
1953     p9_a43 := rosetta_g_miss_num_map(ddx_klev_rec.net_rentable);
1954     p9_a44 := rosetta_g_miss_num_map(ddx_klev_rec.remarket_margin);
1955     p9_a45 := ddx_klev_rec.date_letter_acceptance;
1956     p9_a46 := rosetta_g_miss_num_map(ddx_klev_rec.repurchased_amount);
1957     p9_a47 := ddx_klev_rec.date_commitment_expiration;
1958     p9_a48 := ddx_klev_rec.date_repurchased;
1959     p9_a49 := ddx_klev_rec.date_appraisal;
1960     p9_a50 := rosetta_g_miss_num_map(ddx_klev_rec.residual_value);
1961     p9_a51 := rosetta_g_miss_num_map(ddx_klev_rec.appraisal_value);
1962     p9_a52 := ddx_klev_rec.secured_deal_yn;
1963     p9_a53 := rosetta_g_miss_num_map(ddx_klev_rec.gain_loss);
1964     p9_a54 := rosetta_g_miss_num_map(ddx_klev_rec.floor_amount);
1965     p9_a55 := ddx_klev_rec.re_lease_yn;
1966     p9_a56 := ddx_klev_rec.previous_contract;
1967     p9_a57 := rosetta_g_miss_num_map(ddx_klev_rec.tracked_residual);
1968     p9_a58 := ddx_klev_rec.date_title_received;
1969     p9_a59 := rosetta_g_miss_num_map(ddx_klev_rec.amount);
1970     p9_a60 := ddx_klev_rec.attribute_category;
1971     p9_a61 := ddx_klev_rec.attribute1;
1972     p9_a62 := ddx_klev_rec.attribute2;
1973     p9_a63 := ddx_klev_rec.attribute3;
1974     p9_a64 := ddx_klev_rec.attribute4;
1975     p9_a65 := ddx_klev_rec.attribute5;
1976     p9_a66 := ddx_klev_rec.attribute6;
1977     p9_a67 := ddx_klev_rec.attribute7;
1978     p9_a68 := ddx_klev_rec.attribute8;
1979     p9_a69 := ddx_klev_rec.attribute9;
1980     p9_a70 := ddx_klev_rec.attribute10;
1981     p9_a71 := ddx_klev_rec.attribute11;
1982     p9_a72 := ddx_klev_rec.attribute12;
1983     p9_a73 := ddx_klev_rec.attribute13;
1984     p9_a74 := ddx_klev_rec.attribute14;
1985     p9_a75 := ddx_klev_rec.attribute15;
1986     p9_a76 := rosetta_g_miss_num_map(ddx_klev_rec.sty_id_for);
1987     p9_a77 := rosetta_g_miss_num_map(ddx_klev_rec.clg_id);
1988     p9_a78 := rosetta_g_miss_num_map(ddx_klev_rec.created_by);
1989     p9_a79 := ddx_klev_rec.creation_date;
1990     p9_a80 := rosetta_g_miss_num_map(ddx_klev_rec.last_updated_by);
1991     p9_a81 := ddx_klev_rec.last_update_date;
1992     p9_a82 := rosetta_g_miss_num_map(ddx_klev_rec.last_update_login);
1993     p9_a83 := ddx_klev_rec.date_funding;
1994     p9_a84 := ddx_klev_rec.date_funding_required;
1995     p9_a85 := ddx_klev_rec.date_accepted;
1996     p9_a86 := ddx_klev_rec.date_delivery_expected;
1997     p9_a87 := rosetta_g_miss_num_map(ddx_klev_rec.oec);
1998     p9_a88 := rosetta_g_miss_num_map(ddx_klev_rec.capital_amount);
1999     p9_a89 := rosetta_g_miss_num_map(ddx_klev_rec.residual_grnty_amount);
2000     p9_a90 := ddx_klev_rec.residual_code;
2001     p9_a91 := rosetta_g_miss_num_map(ddx_klev_rec.rvi_premium);
2002     p9_a92 := ddx_klev_rec.credit_nature;
2003     p9_a93 := rosetta_g_miss_num_map(ddx_klev_rec.capitalized_interest);
2004     p9_a94 := rosetta_g_miss_num_map(ddx_klev_rec.capital_reduction_percent);
2005     p9_a95 := ddx_klev_rec.date_pay_investor_start;
2006     p9_a96 := ddx_klev_rec.pay_investor_frequency;
2007     p9_a97 := ddx_klev_rec.pay_investor_event;
2008     p9_a98 := rosetta_g_miss_num_map(ddx_klev_rec.pay_investor_remittance_days);
2009 
2010     p10_a0 := rosetta_g_miss_num_map(ddx_cimv_rec.id);
2011     p10_a1 := rosetta_g_miss_num_map(ddx_cimv_rec.object_version_number);
2012     p10_a2 := rosetta_g_miss_num_map(ddx_cimv_rec.cle_id);
2013     p10_a3 := rosetta_g_miss_num_map(ddx_cimv_rec.chr_id);
2014     p10_a4 := rosetta_g_miss_num_map(ddx_cimv_rec.cle_id_for);
2015     p10_a5 := rosetta_g_miss_num_map(ddx_cimv_rec.dnz_chr_id);
2016     p10_a6 := ddx_cimv_rec.object1_id1;
2017     p10_a7 := ddx_cimv_rec.object1_id2;
2018     p10_a8 := ddx_cimv_rec.jtot_object1_code;
2019     p10_a9 := ddx_cimv_rec.uom_code;
2020     p10_a10 := ddx_cimv_rec.exception_yn;
2021     p10_a11 := rosetta_g_miss_num_map(ddx_cimv_rec.number_of_items);
2022     p10_a12 := ddx_cimv_rec.upg_orig_system_ref;
2023     p10_a13 := rosetta_g_miss_num_map(ddx_cimv_rec.upg_orig_system_ref_id);
2024     p10_a14 := ddx_cimv_rec.priced_item_yn;
2025     p10_a15 := rosetta_g_miss_num_map(ddx_cimv_rec.created_by);
2026     p10_a16 := ddx_cimv_rec.creation_date;
2027     p10_a17 := rosetta_g_miss_num_map(ddx_cimv_rec.last_updated_by);
2028     p10_a18 := ddx_cimv_rec.last_update_date;
2029     p10_a19 := rosetta_g_miss_num_map(ddx_cimv_rec.last_update_login);
2030   end;
2031 
2032   procedure delete_contract_line_item(p_api_version  NUMBER
2033     , p_init_msg_list  VARCHAR2
2034     , x_return_status out nocopy  VARCHAR2
2035     , x_msg_count out nocopy  NUMBER
2036     , x_msg_data out nocopy  VARCHAR2
2037     , p5_a0  NUMBER := 0-1962.0724
2038     , p5_a1  NUMBER := 0-1962.0724
2039     , p5_a2  VARCHAR2 := fnd_api.g_miss_char
2040     , p5_a3  NUMBER := 0-1962.0724
2041     , p5_a4  NUMBER := 0-1962.0724
2042     , p5_a5  NUMBER := 0-1962.0724
2043     , p5_a6  NUMBER := 0-1962.0724
2044     , p5_a7  NUMBER := 0-1962.0724
2045     , p5_a8  VARCHAR2 := fnd_api.g_miss_char
2046     , p5_a9  VARCHAR2 := fnd_api.g_miss_char
2047     , p5_a10  NUMBER := 0-1962.0724
2048     , p5_a11  VARCHAR2 := fnd_api.g_miss_char
2049     , p5_a12  NUMBER := 0-1962.0724
2050     , p5_a13  VARCHAR2 := fnd_api.g_miss_char
2051     , p5_a14  VARCHAR2 := fnd_api.g_miss_char
2052     , p5_a15  VARCHAR2 := fnd_api.g_miss_char
2053     , p5_a16  VARCHAR2 := fnd_api.g_miss_char
2054     , p5_a17  VARCHAR2 := fnd_api.g_miss_char
2055     , p5_a18  NUMBER := 0-1962.0724
2056     , p5_a19  NUMBER := 0-1962.0724
2057     , p5_a20  NUMBER := 0-1962.0724
2058     , p5_a21  NUMBER := 0-1962.0724
2059     , p5_a22  VARCHAR2 := fnd_api.g_miss_char
2060     , p5_a23  VARCHAR2 := fnd_api.g_miss_char
2061     , p5_a24  VARCHAR2 := fnd_api.g_miss_char
2062     , p5_a25  VARCHAR2 := fnd_api.g_miss_char
2063     , p5_a26  VARCHAR2 := fnd_api.g_miss_char
2064     , p5_a27  VARCHAR2 := fnd_api.g_miss_char
2065     , p5_a28  DATE := fnd_api.g_miss_date
2066     , p5_a29  VARCHAR2 := fnd_api.g_miss_char
2067     , p5_a30  DATE := fnd_api.g_miss_date
2068     , p5_a31  DATE := fnd_api.g_miss_date
2069     , p5_a32  DATE := fnd_api.g_miss_date
2070     , p5_a33  VARCHAR2 := fnd_api.g_miss_char
2071     , p5_a34  NUMBER := 0-1962.0724
2072     , p5_a35  VARCHAR2 := fnd_api.g_miss_char
2073     , p5_a36  NUMBER := 0-1962.0724
2074     , p5_a37  VARCHAR2 := fnd_api.g_miss_char
2075     , p5_a38  VARCHAR2 := fnd_api.g_miss_char
2076     , p5_a39  VARCHAR2 := fnd_api.g_miss_char
2077     , p5_a40  VARCHAR2 := fnd_api.g_miss_char
2078     , p5_a41  VARCHAR2 := fnd_api.g_miss_char
2079     , p5_a42  VARCHAR2 := fnd_api.g_miss_char
2080     , p5_a43  VARCHAR2 := fnd_api.g_miss_char
2081     , p5_a44  VARCHAR2 := fnd_api.g_miss_char
2082     , p5_a45  VARCHAR2 := fnd_api.g_miss_char
2083     , p5_a46  VARCHAR2 := fnd_api.g_miss_char
2084     , p5_a47  VARCHAR2 := fnd_api.g_miss_char
2085     , p5_a48  VARCHAR2 := fnd_api.g_miss_char
2086     , p5_a49  VARCHAR2 := fnd_api.g_miss_char
2087     , p5_a50  VARCHAR2 := fnd_api.g_miss_char
2088     , p5_a51  VARCHAR2 := fnd_api.g_miss_char
2089     , p5_a52  VARCHAR2 := fnd_api.g_miss_char
2090     , p5_a53  VARCHAR2 := fnd_api.g_miss_char
2091     , p5_a54  NUMBER := 0-1962.0724
2092     , p5_a55  DATE := fnd_api.g_miss_date
2093     , p5_a56  NUMBER := 0-1962.0724
2094     , p5_a57  DATE := fnd_api.g_miss_date
2095     , p5_a58  VARCHAR2 := fnd_api.g_miss_char
2096     , p5_a59  VARCHAR2 := fnd_api.g_miss_char
2097     , p5_a60  VARCHAR2 := fnd_api.g_miss_char
2098     , p5_a61  NUMBER := 0-1962.0724
2099     , p5_a62  VARCHAR2 := fnd_api.g_miss_char
2100     , p5_a63  VARCHAR2 := fnd_api.g_miss_char
2101     , p5_a64  VARCHAR2 := fnd_api.g_miss_char
2102     , p5_a65  VARCHAR2 := fnd_api.g_miss_char
2103     , p5_a66  VARCHAR2 := fnd_api.g_miss_char
2104     , p5_a67  NUMBER := 0-1962.0724
2105     , p5_a68  NUMBER := 0-1962.0724
2106     , p5_a69  NUMBER := 0-1962.0724
2107     , p5_a70  DATE := fnd_api.g_miss_date
2108     , p5_a71  NUMBER := 0-1962.0724
2109     , p5_a72  DATE := fnd_api.g_miss_date
2110     , p5_a73  NUMBER := 0-1962.0724
2111     , p5_a74  NUMBER := 0-1962.0724
2112     , p5_a75  VARCHAR2 := fnd_api.g_miss_char
2113     , p5_a76  VARCHAR2 := fnd_api.g_miss_char
2114     , p5_a77  NUMBER := 0-1962.0724
2115     , p5_a78  NUMBER := 0-1962.0724
2116     , p5_a79  VARCHAR2 := fnd_api.g_miss_char
2117     , p5_a80  VARCHAR2 := fnd_api.g_miss_char
2118     , p5_a81  NUMBER := 0-1962.0724
2119     , p5_a82  VARCHAR2 := fnd_api.g_miss_char
2120     , p5_a83  NUMBER := 0-1962.0724
2121     , p5_a84  NUMBER := 0-1962.0724
2122     , p5_a85  NUMBER := 0-1962.0724
2123     , p5_a86  NUMBER := 0-1962.0724
2124     , p5_a87  VARCHAR2 := fnd_api.g_miss_char
2125     , p5_a88  NUMBER := 0-1962.0724
2126     , p5_a89  NUMBER := 0-1962.0724
2127     , p6_a0  NUMBER := 0-1962.0724
2128     , p6_a1  NUMBER := 0-1962.0724
2129     , p6_a2  NUMBER := 0-1962.0724
2130     , p6_a3  NUMBER := 0-1962.0724
2131     , p6_a4  VARCHAR2 := fnd_api.g_miss_char
2132     , p6_a5  VARCHAR2 := fnd_api.g_miss_char
2133     , p6_a6  VARCHAR2 := fnd_api.g_miss_char
2134     , p6_a7  NUMBER := 0-1962.0724
2135     , p6_a8  NUMBER := 0-1962.0724
2136     , p6_a9  DATE := fnd_api.g_miss_date
2137     , p6_a10  NUMBER := 0-1962.0724
2138     , p6_a11  NUMBER := 0-1962.0724
2139     , p6_a12  NUMBER := 0-1962.0724
2140     , p6_a13  NUMBER := 0-1962.0724
2141     , p6_a14  NUMBER := 0-1962.0724
2142     , p6_a15  NUMBER := 0-1962.0724
2143     , p6_a16  NUMBER := 0-1962.0724
2144     , p6_a17  NUMBER := 0-1962.0724
2145     , p6_a18  NUMBER := 0-1962.0724
2146     , p6_a19  NUMBER := 0-1962.0724
2147     , p6_a20  DATE := fnd_api.g_miss_date
2148     , p6_a21  DATE := fnd_api.g_miss_date
2149     , p6_a22  NUMBER := 0-1962.0724
2150     , p6_a23  NUMBER := 0-1962.0724
2151     , p6_a24  DATE := fnd_api.g_miss_date
2152     , p6_a25  DATE := fnd_api.g_miss_date
2153     , p6_a26  DATE := fnd_api.g_miss_date
2154     , p6_a27  NUMBER := 0-1962.0724
2155     , p6_a28  NUMBER := 0-1962.0724
2156     , p6_a29  NUMBER := 0-1962.0724
2157     , p6_a30  NUMBER := 0-1962.0724
2158     , p6_a31  NUMBER := 0-1962.0724
2159     , p6_a32  NUMBER := 0-1962.0724
2160     , p6_a33  NUMBER := 0-1962.0724
2161     , p6_a34  DATE := fnd_api.g_miss_date
2162     , p6_a35  VARCHAR2 := fnd_api.g_miss_char
2163     , p6_a36  DATE := fnd_api.g_miss_date
2164     , p6_a37  VARCHAR2 := fnd_api.g_miss_char
2165     , p6_a38  NUMBER := 0-1962.0724
2166     , p6_a39  NUMBER := 0-1962.0724
2167     , p6_a40  NUMBER := 0-1962.0724
2168     , p6_a41  VARCHAR2 := fnd_api.g_miss_char
2169     , p6_a42  DATE := fnd_api.g_miss_date
2170     , p6_a43  NUMBER := 0-1962.0724
2171     , p6_a44  NUMBER := 0-1962.0724
2172     , p6_a45  DATE := fnd_api.g_miss_date
2173     , p6_a46  NUMBER := 0-1962.0724
2174     , p6_a47  DATE := fnd_api.g_miss_date
2175     , p6_a48  DATE := fnd_api.g_miss_date
2176     , p6_a49  DATE := fnd_api.g_miss_date
2177     , p6_a50  NUMBER := 0-1962.0724
2178     , p6_a51  NUMBER := 0-1962.0724
2179     , p6_a52  VARCHAR2 := fnd_api.g_miss_char
2180     , p6_a53  NUMBER := 0-1962.0724
2181     , p6_a54  NUMBER := 0-1962.0724
2182     , p6_a55  VARCHAR2 := fnd_api.g_miss_char
2183     , p6_a56  VARCHAR2 := fnd_api.g_miss_char
2184     , p6_a57  NUMBER := 0-1962.0724
2185     , p6_a58  DATE := fnd_api.g_miss_date
2186     , p6_a59  NUMBER := 0-1962.0724
2187     , p6_a60  VARCHAR2 := fnd_api.g_miss_char
2188     , p6_a61  VARCHAR2 := fnd_api.g_miss_char
2189     , p6_a62  VARCHAR2 := fnd_api.g_miss_char
2190     , p6_a63  VARCHAR2 := fnd_api.g_miss_char
2191     , p6_a64  VARCHAR2 := fnd_api.g_miss_char
2192     , p6_a65  VARCHAR2 := fnd_api.g_miss_char
2193     , p6_a66  VARCHAR2 := fnd_api.g_miss_char
2194     , p6_a67  VARCHAR2 := fnd_api.g_miss_char
2195     , p6_a68  VARCHAR2 := fnd_api.g_miss_char
2196     , p6_a69  VARCHAR2 := fnd_api.g_miss_char
2197     , p6_a70  VARCHAR2 := fnd_api.g_miss_char
2198     , p6_a71  VARCHAR2 := fnd_api.g_miss_char
2199     , p6_a72  VARCHAR2 := fnd_api.g_miss_char
2200     , p6_a73  VARCHAR2 := fnd_api.g_miss_char
2201     , p6_a74  VARCHAR2 := fnd_api.g_miss_char
2202     , p6_a75  VARCHAR2 := fnd_api.g_miss_char
2203     , p6_a76  NUMBER := 0-1962.0724
2204     , p6_a77  NUMBER := 0-1962.0724
2205     , p6_a78  NUMBER := 0-1962.0724
2206     , p6_a79  DATE := fnd_api.g_miss_date
2207     , p6_a80  NUMBER := 0-1962.0724
2208     , p6_a81  DATE := fnd_api.g_miss_date
2209     , p6_a82  NUMBER := 0-1962.0724
2210     , p6_a83  DATE := fnd_api.g_miss_date
2211     , p6_a84  DATE := fnd_api.g_miss_date
2212     , p6_a85  DATE := fnd_api.g_miss_date
2213     , p6_a86  DATE := fnd_api.g_miss_date
2214     , p6_a87  NUMBER := 0-1962.0724
2215     , p6_a88  NUMBER := 0-1962.0724
2216     , p6_a89  NUMBER := 0-1962.0724
2217     , p6_a90  VARCHAR2 := fnd_api.g_miss_char
2218     , p6_a91  NUMBER := 0-1962.0724
2219     , p6_a92  VARCHAR2 := fnd_api.g_miss_char
2220     , p6_a93  NUMBER := 0-1962.0724
2221     , p6_a94  NUMBER := 0-1962.0724
2222     , p6_a95  DATE := fnd_api.g_miss_date
2223     , p6_a96  VARCHAR2 := fnd_api.g_miss_char
2224     , p6_a97  VARCHAR2 := fnd_api.g_miss_char
2225     , p6_a98  NUMBER := 0-1962.0724
2226     , p7_a0  NUMBER := 0-1962.0724
2227     , p7_a1  NUMBER := 0-1962.0724
2228     , p7_a2  NUMBER := 0-1962.0724
2229     , p7_a3  NUMBER := 0-1962.0724
2230     , p7_a4  NUMBER := 0-1962.0724
2231     , p7_a5  NUMBER := 0-1962.0724
2232     , p7_a6  VARCHAR2 := fnd_api.g_miss_char
2233     , p7_a7  VARCHAR2 := fnd_api.g_miss_char
2234     , p7_a8  VARCHAR2 := fnd_api.g_miss_char
2235     , p7_a9  VARCHAR2 := fnd_api.g_miss_char
2236     , p7_a10  VARCHAR2 := fnd_api.g_miss_char
2237     , p7_a11  NUMBER := 0-1962.0724
2238     , p7_a12  VARCHAR2 := fnd_api.g_miss_char
2239     , p7_a13  NUMBER := 0-1962.0724
2240     , p7_a14  VARCHAR2 := fnd_api.g_miss_char
2241     , p7_a15  NUMBER := 0-1962.0724
2242     , p7_a16  DATE := fnd_api.g_miss_date
2243     , p7_a17  NUMBER := 0-1962.0724
2244     , p7_a18  DATE := fnd_api.g_miss_date
2245     , p7_a19  NUMBER := 0-1962.0724
2246   )
2247 
2248   as
2249     ddp_clev_rec okl_contract_line_item_pub.clev_rec_type;
2250     ddp_klev_rec okl_contract_line_item_pub.klev_rec_type;
2251     ddp_cimv_rec okl_contract_line_item_pub.cimv_rec_type;
2252     ddindx binary_integer; indx binary_integer;
2253   begin
2254 
2255     -- copy data to the local IN or IN-OUT args, if any
2256 
2257 
2258 
2259 
2260 
2261     ddp_clev_rec.id := rosetta_g_miss_num_map(p5_a0);
2262     ddp_clev_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2263     ddp_clev_rec.sfwt_flag := p5_a2;
2264     ddp_clev_rec.chr_id := rosetta_g_miss_num_map(p5_a3);
2265     ddp_clev_rec.cle_id := rosetta_g_miss_num_map(p5_a4);
2266     ddp_clev_rec.cle_id_renewed := rosetta_g_miss_num_map(p5_a5);
2267     ddp_clev_rec.cle_id_renewed_to := rosetta_g_miss_num_map(p5_a6);
2268     ddp_clev_rec.lse_id := rosetta_g_miss_num_map(p5_a7);
2269     ddp_clev_rec.line_number := p5_a8;
2270     ddp_clev_rec.sts_code := p5_a9;
2271     ddp_clev_rec.display_sequence := rosetta_g_miss_num_map(p5_a10);
2272     ddp_clev_rec.trn_code := p5_a11;
2273     ddp_clev_rec.dnz_chr_id := rosetta_g_miss_num_map(p5_a12);
2274     ddp_clev_rec.comments := p5_a13;
2275     ddp_clev_rec.item_description := p5_a14;
2276     ddp_clev_rec.oke_boe_description := p5_a15;
2277     ddp_clev_rec.cognomen := p5_a16;
2278     ddp_clev_rec.hidden_ind := p5_a17;
2279     ddp_clev_rec.price_unit := rosetta_g_miss_num_map(p5_a18);
2280     ddp_clev_rec.price_unit_percent := rosetta_g_miss_num_map(p5_a19);
2281     ddp_clev_rec.price_negotiated := rosetta_g_miss_num_map(p5_a20);
2282     ddp_clev_rec.price_negotiated_renewed := rosetta_g_miss_num_map(p5_a21);
2283     ddp_clev_rec.price_level_ind := p5_a22;
2284     ddp_clev_rec.invoice_line_level_ind := p5_a23;
2285     ddp_clev_rec.dpas_rating := p5_a24;
2286     ddp_clev_rec.block23text := p5_a25;
2287     ddp_clev_rec.exception_yn := p5_a26;
2288     ddp_clev_rec.template_used := p5_a27;
2289     ddp_clev_rec.date_terminated := rosetta_g_miss_date_in_map(p5_a28);
2290     ddp_clev_rec.name := p5_a29;
2291     ddp_clev_rec.start_date := rosetta_g_miss_date_in_map(p5_a30);
2292     ddp_clev_rec.end_date := rosetta_g_miss_date_in_map(p5_a31);
2293     ddp_clev_rec.date_renewed := rosetta_g_miss_date_in_map(p5_a32);
2294     ddp_clev_rec.upg_orig_system_ref := p5_a33;
2295     ddp_clev_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p5_a34);
2296     ddp_clev_rec.orig_system_source_code := p5_a35;
2297     ddp_clev_rec.orig_system_id1 := rosetta_g_miss_num_map(p5_a36);
2298     ddp_clev_rec.orig_system_reference1 := p5_a37;
2299     ddp_clev_rec.attribute_category := p5_a38;
2300     ddp_clev_rec.attribute1 := p5_a39;
2301     ddp_clev_rec.attribute2 := p5_a40;
2302     ddp_clev_rec.attribute3 := p5_a41;
2303     ddp_clev_rec.attribute4 := p5_a42;
2304     ddp_clev_rec.attribute5 := p5_a43;
2305     ddp_clev_rec.attribute6 := p5_a44;
2306     ddp_clev_rec.attribute7 := p5_a45;
2307     ddp_clev_rec.attribute8 := p5_a46;
2308     ddp_clev_rec.attribute9 := p5_a47;
2309     ddp_clev_rec.attribute10 := p5_a48;
2310     ddp_clev_rec.attribute11 := p5_a49;
2311     ddp_clev_rec.attribute12 := p5_a50;
2312     ddp_clev_rec.attribute13 := p5_a51;
2313     ddp_clev_rec.attribute14 := p5_a52;
2314     ddp_clev_rec.attribute15 := p5_a53;
2315     ddp_clev_rec.created_by := rosetta_g_miss_num_map(p5_a54);
2316     ddp_clev_rec.creation_date := rosetta_g_miss_date_in_map(p5_a55);
2317     ddp_clev_rec.last_updated_by := rosetta_g_miss_num_map(p5_a56);
2318     ddp_clev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a57);
2319     ddp_clev_rec.price_type := p5_a58;
2320     ddp_clev_rec.currency_code := p5_a59;
2321     ddp_clev_rec.currency_code_renewed := p5_a60;
2322     ddp_clev_rec.last_update_login := rosetta_g_miss_num_map(p5_a61);
2323     ddp_clev_rec.old_sts_code := p5_a62;
2324     ddp_clev_rec.new_sts_code := p5_a63;
2325     ddp_clev_rec.old_ste_code := p5_a64;
2326     ddp_clev_rec.new_ste_code := p5_a65;
2327     ddp_clev_rec.call_action_asmblr := p5_a66;
2328     ddp_clev_rec.request_id := rosetta_g_miss_num_map(p5_a67);
2329     ddp_clev_rec.program_application_id := rosetta_g_miss_num_map(p5_a68);
2330     ddp_clev_rec.program_id := rosetta_g_miss_num_map(p5_a69);
2331     ddp_clev_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a70);
2332     ddp_clev_rec.price_list_id := rosetta_g_miss_num_map(p5_a71);
2333     ddp_clev_rec.pricing_date := rosetta_g_miss_date_in_map(p5_a72);
2334     ddp_clev_rec.price_list_line_id := rosetta_g_miss_num_map(p5_a73);
2335     ddp_clev_rec.line_list_price := rosetta_g_miss_num_map(p5_a74);
2336     ddp_clev_rec.item_to_price_yn := p5_a75;
2337     ddp_clev_rec.price_basis_yn := p5_a76;
2338     ddp_clev_rec.config_header_id := rosetta_g_miss_num_map(p5_a77);
2339     ddp_clev_rec.config_revision_number := rosetta_g_miss_num_map(p5_a78);
2340     ddp_clev_rec.config_complete_yn := p5_a79;
2341     ddp_clev_rec.config_valid_yn := p5_a80;
2342     ddp_clev_rec.config_top_model_line_id := rosetta_g_miss_num_map(p5_a81);
2343     ddp_clev_rec.config_item_type := p5_a82;
2344     ddp_clev_rec.config_item_id := rosetta_g_miss_num_map(p5_a83);
2345     ddp_clev_rec.cust_acct_id := rosetta_g_miss_num_map(p5_a84);
2346     ddp_clev_rec.bill_to_site_use_id := rosetta_g_miss_num_map(p5_a85);
2347     ddp_clev_rec.inv_rule_id := rosetta_g_miss_num_map(p5_a86);
2348     ddp_clev_rec.line_renewal_type_code := p5_a87;
2349     ddp_clev_rec.ship_to_site_use_id := rosetta_g_miss_num_map(p5_a88);
2350     ddp_clev_rec.payment_term_id := rosetta_g_miss_num_map(p5_a89);
2351 
2352     ddp_klev_rec.id := rosetta_g_miss_num_map(p6_a0);
2353     ddp_klev_rec.object_version_number := rosetta_g_miss_num_map(p6_a1);
2354     ddp_klev_rec.kle_id := rosetta_g_miss_num_map(p6_a2);
2355     ddp_klev_rec.sty_id := rosetta_g_miss_num_map(p6_a3);
2356     ddp_klev_rec.prc_code := p6_a4;
2357     ddp_klev_rec.fcg_code := p6_a5;
2358     ddp_klev_rec.nty_code := p6_a6;
2359     ddp_klev_rec.estimated_oec := rosetta_g_miss_num_map(p6_a7);
2360     ddp_klev_rec.lao_amount := rosetta_g_miss_num_map(p6_a8);
2361     ddp_klev_rec.title_date := rosetta_g_miss_date_in_map(p6_a9);
2362     ddp_klev_rec.fee_charge := rosetta_g_miss_num_map(p6_a10);
2363     ddp_klev_rec.lrs_percent := rosetta_g_miss_num_map(p6_a11);
2364     ddp_klev_rec.initial_direct_cost := rosetta_g_miss_num_map(p6_a12);
2365     ddp_klev_rec.percent_stake := rosetta_g_miss_num_map(p6_a13);
2366     ddp_klev_rec.percent := rosetta_g_miss_num_map(p6_a14);
2367     ddp_klev_rec.evergreen_percent := rosetta_g_miss_num_map(p6_a15);
2368     ddp_klev_rec.amount_stake := rosetta_g_miss_num_map(p6_a16);
2369     ddp_klev_rec.occupancy := rosetta_g_miss_num_map(p6_a17);
2370     ddp_klev_rec.coverage := rosetta_g_miss_num_map(p6_a18);
2371     ddp_klev_rec.residual_percentage := rosetta_g_miss_num_map(p6_a19);
2372     ddp_klev_rec.date_last_inspection := rosetta_g_miss_date_in_map(p6_a20);
2373     ddp_klev_rec.date_sold := rosetta_g_miss_date_in_map(p6_a21);
2374     ddp_klev_rec.lrv_amount := rosetta_g_miss_num_map(p6_a22);
2375     ddp_klev_rec.capital_reduction := rosetta_g_miss_num_map(p6_a23);
2376     ddp_klev_rec.date_next_inspection_due := rosetta_g_miss_date_in_map(p6_a24);
2377     ddp_klev_rec.date_residual_last_review := rosetta_g_miss_date_in_map(p6_a25);
2378     ddp_klev_rec.date_last_reamortisation := rosetta_g_miss_date_in_map(p6_a26);
2379     ddp_klev_rec.vendor_advance_paid := rosetta_g_miss_num_map(p6_a27);
2380     ddp_klev_rec.weighted_average_life := rosetta_g_miss_num_map(p6_a28);
2381     ddp_klev_rec.tradein_amount := rosetta_g_miss_num_map(p6_a29);
2382     ddp_klev_rec.bond_equivalent_yield := rosetta_g_miss_num_map(p6_a30);
2383     ddp_klev_rec.termination_purchase_amount := rosetta_g_miss_num_map(p6_a31);
2384     ddp_klev_rec.refinance_amount := rosetta_g_miss_num_map(p6_a32);
2385     ddp_klev_rec.year_built := rosetta_g_miss_num_map(p6_a33);
2386     ddp_klev_rec.delivered_date := rosetta_g_miss_date_in_map(p6_a34);
2387     ddp_klev_rec.credit_tenant_yn := p6_a35;
2388     ddp_klev_rec.date_last_cleanup := rosetta_g_miss_date_in_map(p6_a36);
2389     ddp_klev_rec.year_of_manufacture := p6_a37;
2390     ddp_klev_rec.coverage_ratio := rosetta_g_miss_num_map(p6_a38);
2391     ddp_klev_rec.remarketed_amount := rosetta_g_miss_num_map(p6_a39);
2392     ddp_klev_rec.gross_square_footage := rosetta_g_miss_num_map(p6_a40);
2393     ddp_klev_rec.prescribed_asset_yn := p6_a41;
2394     ddp_klev_rec.date_remarketed := rosetta_g_miss_date_in_map(p6_a42);
2395     ddp_klev_rec.net_rentable := rosetta_g_miss_num_map(p6_a43);
2396     ddp_klev_rec.remarket_margin := rosetta_g_miss_num_map(p6_a44);
2397     ddp_klev_rec.date_letter_acceptance := rosetta_g_miss_date_in_map(p6_a45);
2398     ddp_klev_rec.repurchased_amount := rosetta_g_miss_num_map(p6_a46);
2399     ddp_klev_rec.date_commitment_expiration := rosetta_g_miss_date_in_map(p6_a47);
2400     ddp_klev_rec.date_repurchased := rosetta_g_miss_date_in_map(p6_a48);
2401     ddp_klev_rec.date_appraisal := rosetta_g_miss_date_in_map(p6_a49);
2402     ddp_klev_rec.residual_value := rosetta_g_miss_num_map(p6_a50);
2403     ddp_klev_rec.appraisal_value := rosetta_g_miss_num_map(p6_a51);
2404     ddp_klev_rec.secured_deal_yn := p6_a52;
2405     ddp_klev_rec.gain_loss := rosetta_g_miss_num_map(p6_a53);
2406     ddp_klev_rec.floor_amount := rosetta_g_miss_num_map(p6_a54);
2407     ddp_klev_rec.re_lease_yn := p6_a55;
2408     ddp_klev_rec.previous_contract := p6_a56;
2409     ddp_klev_rec.tracked_residual := rosetta_g_miss_num_map(p6_a57);
2410     ddp_klev_rec.date_title_received := rosetta_g_miss_date_in_map(p6_a58);
2411     ddp_klev_rec.amount := rosetta_g_miss_num_map(p6_a59);
2412     ddp_klev_rec.attribute_category := p6_a60;
2413     ddp_klev_rec.attribute1 := p6_a61;
2414     ddp_klev_rec.attribute2 := p6_a62;
2415     ddp_klev_rec.attribute3 := p6_a63;
2416     ddp_klev_rec.attribute4 := p6_a64;
2417     ddp_klev_rec.attribute5 := p6_a65;
2418     ddp_klev_rec.attribute6 := p6_a66;
2419     ddp_klev_rec.attribute7 := p6_a67;
2420     ddp_klev_rec.attribute8 := p6_a68;
2421     ddp_klev_rec.attribute9 := p6_a69;
2422     ddp_klev_rec.attribute10 := p6_a70;
2423     ddp_klev_rec.attribute11 := p6_a71;
2424     ddp_klev_rec.attribute12 := p6_a72;
2425     ddp_klev_rec.attribute13 := p6_a73;
2426     ddp_klev_rec.attribute14 := p6_a74;
2427     ddp_klev_rec.attribute15 := p6_a75;
2428     ddp_klev_rec.sty_id_for := rosetta_g_miss_num_map(p6_a76);
2429     ddp_klev_rec.clg_id := rosetta_g_miss_num_map(p6_a77);
2430     ddp_klev_rec.created_by := rosetta_g_miss_num_map(p6_a78);
2431     ddp_klev_rec.creation_date := rosetta_g_miss_date_in_map(p6_a79);
2432     ddp_klev_rec.last_updated_by := rosetta_g_miss_num_map(p6_a80);
2433     ddp_klev_rec.last_update_date := rosetta_g_miss_date_in_map(p6_a81);
2434     ddp_klev_rec.last_update_login := rosetta_g_miss_num_map(p6_a82);
2435     ddp_klev_rec.date_funding := rosetta_g_miss_date_in_map(p6_a83);
2436     ddp_klev_rec.date_funding_required := rosetta_g_miss_date_in_map(p6_a84);
2437     ddp_klev_rec.date_accepted := rosetta_g_miss_date_in_map(p6_a85);
2438     ddp_klev_rec.date_delivery_expected := rosetta_g_miss_date_in_map(p6_a86);
2439     ddp_klev_rec.oec := rosetta_g_miss_num_map(p6_a87);
2440     ddp_klev_rec.capital_amount := rosetta_g_miss_num_map(p6_a88);
2441     ddp_klev_rec.residual_grnty_amount := rosetta_g_miss_num_map(p6_a89);
2442     ddp_klev_rec.residual_code := p6_a90;
2443     ddp_klev_rec.rvi_premium := rosetta_g_miss_num_map(p6_a91);
2444     ddp_klev_rec.credit_nature := p6_a92;
2445     ddp_klev_rec.capitalized_interest := rosetta_g_miss_num_map(p6_a93);
2446     ddp_klev_rec.capital_reduction_percent := rosetta_g_miss_num_map(p6_a94);
2447     ddp_klev_rec.date_pay_investor_start := rosetta_g_miss_date_in_map(p6_a95);
2448     ddp_klev_rec.pay_investor_frequency := p6_a96;
2449     ddp_klev_rec.pay_investor_event := p6_a97;
2450     ddp_klev_rec.pay_investor_remittance_days := rosetta_g_miss_num_map(p6_a98);
2451 
2452     ddp_cimv_rec.id := rosetta_g_miss_num_map(p7_a0);
2453     ddp_cimv_rec.object_version_number := rosetta_g_miss_num_map(p7_a1);
2454     ddp_cimv_rec.cle_id := rosetta_g_miss_num_map(p7_a2);
2455     ddp_cimv_rec.chr_id := rosetta_g_miss_num_map(p7_a3);
2456     ddp_cimv_rec.cle_id_for := rosetta_g_miss_num_map(p7_a4);
2457     ddp_cimv_rec.dnz_chr_id := rosetta_g_miss_num_map(p7_a5);
2458     ddp_cimv_rec.object1_id1 := p7_a6;
2459     ddp_cimv_rec.object1_id2 := p7_a7;
2460     ddp_cimv_rec.jtot_object1_code := p7_a8;
2461     ddp_cimv_rec.uom_code := p7_a9;
2462     ddp_cimv_rec.exception_yn := p7_a10;
2463     ddp_cimv_rec.number_of_items := rosetta_g_miss_num_map(p7_a11);
2464     ddp_cimv_rec.upg_orig_system_ref := p7_a12;
2465     ddp_cimv_rec.upg_orig_system_ref_id := rosetta_g_miss_num_map(p7_a13);
2466     ddp_cimv_rec.priced_item_yn := p7_a14;
2467     ddp_cimv_rec.created_by := rosetta_g_miss_num_map(p7_a15);
2468     ddp_cimv_rec.creation_date := rosetta_g_miss_date_in_map(p7_a16);
2469     ddp_cimv_rec.last_updated_by := rosetta_g_miss_num_map(p7_a17);
2470     ddp_cimv_rec.last_update_date := rosetta_g_miss_date_in_map(p7_a18);
2471     ddp_cimv_rec.last_update_login := rosetta_g_miss_num_map(p7_a19);
2472 
2473     -- here's the delegated call to the old PL/SQL routine
2474     okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
2475       p_init_msg_list,
2476       x_return_status,
2477       x_msg_count,
2478       x_msg_data,
2479       ddp_clev_rec,
2480       ddp_klev_rec,
2481       ddp_cimv_rec);
2482 
2483     -- copy data back from the local variables to OUT or IN-OUT args, if any
2484 
2485 
2486 
2487 
2488 
2489 
2490 
2491   end;
2492 
2493   procedure create_contract_line_item(p_api_version  NUMBER
2494     , p_init_msg_list  VARCHAR2
2495     , x_return_status out nocopy  VARCHAR2
2496     , x_msg_count out nocopy  NUMBER
2497     , x_msg_data out nocopy  VARCHAR2
2498     , p5_a0 JTF_NUMBER_TABLE
2499     , p5_a1 JTF_NUMBER_TABLE
2500     , p5_a2 JTF_VARCHAR2_TABLE_100
2501     , p5_a3 JTF_NUMBER_TABLE
2502     , p5_a4 JTF_NUMBER_TABLE
2503     , p5_a5 JTF_NUMBER_TABLE
2504     , p5_a6 JTF_NUMBER_TABLE
2505     , p5_a7 JTF_NUMBER_TABLE
2506     , p5_a8 JTF_VARCHAR2_TABLE_200
2507     , p5_a9 JTF_VARCHAR2_TABLE_100
2508     , p5_a10 JTF_NUMBER_TABLE
2509     , p5_a11 JTF_VARCHAR2_TABLE_100
2510     , p5_a12 JTF_NUMBER_TABLE
2511     , p5_a13 JTF_VARCHAR2_TABLE_2000
2512     , p5_a14 JTF_VARCHAR2_TABLE_2000
2513     , p5_a15 JTF_VARCHAR2_TABLE_2000
2514     , p5_a16 JTF_VARCHAR2_TABLE_300
2515     , p5_a17 JTF_VARCHAR2_TABLE_100
2516     , p5_a18 JTF_NUMBER_TABLE
2517     , p5_a19 JTF_NUMBER_TABLE
2518     , p5_a20 JTF_NUMBER_TABLE
2519     , p5_a21 JTF_NUMBER_TABLE
2520     , p5_a22 JTF_VARCHAR2_TABLE_100
2521     , p5_a23 JTF_VARCHAR2_TABLE_100
2522     , p5_a24 JTF_VARCHAR2_TABLE_100
2523     , p5_a25 JTF_VARCHAR2_TABLE_2000
2524     , p5_a26 JTF_VARCHAR2_TABLE_100
2525     , p5_a27 JTF_VARCHAR2_TABLE_200
2526     , p5_a28 JTF_DATE_TABLE
2527     , p5_a29 JTF_VARCHAR2_TABLE_200
2528     , p5_a30 JTF_DATE_TABLE
2529     , p5_a31 JTF_DATE_TABLE
2530     , p5_a32 JTF_DATE_TABLE
2531     , p5_a33 JTF_VARCHAR2_TABLE_100
2532     , p5_a34 JTF_NUMBER_TABLE
2533     , p5_a35 JTF_VARCHAR2_TABLE_100
2534     , p5_a36 JTF_NUMBER_TABLE
2535     , p5_a37 JTF_VARCHAR2_TABLE_100
2536     , p5_a38 JTF_VARCHAR2_TABLE_100
2537     , p5_a39 JTF_VARCHAR2_TABLE_500
2538     , p5_a40 JTF_VARCHAR2_TABLE_500
2539     , p5_a41 JTF_VARCHAR2_TABLE_500
2540     , p5_a42 JTF_VARCHAR2_TABLE_500
2541     , p5_a43 JTF_VARCHAR2_TABLE_500
2542     , p5_a44 JTF_VARCHAR2_TABLE_500
2543     , p5_a45 JTF_VARCHAR2_TABLE_500
2544     , p5_a46 JTF_VARCHAR2_TABLE_500
2545     , p5_a47 JTF_VARCHAR2_TABLE_500
2546     , p5_a48 JTF_VARCHAR2_TABLE_500
2547     , p5_a49 JTF_VARCHAR2_TABLE_500
2548     , p5_a50 JTF_VARCHAR2_TABLE_500
2549     , p5_a51 JTF_VARCHAR2_TABLE_500
2550     , p5_a52 JTF_VARCHAR2_TABLE_500
2551     , p5_a53 JTF_VARCHAR2_TABLE_500
2552     , p5_a54 JTF_NUMBER_TABLE
2553     , p5_a55 JTF_DATE_TABLE
2554     , p5_a56 JTF_NUMBER_TABLE
2555     , p5_a57 JTF_DATE_TABLE
2556     , p5_a58 JTF_VARCHAR2_TABLE_100
2557     , p5_a59 JTF_VARCHAR2_TABLE_100
2558     , p5_a60 JTF_VARCHAR2_TABLE_100
2559     , p5_a61 JTF_NUMBER_TABLE
2560     , p5_a62 JTF_VARCHAR2_TABLE_100
2561     , p5_a63 JTF_VARCHAR2_TABLE_100
2562     , p5_a64 JTF_VARCHAR2_TABLE_100
2563     , p5_a65 JTF_VARCHAR2_TABLE_100
2564     , p5_a66 JTF_VARCHAR2_TABLE_100
2565     , p5_a67 JTF_NUMBER_TABLE
2566     , p5_a68 JTF_NUMBER_TABLE
2567     , p5_a69 JTF_NUMBER_TABLE
2568     , p5_a70 JTF_DATE_TABLE
2569     , p5_a71 JTF_NUMBER_TABLE
2570     , p5_a72 JTF_DATE_TABLE
2571     , p5_a73 JTF_NUMBER_TABLE
2572     , p5_a74 JTF_NUMBER_TABLE
2573     , p5_a75 JTF_VARCHAR2_TABLE_100
2574     , p5_a76 JTF_VARCHAR2_TABLE_100
2575     , p5_a77 JTF_NUMBER_TABLE
2576     , p5_a78 JTF_NUMBER_TABLE
2577     , p5_a79 JTF_VARCHAR2_TABLE_100
2578     , p5_a80 JTF_VARCHAR2_TABLE_100
2579     , p5_a81 JTF_NUMBER_TABLE
2580     , p5_a82 JTF_VARCHAR2_TABLE_100
2581     , p5_a83 JTF_NUMBER_TABLE
2582     , p5_a84 JTF_NUMBER_TABLE
2583     , p5_a85 JTF_NUMBER_TABLE
2584     , p5_a86 JTF_NUMBER_TABLE
2585     , p5_a87 JTF_VARCHAR2_TABLE_100
2586     , p5_a88 JTF_NUMBER_TABLE
2587     , p5_a89 JTF_NUMBER_TABLE
2588     , p6_a0 JTF_NUMBER_TABLE
2589     , p6_a1 JTF_NUMBER_TABLE
2590     , p6_a2 JTF_NUMBER_TABLE
2591     , p6_a3 JTF_NUMBER_TABLE
2592     , p6_a4 JTF_VARCHAR2_TABLE_100
2593     , p6_a5 JTF_VARCHAR2_TABLE_100
2594     , p6_a6 JTF_VARCHAR2_TABLE_100
2595     , p6_a7 JTF_NUMBER_TABLE
2596     , p6_a8 JTF_NUMBER_TABLE
2597     , p6_a9 JTF_DATE_TABLE
2598     , p6_a10 JTF_NUMBER_TABLE
2599     , p6_a11 JTF_NUMBER_TABLE
2600     , p6_a12 JTF_NUMBER_TABLE
2601     , p6_a13 JTF_NUMBER_TABLE
2602     , p6_a14 JTF_NUMBER_TABLE
2603     , p6_a15 JTF_NUMBER_TABLE
2604     , p6_a16 JTF_NUMBER_TABLE
2605     , p6_a17 JTF_NUMBER_TABLE
2606     , p6_a18 JTF_NUMBER_TABLE
2607     , p6_a19 JTF_NUMBER_TABLE
2608     , p6_a20 JTF_DATE_TABLE
2609     , p6_a21 JTF_DATE_TABLE
2610     , p6_a22 JTF_NUMBER_TABLE
2611     , p6_a23 JTF_NUMBER_TABLE
2612     , p6_a24 JTF_DATE_TABLE
2613     , p6_a25 JTF_DATE_TABLE
2614     , p6_a26 JTF_DATE_TABLE
2615     , p6_a27 JTF_NUMBER_TABLE
2616     , p6_a28 JTF_NUMBER_TABLE
2617     , p6_a29 JTF_NUMBER_TABLE
2618     , p6_a30 JTF_NUMBER_TABLE
2619     , p6_a31 JTF_NUMBER_TABLE
2620     , p6_a32 JTF_NUMBER_TABLE
2621     , p6_a33 JTF_NUMBER_TABLE
2622     , p6_a34 JTF_DATE_TABLE
2623     , p6_a35 JTF_VARCHAR2_TABLE_100
2624     , p6_a36 JTF_DATE_TABLE
2625     , p6_a37 JTF_VARCHAR2_TABLE_300
2626     , p6_a38 JTF_NUMBER_TABLE
2627     , p6_a39 JTF_NUMBER_TABLE
2628     , p6_a40 JTF_NUMBER_TABLE
2629     , p6_a41 JTF_VARCHAR2_TABLE_100
2630     , p6_a42 JTF_DATE_TABLE
2631     , p6_a43 JTF_NUMBER_TABLE
2632     , p6_a44 JTF_NUMBER_TABLE
2633     , p6_a45 JTF_DATE_TABLE
2634     , p6_a46 JTF_NUMBER_TABLE
2635     , p6_a47 JTF_DATE_TABLE
2636     , p6_a48 JTF_DATE_TABLE
2637     , p6_a49 JTF_DATE_TABLE
2638     , p6_a50 JTF_NUMBER_TABLE
2639     , p6_a51 JTF_NUMBER_TABLE
2640     , p6_a52 JTF_VARCHAR2_TABLE_100
2641     , p6_a53 JTF_NUMBER_TABLE
2642     , p6_a54 JTF_NUMBER_TABLE
2643     , p6_a55 JTF_VARCHAR2_TABLE_100
2644     , p6_a56 JTF_VARCHAR2_TABLE_100
2645     , p6_a57 JTF_NUMBER_TABLE
2646     , p6_a58 JTF_DATE_TABLE
2647     , p6_a59 JTF_NUMBER_TABLE
2648     , p6_a60 JTF_VARCHAR2_TABLE_100
2649     , p6_a61 JTF_VARCHAR2_TABLE_500
2650     , p6_a62 JTF_VARCHAR2_TABLE_500
2651     , p6_a63 JTF_VARCHAR2_TABLE_500
2652     , p6_a64 JTF_VARCHAR2_TABLE_500
2653     , p6_a65 JTF_VARCHAR2_TABLE_500
2654     , p6_a66 JTF_VARCHAR2_TABLE_500
2655     , p6_a67 JTF_VARCHAR2_TABLE_500
2656     , p6_a68 JTF_VARCHAR2_TABLE_500
2657     , p6_a69 JTF_VARCHAR2_TABLE_500
2658     , p6_a70 JTF_VARCHAR2_TABLE_500
2659     , p6_a71 JTF_VARCHAR2_TABLE_500
2660     , p6_a72 JTF_VARCHAR2_TABLE_500
2661     , p6_a73 JTF_VARCHAR2_TABLE_500
2662     , p6_a74 JTF_VARCHAR2_TABLE_500
2663     , p6_a75 JTF_VARCHAR2_TABLE_500
2664     , p6_a76 JTF_NUMBER_TABLE
2665     , p6_a77 JTF_NUMBER_TABLE
2666     , p6_a78 JTF_NUMBER_TABLE
2667     , p6_a79 JTF_DATE_TABLE
2668     , p6_a80 JTF_NUMBER_TABLE
2669     , p6_a81 JTF_DATE_TABLE
2670     , p6_a82 JTF_NUMBER_TABLE
2671     , p6_a83 JTF_DATE_TABLE
2672     , p6_a84 JTF_DATE_TABLE
2673     , p6_a85 JTF_DATE_TABLE
2674     , p6_a86 JTF_DATE_TABLE
2675     , p6_a87 JTF_NUMBER_TABLE
2676     , p6_a88 JTF_NUMBER_TABLE
2677     , p6_a89 JTF_NUMBER_TABLE
2678     , p6_a90 JTF_VARCHAR2_TABLE_100
2679     , p6_a91 JTF_NUMBER_TABLE
2680     , p6_a92 JTF_VARCHAR2_TABLE_100
2681     , p6_a93 JTF_NUMBER_TABLE
2682     , p6_a94 JTF_NUMBER_TABLE
2683     , p6_a95 JTF_DATE_TABLE
2684     , p6_a96 JTF_VARCHAR2_TABLE_100
2685     , p6_a97 JTF_VARCHAR2_TABLE_100
2686     , p6_a98 JTF_NUMBER_TABLE
2687     , p7_a0 JTF_NUMBER_TABLE
2688     , p7_a1 JTF_NUMBER_TABLE
2689     , p7_a2 JTF_NUMBER_TABLE
2690     , p7_a3 JTF_NUMBER_TABLE
2691     , p7_a4 JTF_NUMBER_TABLE
2692     , p7_a5 JTF_NUMBER_TABLE
2693     , p7_a6 JTF_VARCHAR2_TABLE_100
2694     , p7_a7 JTF_VARCHAR2_TABLE_200
2695     , p7_a8 JTF_VARCHAR2_TABLE_100
2696     , p7_a9 JTF_VARCHAR2_TABLE_100
2697     , p7_a10 JTF_VARCHAR2_TABLE_100
2698     , p7_a11 JTF_NUMBER_TABLE
2699     , p7_a12 JTF_VARCHAR2_TABLE_100
2700     , p7_a13 JTF_NUMBER_TABLE
2701     , p7_a14 JTF_VARCHAR2_TABLE_100
2702     , p7_a15 JTF_NUMBER_TABLE
2703     , p7_a16 JTF_DATE_TABLE
2704     , p7_a17 JTF_NUMBER_TABLE
2705     , p7_a18 JTF_DATE_TABLE
2706     , p7_a19 JTF_NUMBER_TABLE
2707     , p8_a0 out nocopy JTF_NUMBER_TABLE
2708     , p8_a1 out nocopy JTF_NUMBER_TABLE
2709     , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
2710     , p8_a3 out nocopy JTF_NUMBER_TABLE
2711     , p8_a4 out nocopy JTF_NUMBER_TABLE
2712     , p8_a5 out nocopy JTF_NUMBER_TABLE
2713     , p8_a6 out nocopy JTF_NUMBER_TABLE
2714     , p8_a7 out nocopy JTF_NUMBER_TABLE
2715     , p8_a8 out nocopy JTF_VARCHAR2_TABLE_200
2716     , p8_a9 out nocopy JTF_VARCHAR2_TABLE_100
2717     , p8_a10 out nocopy JTF_NUMBER_TABLE
2718     , p8_a11 out nocopy JTF_VARCHAR2_TABLE_100
2719     , p8_a12 out nocopy JTF_NUMBER_TABLE
2720     , p8_a13 out nocopy JTF_VARCHAR2_TABLE_2000
2721     , p8_a14 out nocopy JTF_VARCHAR2_TABLE_2000
2722     , p8_a15 out nocopy JTF_VARCHAR2_TABLE_2000
2723     , p8_a16 out nocopy JTF_VARCHAR2_TABLE_300
2724     , p8_a17 out nocopy JTF_VARCHAR2_TABLE_100
2725     , p8_a18 out nocopy JTF_NUMBER_TABLE
2726     , p8_a19 out nocopy JTF_NUMBER_TABLE
2727     , p8_a20 out nocopy JTF_NUMBER_TABLE
2728     , p8_a21 out nocopy JTF_NUMBER_TABLE
2729     , p8_a22 out nocopy JTF_VARCHAR2_TABLE_100
2730     , p8_a23 out nocopy JTF_VARCHAR2_TABLE_100
2731     , p8_a24 out nocopy JTF_VARCHAR2_TABLE_100
2732     , p8_a25 out nocopy JTF_VARCHAR2_TABLE_2000
2733     , p8_a26 out nocopy JTF_VARCHAR2_TABLE_100
2734     , p8_a27 out nocopy JTF_VARCHAR2_TABLE_200
2735     , p8_a28 out nocopy JTF_DATE_TABLE
2736     , p8_a29 out nocopy JTF_VARCHAR2_TABLE_200
2737     , p8_a30 out nocopy JTF_DATE_TABLE
2738     , p8_a31 out nocopy JTF_DATE_TABLE
2739     , p8_a32 out nocopy JTF_DATE_TABLE
2740     , p8_a33 out nocopy JTF_VARCHAR2_TABLE_100
2741     , p8_a34 out nocopy JTF_NUMBER_TABLE
2742     , p8_a35 out nocopy JTF_VARCHAR2_TABLE_100
2743     , p8_a36 out nocopy JTF_NUMBER_TABLE
2744     , p8_a37 out nocopy JTF_VARCHAR2_TABLE_100
2745     , p8_a38 out nocopy JTF_VARCHAR2_TABLE_100
2746     , p8_a39 out nocopy JTF_VARCHAR2_TABLE_500
2747     , p8_a40 out nocopy JTF_VARCHAR2_TABLE_500
2748     , p8_a41 out nocopy JTF_VARCHAR2_TABLE_500
2749     , p8_a42 out nocopy JTF_VARCHAR2_TABLE_500
2750     , p8_a43 out nocopy JTF_VARCHAR2_TABLE_500
2751     , p8_a44 out nocopy JTF_VARCHAR2_TABLE_500
2752     , p8_a45 out nocopy JTF_VARCHAR2_TABLE_500
2753     , p8_a46 out nocopy JTF_VARCHAR2_TABLE_500
2754     , p8_a47 out nocopy JTF_VARCHAR2_TABLE_500
2755     , p8_a48 out nocopy JTF_VARCHAR2_TABLE_500
2756     , p8_a49 out nocopy JTF_VARCHAR2_TABLE_500
2757     , p8_a50 out nocopy JTF_VARCHAR2_TABLE_500
2758     , p8_a51 out nocopy JTF_VARCHAR2_TABLE_500
2759     , p8_a52 out nocopy JTF_VARCHAR2_TABLE_500
2760     , p8_a53 out nocopy JTF_VARCHAR2_TABLE_500
2761     , p8_a54 out nocopy JTF_NUMBER_TABLE
2762     , p8_a55 out nocopy JTF_DATE_TABLE
2763     , p8_a56 out nocopy JTF_NUMBER_TABLE
2764     , p8_a57 out nocopy JTF_DATE_TABLE
2765     , p8_a58 out nocopy JTF_VARCHAR2_TABLE_100
2766     , p8_a59 out nocopy JTF_VARCHAR2_TABLE_100
2767     , p8_a60 out nocopy JTF_VARCHAR2_TABLE_100
2768     , p8_a61 out nocopy JTF_NUMBER_TABLE
2769     , p8_a62 out nocopy JTF_VARCHAR2_TABLE_100
2770     , p8_a63 out nocopy JTF_VARCHAR2_TABLE_100
2771     , p8_a64 out nocopy JTF_VARCHAR2_TABLE_100
2772     , p8_a65 out nocopy JTF_VARCHAR2_TABLE_100
2773     , p8_a66 out nocopy JTF_VARCHAR2_TABLE_100
2774     , p8_a67 out nocopy JTF_NUMBER_TABLE
2775     , p8_a68 out nocopy JTF_NUMBER_TABLE
2776     , p8_a69 out nocopy JTF_NUMBER_TABLE
2777     , p8_a70 out nocopy JTF_DATE_TABLE
2778     , p8_a71 out nocopy JTF_NUMBER_TABLE
2779     , p8_a72 out nocopy JTF_DATE_TABLE
2780     , p8_a73 out nocopy JTF_NUMBER_TABLE
2781     , p8_a74 out nocopy JTF_NUMBER_TABLE
2782     , p8_a75 out nocopy JTF_VARCHAR2_TABLE_100
2783     , p8_a76 out nocopy JTF_VARCHAR2_TABLE_100
2784     , p8_a77 out nocopy JTF_NUMBER_TABLE
2785     , p8_a78 out nocopy JTF_NUMBER_TABLE
2786     , p8_a79 out nocopy JTF_VARCHAR2_TABLE_100
2787     , p8_a80 out nocopy JTF_VARCHAR2_TABLE_100
2788     , p8_a81 out nocopy JTF_NUMBER_TABLE
2789     , p8_a82 out nocopy JTF_VARCHAR2_TABLE_100
2790     , p8_a83 out nocopy JTF_NUMBER_TABLE
2791     , p8_a84 out nocopy JTF_NUMBER_TABLE
2792     , p8_a85 out nocopy JTF_NUMBER_TABLE
2793     , p8_a86 out nocopy JTF_NUMBER_TABLE
2794     , p8_a87 out nocopy JTF_VARCHAR2_TABLE_100
2795     , p8_a88 out nocopy JTF_NUMBER_TABLE
2796     , p8_a89 out nocopy JTF_NUMBER_TABLE
2797     , p9_a0 out nocopy JTF_NUMBER_TABLE
2798     , p9_a1 out nocopy JTF_NUMBER_TABLE
2799     , p9_a2 out nocopy JTF_NUMBER_TABLE
2800     , p9_a3 out nocopy JTF_NUMBER_TABLE
2801     , p9_a4 out nocopy JTF_VARCHAR2_TABLE_100
2802     , p9_a5 out nocopy JTF_VARCHAR2_TABLE_100
2803     , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
2804     , p9_a7 out nocopy JTF_NUMBER_TABLE
2805     , p9_a8 out nocopy JTF_NUMBER_TABLE
2806     , p9_a9 out nocopy JTF_DATE_TABLE
2807     , p9_a10 out nocopy JTF_NUMBER_TABLE
2808     , p9_a11 out nocopy JTF_NUMBER_TABLE
2809     , p9_a12 out nocopy JTF_NUMBER_TABLE
2810     , p9_a13 out nocopy JTF_NUMBER_TABLE
2811     , p9_a14 out nocopy JTF_NUMBER_TABLE
2812     , p9_a15 out nocopy JTF_NUMBER_TABLE
2813     , p9_a16 out nocopy JTF_NUMBER_TABLE
2814     , p9_a17 out nocopy JTF_NUMBER_TABLE
2815     , p9_a18 out nocopy JTF_NUMBER_TABLE
2816     , p9_a19 out nocopy JTF_NUMBER_TABLE
2817     , p9_a20 out nocopy JTF_DATE_TABLE
2818     , p9_a21 out nocopy JTF_DATE_TABLE
2819     , p9_a22 out nocopy JTF_NUMBER_TABLE
2820     , p9_a23 out nocopy JTF_NUMBER_TABLE
2821     , p9_a24 out nocopy JTF_DATE_TABLE
2822     , p9_a25 out nocopy JTF_DATE_TABLE
2823     , p9_a26 out nocopy JTF_DATE_TABLE
2824     , p9_a27 out nocopy JTF_NUMBER_TABLE
2825     , p9_a28 out nocopy JTF_NUMBER_TABLE
2826     , p9_a29 out nocopy JTF_NUMBER_TABLE
2827     , p9_a30 out nocopy JTF_NUMBER_TABLE
2828     , p9_a31 out nocopy JTF_NUMBER_TABLE
2829     , p9_a32 out nocopy JTF_NUMBER_TABLE
2830     , p9_a33 out nocopy JTF_NUMBER_TABLE
2831     , p9_a34 out nocopy JTF_DATE_TABLE
2832     , p9_a35 out nocopy JTF_VARCHAR2_TABLE_100
2833     , p9_a36 out nocopy JTF_DATE_TABLE
2834     , p9_a37 out nocopy JTF_VARCHAR2_TABLE_300
2835     , p9_a38 out nocopy JTF_NUMBER_TABLE
2836     , p9_a39 out nocopy JTF_NUMBER_TABLE
2837     , p9_a40 out nocopy JTF_NUMBER_TABLE
2838     , p9_a41 out nocopy JTF_VARCHAR2_TABLE_100
2839     , p9_a42 out nocopy JTF_DATE_TABLE
2840     , p9_a43 out nocopy JTF_NUMBER_TABLE
2841     , p9_a44 out nocopy JTF_NUMBER_TABLE
2842     , p9_a45 out nocopy JTF_DATE_TABLE
2843     , p9_a46 out nocopy JTF_NUMBER_TABLE
2844     , p9_a47 out nocopy JTF_DATE_TABLE
2845     , p9_a48 out nocopy JTF_DATE_TABLE
2846     , p9_a49 out nocopy JTF_DATE_TABLE
2847     , p9_a50 out nocopy JTF_NUMBER_TABLE
2848     , p9_a51 out nocopy JTF_NUMBER_TABLE
2849     , p9_a52 out nocopy JTF_VARCHAR2_TABLE_100
2850     , p9_a53 out nocopy JTF_NUMBER_TABLE
2851     , p9_a54 out nocopy JTF_NUMBER_TABLE
2852     , p9_a55 out nocopy JTF_VARCHAR2_TABLE_100
2853     , p9_a56 out nocopy JTF_VARCHAR2_TABLE_100
2854     , p9_a57 out nocopy JTF_NUMBER_TABLE
2855     , p9_a58 out nocopy JTF_DATE_TABLE
2856     , p9_a59 out nocopy JTF_NUMBER_TABLE
2857     , p9_a60 out nocopy JTF_VARCHAR2_TABLE_100
2858     , p9_a61 out nocopy JTF_VARCHAR2_TABLE_500
2859     , p9_a62 out nocopy JTF_VARCHAR2_TABLE_500
2860     , p9_a63 out nocopy JTF_VARCHAR2_TABLE_500
2861     , p9_a64 out nocopy JTF_VARCHAR2_TABLE_500
2862     , p9_a65 out nocopy JTF_VARCHAR2_TABLE_500
2863     , p9_a66 out nocopy JTF_VARCHAR2_TABLE_500
2864     , p9_a67 out nocopy JTF_VARCHAR2_TABLE_500
2865     , p9_a68 out nocopy JTF_VARCHAR2_TABLE_500
2866     , p9_a69 out nocopy JTF_VARCHAR2_TABLE_500
2867     , p9_a70 out nocopy JTF_VARCHAR2_TABLE_500
2868     , p9_a71 out nocopy JTF_VARCHAR2_TABLE_500
2869     , p9_a72 out nocopy JTF_VARCHAR2_TABLE_500
2870     , p9_a73 out nocopy JTF_VARCHAR2_TABLE_500
2871     , p9_a74 out nocopy JTF_VARCHAR2_TABLE_500
2872     , p9_a75 out nocopy JTF_VARCHAR2_TABLE_500
2873     , p9_a76 out nocopy JTF_NUMBER_TABLE
2874     , p9_a77 out nocopy JTF_NUMBER_TABLE
2875     , p9_a78 out nocopy JTF_NUMBER_TABLE
2876     , p9_a79 out nocopy JTF_DATE_TABLE
2877     , p9_a80 out nocopy JTF_NUMBER_TABLE
2878     , p9_a81 out nocopy JTF_DATE_TABLE
2879     , p9_a82 out nocopy JTF_NUMBER_TABLE
2880     , p9_a83 out nocopy JTF_DATE_TABLE
2881     , p9_a84 out nocopy JTF_DATE_TABLE
2882     , p9_a85 out nocopy JTF_DATE_TABLE
2883     , p9_a86 out nocopy JTF_DATE_TABLE
2884     , p9_a87 out nocopy JTF_NUMBER_TABLE
2885     , p9_a88 out nocopy JTF_NUMBER_TABLE
2886     , p9_a89 out nocopy JTF_NUMBER_TABLE
2887     , p9_a90 out nocopy JTF_VARCHAR2_TABLE_100
2888     , p9_a91 out nocopy JTF_NUMBER_TABLE
2889     , p9_a92 out nocopy JTF_VARCHAR2_TABLE_100
2890     , p9_a93 out nocopy JTF_NUMBER_TABLE
2891     , p9_a94 out nocopy JTF_NUMBER_TABLE
2892     , p9_a95 out nocopy JTF_DATE_TABLE
2893     , p9_a96 out nocopy JTF_VARCHAR2_TABLE_100
2894     , p9_a97 out nocopy JTF_VARCHAR2_TABLE_100
2895     , p9_a98 out nocopy JTF_NUMBER_TABLE
2896     , p10_a0 out nocopy JTF_NUMBER_TABLE
2897     , p10_a1 out nocopy JTF_NUMBER_TABLE
2898     , p10_a2 out nocopy JTF_NUMBER_TABLE
2899     , p10_a3 out nocopy JTF_NUMBER_TABLE
2900     , p10_a4 out nocopy JTF_NUMBER_TABLE
2901     , p10_a5 out nocopy JTF_NUMBER_TABLE
2902     , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
2903     , p10_a7 out nocopy JTF_VARCHAR2_TABLE_200
2904     , p10_a8 out nocopy JTF_VARCHAR2_TABLE_100
2905     , p10_a9 out nocopy JTF_VARCHAR2_TABLE_100
2906     , p10_a10 out nocopy JTF_VARCHAR2_TABLE_100
2907     , p10_a11 out nocopy JTF_NUMBER_TABLE
2908     , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
2909     , p10_a13 out nocopy JTF_NUMBER_TABLE
2910     , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
2911     , p10_a15 out nocopy JTF_NUMBER_TABLE
2912     , p10_a16 out nocopy JTF_DATE_TABLE
2913     , p10_a17 out nocopy JTF_NUMBER_TABLE
2914     , p10_a18 out nocopy JTF_DATE_TABLE
2915     , p10_a19 out nocopy JTF_NUMBER_TABLE
2916   )
2917 
2918   as
2919     ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2920     ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2921     ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2922     ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
2923     ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
2924     ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
2925     ddindx binary_integer; indx binary_integer;
2926   begin
2927 
2928     -- copy data to the local IN or IN-OUT args, if any
2929 
2930 
2931 
2932 
2933 
2934     okl_okc_migration_pvt_w.rosetta_table_copy_in_p5(ddp_clev_tbl, p5_a0
2935       , p5_a1
2936       , p5_a2
2937       , p5_a3
2938       , p5_a4
2939       , p5_a5
2940       , p5_a6
2941       , p5_a7
2942       , p5_a8
2943       , p5_a9
2944       , p5_a10
2945       , p5_a11
2946       , p5_a12
2947       , p5_a13
2948       , p5_a14
2949       , p5_a15
2950       , p5_a16
2951       , p5_a17
2952       , p5_a18
2953       , p5_a19
2954       , p5_a20
2955       , p5_a21
2956       , p5_a22
2957       , p5_a23
2958       , p5_a24
2959       , p5_a25
2960       , p5_a26
2961       , p5_a27
2962       , p5_a28
2963       , p5_a29
2964       , p5_a30
2965       , p5_a31
2966       , p5_a32
2967       , p5_a33
2968       , p5_a34
2969       , p5_a35
2970       , p5_a36
2971       , p5_a37
2972       , p5_a38
2973       , p5_a39
2974       , p5_a40
2975       , p5_a41
2976       , p5_a42
2977       , p5_a43
2978       , p5_a44
2979       , p5_a45
2980       , p5_a46
2981       , p5_a47
2982       , p5_a48
2983       , p5_a49
2984       , p5_a50
2985       , p5_a51
2986       , p5_a52
2987       , p5_a53
2988       , p5_a54
2989       , p5_a55
2990       , p5_a56
2991       , p5_a57
2992       , p5_a58
2993       , p5_a59
2994       , p5_a60
2995       , p5_a61
2996       , p5_a62
2997       , p5_a63
2998       , p5_a64
2999       , p5_a65
3000       , p5_a66
3001       , p5_a67
3002       , p5_a68
3003       , p5_a69
3004       , p5_a70
3005       , p5_a71
3006       , p5_a72
3007       , p5_a73
3008       , p5_a74
3009       , p5_a75
3010       , p5_a76
3011       , p5_a77
3012       , p5_a78
3013       , p5_a79
3014       , p5_a80
3015       , p5_a81
3016       , p5_a82
3017       , p5_a83
3018       , p5_a84
3019       , p5_a85
3020       , p5_a86
3021       , p5_a87
3022       , p5_a88
3023       , p5_a89
3024       );
3025 
3026     okl_kle_pvt_w.rosetta_table_copy_in_p8(ddp_klev_tbl, p6_a0
3027       , p6_a1
3028       , p6_a2
3029       , p6_a3
3030       , p6_a4
3031       , p6_a5
3032       , p6_a6
3033       , p6_a7
3034       , p6_a8
3035       , p6_a9
3036       , p6_a10
3037       , p6_a11
3038       , p6_a12
3039       , p6_a13
3040       , p6_a14
3041       , p6_a15
3042       , p6_a16
3043       , p6_a17
3044       , p6_a18
3045       , p6_a19
3046       , p6_a20
3047       , p6_a21
3048       , p6_a22
3049       , p6_a23
3050       , p6_a24
3051       , p6_a25
3052       , p6_a26
3053       , p6_a27
3054       , p6_a28
3055       , p6_a29
3056       , p6_a30
3057       , p6_a31
3058       , p6_a32
3059       , p6_a33
3060       , p6_a34
3061       , p6_a35
3062       , p6_a36
3063       , p6_a37
3064       , p6_a38
3065       , p6_a39
3066       , p6_a40
3067       , p6_a41
3068       , p6_a42
3069       , p6_a43
3070       , p6_a44
3071       , p6_a45
3072       , p6_a46
3073       , p6_a47
3074       , p6_a48
3075       , p6_a49
3076       , p6_a50
3077       , p6_a51
3078       , p6_a52
3079       , p6_a53
3080       , p6_a54
3081       , p6_a55
3082       , p6_a56
3083       , p6_a57
3084       , p6_a58
3085       , p6_a59
3086       , p6_a60
3087       , p6_a61
3088       , p6_a62
3089       , p6_a63
3090       , p6_a64
3091       , p6_a65
3092       , p6_a66
3093       , p6_a67
3094       , p6_a68
3095       , p6_a69
3096       , p6_a70
3097       , p6_a71
3098       , p6_a72
3099       , p6_a73
3100       , p6_a74
3101       , p6_a75
3102       , p6_a76
3103       , p6_a77
3104       , p6_a78
3105       , p6_a79
3106       , p6_a80
3107       , p6_a81
3108       , p6_a82
3109       , p6_a83
3110       , p6_a84
3111       , p6_a85
3112       , p6_a86
3113       , p6_a87
3114       , p6_a88
3115       , p6_a89
3116       , p6_a90
3117       , p6_a91
3118       , p6_a92
3119       , p6_a93
3120       , p6_a94
3121       , p6_a95
3122       , p6_a96
3123       , p6_a97
3124       , p6_a98
3125       );
3126 
3127     okl_okc_migration_pvt_w.rosetta_table_copy_in_p7(ddp_cimv_tbl, p7_a0
3128       , p7_a1
3129       , p7_a2
3130       , p7_a3
3131       , p7_a4
3132       , p7_a5
3133       , p7_a6
3134       , p7_a7
3135       , p7_a8
3136       , p7_a9
3137       , p7_a10
3138       , p7_a11
3139       , p7_a12
3140       , p7_a13
3141       , p7_a14
3142       , p7_a15
3143       , p7_a16
3144       , p7_a17
3145       , p7_a18
3146       , p7_a19
3147       );
3148 
3149 
3150 
3151 
3152     -- here's the delegated call to the old PL/SQL routine
3153     okl_contract_line_item_pub.create_contract_line_item(p_api_version,
3154       p_init_msg_list,
3155       x_return_status,
3156       x_msg_count,
3157       x_msg_data,
3158       ddp_clev_tbl,
3159       ddp_klev_tbl,
3160       ddp_cimv_tbl,
3161       ddx_clev_tbl,
3162       ddx_klev_tbl,
3163       ddx_cimv_tbl);
3164 
3165     -- copy data back from the local variables to OUT or IN-OUT args, if any
3166 
3167 
3168 
3169 
3170 
3171 
3172 
3173 
3174     okl_okc_migration_pvt_w.rosetta_table_copy_out_p5(ddx_clev_tbl, p8_a0
3175       , p8_a1
3176       , p8_a2
3177       , p8_a3
3178       , p8_a4
3179       , p8_a5
3180       , p8_a6
3181       , p8_a7
3182       , p8_a8
3183       , p8_a9
3184       , p8_a10
3185       , p8_a11
3186       , p8_a12
3187       , p8_a13
3188       , p8_a14
3189       , p8_a15
3190       , p8_a16
3191       , p8_a17
3192       , p8_a18
3193       , p8_a19
3194       , p8_a20
3195       , p8_a21
3196       , p8_a22
3197       , p8_a23
3198       , p8_a24
3199       , p8_a25
3200       , p8_a26
3201       , p8_a27
3202       , p8_a28
3203       , p8_a29
3204       , p8_a30
3205       , p8_a31
3206       , p8_a32
3207       , p8_a33
3208       , p8_a34
3209       , p8_a35
3210       , p8_a36
3211       , p8_a37
3212       , p8_a38
3213       , p8_a39
3214       , p8_a40
3215       , p8_a41
3216       , p8_a42
3217       , p8_a43
3218       , p8_a44
3219       , p8_a45
3220       , p8_a46
3221       , p8_a47
3222       , p8_a48
3223       , p8_a49
3224       , p8_a50
3225       , p8_a51
3226       , p8_a52
3227       , p8_a53
3228       , p8_a54
3229       , p8_a55
3230       , p8_a56
3231       , p8_a57
3232       , p8_a58
3233       , p8_a59
3234       , p8_a60
3235       , p8_a61
3236       , p8_a62
3237       , p8_a63
3238       , p8_a64
3239       , p8_a65
3240       , p8_a66
3241       , p8_a67
3242       , p8_a68
3243       , p8_a69
3244       , p8_a70
3245       , p8_a71
3246       , p8_a72
3247       , p8_a73
3248       , p8_a74
3249       , p8_a75
3250       , p8_a76
3251       , p8_a77
3252       , p8_a78
3253       , p8_a79
3254       , p8_a80
3255       , p8_a81
3256       , p8_a82
3257       , p8_a83
3258       , p8_a84
3259       , p8_a85
3260       , p8_a86
3261       , p8_a87
3262       , p8_a88
3263       , p8_a89
3264       );
3265 
3266     okl_kle_pvt_w.rosetta_table_copy_out_p8(ddx_klev_tbl, p9_a0
3267       , p9_a1
3268       , p9_a2
3269       , p9_a3
3270       , p9_a4
3271       , p9_a5
3272       , p9_a6
3273       , p9_a7
3274       , p9_a8
3275       , p9_a9
3276       , p9_a10
3277       , p9_a11
3278       , p9_a12
3279       , p9_a13
3280       , p9_a14
3281       , p9_a15
3282       , p9_a16
3283       , p9_a17
3284       , p9_a18
3285       , p9_a19
3286       , p9_a20
3287       , p9_a21
3288       , p9_a22
3289       , p9_a23
3290       , p9_a24
3291       , p9_a25
3292       , p9_a26
3293       , p9_a27
3294       , p9_a28
3295       , p9_a29
3296       , p9_a30
3297       , p9_a31
3298       , p9_a32
3299       , p9_a33
3300       , p9_a34
3301       , p9_a35
3302       , p9_a36
3303       , p9_a37
3304       , p9_a38
3305       , p9_a39
3306       , p9_a40
3307       , p9_a41
3308       , p9_a42
3309       , p9_a43
3310       , p9_a44
3311       , p9_a45
3312       , p9_a46
3313       , p9_a47
3314       , p9_a48
3315       , p9_a49
3316       , p9_a50
3317       , p9_a51
3318       , p9_a52
3319       , p9_a53
3320       , p9_a54
3321       , p9_a55
3322       , p9_a56
3323       , p9_a57
3324       , p9_a58
3325       , p9_a59
3326       , p9_a60
3327       , p9_a61
3328       , p9_a62
3329       , p9_a63
3330       , p9_a64
3331       , p9_a65
3332       , p9_a66
3333       , p9_a67
3334       , p9_a68
3335       , p9_a69
3336       , p9_a70
3337       , p9_a71
3338       , p9_a72
3339       , p9_a73
3340       , p9_a74
3341       , p9_a75
3342       , p9_a76
3343       , p9_a77
3344       , p9_a78
3345       , p9_a79
3346       , p9_a80
3347       , p9_a81
3348       , p9_a82
3349       , p9_a83
3350       , p9_a84
3351       , p9_a85
3352       , p9_a86
3353       , p9_a87
3354       , p9_a88
3355       , p9_a89
3356       , p9_a90
3357       , p9_a91
3358       , p9_a92
3359       , p9_a93
3360       , p9_a94
3361       , p9_a95
3362       , p9_a96
3363       , p9_a97
3364       , p9_a98
3365       );
3366 
3367     okl_okc_migration_pvt_w.rosetta_table_copy_out_p7(ddx_cimv_tbl, p10_a0
3368       , p10_a1
3369       , p10_a2
3370       , p10_a3
3371       , p10_a4
3372       , p10_a5
3373       , p10_a6
3374       , p10_a7
3375       , p10_a8
3376       , p10_a9
3377       , p10_a10
3378       , p10_a11
3379       , p10_a12
3380       , p10_a13
3381       , p10_a14
3382       , p10_a15
3383       , p10_a16
3384       , p10_a17
3385       , p10_a18
3386       , p10_a19
3387       );
3388   end;
3389 
3390   procedure delete_contract_line_item(p_api_version  NUMBER
3391     , p_init_msg_list  VARCHAR2
3392     , x_return_status out nocopy  VARCHAR2
3393     , x_msg_count out nocopy  NUMBER
3394     , x_msg_data out nocopy  VARCHAR2
3395     , p5_a0 JTF_NUMBER_TABLE
3396     , p5_a1 JTF_NUMBER_TABLE
3397     , p5_a2 JTF_VARCHAR2_TABLE_100
3398     , p5_a3 JTF_NUMBER_TABLE
3399     , p5_a4 JTF_NUMBER_TABLE
3400     , p5_a5 JTF_NUMBER_TABLE
3401     , p5_a6 JTF_NUMBER_TABLE
3402     , p5_a7 JTF_NUMBER_TABLE
3403     , p5_a8 JTF_VARCHAR2_TABLE_200
3404     , p5_a9 JTF_VARCHAR2_TABLE_100
3405     , p5_a10 JTF_NUMBER_TABLE
3406     , p5_a11 JTF_VARCHAR2_TABLE_100
3407     , p5_a12 JTF_NUMBER_TABLE
3408     , p5_a13 JTF_VARCHAR2_TABLE_2000
3409     , p5_a14 JTF_VARCHAR2_TABLE_2000
3410     , p5_a15 JTF_VARCHAR2_TABLE_2000
3411     , p5_a16 JTF_VARCHAR2_TABLE_300
3412     , p5_a17 JTF_VARCHAR2_TABLE_100
3413     , p5_a18 JTF_NUMBER_TABLE
3414     , p5_a19 JTF_NUMBER_TABLE
3415     , p5_a20 JTF_NUMBER_TABLE
3416     , p5_a21 JTF_NUMBER_TABLE
3417     , p5_a22 JTF_VARCHAR2_TABLE_100
3418     , p5_a23 JTF_VARCHAR2_TABLE_100
3419     , p5_a24 JTF_VARCHAR2_TABLE_100
3420     , p5_a25 JTF_VARCHAR2_TABLE_2000
3421     , p5_a26 JTF_VARCHAR2_TABLE_100
3422     , p5_a27 JTF_VARCHAR2_TABLE_200
3423     , p5_a28 JTF_DATE_TABLE
3424     , p5_a29 JTF_VARCHAR2_TABLE_200
3425     , p5_a30 JTF_DATE_TABLE
3426     , p5_a31 JTF_DATE_TABLE
3427     , p5_a32 JTF_DATE_TABLE
3428     , p5_a33 JTF_VARCHAR2_TABLE_100
3429     , p5_a34 JTF_NUMBER_TABLE
3430     , p5_a35 JTF_VARCHAR2_TABLE_100
3431     , p5_a36 JTF_NUMBER_TABLE
3432     , p5_a37 JTF_VARCHAR2_TABLE_100
3433     , p5_a38 JTF_VARCHAR2_TABLE_100
3434     , p5_a39 JTF_VARCHAR2_TABLE_500
3435     , p5_a40 JTF_VARCHAR2_TABLE_500
3436     , p5_a41 JTF_VARCHAR2_TABLE_500
3437     , p5_a42 JTF_VARCHAR2_TABLE_500
3438     , p5_a43 JTF_VARCHAR2_TABLE_500
3439     , p5_a44 JTF_VARCHAR2_TABLE_500
3440     , p5_a45 JTF_VARCHAR2_TABLE_500
3441     , p5_a46 JTF_VARCHAR2_TABLE_500
3442     , p5_a47 JTF_VARCHAR2_TABLE_500
3443     , p5_a48 JTF_VARCHAR2_TABLE_500
3444     , p5_a49 JTF_VARCHAR2_TABLE_500
3445     , p5_a50 JTF_VARCHAR2_TABLE_500
3446     , p5_a51 JTF_VARCHAR2_TABLE_500
3447     , p5_a52 JTF_VARCHAR2_TABLE_500
3448     , p5_a53 JTF_VARCHAR2_TABLE_500
3449     , p5_a54 JTF_NUMBER_TABLE
3450     , p5_a55 JTF_DATE_TABLE
3451     , p5_a56 JTF_NUMBER_TABLE
3452     , p5_a57 JTF_DATE_TABLE
3453     , p5_a58 JTF_VARCHAR2_TABLE_100
3454     , p5_a59 JTF_VARCHAR2_TABLE_100
3455     , p5_a60 JTF_VARCHAR2_TABLE_100
3456     , p5_a61 JTF_NUMBER_TABLE
3457     , p5_a62 JTF_VARCHAR2_TABLE_100
3458     , p5_a63 JTF_VARCHAR2_TABLE_100
3459     , p5_a64 JTF_VARCHAR2_TABLE_100
3460     , p5_a65 JTF_VARCHAR2_TABLE_100
3461     , p5_a66 JTF_VARCHAR2_TABLE_100
3462     , p5_a67 JTF_NUMBER_TABLE
3463     , p5_a68 JTF_NUMBER_TABLE
3464     , p5_a69 JTF_NUMBER_TABLE
3465     , p5_a70 JTF_DATE_TABLE
3466     , p5_a71 JTF_NUMBER_TABLE
3467     , p5_a72 JTF_DATE_TABLE
3468     , p5_a73 JTF_NUMBER_TABLE
3469     , p5_a74 JTF_NUMBER_TABLE
3470     , p5_a75 JTF_VARCHAR2_TABLE_100
3471     , p5_a76 JTF_VARCHAR2_TABLE_100
3472     , p5_a77 JTF_NUMBER_TABLE
3473     , p5_a78 JTF_NUMBER_TABLE
3474     , p5_a79 JTF_VARCHAR2_TABLE_100
3475     , p5_a80 JTF_VARCHAR2_TABLE_100
3476     , p5_a81 JTF_NUMBER_TABLE
3477     , p5_a82 JTF_VARCHAR2_TABLE_100
3478     , p5_a83 JTF_NUMBER_TABLE
3479     , p5_a84 JTF_NUMBER_TABLE
3480     , p5_a85 JTF_NUMBER_TABLE
3481     , p5_a86 JTF_NUMBER_TABLE
3482     , p5_a87 JTF_VARCHAR2_TABLE_100
3483     , p5_a88 JTF_NUMBER_TABLE
3484     , p5_a89 JTF_NUMBER_TABLE
3485     , p6_a0 JTF_NUMBER_TABLE
3486     , p6_a1 JTF_NUMBER_TABLE
3487     , p6_a2 JTF_NUMBER_TABLE
3488     , p6_a3 JTF_NUMBER_TABLE
3489     , p6_a4 JTF_VARCHAR2_TABLE_100
3490     , p6_a5 JTF_VARCHAR2_TABLE_100
3491     , p6_a6 JTF_VARCHAR2_TABLE_100
3492     , p6_a7 JTF_NUMBER_TABLE
3493     , p6_a8 JTF_NUMBER_TABLE
3494     , p6_a9 JTF_DATE_TABLE
3495     , p6_a10 JTF_NUMBER_TABLE
3496     , p6_a11 JTF_NUMBER_TABLE
3497     , p6_a12 JTF_NUMBER_TABLE
3498     , p6_a13 JTF_NUMBER_TABLE
3499     , p6_a14 JTF_NUMBER_TABLE
3500     , p6_a15 JTF_NUMBER_TABLE
3501     , p6_a16 JTF_NUMBER_TABLE
3502     , p6_a17 JTF_NUMBER_TABLE
3503     , p6_a18 JTF_NUMBER_TABLE
3504     , p6_a19 JTF_NUMBER_TABLE
3505     , p6_a20 JTF_DATE_TABLE
3506     , p6_a21 JTF_DATE_TABLE
3507     , p6_a22 JTF_NUMBER_TABLE
3508     , p6_a23 JTF_NUMBER_TABLE
3509     , p6_a24 JTF_DATE_TABLE
3510     , p6_a25 JTF_DATE_TABLE
3511     , p6_a26 JTF_DATE_TABLE
3512     , p6_a27 JTF_NUMBER_TABLE
3513     , p6_a28 JTF_NUMBER_TABLE
3514     , p6_a29 JTF_NUMBER_TABLE
3515     , p6_a30 JTF_NUMBER_TABLE
3516     , p6_a31 JTF_NUMBER_TABLE
3517     , p6_a32 JTF_NUMBER_TABLE
3518     , p6_a33 JTF_NUMBER_TABLE
3519     , p6_a34 JTF_DATE_TABLE
3520     , p6_a35 JTF_VARCHAR2_TABLE_100
3521     , p6_a36 JTF_DATE_TABLE
3522     , p6_a37 JTF_VARCHAR2_TABLE_300
3523     , p6_a38 JTF_NUMBER_TABLE
3524     , p6_a39 JTF_NUMBER_TABLE
3525     , p6_a40 JTF_NUMBER_TABLE
3526     , p6_a41 JTF_VARCHAR2_TABLE_100
3527     , p6_a42 JTF_DATE_TABLE
3528     , p6_a43 JTF_NUMBER_TABLE
3529     , p6_a44 JTF_NUMBER_TABLE
3530     , p6_a45 JTF_DATE_TABLE
3531     , p6_a46 JTF_NUMBER_TABLE
3532     , p6_a47 JTF_DATE_TABLE
3533     , p6_a48 JTF_DATE_TABLE
3534     , p6_a49 JTF_DATE_TABLE
3535     , p6_a50 JTF_NUMBER_TABLE
3536     , p6_a51 JTF_NUMBER_TABLE
3537     , p6_a52 JTF_VARCHAR2_TABLE_100
3538     , p6_a53 JTF_NUMBER_TABLE
3539     , p6_a54 JTF_NUMBER_TABLE
3540     , p6_a55 JTF_VARCHAR2_TABLE_100
3541     , p6_a56 JTF_VARCHAR2_TABLE_100
3542     , p6_a57 JTF_NUMBER_TABLE
3543     , p6_a58 JTF_DATE_TABLE
3544     , p6_a59 JTF_NUMBER_TABLE
3545     , p6_a60 JTF_VARCHAR2_TABLE_100
3546     , p6_a61 JTF_VARCHAR2_TABLE_500
3547     , p6_a62 JTF_VARCHAR2_TABLE_500
3548     , p6_a63 JTF_VARCHAR2_TABLE_500
3549     , p6_a64 JTF_VARCHAR2_TABLE_500
3550     , p6_a65 JTF_VARCHAR2_TABLE_500
3551     , p6_a66 JTF_VARCHAR2_TABLE_500
3552     , p6_a67 JTF_VARCHAR2_TABLE_500
3553     , p6_a68 JTF_VARCHAR2_TABLE_500
3554     , p6_a69 JTF_VARCHAR2_TABLE_500
3555     , p6_a70 JTF_VARCHAR2_TABLE_500
3556     , p6_a71 JTF_VARCHAR2_TABLE_500
3557     , p6_a72 JTF_VARCHAR2_TABLE_500
3558     , p6_a73 JTF_VARCHAR2_TABLE_500
3559     , p6_a74 JTF_VARCHAR2_TABLE_500
3560     , p6_a75 JTF_VARCHAR2_TABLE_500
3561     , p6_a76 JTF_NUMBER_TABLE
3562     , p6_a77 JTF_NUMBER_TABLE
3563     , p6_a78 JTF_NUMBER_TABLE
3564     , p6_a79 JTF_DATE_TABLE
3565     , p6_a80 JTF_NUMBER_TABLE
3566     , p6_a81 JTF_DATE_TABLE
3567     , p6_a82 JTF_NUMBER_TABLE
3568     , p6_a83 JTF_DATE_TABLE
3569     , p6_a84 JTF_DATE_TABLE
3570     , p6_a85 JTF_DATE_TABLE
3571     , p6_a86 JTF_DATE_TABLE
3572     , p6_a87 JTF_NUMBER_TABLE
3573     , p6_a88 JTF_NUMBER_TABLE
3574     , p6_a89 JTF_NUMBER_TABLE
3575     , p6_a90 JTF_VARCHAR2_TABLE_100
3576     , p6_a91 JTF_NUMBER_TABLE
3577     , p6_a92 JTF_VARCHAR2_TABLE_100
3578     , p6_a93 JTF_NUMBER_TABLE
3579     , p6_a94 JTF_NUMBER_TABLE
3580     , p6_a95 JTF_DATE_TABLE
3581     , p6_a96 JTF_VARCHAR2_TABLE_100
3582     , p6_a97 JTF_VARCHAR2_TABLE_100
3583     , p6_a98 JTF_NUMBER_TABLE
3584     , p7_a0 JTF_NUMBER_TABLE
3585     , p7_a1 JTF_NUMBER_TABLE
3586     , p7_a2 JTF_NUMBER_TABLE
3587     , p7_a3 JTF_NUMBER_TABLE
3588     , p7_a4 JTF_NUMBER_TABLE
3589     , p7_a5 JTF_NUMBER_TABLE
3590     , p7_a6 JTF_VARCHAR2_TABLE_100
3591     , p7_a7 JTF_VARCHAR2_TABLE_200
3592     , p7_a8 JTF_VARCHAR2_TABLE_100
3593     , p7_a9 JTF_VARCHAR2_TABLE_100
3594     , p7_a10 JTF_VARCHAR2_TABLE_100
3595     , p7_a11 JTF_NUMBER_TABLE
3596     , p7_a12 JTF_VARCHAR2_TABLE_100
3597     , p7_a13 JTF_NUMBER_TABLE
3598     , p7_a14 JTF_VARCHAR2_TABLE_100
3599     , p7_a15 JTF_NUMBER_TABLE
3600     , p7_a16 JTF_DATE_TABLE
3601     , p7_a17 JTF_NUMBER_TABLE
3602     , p7_a18 JTF_DATE_TABLE
3603     , p7_a19 JTF_NUMBER_TABLE
3604   )
3605 
3606   as
3607     ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
3608     ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
3609     ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
3610     ddindx binary_integer; indx binary_integer;
3611   begin
3612 
3613     -- copy data to the local IN or IN-OUT args, if any
3614 
3615 
3616 
3617 
3618 
3619     okl_okc_migration_pvt_w.rosetta_table_copy_in_p5(ddp_clev_tbl, p5_a0
3620       , p5_a1
3621       , p5_a2
3622       , p5_a3
3623       , p5_a4
3624       , p5_a5
3625       , p5_a6
3626       , p5_a7
3627       , p5_a8
3628       , p5_a9
3629       , p5_a10
3630       , p5_a11
3631       , p5_a12
3632       , p5_a13
3633       , p5_a14
3634       , p5_a15
3635       , p5_a16
3636       , p5_a17
3637       , p5_a18
3638       , p5_a19
3639       , p5_a20
3640       , p5_a21
3641       , p5_a22
3642       , p5_a23
3643       , p5_a24
3644       , p5_a25
3645       , p5_a26
3646       , p5_a27
3647       , p5_a28
3648       , p5_a29
3649       , p5_a30
3650       , p5_a31
3651       , p5_a32
3652       , p5_a33
3653       , p5_a34
3654       , p5_a35
3655       , p5_a36
3656       , p5_a37
3657       , p5_a38
3658       , p5_a39
3659       , p5_a40
3660       , p5_a41
3661       , p5_a42
3662       , p5_a43
3663       , p5_a44
3664       , p5_a45
3665       , p5_a46
3666       , p5_a47
3667       , p5_a48
3668       , p5_a49
3669       , p5_a50
3670       , p5_a51
3671       , p5_a52
3672       , p5_a53
3673       , p5_a54
3674       , p5_a55
3675       , p5_a56
3676       , p5_a57
3677       , p5_a58
3678       , p5_a59
3679       , p5_a60
3680       , p5_a61
3681       , p5_a62
3682       , p5_a63
3683       , p5_a64
3684       , p5_a65
3685       , p5_a66
3686       , p5_a67
3687       , p5_a68
3688       , p5_a69
3689       , p5_a70
3690       , p5_a71
3691       , p5_a72
3692       , p5_a73
3693       , p5_a74
3694       , p5_a75
3695       , p5_a76
3696       , p5_a77
3697       , p5_a78
3698       , p5_a79
3699       , p5_a80
3700       , p5_a81
3701       , p5_a82
3702       , p5_a83
3703       , p5_a84
3704       , p5_a85
3705       , p5_a86
3706       , p5_a87
3707       , p5_a88
3708       , p5_a89
3709       );
3710 
3711     okl_kle_pvt_w.rosetta_table_copy_in_p8(ddp_klev_tbl, p6_a0
3712       , p6_a1
3713       , p6_a2
3714       , p6_a3
3715       , p6_a4
3716       , p6_a5
3717       , p6_a6
3718       , p6_a7
3719       , p6_a8
3720       , p6_a9
3721       , p6_a10
3722       , p6_a11
3723       , p6_a12
3724       , p6_a13
3725       , p6_a14
3726       , p6_a15
3727       , p6_a16
3728       , p6_a17
3729       , p6_a18
3730       , p6_a19
3731       , p6_a20
3732       , p6_a21
3733       , p6_a22
3734       , p6_a23
3735       , p6_a24
3736       , p6_a25
3737       , p6_a26
3738       , p6_a27
3739       , p6_a28
3740       , p6_a29
3741       , p6_a30
3742       , p6_a31
3743       , p6_a32
3744       , p6_a33
3745       , p6_a34
3746       , p6_a35
3747       , p6_a36
3748       , p6_a37
3749       , p6_a38
3750       , p6_a39
3751       , p6_a40
3752       , p6_a41
3753       , p6_a42
3754       , p6_a43
3755       , p6_a44
3756       , p6_a45
3757       , p6_a46
3758       , p6_a47
3759       , p6_a48
3760       , p6_a49
3761       , p6_a50
3762       , p6_a51
3763       , p6_a52
3764       , p6_a53
3765       , p6_a54
3766       , p6_a55
3767       , p6_a56
3768       , p6_a57
3769       , p6_a58
3770       , p6_a59
3771       , p6_a60
3772       , p6_a61
3773       , p6_a62
3774       , p6_a63
3775       , p6_a64
3776       , p6_a65
3777       , p6_a66
3778       , p6_a67
3779       , p6_a68
3780       , p6_a69
3781       , p6_a70
3782       , p6_a71
3783       , p6_a72
3784       , p6_a73
3785       , p6_a74
3786       , p6_a75
3787       , p6_a76
3788       , p6_a77
3789       , p6_a78
3790       , p6_a79
3791       , p6_a80
3792       , p6_a81
3793       , p6_a82
3794       , p6_a83
3795       , p6_a84
3796       , p6_a85
3797       , p6_a86
3798       , p6_a87
3799       , p6_a88
3800       , p6_a89
3801       , p6_a90
3802       , p6_a91
3803       , p6_a92
3804       , p6_a93
3805       , p6_a94
3806       , p6_a95
3807       , p6_a96
3808       , p6_a97
3809       , p6_a98
3810       );
3811 
3812     okl_okc_migration_pvt_w.rosetta_table_copy_in_p7(ddp_cimv_tbl, p7_a0
3813       , p7_a1
3814       , p7_a2
3815       , p7_a3
3816       , p7_a4
3817       , p7_a5
3818       , p7_a6
3819       , p7_a7
3820       , p7_a8
3821       , p7_a9
3822       , p7_a10
3823       , p7_a11
3824       , p7_a12
3825       , p7_a13
3826       , p7_a14
3827       , p7_a15
3828       , p7_a16
3829       , p7_a17
3830       , p7_a18
3831       , p7_a19
3832       );
3833 
3834     -- here's the delegated call to the old PL/SQL routine
3835     okl_contract_line_item_pub.delete_contract_line_item(p_api_version,
3836       p_init_msg_list,
3837       x_return_status,
3838       x_msg_count,
3839       x_msg_data,
3840       ddp_clev_tbl,
3841       ddp_klev_tbl,
3842       ddp_cimv_tbl);
3843 
3844     -- copy data back from the local variables to OUT or IN-OUT args, if any
3845 
3846 
3847 
3848 
3849 
3850 
3851 
3852   end;
3853 
3854   procedure update_contract_line_item(p_api_version  NUMBER
3855     , p_init_msg_list  VARCHAR2
3856     , x_return_status out nocopy  VARCHAR2
3857     , x_msg_count out nocopy  NUMBER
3858     , x_msg_data out nocopy  VARCHAR2
3859     , p5_a0 JTF_NUMBER_TABLE
3860     , p5_a1 JTF_NUMBER_TABLE
3861     , p5_a2 JTF_VARCHAR2_TABLE_100
3862     , p5_a3 JTF_NUMBER_TABLE
3863     , p5_a4 JTF_NUMBER_TABLE
3864     , p5_a5 JTF_NUMBER_TABLE
3865     , p5_a6 JTF_NUMBER_TABLE
3866     , p5_a7 JTF_NUMBER_TABLE
3867     , p5_a8 JTF_VARCHAR2_TABLE_200
3868     , p5_a9 JTF_VARCHAR2_TABLE_100
3869     , p5_a10 JTF_NUMBER_TABLE
3870     , p5_a11 JTF_VARCHAR2_TABLE_100
3871     , p5_a12 JTF_NUMBER_TABLE
3872     , p5_a13 JTF_VARCHAR2_TABLE_2000
3873     , p5_a14 JTF_VARCHAR2_TABLE_2000
3874     , p5_a15 JTF_VARCHAR2_TABLE_2000
3875     , p5_a16 JTF_VARCHAR2_TABLE_300
3876     , p5_a17 JTF_VARCHAR2_TABLE_100
3877     , p5_a18 JTF_NUMBER_TABLE
3878     , p5_a19 JTF_NUMBER_TABLE
3879     , p5_a20 JTF_NUMBER_TABLE
3880     , p5_a21 JTF_NUMBER_TABLE
3881     , p5_a22 JTF_VARCHAR2_TABLE_100
3882     , p5_a23 JTF_VARCHAR2_TABLE_100
3883     , p5_a24 JTF_VARCHAR2_TABLE_100
3884     , p5_a25 JTF_VARCHAR2_TABLE_2000
3885     , p5_a26 JTF_VARCHAR2_TABLE_100
3886     , p5_a27 JTF_VARCHAR2_TABLE_200
3887     , p5_a28 JTF_DATE_TABLE
3888     , p5_a29 JTF_VARCHAR2_TABLE_200
3889     , p5_a30 JTF_DATE_TABLE
3890     , p5_a31 JTF_DATE_TABLE
3891     , p5_a32 JTF_DATE_TABLE
3892     , p5_a33 JTF_VARCHAR2_TABLE_100
3893     , p5_a34 JTF_NUMBER_TABLE
3894     , p5_a35 JTF_VARCHAR2_TABLE_100
3895     , p5_a36 JTF_NUMBER_TABLE
3896     , p5_a37 JTF_VARCHAR2_TABLE_100
3897     , p5_a38 JTF_VARCHAR2_TABLE_100
3898     , p5_a39 JTF_VARCHAR2_TABLE_500
3899     , p5_a40 JTF_VARCHAR2_TABLE_500
3900     , p5_a41 JTF_VARCHAR2_TABLE_500
3901     , p5_a42 JTF_VARCHAR2_TABLE_500
3902     , p5_a43 JTF_VARCHAR2_TABLE_500
3903     , p5_a44 JTF_VARCHAR2_TABLE_500
3904     , p5_a45 JTF_VARCHAR2_TABLE_500
3905     , p5_a46 JTF_VARCHAR2_TABLE_500
3906     , p5_a47 JTF_VARCHAR2_TABLE_500
3907     , p5_a48 JTF_VARCHAR2_TABLE_500
3908     , p5_a49 JTF_VARCHAR2_TABLE_500
3909     , p5_a50 JTF_VARCHAR2_TABLE_500
3910     , p5_a51 JTF_VARCHAR2_TABLE_500
3911     , p5_a52 JTF_VARCHAR2_TABLE_500
3912     , p5_a53 JTF_VARCHAR2_TABLE_500
3913     , p5_a54 JTF_NUMBER_TABLE
3914     , p5_a55 JTF_DATE_TABLE
3915     , p5_a56 JTF_NUMBER_TABLE
3916     , p5_a57 JTF_DATE_TABLE
3917     , p5_a58 JTF_VARCHAR2_TABLE_100
3918     , p5_a59 JTF_VARCHAR2_TABLE_100
3919     , p5_a60 JTF_VARCHAR2_TABLE_100
3920     , p5_a61 JTF_NUMBER_TABLE
3921     , p5_a62 JTF_VARCHAR2_TABLE_100
3922     , p5_a63 JTF_VARCHAR2_TABLE_100
3923     , p5_a64 JTF_VARCHAR2_TABLE_100
3924     , p5_a65 JTF_VARCHAR2_TABLE_100
3925     , p5_a66 JTF_VARCHAR2_TABLE_100
3926     , p5_a67 JTF_NUMBER_TABLE
3927     , p5_a68 JTF_NUMBER_TABLE
3928     , p5_a69 JTF_NUMBER_TABLE
3929     , p5_a70 JTF_DATE_TABLE
3930     , p5_a71 JTF_NUMBER_TABLE
3931     , p5_a72 JTF_DATE_TABLE
3932     , p5_a73 JTF_NUMBER_TABLE
3933     , p5_a74 JTF_NUMBER_TABLE
3934     , p5_a75 JTF_VARCHAR2_TABLE_100
3935     , p5_a76 JTF_VARCHAR2_TABLE_100
3936     , p5_a77 JTF_NUMBER_TABLE
3937     , p5_a78 JTF_NUMBER_TABLE
3938     , p5_a79 JTF_VARCHAR2_TABLE_100
3939     , p5_a80 JTF_VARCHAR2_TABLE_100
3940     , p5_a81 JTF_NUMBER_TABLE
3941     , p5_a82 JTF_VARCHAR2_TABLE_100
3942     , p5_a83 JTF_NUMBER_TABLE
3943     , p5_a84 JTF_NUMBER_TABLE
3944     , p5_a85 JTF_NUMBER_TABLE
3945     , p5_a86 JTF_NUMBER_TABLE
3946     , p5_a87 JTF_VARCHAR2_TABLE_100
3947     , p5_a88 JTF_NUMBER_TABLE
3948     , p5_a89 JTF_NUMBER_TABLE
3949     , p6_a0 JTF_NUMBER_TABLE
3950     , p6_a1 JTF_NUMBER_TABLE
3951     , p6_a2 JTF_NUMBER_TABLE
3952     , p6_a3 JTF_NUMBER_TABLE
3953     , p6_a4 JTF_VARCHAR2_TABLE_100
3954     , p6_a5 JTF_VARCHAR2_TABLE_100
3955     , p6_a6 JTF_VARCHAR2_TABLE_100
3956     , p6_a7 JTF_NUMBER_TABLE
3957     , p6_a8 JTF_NUMBER_TABLE
3958     , p6_a9 JTF_DATE_TABLE
3959     , p6_a10 JTF_NUMBER_TABLE
3960     , p6_a11 JTF_NUMBER_TABLE
3961     , p6_a12 JTF_NUMBER_TABLE
3962     , p6_a13 JTF_NUMBER_TABLE
3963     , p6_a14 JTF_NUMBER_TABLE
3964     , p6_a15 JTF_NUMBER_TABLE
3965     , p6_a16 JTF_NUMBER_TABLE
3966     , p6_a17 JTF_NUMBER_TABLE
3967     , p6_a18 JTF_NUMBER_TABLE
3968     , p6_a19 JTF_NUMBER_TABLE
3969     , p6_a20 JTF_DATE_TABLE
3970     , p6_a21 JTF_DATE_TABLE
3971     , p6_a22 JTF_NUMBER_TABLE
3972     , p6_a23 JTF_NUMBER_TABLE
3973     , p6_a24 JTF_DATE_TABLE
3974     , p6_a25 JTF_DATE_TABLE
3975     , p6_a26 JTF_DATE_TABLE
3976     , p6_a27 JTF_NUMBER_TABLE
3977     , p6_a28 JTF_NUMBER_TABLE
3978     , p6_a29 JTF_NUMBER_TABLE
3979     , p6_a30 JTF_NUMBER_TABLE
3980     , p6_a31 JTF_NUMBER_TABLE
3981     , p6_a32 JTF_NUMBER_TABLE
3982     , p6_a33 JTF_NUMBER_TABLE
3983     , p6_a34 JTF_DATE_TABLE
3984     , p6_a35 JTF_VARCHAR2_TABLE_100
3985     , p6_a36 JTF_DATE_TABLE
3986     , p6_a37 JTF_VARCHAR2_TABLE_300
3987     , p6_a38 JTF_NUMBER_TABLE
3988     , p6_a39 JTF_NUMBER_TABLE
3989     , p6_a40 JTF_NUMBER_TABLE
3990     , p6_a41 JTF_VARCHAR2_TABLE_100
3991     , p6_a42 JTF_DATE_TABLE
3992     , p6_a43 JTF_NUMBER_TABLE
3993     , p6_a44 JTF_NUMBER_TABLE
3994     , p6_a45 JTF_DATE_TABLE
3995     , p6_a46 JTF_NUMBER_TABLE
3996     , p6_a47 JTF_DATE_TABLE
3997     , p6_a48 JTF_DATE_TABLE
3998     , p6_a49 JTF_DATE_TABLE
3999     , p6_a50 JTF_NUMBER_TABLE
4000     , p6_a51 JTF_NUMBER_TABLE
4001     , p6_a52 JTF_VARCHAR2_TABLE_100
4002     , p6_a53 JTF_NUMBER_TABLE
4003     , p6_a54 JTF_NUMBER_TABLE
4004     , p6_a55 JTF_VARCHAR2_TABLE_100
4005     , p6_a56 JTF_VARCHAR2_TABLE_100
4006     , p6_a57 JTF_NUMBER_TABLE
4007     , p6_a58 JTF_DATE_TABLE
4008     , p6_a59 JTF_NUMBER_TABLE
4009     , p6_a60 JTF_VARCHAR2_TABLE_100
4010     , p6_a61 JTF_VARCHAR2_TABLE_500
4011     , p6_a62 JTF_VARCHAR2_TABLE_500
4012     , p6_a63 JTF_VARCHAR2_TABLE_500
4013     , p6_a64 JTF_VARCHAR2_TABLE_500
4014     , p6_a65 JTF_VARCHAR2_TABLE_500
4015     , p6_a66 JTF_VARCHAR2_TABLE_500
4016     , p6_a67 JTF_VARCHAR2_TABLE_500
4017     , p6_a68 JTF_VARCHAR2_TABLE_500
4018     , p6_a69 JTF_VARCHAR2_TABLE_500
4019     , p6_a70 JTF_VARCHAR2_TABLE_500
4020     , p6_a71 JTF_VARCHAR2_TABLE_500
4021     , p6_a72 JTF_VARCHAR2_TABLE_500
4022     , p6_a73 JTF_VARCHAR2_TABLE_500
4023     , p6_a74 JTF_VARCHAR2_TABLE_500
4024     , p6_a75 JTF_VARCHAR2_TABLE_500
4025     , p6_a76 JTF_NUMBER_TABLE
4026     , p6_a77 JTF_NUMBER_TABLE
4027     , p6_a78 JTF_NUMBER_TABLE
4028     , p6_a79 JTF_DATE_TABLE
4029     , p6_a80 JTF_NUMBER_TABLE
4030     , p6_a81 JTF_DATE_TABLE
4031     , p6_a82 JTF_NUMBER_TABLE
4032     , p6_a83 JTF_DATE_TABLE
4033     , p6_a84 JTF_DATE_TABLE
4034     , p6_a85 JTF_DATE_TABLE
4035     , p6_a86 JTF_DATE_TABLE
4036     , p6_a87 JTF_NUMBER_TABLE
4037     , p6_a88 JTF_NUMBER_TABLE
4038     , p6_a89 JTF_NUMBER_TABLE
4039     , p6_a90 JTF_VARCHAR2_TABLE_100
4040     , p6_a91 JTF_NUMBER_TABLE
4041     , p6_a92 JTF_VARCHAR2_TABLE_100
4042     , p6_a93 JTF_NUMBER_TABLE
4043     , p6_a94 JTF_NUMBER_TABLE
4044     , p6_a95 JTF_DATE_TABLE
4045     , p6_a96 JTF_VARCHAR2_TABLE_100
4046     , p6_a97 JTF_VARCHAR2_TABLE_100
4047     , p6_a98 JTF_NUMBER_TABLE
4048     , p7_a0 JTF_NUMBER_TABLE
4049     , p7_a1 JTF_NUMBER_TABLE
4050     , p7_a2 JTF_NUMBER_TABLE
4051     , p7_a3 JTF_NUMBER_TABLE
4052     , p7_a4 JTF_NUMBER_TABLE
4053     , p7_a5 JTF_NUMBER_TABLE
4054     , p7_a6 JTF_VARCHAR2_TABLE_100
4055     , p7_a7 JTF_VARCHAR2_TABLE_200
4056     , p7_a8 JTF_VARCHAR2_TABLE_100
4057     , p7_a9 JTF_VARCHAR2_TABLE_100
4058     , p7_a10 JTF_VARCHAR2_TABLE_100
4059     , p7_a11 JTF_NUMBER_TABLE
4060     , p7_a12 JTF_VARCHAR2_TABLE_100
4061     , p7_a13 JTF_NUMBER_TABLE
4062     , p7_a14 JTF_VARCHAR2_TABLE_100
4063     , p7_a15 JTF_NUMBER_TABLE
4064     , p7_a16 JTF_DATE_TABLE
4065     , p7_a17 JTF_NUMBER_TABLE
4066     , p7_a18 JTF_DATE_TABLE
4067     , p7_a19 JTF_NUMBER_TABLE
4068     , p8_a0 out nocopy JTF_NUMBER_TABLE
4069     , p8_a1 out nocopy JTF_NUMBER_TABLE
4070     , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
4071     , p8_a3 out nocopy JTF_NUMBER_TABLE
4072     , p8_a4 out nocopy JTF_NUMBER_TABLE
4073     , p8_a5 out nocopy JTF_NUMBER_TABLE
4074     , p8_a6 out nocopy JTF_NUMBER_TABLE
4075     , p8_a7 out nocopy JTF_NUMBER_TABLE
4076     , p8_a8 out nocopy JTF_VARCHAR2_TABLE_200
4077     , p8_a9 out nocopy JTF_VARCHAR2_TABLE_100
4078     , p8_a10 out nocopy JTF_NUMBER_TABLE
4079     , p8_a11 out nocopy JTF_VARCHAR2_TABLE_100
4080     , p8_a12 out nocopy JTF_NUMBER_TABLE
4081     , p8_a13 out nocopy JTF_VARCHAR2_TABLE_2000
4082     , p8_a14 out nocopy JTF_VARCHAR2_TABLE_2000
4083     , p8_a15 out nocopy JTF_VARCHAR2_TABLE_2000
4084     , p8_a16 out nocopy JTF_VARCHAR2_TABLE_300
4085     , p8_a17 out nocopy JTF_VARCHAR2_TABLE_100
4086     , p8_a18 out nocopy JTF_NUMBER_TABLE
4087     , p8_a19 out nocopy JTF_NUMBER_TABLE
4088     , p8_a20 out nocopy JTF_NUMBER_TABLE
4089     , p8_a21 out nocopy JTF_NUMBER_TABLE
4090     , p8_a22 out nocopy JTF_VARCHAR2_TABLE_100
4091     , p8_a23 out nocopy JTF_VARCHAR2_TABLE_100
4092     , p8_a24 out nocopy JTF_VARCHAR2_TABLE_100
4093     , p8_a25 out nocopy JTF_VARCHAR2_TABLE_2000
4094     , p8_a26 out nocopy JTF_VARCHAR2_TABLE_100
4095     , p8_a27 out nocopy JTF_VARCHAR2_TABLE_200
4096     , p8_a28 out nocopy JTF_DATE_TABLE
4097     , p8_a29 out nocopy JTF_VARCHAR2_TABLE_200
4098     , p8_a30 out nocopy JTF_DATE_TABLE
4099     , p8_a31 out nocopy JTF_DATE_TABLE
4100     , p8_a32 out nocopy JTF_DATE_TABLE
4101     , p8_a33 out nocopy JTF_VARCHAR2_TABLE_100
4102     , p8_a34 out nocopy JTF_NUMBER_TABLE
4103     , p8_a35 out nocopy JTF_VARCHAR2_TABLE_100
4104     , p8_a36 out nocopy JTF_NUMBER_TABLE
4105     , p8_a37 out nocopy JTF_VARCHAR2_TABLE_100
4106     , p8_a38 out nocopy JTF_VARCHAR2_TABLE_100
4107     , p8_a39 out nocopy JTF_VARCHAR2_TABLE_500
4108     , p8_a40 out nocopy JTF_VARCHAR2_TABLE_500
4109     , p8_a41 out nocopy JTF_VARCHAR2_TABLE_500
4110     , p8_a42 out nocopy JTF_VARCHAR2_TABLE_500
4111     , p8_a43 out nocopy JTF_VARCHAR2_TABLE_500
4112     , p8_a44 out nocopy JTF_VARCHAR2_TABLE_500
4113     , p8_a45 out nocopy JTF_VARCHAR2_TABLE_500
4114     , p8_a46 out nocopy JTF_VARCHAR2_TABLE_500
4115     , p8_a47 out nocopy JTF_VARCHAR2_TABLE_500
4116     , p8_a48 out nocopy JTF_VARCHAR2_TABLE_500
4117     , p8_a49 out nocopy JTF_VARCHAR2_TABLE_500
4118     , p8_a50 out nocopy JTF_VARCHAR2_TABLE_500
4119     , p8_a51 out nocopy JTF_VARCHAR2_TABLE_500
4120     , p8_a52 out nocopy JTF_VARCHAR2_TABLE_500
4121     , p8_a53 out nocopy JTF_VARCHAR2_TABLE_500
4122     , p8_a54 out nocopy JTF_NUMBER_TABLE
4123     , p8_a55 out nocopy JTF_DATE_TABLE
4124     , p8_a56 out nocopy JTF_NUMBER_TABLE
4125     , p8_a57 out nocopy JTF_DATE_TABLE
4126     , p8_a58 out nocopy JTF_VARCHAR2_TABLE_100
4127     , p8_a59 out nocopy JTF_VARCHAR2_TABLE_100
4128     , p8_a60 out nocopy JTF_VARCHAR2_TABLE_100
4129     , p8_a61 out nocopy JTF_NUMBER_TABLE
4130     , p8_a62 out nocopy JTF_VARCHAR2_TABLE_100
4131     , p8_a63 out nocopy JTF_VARCHAR2_TABLE_100
4132     , p8_a64 out nocopy JTF_VARCHAR2_TABLE_100
4133     , p8_a65 out nocopy JTF_VARCHAR2_TABLE_100
4134     , p8_a66 out nocopy JTF_VARCHAR2_TABLE_100
4135     , p8_a67 out nocopy JTF_NUMBER_TABLE
4136     , p8_a68 out nocopy JTF_NUMBER_TABLE
4137     , p8_a69 out nocopy JTF_NUMBER_TABLE
4138     , p8_a70 out nocopy JTF_DATE_TABLE
4139     , p8_a71 out nocopy JTF_NUMBER_TABLE
4140     , p8_a72 out nocopy JTF_DATE_TABLE
4141     , p8_a73 out nocopy JTF_NUMBER_TABLE
4142     , p8_a74 out nocopy JTF_NUMBER_TABLE
4143     , p8_a75 out nocopy JTF_VARCHAR2_TABLE_100
4144     , p8_a76 out nocopy JTF_VARCHAR2_TABLE_100
4145     , p8_a77 out nocopy JTF_NUMBER_TABLE
4146     , p8_a78 out nocopy JTF_NUMBER_TABLE
4147     , p8_a79 out nocopy JTF_VARCHAR2_TABLE_100
4148     , p8_a80 out nocopy JTF_VARCHAR2_TABLE_100
4149     , p8_a81 out nocopy JTF_NUMBER_TABLE
4150     , p8_a82 out nocopy JTF_VARCHAR2_TABLE_100
4151     , p8_a83 out nocopy JTF_NUMBER_TABLE
4152     , p8_a84 out nocopy JTF_NUMBER_TABLE
4153     , p8_a85 out nocopy JTF_NUMBER_TABLE
4154     , p8_a86 out nocopy JTF_NUMBER_TABLE
4155     , p8_a87 out nocopy JTF_VARCHAR2_TABLE_100
4156     , p8_a88 out nocopy JTF_NUMBER_TABLE
4157     , p8_a89 out nocopy JTF_NUMBER_TABLE
4158     , p9_a0 out nocopy JTF_NUMBER_TABLE
4159     , p9_a1 out nocopy JTF_NUMBER_TABLE
4160     , p9_a2 out nocopy JTF_NUMBER_TABLE
4161     , p9_a3 out nocopy JTF_NUMBER_TABLE
4162     , p9_a4 out nocopy JTF_VARCHAR2_TABLE_100
4163     , p9_a5 out nocopy JTF_VARCHAR2_TABLE_100
4164     , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
4165     , p9_a7 out nocopy JTF_NUMBER_TABLE
4166     , p9_a8 out nocopy JTF_NUMBER_TABLE
4167     , p9_a9 out nocopy JTF_DATE_TABLE
4168     , p9_a10 out nocopy JTF_NUMBER_TABLE
4169     , p9_a11 out nocopy JTF_NUMBER_TABLE
4170     , p9_a12 out nocopy JTF_NUMBER_TABLE
4171     , p9_a13 out nocopy JTF_NUMBER_TABLE
4172     , p9_a14 out nocopy JTF_NUMBER_TABLE
4173     , p9_a15 out nocopy JTF_NUMBER_TABLE
4174     , p9_a16 out nocopy JTF_NUMBER_TABLE
4175     , p9_a17 out nocopy JTF_NUMBER_TABLE
4176     , p9_a18 out nocopy JTF_NUMBER_TABLE
4177     , p9_a19 out nocopy JTF_NUMBER_TABLE
4178     , p9_a20 out nocopy JTF_DATE_TABLE
4179     , p9_a21 out nocopy JTF_DATE_TABLE
4180     , p9_a22 out nocopy JTF_NUMBER_TABLE
4181     , p9_a23 out nocopy JTF_NUMBER_TABLE
4182     , p9_a24 out nocopy JTF_DATE_TABLE
4183     , p9_a25 out nocopy JTF_DATE_TABLE
4184     , p9_a26 out nocopy JTF_DATE_TABLE
4185     , p9_a27 out nocopy JTF_NUMBER_TABLE
4186     , p9_a28 out nocopy JTF_NUMBER_TABLE
4187     , p9_a29 out nocopy JTF_NUMBER_TABLE
4188     , p9_a30 out nocopy JTF_NUMBER_TABLE
4189     , p9_a31 out nocopy JTF_NUMBER_TABLE
4190     , p9_a32 out nocopy JTF_NUMBER_TABLE
4191     , p9_a33 out nocopy JTF_NUMBER_TABLE
4192     , p9_a34 out nocopy JTF_DATE_TABLE
4193     , p9_a35 out nocopy JTF_VARCHAR2_TABLE_100
4194     , p9_a36 out nocopy JTF_DATE_TABLE
4195     , p9_a37 out nocopy JTF_VARCHAR2_TABLE_300
4196     , p9_a38 out nocopy JTF_NUMBER_TABLE
4197     , p9_a39 out nocopy JTF_NUMBER_TABLE
4198     , p9_a40 out nocopy JTF_NUMBER_TABLE
4199     , p9_a41 out nocopy JTF_VARCHAR2_TABLE_100
4200     , p9_a42 out nocopy JTF_DATE_TABLE
4201     , p9_a43 out nocopy JTF_NUMBER_TABLE
4202     , p9_a44 out nocopy JTF_NUMBER_TABLE
4203     , p9_a45 out nocopy JTF_DATE_TABLE
4204     , p9_a46 out nocopy JTF_NUMBER_TABLE
4205     , p9_a47 out nocopy JTF_DATE_TABLE
4206     , p9_a48 out nocopy JTF_DATE_TABLE
4207     , p9_a49 out nocopy JTF_DATE_TABLE
4208     , p9_a50 out nocopy JTF_NUMBER_TABLE
4209     , p9_a51 out nocopy JTF_NUMBER_TABLE
4210     , p9_a52 out nocopy JTF_VARCHAR2_TABLE_100
4211     , p9_a53 out nocopy JTF_NUMBER_TABLE
4212     , p9_a54 out nocopy JTF_NUMBER_TABLE
4213     , p9_a55 out nocopy JTF_VARCHAR2_TABLE_100
4214     , p9_a56 out nocopy JTF_VARCHAR2_TABLE_100
4215     , p9_a57 out nocopy JTF_NUMBER_TABLE
4216     , p9_a58 out nocopy JTF_DATE_TABLE
4217     , p9_a59 out nocopy JTF_NUMBER_TABLE
4218     , p9_a60 out nocopy JTF_VARCHAR2_TABLE_100
4219     , p9_a61 out nocopy JTF_VARCHAR2_TABLE_500
4220     , p9_a62 out nocopy JTF_VARCHAR2_TABLE_500
4221     , p9_a63 out nocopy JTF_VARCHAR2_TABLE_500
4222     , p9_a64 out nocopy JTF_VARCHAR2_TABLE_500
4223     , p9_a65 out nocopy JTF_VARCHAR2_TABLE_500
4224     , p9_a66 out nocopy JTF_VARCHAR2_TABLE_500
4225     , p9_a67 out nocopy JTF_VARCHAR2_TABLE_500
4226     , p9_a68 out nocopy JTF_VARCHAR2_TABLE_500
4227     , p9_a69 out nocopy JTF_VARCHAR2_TABLE_500
4228     , p9_a70 out nocopy JTF_VARCHAR2_TABLE_500
4229     , p9_a71 out nocopy JTF_VARCHAR2_TABLE_500
4230     , p9_a72 out nocopy JTF_VARCHAR2_TABLE_500
4231     , p9_a73 out nocopy JTF_VARCHAR2_TABLE_500
4232     , p9_a74 out nocopy JTF_VARCHAR2_TABLE_500
4233     , p9_a75 out nocopy JTF_VARCHAR2_TABLE_500
4234     , p9_a76 out nocopy JTF_NUMBER_TABLE
4235     , p9_a77 out nocopy JTF_NUMBER_TABLE
4236     , p9_a78 out nocopy JTF_NUMBER_TABLE
4237     , p9_a79 out nocopy JTF_DATE_TABLE
4238     , p9_a80 out nocopy JTF_NUMBER_TABLE
4239     , p9_a81 out nocopy JTF_DATE_TABLE
4240     , p9_a82 out nocopy JTF_NUMBER_TABLE
4241     , p9_a83 out nocopy JTF_DATE_TABLE
4242     , p9_a84 out nocopy JTF_DATE_TABLE
4243     , p9_a85 out nocopy JTF_DATE_TABLE
4244     , p9_a86 out nocopy JTF_DATE_TABLE
4245     , p9_a87 out nocopy JTF_NUMBER_TABLE
4246     , p9_a88 out nocopy JTF_NUMBER_TABLE
4247     , p9_a89 out nocopy JTF_NUMBER_TABLE
4248     , p9_a90 out nocopy JTF_VARCHAR2_TABLE_100
4249     , p9_a91 out nocopy JTF_NUMBER_TABLE
4250     , p9_a92 out nocopy JTF_VARCHAR2_TABLE_100
4251     , p9_a93 out nocopy JTF_NUMBER_TABLE
4252     , p9_a94 out nocopy JTF_NUMBER_TABLE
4253     , p9_a95 out nocopy JTF_DATE_TABLE
4254     , p9_a96 out nocopy JTF_VARCHAR2_TABLE_100
4255     , p9_a97 out nocopy JTF_VARCHAR2_TABLE_100
4256     , p9_a98 out nocopy JTF_NUMBER_TABLE
4257     , p10_a0 out nocopy JTF_NUMBER_TABLE
4258     , p10_a1 out nocopy JTF_NUMBER_TABLE
4259     , p10_a2 out nocopy JTF_NUMBER_TABLE
4260     , p10_a3 out nocopy JTF_NUMBER_TABLE
4261     , p10_a4 out nocopy JTF_NUMBER_TABLE
4262     , p10_a5 out nocopy JTF_NUMBER_TABLE
4263     , p10_a6 out nocopy JTF_VARCHAR2_TABLE_100
4264     , p10_a7 out nocopy JTF_VARCHAR2_TABLE_200
4265     , p10_a8 out nocopy JTF_VARCHAR2_TABLE_100
4266     , p10_a9 out nocopy JTF_VARCHAR2_TABLE_100
4267     , p10_a10 out nocopy JTF_VARCHAR2_TABLE_100
4268     , p10_a11 out nocopy JTF_NUMBER_TABLE
4269     , p10_a12 out nocopy JTF_VARCHAR2_TABLE_100
4270     , p10_a13 out nocopy JTF_NUMBER_TABLE
4271     , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
4272     , p10_a15 out nocopy JTF_NUMBER_TABLE
4273     , p10_a16 out nocopy JTF_DATE_TABLE
4274     , p10_a17 out nocopy JTF_NUMBER_TABLE
4275     , p10_a18 out nocopy JTF_DATE_TABLE
4276     , p10_a19 out nocopy JTF_NUMBER_TABLE
4277   )
4278 
4279   as
4280     ddp_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4281     ddp_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4282     ddp_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4283     ddx_clev_tbl okl_contract_line_item_pub.clev_tbl_type;
4284     ddx_klev_tbl okl_contract_line_item_pub.klev_tbl_type;
4285     ddx_cimv_tbl okl_contract_line_item_pub.cimv_tbl_type;
4286     ddindx binary_integer; indx binary_integer;
4287   begin
4288 
4289     -- copy data to the local IN or IN-OUT args, if any
4290 
4291 
4292 
4293 
4294 
4295     okl_okc_migration_pvt_w.rosetta_table_copy_in_p5(ddp_clev_tbl, p5_a0
4296       , p5_a1
4297       , p5_a2
4298       , p5_a3
4299       , p5_a4
4300       , p5_a5
4301       , p5_a6
4302       , p5_a7
4303       , p5_a8
4304       , p5_a9
4305       , p5_a10
4306       , p5_a11
4307       , p5_a12
4308       , p5_a13
4309       , p5_a14
4310       , p5_a15
4311       , p5_a16
4312       , p5_a17
4313       , p5_a18
4314       , p5_a19
4315       , p5_a20
4316       , p5_a21
4317       , p5_a22
4318       , p5_a23
4319       , p5_a24
4320       , p5_a25
4321       , p5_a26
4322       , p5_a27
4323       , p5_a28
4324       , p5_a29
4325       , p5_a30
4326       , p5_a31
4327       , p5_a32
4328       , p5_a33
4329       , p5_a34
4330       , p5_a35
4331       , p5_a36
4332       , p5_a37
4333       , p5_a38
4334       , p5_a39
4335       , p5_a40
4336       , p5_a41
4337       , p5_a42
4338       , p5_a43
4339       , p5_a44
4340       , p5_a45
4341       , p5_a46
4342       , p5_a47
4343       , p5_a48
4344       , p5_a49
4345       , p5_a50
4346       , p5_a51
4347       , p5_a52
4348       , p5_a53
4349       , p5_a54
4350       , p5_a55
4351       , p5_a56
4352       , p5_a57
4353       , p5_a58
4354       , p5_a59
4355       , p5_a60
4356       , p5_a61
4357       , p5_a62
4358       , p5_a63
4359       , p5_a64
4360       , p5_a65
4361       , p5_a66
4362       , p5_a67
4363       , p5_a68
4364       , p5_a69
4365       , p5_a70
4366       , p5_a71
4367       , p5_a72
4368       , p5_a73
4369       , p5_a74
4370       , p5_a75
4371       , p5_a76
4372       , p5_a77
4373       , p5_a78
4374       , p5_a79
4375       , p5_a80
4376       , p5_a81
4377       , p5_a82
4378       , p5_a83
4379       , p5_a84
4380       , p5_a85
4381       , p5_a86
4382       , p5_a87
4383       , p5_a88
4384       , p5_a89
4385       );
4386 
4387     okl_kle_pvt_w.rosetta_table_copy_in_p8(ddp_klev_tbl, p6_a0
4388       , p6_a1
4389       , p6_a2
4390       , p6_a3
4391       , p6_a4
4392       , p6_a5
4393       , p6_a6
4394       , p6_a7
4395       , p6_a8
4396       , p6_a9
4397       , p6_a10
4398       , p6_a11
4399       , p6_a12
4400       , p6_a13
4401       , p6_a14
4402       , p6_a15
4403       , p6_a16
4404       , p6_a17
4405       , p6_a18
4406       , p6_a19
4407       , p6_a20
4408       , p6_a21
4409       , p6_a22
4410       , p6_a23
4411       , p6_a24
4412       , p6_a25
4413       , p6_a26
4414       , p6_a27
4415       , p6_a28
4416       , p6_a29
4417       , p6_a30
4418       , p6_a31
4419       , p6_a32
4420       , p6_a33
4421       , p6_a34
4422       , p6_a35
4423       , p6_a36
4424       , p6_a37
4425       , p6_a38
4426       , p6_a39
4427       , p6_a40
4428       , p6_a41
4429       , p6_a42
4430       , p6_a43
4431       , p6_a44
4432       , p6_a45
4433       , p6_a46
4434       , p6_a47
4435       , p6_a48
4436       , p6_a49
4437       , p6_a50
4438       , p6_a51
4439       , p6_a52
4440       , p6_a53
4441       , p6_a54
4442       , p6_a55
4443       , p6_a56
4444       , p6_a57
4445       , p6_a58
4446       , p6_a59
4447       , p6_a60
4448       , p6_a61
4449       , p6_a62
4450       , p6_a63
4451       , p6_a64
4452       , p6_a65
4453       , p6_a66
4454       , p6_a67
4455       , p6_a68
4456       , p6_a69
4457       , p6_a70
4458       , p6_a71
4459       , p6_a72
4460       , p6_a73
4461       , p6_a74
4462       , p6_a75
4463       , p6_a76
4464       , p6_a77
4465       , p6_a78
4466       , p6_a79
4467       , p6_a80
4468       , p6_a81
4469       , p6_a82
4470       , p6_a83
4471       , p6_a84
4472       , p6_a85
4473       , p6_a86
4474       , p6_a87
4475       , p6_a88
4476       , p6_a89
4477       , p6_a90
4478       , p6_a91
4479       , p6_a92
4480       , p6_a93
4481       , p6_a94
4482       , p6_a95
4483       , p6_a96
4484       , p6_a97
4485       , p6_a98
4486       );
4487 
4488     okl_okc_migration_pvt_w.rosetta_table_copy_in_p7(ddp_cimv_tbl, p7_a0
4489       , p7_a1
4490       , p7_a2
4491       , p7_a3
4492       , p7_a4
4493       , p7_a5
4494       , p7_a6
4495       , p7_a7
4496       , p7_a8
4497       , p7_a9
4498       , p7_a10
4499       , p7_a11
4500       , p7_a12
4501       , p7_a13
4502       , p7_a14
4503       , p7_a15
4504       , p7_a16
4505       , p7_a17
4506       , p7_a18
4507       , p7_a19
4508       );
4509 
4510 
4511 
4512 
4513     -- here's the delegated call to the old PL/SQL routine
4514     okl_contract_line_item_pub.update_contract_line_item(p_api_version,
4515       p_init_msg_list,
4516       x_return_status,
4517       x_msg_count,
4518       x_msg_data,
4519       ddp_clev_tbl,
4520       ddp_klev_tbl,
4521       ddp_cimv_tbl,
4522       ddx_clev_tbl,
4523       ddx_klev_tbl,
4524       ddx_cimv_tbl);
4525 
4526     -- copy data back from the local variables to OUT or IN-OUT args, if any
4527 
4528 
4529 
4530 
4531 
4532 
4533 
4534 
4535     okl_okc_migration_pvt_w.rosetta_table_copy_out_p5(ddx_clev_tbl, p8_a0
4536       , p8_a1
4537       , p8_a2
4538       , p8_a3
4539       , p8_a4
4540       , p8_a5
4541       , p8_a6
4542       , p8_a7
4543       , p8_a8
4544       , p8_a9
4545       , p8_a10
4546       , p8_a11
4547       , p8_a12
4548       , p8_a13
4549       , p8_a14
4550       , p8_a15
4551       , p8_a16
4552       , p8_a17
4553       , p8_a18
4554       , p8_a19
4555       , p8_a20
4556       , p8_a21
4557       , p8_a22
4558       , p8_a23
4559       , p8_a24
4560       , p8_a25
4561       , p8_a26
4562       , p8_a27
4563       , p8_a28
4564       , p8_a29
4565       , p8_a30
4566       , p8_a31
4567       , p8_a32
4568       , p8_a33
4569       , p8_a34
4570       , p8_a35
4571       , p8_a36
4572       , p8_a37
4573       , p8_a38
4574       , p8_a39
4575       , p8_a40
4576       , p8_a41
4577       , p8_a42
4578       , p8_a43
4579       , p8_a44
4580       , p8_a45
4581       , p8_a46
4582       , p8_a47
4583       , p8_a48
4584       , p8_a49
4585       , p8_a50
4586       , p8_a51
4587       , p8_a52
4588       , p8_a53
4589       , p8_a54
4590       , p8_a55
4591       , p8_a56
4592       , p8_a57
4593       , p8_a58
4594       , p8_a59
4595       , p8_a60
4596       , p8_a61
4597       , p8_a62
4598       , p8_a63
4599       , p8_a64
4600       , p8_a65
4601       , p8_a66
4602       , p8_a67
4603       , p8_a68
4604       , p8_a69
4605       , p8_a70
4606       , p8_a71
4607       , p8_a72
4608       , p8_a73
4609       , p8_a74
4610       , p8_a75
4611       , p8_a76
4612       , p8_a77
4613       , p8_a78
4614       , p8_a79
4615       , p8_a80
4616       , p8_a81
4617       , p8_a82
4618       , p8_a83
4619       , p8_a84
4620       , p8_a85
4621       , p8_a86
4622       , p8_a87
4623       , p8_a88
4624       , p8_a89
4625       );
4626 
4627     okl_kle_pvt_w.rosetta_table_copy_out_p8(ddx_klev_tbl, p9_a0
4628       , p9_a1
4629       , p9_a2
4630       , p9_a3
4631       , p9_a4
4632       , p9_a5
4633       , p9_a6
4634       , p9_a7
4635       , p9_a8
4636       , p9_a9
4637       , p9_a10
4638       , p9_a11
4639       , p9_a12
4640       , p9_a13
4641       , p9_a14
4642       , p9_a15
4643       , p9_a16
4644       , p9_a17
4645       , p9_a18
4646       , p9_a19
4647       , p9_a20
4648       , p9_a21
4649       , p9_a22
4650       , p9_a23
4651       , p9_a24
4652       , p9_a25
4653       , p9_a26
4654       , p9_a27
4655       , p9_a28
4656       , p9_a29
4657       , p9_a30
4658       , p9_a31
4659       , p9_a32
4660       , p9_a33
4661       , p9_a34
4662       , p9_a35
4663       , p9_a36
4664       , p9_a37
4665       , p9_a38
4666       , p9_a39
4667       , p9_a40
4668       , p9_a41
4669       , p9_a42
4670       , p9_a43
4671       , p9_a44
4672       , p9_a45
4673       , p9_a46
4674       , p9_a47
4675       , p9_a48
4676       , p9_a49
4677       , p9_a50
4678       , p9_a51
4679       , p9_a52
4680       , p9_a53
4681       , p9_a54
4682       , p9_a55
4683       , p9_a56
4684       , p9_a57
4685       , p9_a58
4686       , p9_a59
4687       , p9_a60
4688       , p9_a61
4689       , p9_a62
4690       , p9_a63
4691       , p9_a64
4692       , p9_a65
4693       , p9_a66
4694       , p9_a67
4695       , p9_a68
4696       , p9_a69
4697       , p9_a70
4698       , p9_a71
4699       , p9_a72
4700       , p9_a73
4701       , p9_a74
4702       , p9_a75
4703       , p9_a76
4704       , p9_a77
4705       , p9_a78
4706       , p9_a79
4707       , p9_a80
4708       , p9_a81
4709       , p9_a82
4710       , p9_a83
4711       , p9_a84
4712       , p9_a85
4713       , p9_a86
4714       , p9_a87
4715       , p9_a88
4716       , p9_a89
4717       , p9_a90
4718       , p9_a91
4719       , p9_a92
4720       , p9_a93
4721       , p9_a94
4722       , p9_a95
4723       , p9_a96
4724       , p9_a97
4725       , p9_a98
4726       );
4727 
4728     okl_okc_migration_pvt_w.rosetta_table_copy_out_p7(ddx_cimv_tbl, p10_a0
4729       , p10_a1
4730       , p10_a2
4731       , p10_a3
4732       , p10_a4
4733       , p10_a5
4734       , p10_a6
4735       , p10_a7
4736       , p10_a8
4737       , p10_a9
4738       , p10_a10
4739       , p10_a11
4740       , p10_a12
4741       , p10_a13
4742       , p10_a14
4743       , p10_a15
4744       , p10_a16
4745       , p10_a17
4746       , p10_a18
4747       , p10_a19
4748       );
4749   end;
4750 
4751 end okl_contract_line_item_pub_w;