[Home] [Help]
PACKAGE BODY: APPS.OKL_COPY_ASSET_PUB_W
Source
1 package body okl_copy_asset_pub_w as
2 /* $Header: OKLUCALB.pls 115.7 2003/10/16 09:59:58 avsingh noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure copy_asset_lines(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_100
33 , p5_a6 JTF_VARCHAR2_TABLE_100
34 , p5_a7 JTF_NUMBER_TABLE
35 , p5_a8 JTF_NUMBER_TABLE
36 , p5_a9 JTF_DATE_TABLE
37 , p5_a10 JTF_NUMBER_TABLE
38 , p5_a11 JTF_NUMBER_TABLE
39 , p5_a12 JTF_NUMBER_TABLE
40 , p5_a13 JTF_NUMBER_TABLE
41 , p5_a14 JTF_NUMBER_TABLE
42 , p5_a15 JTF_NUMBER_TABLE
43 , p5_a16 JTF_NUMBER_TABLE
44 , p5_a17 JTF_NUMBER_TABLE
45 , p5_a18 JTF_NUMBER_TABLE
46 , p5_a19 JTF_NUMBER_TABLE
47 , p5_a20 JTF_DATE_TABLE
48 , p5_a21 JTF_DATE_TABLE
49 , p5_a22 JTF_NUMBER_TABLE
50 , p5_a23 JTF_NUMBER_TABLE
51 , p5_a24 JTF_DATE_TABLE
52 , p5_a25 JTF_DATE_TABLE
53 , p5_a26 JTF_DATE_TABLE
54 , p5_a27 JTF_NUMBER_TABLE
55 , p5_a28 JTF_NUMBER_TABLE
56 , p5_a29 JTF_NUMBER_TABLE
57 , p5_a30 JTF_NUMBER_TABLE
58 , p5_a31 JTF_NUMBER_TABLE
59 , p5_a32 JTF_NUMBER_TABLE
60 , p5_a33 JTF_NUMBER_TABLE
61 , p5_a34 JTF_DATE_TABLE
62 , p5_a35 JTF_VARCHAR2_TABLE_100
63 , p5_a36 JTF_DATE_TABLE
64 , p5_a37 JTF_VARCHAR2_TABLE_300
65 , p5_a38 JTF_NUMBER_TABLE
66 , p5_a39 JTF_NUMBER_TABLE
67 , p5_a40 JTF_NUMBER_TABLE
68 , p5_a41 JTF_VARCHAR2_TABLE_100
69 , p5_a42 JTF_DATE_TABLE
70 , p5_a43 JTF_NUMBER_TABLE
71 , p5_a44 JTF_NUMBER_TABLE
72 , p5_a45 JTF_DATE_TABLE
73 , p5_a46 JTF_NUMBER_TABLE
74 , p5_a47 JTF_DATE_TABLE
75 , p5_a48 JTF_DATE_TABLE
76 , p5_a49 JTF_DATE_TABLE
77 , p5_a50 JTF_NUMBER_TABLE
78 , p5_a51 JTF_NUMBER_TABLE
79 , p5_a52 JTF_VARCHAR2_TABLE_100
80 , p5_a53 JTF_NUMBER_TABLE
81 , p5_a54 JTF_NUMBER_TABLE
82 , p5_a55 JTF_VARCHAR2_TABLE_100
83 , p5_a56 JTF_VARCHAR2_TABLE_100
84 , p5_a57 JTF_NUMBER_TABLE
85 , p5_a58 JTF_DATE_TABLE
86 , p5_a59 JTF_NUMBER_TABLE
87 , p5_a60 JTF_VARCHAR2_TABLE_100
88 , p5_a61 JTF_VARCHAR2_TABLE_500
89 , p5_a62 JTF_VARCHAR2_TABLE_500
90 , p5_a63 JTF_VARCHAR2_TABLE_500
91 , p5_a64 JTF_VARCHAR2_TABLE_500
92 , p5_a65 JTF_VARCHAR2_TABLE_500
93 , p5_a66 JTF_VARCHAR2_TABLE_500
94 , p5_a67 JTF_VARCHAR2_TABLE_500
95 , p5_a68 JTF_VARCHAR2_TABLE_500
96 , p5_a69 JTF_VARCHAR2_TABLE_500
97 , p5_a70 JTF_VARCHAR2_TABLE_500
98 , p5_a71 JTF_VARCHAR2_TABLE_500
99 , p5_a72 JTF_VARCHAR2_TABLE_500
100 , p5_a73 JTF_VARCHAR2_TABLE_500
101 , p5_a74 JTF_VARCHAR2_TABLE_500
102 , p5_a75 JTF_VARCHAR2_TABLE_500
103 , p5_a76 JTF_NUMBER_TABLE
104 , p5_a77 JTF_NUMBER_TABLE
105 , p5_a78 JTF_NUMBER_TABLE
106 , p5_a79 JTF_DATE_TABLE
107 , p5_a80 JTF_NUMBER_TABLE
108 , p5_a81 JTF_DATE_TABLE
109 , p5_a82 JTF_NUMBER_TABLE
110 , p5_a83 JTF_DATE_TABLE
111 , p5_a84 JTF_DATE_TABLE
112 , p5_a85 JTF_DATE_TABLE
113 , p5_a86 JTF_DATE_TABLE
114 , p5_a87 JTF_NUMBER_TABLE
115 , p5_a88 JTF_NUMBER_TABLE
116 , p5_a89 JTF_NUMBER_TABLE
117 , p5_a90 JTF_VARCHAR2_TABLE_100
118 , p5_a91 JTF_NUMBER_TABLE
119 , p5_a92 JTF_VARCHAR2_TABLE_100
120 , p5_a93 JTF_NUMBER_TABLE
121 , p5_a94 JTF_NUMBER_TABLE
122 , p5_a95 JTF_DATE_TABLE
123 , p5_a96 JTF_VARCHAR2_TABLE_100
124 , p5_a97 JTF_VARCHAR2_TABLE_100
125 , p5_a98 JTF_NUMBER_TABLE
126 , p_to_cle_id NUMBER
127 , p_to_chr_id NUMBER
128 , p_to_template_yn VARCHAR2
129 , p_copy_reference VARCHAR2
130 , p_copy_line_party_yn VARCHAR2
131 , p_renew_ref_yn VARCHAR2
132 , p_trans_type VARCHAR2
133 , p13_a0 out nocopy JTF_NUMBER_TABLE
134 , p13_a1 out nocopy JTF_NUMBER_TABLE
135 , p13_a2 out nocopy JTF_NUMBER_TABLE
136 , p13_a3 out nocopy JTF_NUMBER_TABLE
137 , p13_a4 out nocopy JTF_VARCHAR2_TABLE_100
138 , p13_a5 out nocopy JTF_VARCHAR2_TABLE_100
139 , p13_a6 out nocopy JTF_VARCHAR2_TABLE_100
140 , p13_a7 out nocopy JTF_NUMBER_TABLE
141 , p13_a8 out nocopy JTF_NUMBER_TABLE
142 , p13_a9 out nocopy JTF_DATE_TABLE
143 , p13_a10 out nocopy JTF_NUMBER_TABLE
144 , p13_a11 out nocopy JTF_NUMBER_TABLE
145 , p13_a12 out nocopy JTF_NUMBER_TABLE
146 , p13_a13 out nocopy JTF_NUMBER_TABLE
147 , p13_a14 out nocopy JTF_NUMBER_TABLE
148 , p13_a15 out nocopy JTF_NUMBER_TABLE
149 , p13_a16 out nocopy JTF_NUMBER_TABLE
150 , p13_a17 out nocopy JTF_NUMBER_TABLE
151 , p13_a18 out nocopy JTF_NUMBER_TABLE
152 , p13_a19 out nocopy JTF_NUMBER_TABLE
153 , p13_a20 out nocopy JTF_DATE_TABLE
154 , p13_a21 out nocopy JTF_DATE_TABLE
155 , p13_a22 out nocopy JTF_NUMBER_TABLE
156 , p13_a23 out nocopy JTF_NUMBER_TABLE
157 , p13_a24 out nocopy JTF_DATE_TABLE
158 , p13_a25 out nocopy JTF_DATE_TABLE
159 , p13_a26 out nocopy JTF_DATE_TABLE
160 , p13_a27 out nocopy JTF_NUMBER_TABLE
161 , p13_a28 out nocopy JTF_NUMBER_TABLE
162 , p13_a29 out nocopy JTF_NUMBER_TABLE
163 , p13_a30 out nocopy JTF_NUMBER_TABLE
164 , p13_a31 out nocopy JTF_NUMBER_TABLE
165 , p13_a32 out nocopy JTF_NUMBER_TABLE
166 , p13_a33 out nocopy JTF_NUMBER_TABLE
167 , p13_a34 out nocopy JTF_DATE_TABLE
168 , p13_a35 out nocopy JTF_VARCHAR2_TABLE_100
169 , p13_a36 out nocopy JTF_DATE_TABLE
170 , p13_a37 out nocopy JTF_VARCHAR2_TABLE_300
171 , p13_a38 out nocopy JTF_NUMBER_TABLE
172 , p13_a39 out nocopy JTF_NUMBER_TABLE
173 , p13_a40 out nocopy JTF_NUMBER_TABLE
174 , p13_a41 out nocopy JTF_VARCHAR2_TABLE_100
175 , p13_a42 out nocopy JTF_DATE_TABLE
176 , p13_a43 out nocopy JTF_NUMBER_TABLE
177 , p13_a44 out nocopy JTF_NUMBER_TABLE
178 , p13_a45 out nocopy JTF_DATE_TABLE
179 , p13_a46 out nocopy JTF_NUMBER_TABLE
180 , p13_a47 out nocopy JTF_DATE_TABLE
181 , p13_a48 out nocopy JTF_DATE_TABLE
182 , p13_a49 out nocopy JTF_DATE_TABLE
183 , p13_a50 out nocopy JTF_NUMBER_TABLE
184 , p13_a51 out nocopy JTF_NUMBER_TABLE
185 , p13_a52 out nocopy JTF_VARCHAR2_TABLE_100
186 , p13_a53 out nocopy JTF_NUMBER_TABLE
187 , p13_a54 out nocopy JTF_NUMBER_TABLE
188 , p13_a55 out nocopy JTF_VARCHAR2_TABLE_100
189 , p13_a56 out nocopy JTF_VARCHAR2_TABLE_100
190 , p13_a57 out nocopy JTF_NUMBER_TABLE
191 , p13_a58 out nocopy JTF_DATE_TABLE
192 , p13_a59 out nocopy JTF_NUMBER_TABLE
193 , p13_a60 out nocopy JTF_VARCHAR2_TABLE_100
194 , p13_a61 out nocopy JTF_VARCHAR2_TABLE_500
195 , p13_a62 out nocopy JTF_VARCHAR2_TABLE_500
196 , p13_a63 out nocopy JTF_VARCHAR2_TABLE_500
197 , p13_a64 out nocopy JTF_VARCHAR2_TABLE_500
198 , p13_a65 out nocopy JTF_VARCHAR2_TABLE_500
199 , p13_a66 out nocopy JTF_VARCHAR2_TABLE_500
200 , p13_a67 out nocopy JTF_VARCHAR2_TABLE_500
201 , p13_a68 out nocopy JTF_VARCHAR2_TABLE_500
202 , p13_a69 out nocopy JTF_VARCHAR2_TABLE_500
203 , p13_a70 out nocopy JTF_VARCHAR2_TABLE_500
204 , p13_a71 out nocopy JTF_VARCHAR2_TABLE_500
205 , p13_a72 out nocopy JTF_VARCHAR2_TABLE_500
206 , p13_a73 out nocopy JTF_VARCHAR2_TABLE_500
207 , p13_a74 out nocopy JTF_VARCHAR2_TABLE_500
208 , p13_a75 out nocopy JTF_VARCHAR2_TABLE_500
209 , p13_a76 out nocopy JTF_NUMBER_TABLE
210 , p13_a77 out nocopy JTF_NUMBER_TABLE
211 , p13_a78 out nocopy JTF_NUMBER_TABLE
212 , p13_a79 out nocopy JTF_DATE_TABLE
213 , p13_a80 out nocopy JTF_NUMBER_TABLE
214 , p13_a81 out nocopy JTF_DATE_TABLE
215 , p13_a82 out nocopy JTF_NUMBER_TABLE
216 , p13_a83 out nocopy JTF_DATE_TABLE
217 , p13_a84 out nocopy JTF_DATE_TABLE
218 , p13_a85 out nocopy JTF_DATE_TABLE
219 , p13_a86 out nocopy JTF_DATE_TABLE
220 , p13_a87 out nocopy JTF_NUMBER_TABLE
221 , p13_a88 out nocopy JTF_NUMBER_TABLE
222 , p13_a89 out nocopy JTF_NUMBER_TABLE
223 , p13_a90 out nocopy JTF_VARCHAR2_TABLE_100
224 , p13_a91 out nocopy JTF_NUMBER_TABLE
225 , p13_a92 out nocopy JTF_VARCHAR2_TABLE_100
226 , p13_a93 out nocopy JTF_NUMBER_TABLE
227 , p13_a94 out nocopy JTF_NUMBER_TABLE
228 , p13_a95 out nocopy JTF_DATE_TABLE
229 , p13_a96 out nocopy JTF_VARCHAR2_TABLE_100
230 , p13_a97 out nocopy JTF_VARCHAR2_TABLE_100
231 , p13_a98 out nocopy JTF_NUMBER_TABLE
232 )
233
234 as
235 ddp_from_cle_id_tbl okl_copy_asset_pub.klev_tbl_type;
236 ddx_cle_id_tbl okl_copy_asset_pub.klev_tbl_type;
237 ddindx binary_integer; indx binary_integer;
238 begin
239
240 -- copy data to the local IN or IN-OUT args, if any
241
242
243
244
245
246 okl_kle_pvt_w.rosetta_table_copy_in_p8(ddp_from_cle_id_tbl, p5_a0
247 , p5_a1
248 , p5_a2
249 , p5_a3
250 , p5_a4
251 , p5_a5
252 , p5_a6
253 , p5_a7
254 , p5_a8
255 , p5_a9
256 , p5_a10
257 , p5_a11
258 , p5_a12
259 , p5_a13
260 , p5_a14
261 , p5_a15
262 , p5_a16
263 , p5_a17
264 , p5_a18
265 , p5_a19
266 , p5_a20
267 , p5_a21
268 , p5_a22
269 , p5_a23
270 , p5_a24
271 , p5_a25
272 , p5_a26
273 , p5_a27
274 , p5_a28
275 , p5_a29
276 , p5_a30
277 , p5_a31
278 , p5_a32
279 , p5_a33
280 , p5_a34
281 , p5_a35
282 , p5_a36
283 , p5_a37
284 , p5_a38
285 , p5_a39
286 , p5_a40
287 , p5_a41
288 , p5_a42
289 , p5_a43
290 , p5_a44
291 , p5_a45
292 , p5_a46
293 , p5_a47
294 , p5_a48
295 , p5_a49
296 , p5_a50
297 , p5_a51
298 , p5_a52
299 , p5_a53
300 , p5_a54
301 , p5_a55
302 , p5_a56
303 , p5_a57
304 , p5_a58
305 , p5_a59
306 , p5_a60
307 , p5_a61
308 , p5_a62
309 , p5_a63
310 , p5_a64
311 , p5_a65
312 , p5_a66
313 , p5_a67
314 , p5_a68
315 , p5_a69
316 , p5_a70
317 , p5_a71
318 , p5_a72
319 , p5_a73
320 , p5_a74
321 , p5_a75
322 , p5_a76
323 , p5_a77
324 , p5_a78
325 , p5_a79
326 , p5_a80
327 , p5_a81
328 , p5_a82
329 , p5_a83
330 , p5_a84
331 , p5_a85
332 , p5_a86
333 , p5_a87
334 , p5_a88
335 , p5_a89
336 , p5_a90
337 , p5_a91
338 , p5_a92
339 , p5_a93
340 , p5_a94
341 , p5_a95
342 , p5_a96
343 , p5_a97
344 , p5_a98
345 );
346
347
348
349
350
351
352
353
354
355 -- here's the delegated call to the old PL/SQL routine
356 okl_copy_asset_pub.copy_asset_lines(p_api_version,
357 p_init_msg_list,
358 x_return_status,
359 x_msg_count,
360 x_msg_data,
361 ddp_from_cle_id_tbl,
362 p_to_cle_id,
363 p_to_chr_id,
364 p_to_template_yn,
365 p_copy_reference,
366 p_copy_line_party_yn,
367 p_renew_ref_yn,
368 p_trans_type,
369 ddx_cle_id_tbl);
370
371 -- copy data back from the local variables to OUT or IN-OUT args, if any
372
373
374
375
376
377
378
379
380
381
382
383
384
385 okl_kle_pvt_w.rosetta_table_copy_out_p8(ddx_cle_id_tbl, p13_a0
386 , p13_a1
387 , p13_a2
388 , p13_a3
389 , p13_a4
390 , p13_a5
391 , p13_a6
392 , p13_a7
393 , p13_a8
394 , p13_a9
395 , p13_a10
396 , p13_a11
397 , p13_a12
398 , p13_a13
399 , p13_a14
400 , p13_a15
401 , p13_a16
402 , p13_a17
403 , p13_a18
404 , p13_a19
405 , p13_a20
406 , p13_a21
407 , p13_a22
408 , p13_a23
409 , p13_a24
410 , p13_a25
411 , p13_a26
412 , p13_a27
413 , p13_a28
414 , p13_a29
415 , p13_a30
416 , p13_a31
417 , p13_a32
418 , p13_a33
419 , p13_a34
420 , p13_a35
421 , p13_a36
422 , p13_a37
423 , p13_a38
424 , p13_a39
425 , p13_a40
426 , p13_a41
427 , p13_a42
428 , p13_a43
429 , p13_a44
430 , p13_a45
431 , p13_a46
432 , p13_a47
433 , p13_a48
434 , p13_a49
435 , p13_a50
436 , p13_a51
437 , p13_a52
438 , p13_a53
439 , p13_a54
440 , p13_a55
441 , p13_a56
442 , p13_a57
443 , p13_a58
444 , p13_a59
445 , p13_a60
446 , p13_a61
447 , p13_a62
448 , p13_a63
449 , p13_a64
450 , p13_a65
451 , p13_a66
452 , p13_a67
453 , p13_a68
454 , p13_a69
455 , p13_a70
456 , p13_a71
457 , p13_a72
458 , p13_a73
459 , p13_a74
460 , p13_a75
461 , p13_a76
462 , p13_a77
463 , p13_a78
464 , p13_a79
465 , p13_a80
466 , p13_a81
467 , p13_a82
468 , p13_a83
469 , p13_a84
470 , p13_a85
471 , p13_a86
472 , p13_a87
473 , p13_a88
474 , p13_a89
475 , p13_a90
476 , p13_a91
477 , p13_a92
478 , p13_a93
479 , p13_a94
480 , p13_a95
481 , p13_a96
482 , p13_a97
483 , p13_a98
484 );
485 end;
486
487 procedure copy_all_lines(p_api_version NUMBER
488 , p_init_msg_list VARCHAR2
489 , x_return_status out nocopy VARCHAR2
490 , x_msg_count out nocopy NUMBER
491 , x_msg_data out nocopy VARCHAR2
492 , p5_a0 JTF_NUMBER_TABLE
493 , p5_a1 JTF_NUMBER_TABLE
494 , p5_a2 JTF_NUMBER_TABLE
495 , p5_a3 JTF_NUMBER_TABLE
496 , p5_a4 JTF_VARCHAR2_TABLE_100
497 , p5_a5 JTF_VARCHAR2_TABLE_100
498 , p5_a6 JTF_VARCHAR2_TABLE_100
499 , p5_a7 JTF_NUMBER_TABLE
500 , p5_a8 JTF_NUMBER_TABLE
501 , p5_a9 JTF_DATE_TABLE
502 , p5_a10 JTF_NUMBER_TABLE
503 , p5_a11 JTF_NUMBER_TABLE
504 , p5_a12 JTF_NUMBER_TABLE
505 , p5_a13 JTF_NUMBER_TABLE
506 , p5_a14 JTF_NUMBER_TABLE
507 , p5_a15 JTF_NUMBER_TABLE
508 , p5_a16 JTF_NUMBER_TABLE
509 , p5_a17 JTF_NUMBER_TABLE
510 , p5_a18 JTF_NUMBER_TABLE
511 , p5_a19 JTF_NUMBER_TABLE
512 , p5_a20 JTF_DATE_TABLE
513 , p5_a21 JTF_DATE_TABLE
514 , p5_a22 JTF_NUMBER_TABLE
515 , p5_a23 JTF_NUMBER_TABLE
516 , p5_a24 JTF_DATE_TABLE
517 , p5_a25 JTF_DATE_TABLE
518 , p5_a26 JTF_DATE_TABLE
519 , p5_a27 JTF_NUMBER_TABLE
520 , p5_a28 JTF_NUMBER_TABLE
521 , p5_a29 JTF_NUMBER_TABLE
522 , p5_a30 JTF_NUMBER_TABLE
523 , p5_a31 JTF_NUMBER_TABLE
524 , p5_a32 JTF_NUMBER_TABLE
525 , p5_a33 JTF_NUMBER_TABLE
526 , p5_a34 JTF_DATE_TABLE
527 , p5_a35 JTF_VARCHAR2_TABLE_100
528 , p5_a36 JTF_DATE_TABLE
529 , p5_a37 JTF_VARCHAR2_TABLE_300
530 , p5_a38 JTF_NUMBER_TABLE
531 , p5_a39 JTF_NUMBER_TABLE
532 , p5_a40 JTF_NUMBER_TABLE
533 , p5_a41 JTF_VARCHAR2_TABLE_100
534 , p5_a42 JTF_DATE_TABLE
535 , p5_a43 JTF_NUMBER_TABLE
536 , p5_a44 JTF_NUMBER_TABLE
537 , p5_a45 JTF_DATE_TABLE
538 , p5_a46 JTF_NUMBER_TABLE
539 , p5_a47 JTF_DATE_TABLE
540 , p5_a48 JTF_DATE_TABLE
541 , p5_a49 JTF_DATE_TABLE
542 , p5_a50 JTF_NUMBER_TABLE
543 , p5_a51 JTF_NUMBER_TABLE
544 , p5_a52 JTF_VARCHAR2_TABLE_100
545 , p5_a53 JTF_NUMBER_TABLE
546 , p5_a54 JTF_NUMBER_TABLE
547 , p5_a55 JTF_VARCHAR2_TABLE_100
548 , p5_a56 JTF_VARCHAR2_TABLE_100
549 , p5_a57 JTF_NUMBER_TABLE
550 , p5_a58 JTF_DATE_TABLE
551 , p5_a59 JTF_NUMBER_TABLE
552 , p5_a60 JTF_VARCHAR2_TABLE_100
553 , p5_a61 JTF_VARCHAR2_TABLE_500
554 , p5_a62 JTF_VARCHAR2_TABLE_500
555 , p5_a63 JTF_VARCHAR2_TABLE_500
556 , p5_a64 JTF_VARCHAR2_TABLE_500
557 , p5_a65 JTF_VARCHAR2_TABLE_500
558 , p5_a66 JTF_VARCHAR2_TABLE_500
559 , p5_a67 JTF_VARCHAR2_TABLE_500
560 , p5_a68 JTF_VARCHAR2_TABLE_500
561 , p5_a69 JTF_VARCHAR2_TABLE_500
562 , p5_a70 JTF_VARCHAR2_TABLE_500
563 , p5_a71 JTF_VARCHAR2_TABLE_500
564 , p5_a72 JTF_VARCHAR2_TABLE_500
565 , p5_a73 JTF_VARCHAR2_TABLE_500
566 , p5_a74 JTF_VARCHAR2_TABLE_500
567 , p5_a75 JTF_VARCHAR2_TABLE_500
568 , p5_a76 JTF_NUMBER_TABLE
569 , p5_a77 JTF_NUMBER_TABLE
570 , p5_a78 JTF_NUMBER_TABLE
571 , p5_a79 JTF_DATE_TABLE
572 , p5_a80 JTF_NUMBER_TABLE
573 , p5_a81 JTF_DATE_TABLE
574 , p5_a82 JTF_NUMBER_TABLE
575 , p5_a83 JTF_DATE_TABLE
576 , p5_a84 JTF_DATE_TABLE
577 , p5_a85 JTF_DATE_TABLE
578 , p5_a86 JTF_DATE_TABLE
579 , p5_a87 JTF_NUMBER_TABLE
580 , p5_a88 JTF_NUMBER_TABLE
581 , p5_a89 JTF_NUMBER_TABLE
582 , p5_a90 JTF_VARCHAR2_TABLE_100
583 , p5_a91 JTF_NUMBER_TABLE
584 , p5_a92 JTF_VARCHAR2_TABLE_100
585 , p5_a93 JTF_NUMBER_TABLE
586 , p5_a94 JTF_NUMBER_TABLE
587 , p5_a95 JTF_DATE_TABLE
588 , p5_a96 JTF_VARCHAR2_TABLE_100
589 , p5_a97 JTF_VARCHAR2_TABLE_100
590 , p5_a98 JTF_NUMBER_TABLE
591 , p_to_cle_id NUMBER
592 , p_to_chr_id NUMBER
593 , p_to_template_yn VARCHAR2
594 , p_copy_reference VARCHAR2
595 , p_copy_line_party_yn VARCHAR2
596 , p_renew_ref_yn VARCHAR2
597 , p_trans_type VARCHAR2
598 , p13_a0 out nocopy JTF_NUMBER_TABLE
599 , p13_a1 out nocopy JTF_NUMBER_TABLE
600 , p13_a2 out nocopy JTF_NUMBER_TABLE
601 , p13_a3 out nocopy JTF_NUMBER_TABLE
602 , p13_a4 out nocopy JTF_VARCHAR2_TABLE_100
603 , p13_a5 out nocopy JTF_VARCHAR2_TABLE_100
604 , p13_a6 out nocopy JTF_VARCHAR2_TABLE_100
605 , p13_a7 out nocopy JTF_NUMBER_TABLE
606 , p13_a8 out nocopy JTF_NUMBER_TABLE
607 , p13_a9 out nocopy JTF_DATE_TABLE
608 , p13_a10 out nocopy JTF_NUMBER_TABLE
609 , p13_a11 out nocopy JTF_NUMBER_TABLE
610 , p13_a12 out nocopy JTF_NUMBER_TABLE
611 , p13_a13 out nocopy JTF_NUMBER_TABLE
612 , p13_a14 out nocopy JTF_NUMBER_TABLE
613 , p13_a15 out nocopy JTF_NUMBER_TABLE
614 , p13_a16 out nocopy JTF_NUMBER_TABLE
615 , p13_a17 out nocopy JTF_NUMBER_TABLE
616 , p13_a18 out nocopy JTF_NUMBER_TABLE
617 , p13_a19 out nocopy JTF_NUMBER_TABLE
618 , p13_a20 out nocopy JTF_DATE_TABLE
619 , p13_a21 out nocopy JTF_DATE_TABLE
620 , p13_a22 out nocopy JTF_NUMBER_TABLE
621 , p13_a23 out nocopy JTF_NUMBER_TABLE
622 , p13_a24 out nocopy JTF_DATE_TABLE
623 , p13_a25 out nocopy JTF_DATE_TABLE
624 , p13_a26 out nocopy JTF_DATE_TABLE
625 , p13_a27 out nocopy JTF_NUMBER_TABLE
626 , p13_a28 out nocopy JTF_NUMBER_TABLE
627 , p13_a29 out nocopy JTF_NUMBER_TABLE
628 , p13_a30 out nocopy JTF_NUMBER_TABLE
629 , p13_a31 out nocopy JTF_NUMBER_TABLE
630 , p13_a32 out nocopy JTF_NUMBER_TABLE
631 , p13_a33 out nocopy JTF_NUMBER_TABLE
632 , p13_a34 out nocopy JTF_DATE_TABLE
633 , p13_a35 out nocopy JTF_VARCHAR2_TABLE_100
634 , p13_a36 out nocopy JTF_DATE_TABLE
635 , p13_a37 out nocopy JTF_VARCHAR2_TABLE_300
636 , p13_a38 out nocopy JTF_NUMBER_TABLE
637 , p13_a39 out nocopy JTF_NUMBER_TABLE
638 , p13_a40 out nocopy JTF_NUMBER_TABLE
639 , p13_a41 out nocopy JTF_VARCHAR2_TABLE_100
640 , p13_a42 out nocopy JTF_DATE_TABLE
641 , p13_a43 out nocopy JTF_NUMBER_TABLE
642 , p13_a44 out nocopy JTF_NUMBER_TABLE
643 , p13_a45 out nocopy JTF_DATE_TABLE
644 , p13_a46 out nocopy JTF_NUMBER_TABLE
645 , p13_a47 out nocopy JTF_DATE_TABLE
646 , p13_a48 out nocopy JTF_DATE_TABLE
647 , p13_a49 out nocopy JTF_DATE_TABLE
648 , p13_a50 out nocopy JTF_NUMBER_TABLE
649 , p13_a51 out nocopy JTF_NUMBER_TABLE
650 , p13_a52 out nocopy JTF_VARCHAR2_TABLE_100
651 , p13_a53 out nocopy JTF_NUMBER_TABLE
652 , p13_a54 out nocopy JTF_NUMBER_TABLE
653 , p13_a55 out nocopy JTF_VARCHAR2_TABLE_100
654 , p13_a56 out nocopy JTF_VARCHAR2_TABLE_100
655 , p13_a57 out nocopy JTF_NUMBER_TABLE
656 , p13_a58 out nocopy JTF_DATE_TABLE
657 , p13_a59 out nocopy JTF_NUMBER_TABLE
658 , p13_a60 out nocopy JTF_VARCHAR2_TABLE_100
659 , p13_a61 out nocopy JTF_VARCHAR2_TABLE_500
660 , p13_a62 out nocopy JTF_VARCHAR2_TABLE_500
661 , p13_a63 out nocopy JTF_VARCHAR2_TABLE_500
662 , p13_a64 out nocopy JTF_VARCHAR2_TABLE_500
663 , p13_a65 out nocopy JTF_VARCHAR2_TABLE_500
664 , p13_a66 out nocopy JTF_VARCHAR2_TABLE_500
665 , p13_a67 out nocopy JTF_VARCHAR2_TABLE_500
666 , p13_a68 out nocopy JTF_VARCHAR2_TABLE_500
667 , p13_a69 out nocopy JTF_VARCHAR2_TABLE_500
668 , p13_a70 out nocopy JTF_VARCHAR2_TABLE_500
669 , p13_a71 out nocopy JTF_VARCHAR2_TABLE_500
670 , p13_a72 out nocopy JTF_VARCHAR2_TABLE_500
671 , p13_a73 out nocopy JTF_VARCHAR2_TABLE_500
672 , p13_a74 out nocopy JTF_VARCHAR2_TABLE_500
673 , p13_a75 out nocopy JTF_VARCHAR2_TABLE_500
674 , p13_a76 out nocopy JTF_NUMBER_TABLE
675 , p13_a77 out nocopy JTF_NUMBER_TABLE
676 , p13_a78 out nocopy JTF_NUMBER_TABLE
677 , p13_a79 out nocopy JTF_DATE_TABLE
678 , p13_a80 out nocopy JTF_NUMBER_TABLE
679 , p13_a81 out nocopy JTF_DATE_TABLE
680 , p13_a82 out nocopy JTF_NUMBER_TABLE
681 , p13_a83 out nocopy JTF_DATE_TABLE
682 , p13_a84 out nocopy JTF_DATE_TABLE
683 , p13_a85 out nocopy JTF_DATE_TABLE
684 , p13_a86 out nocopy JTF_DATE_TABLE
685 , p13_a87 out nocopy JTF_NUMBER_TABLE
686 , p13_a88 out nocopy JTF_NUMBER_TABLE
687 , p13_a89 out nocopy JTF_NUMBER_TABLE
688 , p13_a90 out nocopy JTF_VARCHAR2_TABLE_100
689 , p13_a91 out nocopy JTF_NUMBER_TABLE
690 , p13_a92 out nocopy JTF_VARCHAR2_TABLE_100
691 , p13_a93 out nocopy JTF_NUMBER_TABLE
692 , p13_a94 out nocopy JTF_NUMBER_TABLE
693 , p13_a95 out nocopy JTF_DATE_TABLE
694 , p13_a96 out nocopy JTF_VARCHAR2_TABLE_100
695 , p13_a97 out nocopy JTF_VARCHAR2_TABLE_100
696 , p13_a98 out nocopy JTF_NUMBER_TABLE
697 )
698
699 as
700 ddp_from_cle_id_tbl okl_copy_asset_pub.klev_tbl_type;
701 ddx_cle_id_tbl okl_copy_asset_pub.klev_tbl_type;
702 ddindx binary_integer; indx binary_integer;
703 begin
704
705 -- copy data to the local IN or IN-OUT args, if any
706
707
708
709
710
711 okl_kle_pvt_w.rosetta_table_copy_in_p8(ddp_from_cle_id_tbl, p5_a0
712 , p5_a1
713 , p5_a2
714 , p5_a3
715 , p5_a4
716 , p5_a5
717 , p5_a6
718 , p5_a7
719 , p5_a8
720 , p5_a9
721 , p5_a10
722 , p5_a11
723 , p5_a12
724 , p5_a13
725 , p5_a14
726 , p5_a15
727 , p5_a16
728 , p5_a17
729 , p5_a18
730 , p5_a19
731 , p5_a20
732 , p5_a21
733 , p5_a22
734 , p5_a23
735 , p5_a24
736 , p5_a25
737 , p5_a26
738 , p5_a27
739 , p5_a28
740 , p5_a29
741 , p5_a30
742 , p5_a31
743 , p5_a32
744 , p5_a33
745 , p5_a34
746 , p5_a35
747 , p5_a36
748 , p5_a37
749 , p5_a38
750 , p5_a39
751 , p5_a40
752 , p5_a41
753 , p5_a42
754 , p5_a43
755 , p5_a44
756 , p5_a45
757 , p5_a46
758 , p5_a47
759 , p5_a48
760 , p5_a49
761 , p5_a50
762 , p5_a51
763 , p5_a52
764 , p5_a53
765 , p5_a54
766 , p5_a55
767 , p5_a56
768 , p5_a57
769 , p5_a58
770 , p5_a59
771 , p5_a60
772 , p5_a61
773 , p5_a62
774 , p5_a63
775 , p5_a64
776 , p5_a65
777 , p5_a66
778 , p5_a67
779 , p5_a68
780 , p5_a69
781 , p5_a70
782 , p5_a71
783 , p5_a72
784 , p5_a73
785 , p5_a74
786 , p5_a75
787 , p5_a76
788 , p5_a77
789 , p5_a78
790 , p5_a79
791 , p5_a80
792 , p5_a81
793 , p5_a82
794 , p5_a83
795 , p5_a84
796 , p5_a85
797 , p5_a86
798 , p5_a87
799 , p5_a88
800 , p5_a89
801 , p5_a90
802 , p5_a91
803 , p5_a92
804 , p5_a93
805 , p5_a94
806 , p5_a95
807 , p5_a96
808 , p5_a97
809 , p5_a98
810 );
811
812
813
814
815
816
817
818
819
820 -- here's the delegated call to the old PL/SQL routine
821 okl_copy_asset_pub.copy_all_lines(p_api_version,
822 p_init_msg_list,
823 x_return_status,
824 x_msg_count,
825 x_msg_data,
826 ddp_from_cle_id_tbl,
827 p_to_cle_id,
828 p_to_chr_id,
829 p_to_template_yn,
830 p_copy_reference,
831 p_copy_line_party_yn,
832 p_renew_ref_yn,
833 p_trans_type,
834 ddx_cle_id_tbl);
835
836 -- copy data back from the local variables to OUT or IN-OUT args, if any
837
838
839
840
841
842
843
844
845
846
847
848
849
850 okl_kle_pvt_w.rosetta_table_copy_out_p8(ddx_cle_id_tbl, p13_a0
851 , p13_a1
852 , p13_a2
853 , p13_a3
854 , p13_a4
855 , p13_a5
856 , p13_a6
857 , p13_a7
858 , p13_a8
859 , p13_a9
860 , p13_a10
861 , p13_a11
862 , p13_a12
863 , p13_a13
864 , p13_a14
865 , p13_a15
866 , p13_a16
867 , p13_a17
868 , p13_a18
869 , p13_a19
870 , p13_a20
871 , p13_a21
872 , p13_a22
873 , p13_a23
874 , p13_a24
875 , p13_a25
876 , p13_a26
877 , p13_a27
878 , p13_a28
879 , p13_a29
880 , p13_a30
881 , p13_a31
882 , p13_a32
883 , p13_a33
884 , p13_a34
885 , p13_a35
886 , p13_a36
887 , p13_a37
888 , p13_a38
889 , p13_a39
890 , p13_a40
891 , p13_a41
892 , p13_a42
893 , p13_a43
894 , p13_a44
895 , p13_a45
896 , p13_a46
897 , p13_a47
898 , p13_a48
899 , p13_a49
900 , p13_a50
901 , p13_a51
902 , p13_a52
903 , p13_a53
904 , p13_a54
905 , p13_a55
906 , p13_a56
907 , p13_a57
908 , p13_a58
909 , p13_a59
910 , p13_a60
911 , p13_a61
912 , p13_a62
913 , p13_a63
914 , p13_a64
915 , p13_a65
916 , p13_a66
917 , p13_a67
918 , p13_a68
919 , p13_a69
920 , p13_a70
921 , p13_a71
922 , p13_a72
923 , p13_a73
924 , p13_a74
925 , p13_a75
926 , p13_a76
927 , p13_a77
928 , p13_a78
929 , p13_a79
930 , p13_a80
931 , p13_a81
932 , p13_a82
933 , p13_a83
934 , p13_a84
935 , p13_a85
936 , p13_a86
937 , p13_a87
938 , p13_a88
939 , p13_a89
940 , p13_a90
941 , p13_a91
942 , p13_a92
943 , p13_a93
944 , p13_a94
945 , p13_a95
946 , p13_a96
947 , p13_a97
948 , p13_a98
949 );
950 end;
951
952 end okl_copy_asset_pub_w;