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