[Home] [Help]
PACKAGE BODY: APPS.OKL_FE_EO_TERM_OPTIONS_PUB_W
Source
1 package body okl_fe_eo_term_options_pub_w as
2 /* $Header: OKLUEOTB.pls 120.0 2005/07/07 10:45:59 viselvar noship $ */
3 procedure get_item_lines(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 , p_po_id NUMBER
9 , p_po_version VARCHAR2
10 , p7_a0 out nocopy JTF_NUMBER_TABLE
11 , p7_a1 out nocopy JTF_NUMBER_TABLE
12 , p7_a2 out nocopy JTF_NUMBER_TABLE
13 , p7_a3 out nocopy JTF_NUMBER_TABLE
14 , p7_a4 out nocopy JTF_NUMBER_TABLE
15 , p7_a5 out nocopy JTF_NUMBER_TABLE
16 , p7_a6 out nocopy JTF_NUMBER_TABLE
17 , p7_a7 out nocopy JTF_NUMBER_TABLE
18 , p7_a8 out nocopy JTF_VARCHAR2_TABLE_100
19 , p7_a9 out nocopy JTF_VARCHAR2_TABLE_500
20 , p7_a10 out nocopy JTF_VARCHAR2_TABLE_500
21 , p7_a11 out nocopy JTF_VARCHAR2_TABLE_500
22 , p7_a12 out nocopy JTF_VARCHAR2_TABLE_500
23 , p7_a13 out nocopy JTF_VARCHAR2_TABLE_500
24 , p7_a14 out nocopy JTF_VARCHAR2_TABLE_500
25 , p7_a15 out nocopy JTF_VARCHAR2_TABLE_500
26 , p7_a16 out nocopy JTF_VARCHAR2_TABLE_500
27 , p7_a17 out nocopy JTF_VARCHAR2_TABLE_500
28 , p7_a18 out nocopy JTF_VARCHAR2_TABLE_500
29 , p7_a19 out nocopy JTF_VARCHAR2_TABLE_500
30 , p7_a20 out nocopy JTF_VARCHAR2_TABLE_500
31 , p7_a21 out nocopy JTF_VARCHAR2_TABLE_500
32 , p7_a22 out nocopy JTF_VARCHAR2_TABLE_500
33 , p7_a23 out nocopy JTF_VARCHAR2_TABLE_500
34 , p7_a24 out nocopy JTF_NUMBER_TABLE
35 , p7_a25 out nocopy JTF_DATE_TABLE
36 , p7_a26 out nocopy JTF_NUMBER_TABLE
37 , p7_a27 out nocopy JTF_DATE_TABLE
38 , p7_a28 out nocopy JTF_NUMBER_TABLE
39 )
40
41 as
42 ddx_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
43 ddindx binary_integer; indx binary_integer;
44 begin
45
46 -- copy data to the local IN or IN-OUT args, if any
47
48
49
50
51
52
53
54
55 -- here's the delegated call to the old PL/SQL routine
56 okl_fe_eo_term_options_pub.get_item_lines(p_api_version,
57 p_init_msg_list,
58 x_return_status,
59 x_msg_count,
60 x_msg_data,
61 p_po_id,
62 p_po_version,
63 ddx_eto_tbl);
64
65 -- copy data back from the local variables to OUT or IN-OUT args, if any
66
67
68
69
70
71
72
73 okl_eto_pvt_w.rosetta_table_copy_out_p1(ddx_eto_tbl, p7_a0
74 , p7_a1
75 , p7_a2
76 , p7_a3
77 , p7_a4
78 , p7_a5
79 , p7_a6
80 , p7_a7
81 , p7_a8
82 , p7_a9
83 , p7_a10
84 , p7_a11
85 , p7_a12
86 , p7_a13
87 , p7_a14
88 , p7_a15
89 , p7_a16
90 , p7_a17
91 , p7_a18
92 , p7_a19
93 , p7_a20
94 , p7_a21
95 , p7_a22
96 , p7_a23
97 , p7_a24
98 , p7_a25
99 , p7_a26
100 , p7_a27
101 , p7_a28
102 );
103 end;
104
105 procedure get_eo_term_values(p_api_version NUMBER
106 , p_init_msg_list VARCHAR2
107 , x_return_status out nocopy VARCHAR2
108 , x_msg_count out nocopy NUMBER
109 , x_msg_data out nocopy VARCHAR2
110 , p_po_id NUMBER
111 , p_po_version VARCHAR2
112 , p7_a0 out nocopy JTF_NUMBER_TABLE
113 , p7_a1 out nocopy JTF_NUMBER_TABLE
114 , p7_a2 out nocopy JTF_NUMBER_TABLE
115 , p7_a3 out nocopy JTF_NUMBER_TABLE
116 , p7_a4 out nocopy JTF_NUMBER_TABLE
117 , p7_a5 out nocopy JTF_VARCHAR2_TABLE_100
118 , p7_a6 out nocopy JTF_VARCHAR2_TABLE_500
119 , p7_a7 out nocopy JTF_VARCHAR2_TABLE_500
120 , p7_a8 out nocopy JTF_VARCHAR2_TABLE_500
121 , p7_a9 out nocopy JTF_VARCHAR2_TABLE_500
122 , p7_a10 out nocopy JTF_VARCHAR2_TABLE_500
123 , p7_a11 out nocopy JTF_VARCHAR2_TABLE_500
124 , p7_a12 out nocopy JTF_VARCHAR2_TABLE_500
125 , p7_a13 out nocopy JTF_VARCHAR2_TABLE_500
126 , p7_a14 out nocopy JTF_VARCHAR2_TABLE_500
127 , p7_a15 out nocopy JTF_VARCHAR2_TABLE_500
128 , p7_a16 out nocopy JTF_VARCHAR2_TABLE_500
129 , p7_a17 out nocopy JTF_VARCHAR2_TABLE_500
130 , p7_a18 out nocopy JTF_VARCHAR2_TABLE_500
131 , p7_a19 out nocopy JTF_VARCHAR2_TABLE_500
132 , p7_a20 out nocopy JTF_VARCHAR2_TABLE_500
133 , p7_a21 out nocopy JTF_NUMBER_TABLE
134 , p7_a22 out nocopy JTF_DATE_TABLE
135 , p7_a23 out nocopy JTF_NUMBER_TABLE
136 , p7_a24 out nocopy JTF_DATE_TABLE
137 , p7_a25 out nocopy JTF_NUMBER_TABLE
138 )
139
140 as
141 ddx_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
142 ddindx binary_integer; indx binary_integer;
143 begin
144
145 -- copy data to the local IN or IN-OUT args, if any
146
147
148
149
150
151
152
153
154 -- here's the delegated call to the old PL/SQL routine
155 okl_fe_eo_term_options_pub.get_eo_term_values(p_api_version,
156 p_init_msg_list,
157 x_return_status,
158 x_msg_count,
159 x_msg_data,
160 p_po_id,
161 p_po_version,
162 ddx_etv_tbl);
163
164 -- copy data back from the local variables to OUT or IN-OUT args, if any
165
166
167
168
169
170
171
172 okl_etv_pvt_w.rosetta_table_copy_out_p1(ddx_etv_tbl, p7_a0
173 , p7_a1
174 , p7_a2
175 , p7_a3
176 , p7_a4
177 , p7_a5
178 , p7_a6
179 , p7_a7
180 , p7_a8
181 , p7_a9
182 , p7_a10
183 , p7_a11
184 , p7_a12
185 , p7_a13
186 , p7_a14
187 , p7_a15
188 , p7_a16
189 , p7_a17
190 , p7_a18
191 , p7_a19
192 , p7_a20
193 , p7_a21
194 , p7_a22
195 , p7_a23
196 , p7_a24
197 , p7_a25
198 );
199 end;
200
201 procedure get_end_of_term_option(p_api_version NUMBER
202 , p_init_msg_list VARCHAR2
203 , x_return_status out nocopy VARCHAR2
204 , x_msg_count out nocopy NUMBER
205 , x_msg_data out nocopy VARCHAR2
206 , p_po_id NUMBER
207 , p_po_version VARCHAR2
208 , p7_a0 out nocopy NUMBER
209 , p7_a1 out nocopy NUMBER
210 , p7_a2 out nocopy VARCHAR2
211 , p7_a3 out nocopy VARCHAR2
212 , p7_a4 out nocopy NUMBER
213 , p7_a5 out nocopy VARCHAR2
214 , p7_a6 out nocopy VARCHAR2
215 , p7_a7 out nocopy NUMBER
216 , p7_a8 out nocopy VARCHAR2
217 , p7_a9 out nocopy NUMBER
218 , p7_a10 out nocopy VARCHAR2
219 , p7_a11 out nocopy DATE
220 , p7_a12 out nocopy DATE
221 , p7_a13 out nocopy VARCHAR2
222 , p7_a14 out nocopy VARCHAR2
223 , p7_a15 out nocopy VARCHAR2
224 , p7_a16 out nocopy VARCHAR2
225 , p7_a17 out nocopy VARCHAR2
226 , p7_a18 out nocopy VARCHAR2
227 , p7_a19 out nocopy VARCHAR2
228 , p7_a20 out nocopy VARCHAR2
229 , p7_a21 out nocopy VARCHAR2
230 , p7_a22 out nocopy VARCHAR2
231 , p7_a23 out nocopy VARCHAR2
232 , p7_a24 out nocopy VARCHAR2
233 , p7_a25 out nocopy VARCHAR2
234 , p7_a26 out nocopy VARCHAR2
235 , p7_a27 out nocopy VARCHAR2
236 , p7_a28 out nocopy VARCHAR2
237 , p7_a29 out nocopy NUMBER
238 , p7_a30 out nocopy DATE
239 , p7_a31 out nocopy NUMBER
240 , p7_a32 out nocopy DATE
241 , p7_a33 out nocopy NUMBER
242 , p8_a0 out nocopy NUMBER
243 , p8_a1 out nocopy NUMBER
244 , p8_a2 out nocopy VARCHAR2
245 , p8_a3 out nocopy DATE
246 , p8_a4 out nocopy DATE
247 , p8_a5 out nocopy VARCHAR2
248 , p8_a6 out nocopy NUMBER
249 , p8_a7 out nocopy VARCHAR2
250 , p8_a8 out nocopy VARCHAR2
251 , p8_a9 out nocopy VARCHAR2
252 , p8_a10 out nocopy VARCHAR2
253 , p8_a11 out nocopy VARCHAR2
254 , p8_a12 out nocopy VARCHAR2
255 , p8_a13 out nocopy VARCHAR2
256 , p8_a14 out nocopy VARCHAR2
257 , p8_a15 out nocopy VARCHAR2
258 , p8_a16 out nocopy VARCHAR2
259 , p8_a17 out nocopy VARCHAR2
260 , p8_a18 out nocopy VARCHAR2
261 , p8_a19 out nocopy VARCHAR2
262 , p8_a20 out nocopy VARCHAR2
263 , p8_a21 out nocopy VARCHAR2
264 , p8_a22 out nocopy VARCHAR2
265 , p8_a23 out nocopy NUMBER
266 , p8_a24 out nocopy DATE
267 , p8_a25 out nocopy NUMBER
268 , p8_a26 out nocopy DATE
269 , p8_a27 out nocopy NUMBER
270 , p9_a0 out nocopy JTF_NUMBER_TABLE
271 , p9_a1 out nocopy JTF_NUMBER_TABLE
272 , p9_a2 out nocopy JTF_NUMBER_TABLE
273 , p9_a3 out nocopy JTF_NUMBER_TABLE
274 , p9_a4 out nocopy JTF_NUMBER_TABLE
275 , p9_a5 out nocopy JTF_NUMBER_TABLE
276 , p9_a6 out nocopy JTF_NUMBER_TABLE
277 , p9_a7 out nocopy JTF_NUMBER_TABLE
278 , p9_a8 out nocopy JTF_VARCHAR2_TABLE_100
279 , p9_a9 out nocopy JTF_VARCHAR2_TABLE_500
280 , p9_a10 out nocopy JTF_VARCHAR2_TABLE_500
281 , p9_a11 out nocopy JTF_VARCHAR2_TABLE_500
282 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_500
283 , p9_a13 out nocopy JTF_VARCHAR2_TABLE_500
284 , p9_a14 out nocopy JTF_VARCHAR2_TABLE_500
285 , p9_a15 out nocopy JTF_VARCHAR2_TABLE_500
286 , p9_a16 out nocopy JTF_VARCHAR2_TABLE_500
287 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_500
288 , p9_a18 out nocopy JTF_VARCHAR2_TABLE_500
289 , p9_a19 out nocopy JTF_VARCHAR2_TABLE_500
290 , p9_a20 out nocopy JTF_VARCHAR2_TABLE_500
291 , p9_a21 out nocopy JTF_VARCHAR2_TABLE_500
292 , p9_a22 out nocopy JTF_VARCHAR2_TABLE_500
293 , p9_a23 out nocopy JTF_VARCHAR2_TABLE_500
294 , p9_a24 out nocopy JTF_NUMBER_TABLE
295 , p9_a25 out nocopy JTF_DATE_TABLE
296 , p9_a26 out nocopy JTF_NUMBER_TABLE
297 , p9_a27 out nocopy JTF_DATE_TABLE
298 , p9_a28 out nocopy JTF_NUMBER_TABLE
299 , p10_a0 out nocopy JTF_NUMBER_TABLE
300 , p10_a1 out nocopy JTF_NUMBER_TABLE
301 , p10_a2 out nocopy JTF_NUMBER_TABLE
302 , p10_a3 out nocopy JTF_NUMBER_TABLE
303 , p10_a4 out nocopy JTF_NUMBER_TABLE
304 , p10_a5 out nocopy JTF_VARCHAR2_TABLE_100
305 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_500
306 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_500
307 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_500
308 , p10_a9 out nocopy JTF_VARCHAR2_TABLE_500
309 , p10_a10 out nocopy JTF_VARCHAR2_TABLE_500
310 , p10_a11 out nocopy JTF_VARCHAR2_TABLE_500
311 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_500
312 , p10_a13 out nocopy JTF_VARCHAR2_TABLE_500
313 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_500
314 , p10_a15 out nocopy JTF_VARCHAR2_TABLE_500
315 , p10_a16 out nocopy JTF_VARCHAR2_TABLE_500
316 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_500
317 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_500
318 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_500
319 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_500
320 , p10_a21 out nocopy JTF_NUMBER_TABLE
321 , p10_a22 out nocopy JTF_DATE_TABLE
322 , p10_a23 out nocopy JTF_NUMBER_TABLE
323 , p10_a24 out nocopy JTF_DATE_TABLE
324 , p10_a25 out nocopy JTF_NUMBER_TABLE
325 )
326
327 as
328 ddx_ethv_rec okl_fe_eo_term_options_pub.okl_ethv_rec;
329 ddx_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
330 ddx_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
331 ddx_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
332 ddindx binary_integer; indx binary_integer;
333 begin
334
335 -- copy data to the local IN or IN-OUT args, if any
336
337
338
339
340
341
342
343
344
345
346
347 -- here's the delegated call to the old PL/SQL routine
348 okl_fe_eo_term_options_pub.get_end_of_term_option(p_api_version,
349 p_init_msg_list,
350 x_return_status,
351 x_msg_count,
352 x_msg_data,
353 p_po_id,
354 p_po_version,
355 ddx_ethv_rec,
356 ddx_eve_rec,
357 ddx_eto_tbl,
358 ddx_etv_tbl);
359
360 -- copy data back from the local variables to OUT or IN-OUT args, if any
361
362
363
364
365
366
367
368 p7_a0 := ddx_ethv_rec.end_of_term_id;
369 p7_a1 := ddx_ethv_rec.object_version_number;
370 p7_a2 := ddx_ethv_rec.end_of_term_name;
371 p7_a3 := ddx_ethv_rec.end_of_term_desc;
372 p7_a4 := ddx_ethv_rec.org_id;
373 p7_a5 := ddx_ethv_rec.currency_code;
374 p7_a6 := ddx_ethv_rec.eot_type_code;
375 p7_a7 := ddx_ethv_rec.product_id;
376 p7_a8 := ddx_ethv_rec.category_type_code;
377 p7_a9 := ddx_ethv_rec.orig_end_of_term_id;
378 p7_a10 := ddx_ethv_rec.sts_code;
379 p7_a11 := ddx_ethv_rec.effective_from_date;
380 p7_a12 := ddx_ethv_rec.effective_to_date;
381 p7_a13 := ddx_ethv_rec.attribute_category;
382 p7_a14 := ddx_ethv_rec.attribute1;
383 p7_a15 := ddx_ethv_rec.attribute2;
384 p7_a16 := ddx_ethv_rec.attribute3;
385 p7_a17 := ddx_ethv_rec.attribute4;
386 p7_a18 := ddx_ethv_rec.attribute5;
387 p7_a19 := ddx_ethv_rec.attribute6;
388 p7_a20 := ddx_ethv_rec.attribute7;
389 p7_a21 := ddx_ethv_rec.attribute8;
390 p7_a22 := ddx_ethv_rec.attribute9;
391 p7_a23 := ddx_ethv_rec.attribute10;
392 p7_a24 := ddx_ethv_rec.attribute11;
393 p7_a25 := ddx_ethv_rec.attribute12;
394 p7_a26 := ddx_ethv_rec.attribute13;
395 p7_a27 := ddx_ethv_rec.attribute14;
396 p7_a28 := ddx_ethv_rec.attribute15;
397 p7_a29 := ddx_ethv_rec.created_by;
398 p7_a30 := ddx_ethv_rec.creation_date;
399 p7_a31 := ddx_ethv_rec.last_updated_by;
400 p7_a32 := ddx_ethv_rec.last_update_date;
401 p7_a33 := ddx_ethv_rec.last_update_login;
402
403 p8_a0 := ddx_eve_rec.end_of_term_ver_id;
404 p8_a1 := ddx_eve_rec.object_version_number;
405 p8_a2 := ddx_eve_rec.version_number;
406 p8_a3 := ddx_eve_rec.effective_from_date;
407 p8_a4 := ddx_eve_rec.effective_to_date;
408 p8_a5 := ddx_eve_rec.sts_code;
409 p8_a6 := ddx_eve_rec.end_of_term_id;
410 p8_a7 := ddx_eve_rec.attribute_category;
411 p8_a8 := ddx_eve_rec.attribute1;
412 p8_a9 := ddx_eve_rec.attribute2;
413 p8_a10 := ddx_eve_rec.attribute3;
414 p8_a11 := ddx_eve_rec.attribute4;
415 p8_a12 := ddx_eve_rec.attribute5;
416 p8_a13 := ddx_eve_rec.attribute6;
417 p8_a14 := ddx_eve_rec.attribute7;
418 p8_a15 := ddx_eve_rec.attribute8;
419 p8_a16 := ddx_eve_rec.attribute9;
420 p8_a17 := ddx_eve_rec.attribute10;
421 p8_a18 := ddx_eve_rec.attribute11;
422 p8_a19 := ddx_eve_rec.attribute12;
423 p8_a20 := ddx_eve_rec.attribute13;
424 p8_a21 := ddx_eve_rec.attribute14;
425 p8_a22 := ddx_eve_rec.attribute15;
426 p8_a23 := ddx_eve_rec.created_by;
427 p8_a24 := ddx_eve_rec.creation_date;
428 p8_a25 := ddx_eve_rec.last_updated_by;
429 p8_a26 := ddx_eve_rec.last_update_date;
430 p8_a27 := ddx_eve_rec.last_update_login;
431
432 okl_eto_pvt_w.rosetta_table_copy_out_p1(ddx_eto_tbl, p9_a0
433 , p9_a1
434 , p9_a2
435 , p9_a3
436 , p9_a4
437 , p9_a5
438 , p9_a6
439 , p9_a7
440 , p9_a8
441 , p9_a9
442 , p9_a10
443 , p9_a11
444 , p9_a12
445 , p9_a13
446 , p9_a14
447 , p9_a15
448 , p9_a16
449 , p9_a17
450 , p9_a18
451 , p9_a19
452 , p9_a20
453 , p9_a21
454 , p9_a22
455 , p9_a23
456 , p9_a24
457 , p9_a25
458 , p9_a26
459 , p9_a27
460 , p9_a28
461 );
462
463 okl_etv_pvt_w.rosetta_table_copy_out_p1(ddx_etv_tbl, p10_a0
464 , p10_a1
465 , p10_a2
466 , p10_a3
467 , p10_a4
468 , p10_a5
469 , p10_a6
470 , p10_a7
471 , p10_a8
472 , p10_a9
473 , p10_a10
474 , p10_a11
475 , p10_a12
476 , p10_a13
477 , p10_a14
478 , p10_a15
479 , p10_a16
480 , p10_a17
481 , p10_a18
482 , p10_a19
483 , p10_a20
484 , p10_a21
485 , p10_a22
486 , p10_a23
487 , p10_a24
488 , p10_a25
489 );
490 end;
491
492 procedure insert_end_of_term_option(p_api_version NUMBER
493 , p_init_msg_list VARCHAR2
494 , x_return_status out nocopy VARCHAR2
495 , x_msg_count out nocopy NUMBER
496 , x_msg_data out nocopy VARCHAR2
497 , p5_a0 NUMBER
498 , p5_a1 NUMBER
499 , p5_a2 VARCHAR2
500 , p5_a3 VARCHAR2
501 , p5_a4 NUMBER
502 , p5_a5 VARCHAR2
503 , p5_a6 VARCHAR2
504 , p5_a7 NUMBER
505 , p5_a8 VARCHAR2
506 , p5_a9 NUMBER
507 , p5_a10 VARCHAR2
508 , p5_a11 DATE
509 , p5_a12 DATE
510 , p5_a13 VARCHAR2
511 , p5_a14 VARCHAR2
512 , p5_a15 VARCHAR2
513 , p5_a16 VARCHAR2
514 , p5_a17 VARCHAR2
515 , p5_a18 VARCHAR2
516 , p5_a19 VARCHAR2
517 , p5_a20 VARCHAR2
518 , p5_a21 VARCHAR2
519 , p5_a22 VARCHAR2
520 , p5_a23 VARCHAR2
521 , p5_a24 VARCHAR2
522 , p5_a25 VARCHAR2
523 , p5_a26 VARCHAR2
524 , p5_a27 VARCHAR2
525 , p5_a28 VARCHAR2
526 , p5_a29 NUMBER
527 , p5_a30 DATE
528 , p5_a31 NUMBER
529 , p5_a32 DATE
530 , p5_a33 NUMBER
531 , p6_a0 NUMBER
532 , p6_a1 NUMBER
533 , p6_a2 VARCHAR2
534 , p6_a3 DATE
535 , p6_a4 DATE
536 , p6_a5 VARCHAR2
537 , p6_a6 NUMBER
538 , p6_a7 VARCHAR2
539 , p6_a8 VARCHAR2
540 , p6_a9 VARCHAR2
541 , p6_a10 VARCHAR2
542 , p6_a11 VARCHAR2
543 , p6_a12 VARCHAR2
544 , p6_a13 VARCHAR2
545 , p6_a14 VARCHAR2
546 , p6_a15 VARCHAR2
547 , p6_a16 VARCHAR2
548 , p6_a17 VARCHAR2
549 , p6_a18 VARCHAR2
550 , p6_a19 VARCHAR2
551 , p6_a20 VARCHAR2
552 , p6_a21 VARCHAR2
553 , p6_a22 VARCHAR2
554 , p6_a23 NUMBER
555 , p6_a24 DATE
556 , p6_a25 NUMBER
557 , p6_a26 DATE
558 , p6_a27 NUMBER
559 , p7_a0 JTF_NUMBER_TABLE
560 , p7_a1 JTF_NUMBER_TABLE
561 , p7_a2 JTF_NUMBER_TABLE
562 , p7_a3 JTF_NUMBER_TABLE
563 , p7_a4 JTF_NUMBER_TABLE
564 , p7_a5 JTF_NUMBER_TABLE
565 , p7_a6 JTF_NUMBER_TABLE
566 , p7_a7 JTF_NUMBER_TABLE
567 , p7_a8 JTF_VARCHAR2_TABLE_100
568 , p7_a9 JTF_VARCHAR2_TABLE_500
569 , p7_a10 JTF_VARCHAR2_TABLE_500
570 , p7_a11 JTF_VARCHAR2_TABLE_500
571 , p7_a12 JTF_VARCHAR2_TABLE_500
572 , p7_a13 JTF_VARCHAR2_TABLE_500
573 , p7_a14 JTF_VARCHAR2_TABLE_500
574 , p7_a15 JTF_VARCHAR2_TABLE_500
575 , p7_a16 JTF_VARCHAR2_TABLE_500
576 , p7_a17 JTF_VARCHAR2_TABLE_500
577 , p7_a18 JTF_VARCHAR2_TABLE_500
578 , p7_a19 JTF_VARCHAR2_TABLE_500
579 , p7_a20 JTF_VARCHAR2_TABLE_500
580 , p7_a21 JTF_VARCHAR2_TABLE_500
581 , p7_a22 JTF_VARCHAR2_TABLE_500
582 , p7_a23 JTF_VARCHAR2_TABLE_500
583 , p7_a24 JTF_NUMBER_TABLE
584 , p7_a25 JTF_DATE_TABLE
585 , p7_a26 JTF_NUMBER_TABLE
586 , p7_a27 JTF_DATE_TABLE
587 , p7_a28 JTF_NUMBER_TABLE
588 , p8_a0 JTF_NUMBER_TABLE
589 , p8_a1 JTF_NUMBER_TABLE
590 , p8_a2 JTF_NUMBER_TABLE
591 , p8_a3 JTF_NUMBER_TABLE
592 , p8_a4 JTF_NUMBER_TABLE
593 , p8_a5 JTF_VARCHAR2_TABLE_100
594 , p8_a6 JTF_VARCHAR2_TABLE_500
595 , p8_a7 JTF_VARCHAR2_TABLE_500
596 , p8_a8 JTF_VARCHAR2_TABLE_500
597 , p8_a9 JTF_VARCHAR2_TABLE_500
598 , p8_a10 JTF_VARCHAR2_TABLE_500
599 , p8_a11 JTF_VARCHAR2_TABLE_500
600 , p8_a12 JTF_VARCHAR2_TABLE_500
601 , p8_a13 JTF_VARCHAR2_TABLE_500
602 , p8_a14 JTF_VARCHAR2_TABLE_500
603 , p8_a15 JTF_VARCHAR2_TABLE_500
604 , p8_a16 JTF_VARCHAR2_TABLE_500
605 , p8_a17 JTF_VARCHAR2_TABLE_500
606 , p8_a18 JTF_VARCHAR2_TABLE_500
607 , p8_a19 JTF_VARCHAR2_TABLE_500
608 , p8_a20 JTF_VARCHAR2_TABLE_500
609 , p8_a21 JTF_NUMBER_TABLE
610 , p8_a22 JTF_DATE_TABLE
611 , p8_a23 JTF_NUMBER_TABLE
612 , p8_a24 JTF_DATE_TABLE
613 , p8_a25 JTF_NUMBER_TABLE
614 , p9_a0 out nocopy NUMBER
615 , p9_a1 out nocopy NUMBER
616 , p9_a2 out nocopy VARCHAR2
617 , p9_a3 out nocopy VARCHAR2
618 , p9_a4 out nocopy NUMBER
619 , p9_a5 out nocopy VARCHAR2
620 , p9_a6 out nocopy VARCHAR2
621 , p9_a7 out nocopy NUMBER
622 , p9_a8 out nocopy VARCHAR2
623 , p9_a9 out nocopy NUMBER
624 , p9_a10 out nocopy VARCHAR2
625 , p9_a11 out nocopy DATE
626 , p9_a12 out nocopy DATE
627 , p9_a13 out nocopy VARCHAR2
628 , p9_a14 out nocopy VARCHAR2
629 , p9_a15 out nocopy VARCHAR2
630 , p9_a16 out nocopy VARCHAR2
631 , p9_a17 out nocopy VARCHAR2
632 , p9_a18 out nocopy VARCHAR2
633 , p9_a19 out nocopy VARCHAR2
634 , p9_a20 out nocopy VARCHAR2
635 , p9_a21 out nocopy VARCHAR2
636 , p9_a22 out nocopy VARCHAR2
637 , p9_a23 out nocopy VARCHAR2
638 , p9_a24 out nocopy VARCHAR2
639 , p9_a25 out nocopy VARCHAR2
640 , p9_a26 out nocopy VARCHAR2
641 , p9_a27 out nocopy VARCHAR2
642 , p9_a28 out nocopy VARCHAR2
643 , p9_a29 out nocopy NUMBER
644 , p9_a30 out nocopy DATE
645 , p9_a31 out nocopy NUMBER
646 , p9_a32 out nocopy DATE
647 , p9_a33 out nocopy NUMBER
648 , p10_a0 out nocopy NUMBER
649 , p10_a1 out nocopy NUMBER
650 , p10_a2 out nocopy VARCHAR2
651 , p10_a3 out nocopy DATE
652 , p10_a4 out nocopy DATE
653 , p10_a5 out nocopy VARCHAR2
654 , p10_a6 out nocopy NUMBER
655 , p10_a7 out nocopy VARCHAR2
656 , p10_a8 out nocopy VARCHAR2
657 , p10_a9 out nocopy VARCHAR2
658 , p10_a10 out nocopy VARCHAR2
659 , p10_a11 out nocopy VARCHAR2
660 , p10_a12 out nocopy VARCHAR2
661 , p10_a13 out nocopy VARCHAR2
662 , p10_a14 out nocopy VARCHAR2
663 , p10_a15 out nocopy VARCHAR2
664 , p10_a16 out nocopy VARCHAR2
665 , p10_a17 out nocopy VARCHAR2
666 , p10_a18 out nocopy VARCHAR2
667 , p10_a19 out nocopy VARCHAR2
668 , p10_a20 out nocopy VARCHAR2
669 , p10_a21 out nocopy VARCHAR2
670 , p10_a22 out nocopy VARCHAR2
671 , p10_a23 out nocopy NUMBER
672 , p10_a24 out nocopy DATE
673 , p10_a25 out nocopy NUMBER
674 , p10_a26 out nocopy DATE
675 , p10_a27 out nocopy NUMBER
676 , p11_a0 out nocopy JTF_NUMBER_TABLE
677 , p11_a1 out nocopy JTF_NUMBER_TABLE
678 , p11_a2 out nocopy JTF_NUMBER_TABLE
679 , p11_a3 out nocopy JTF_NUMBER_TABLE
680 , p11_a4 out nocopy JTF_NUMBER_TABLE
681 , p11_a5 out nocopy JTF_NUMBER_TABLE
682 , p11_a6 out nocopy JTF_NUMBER_TABLE
683 , p11_a7 out nocopy JTF_NUMBER_TABLE
684 , p11_a8 out nocopy JTF_VARCHAR2_TABLE_100
685 , p11_a9 out nocopy JTF_VARCHAR2_TABLE_500
686 , p11_a10 out nocopy JTF_VARCHAR2_TABLE_500
687 , p11_a11 out nocopy JTF_VARCHAR2_TABLE_500
688 , p11_a12 out nocopy JTF_VARCHAR2_TABLE_500
689 , p11_a13 out nocopy JTF_VARCHAR2_TABLE_500
690 , p11_a14 out nocopy JTF_VARCHAR2_TABLE_500
691 , p11_a15 out nocopy JTF_VARCHAR2_TABLE_500
692 , p11_a16 out nocopy JTF_VARCHAR2_TABLE_500
693 , p11_a17 out nocopy JTF_VARCHAR2_TABLE_500
694 , p11_a18 out nocopy JTF_VARCHAR2_TABLE_500
695 , p11_a19 out nocopy JTF_VARCHAR2_TABLE_500
696 , p11_a20 out nocopy JTF_VARCHAR2_TABLE_500
697 , p11_a21 out nocopy JTF_VARCHAR2_TABLE_500
698 , p11_a22 out nocopy JTF_VARCHAR2_TABLE_500
699 , p11_a23 out nocopy JTF_VARCHAR2_TABLE_500
700 , p11_a24 out nocopy JTF_NUMBER_TABLE
701 , p11_a25 out nocopy JTF_DATE_TABLE
702 , p11_a26 out nocopy JTF_NUMBER_TABLE
703 , p11_a27 out nocopy JTF_DATE_TABLE
704 , p11_a28 out nocopy JTF_NUMBER_TABLE
705 , p12_a0 out nocopy JTF_NUMBER_TABLE
706 , p12_a1 out nocopy JTF_NUMBER_TABLE
707 , p12_a2 out nocopy JTF_NUMBER_TABLE
708 , p12_a3 out nocopy JTF_NUMBER_TABLE
709 , p12_a4 out nocopy JTF_NUMBER_TABLE
710 , p12_a5 out nocopy JTF_VARCHAR2_TABLE_100
711 , p12_a6 out nocopy JTF_VARCHAR2_TABLE_500
712 , p12_a7 out nocopy JTF_VARCHAR2_TABLE_500
713 , p12_a8 out nocopy JTF_VARCHAR2_TABLE_500
714 , p12_a9 out nocopy JTF_VARCHAR2_TABLE_500
715 , p12_a10 out nocopy JTF_VARCHAR2_TABLE_500
716 , p12_a11 out nocopy JTF_VARCHAR2_TABLE_500
717 , p12_a12 out nocopy JTF_VARCHAR2_TABLE_500
718 , p12_a13 out nocopy JTF_VARCHAR2_TABLE_500
719 , p12_a14 out nocopy JTF_VARCHAR2_TABLE_500
720 , p12_a15 out nocopy JTF_VARCHAR2_TABLE_500
721 , p12_a16 out nocopy JTF_VARCHAR2_TABLE_500
722 , p12_a17 out nocopy JTF_VARCHAR2_TABLE_500
723 , p12_a18 out nocopy JTF_VARCHAR2_TABLE_500
724 , p12_a19 out nocopy JTF_VARCHAR2_TABLE_500
725 , p12_a20 out nocopy JTF_VARCHAR2_TABLE_500
726 , p12_a21 out nocopy JTF_NUMBER_TABLE
727 , p12_a22 out nocopy JTF_DATE_TABLE
728 , p12_a23 out nocopy JTF_NUMBER_TABLE
729 , p12_a24 out nocopy JTF_DATE_TABLE
730 , p12_a25 out nocopy JTF_NUMBER_TABLE
731 )
732
733 as
734 ddp_ethv_rec okl_fe_eo_term_options_pub.okl_ethv_rec;
735 ddp_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
736 ddp_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
737 ddp_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
738 ddx_ethv_rec okl_fe_eo_term_options_pub.okl_ethv_rec;
739 ddx_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
740 ddx_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
741 ddx_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
742 ddindx binary_integer; indx binary_integer;
743 begin
744
745 -- copy data to the local IN or IN-OUT args, if any
746
747
748
749
750
751 ddp_ethv_rec.end_of_term_id := p5_a0;
752 ddp_ethv_rec.object_version_number := p5_a1;
753 ddp_ethv_rec.end_of_term_name := p5_a2;
754 ddp_ethv_rec.end_of_term_desc := p5_a3;
755 ddp_ethv_rec.org_id := p5_a4;
756 ddp_ethv_rec.currency_code := p5_a5;
757 ddp_ethv_rec.eot_type_code := p5_a6;
758 ddp_ethv_rec.product_id := p5_a7;
759 ddp_ethv_rec.category_type_code := p5_a8;
760 ddp_ethv_rec.orig_end_of_term_id := p5_a9;
761 ddp_ethv_rec.sts_code := p5_a10;
762 ddp_ethv_rec.effective_from_date := p5_a11;
763 ddp_ethv_rec.effective_to_date := p5_a12;
764 ddp_ethv_rec.attribute_category := p5_a13;
765 ddp_ethv_rec.attribute1 := p5_a14;
766 ddp_ethv_rec.attribute2 := p5_a15;
767 ddp_ethv_rec.attribute3 := p5_a16;
768 ddp_ethv_rec.attribute4 := p5_a17;
769 ddp_ethv_rec.attribute5 := p5_a18;
770 ddp_ethv_rec.attribute6 := p5_a19;
771 ddp_ethv_rec.attribute7 := p5_a20;
772 ddp_ethv_rec.attribute8 := p5_a21;
773 ddp_ethv_rec.attribute9 := p5_a22;
774 ddp_ethv_rec.attribute10 := p5_a23;
775 ddp_ethv_rec.attribute11 := p5_a24;
776 ddp_ethv_rec.attribute12 := p5_a25;
777 ddp_ethv_rec.attribute13 := p5_a26;
778 ddp_ethv_rec.attribute14 := p5_a27;
779 ddp_ethv_rec.attribute15 := p5_a28;
780 ddp_ethv_rec.created_by := p5_a29;
781 ddp_ethv_rec.creation_date := p5_a30;
782 ddp_ethv_rec.last_updated_by := p5_a31;
783 ddp_ethv_rec.last_update_date := p5_a32;
784 ddp_ethv_rec.last_update_login := p5_a33;
785
786 ddp_eve_rec.end_of_term_ver_id := p6_a0;
787 ddp_eve_rec.object_version_number := p6_a1;
788 ddp_eve_rec.version_number := p6_a2;
789 ddp_eve_rec.effective_from_date := p6_a3;
790 ddp_eve_rec.effective_to_date := p6_a4;
791 ddp_eve_rec.sts_code := p6_a5;
792 ddp_eve_rec.end_of_term_id := p6_a6;
793 ddp_eve_rec.attribute_category := p6_a7;
794 ddp_eve_rec.attribute1 := p6_a8;
795 ddp_eve_rec.attribute2 := p6_a9;
796 ddp_eve_rec.attribute3 := p6_a10;
797 ddp_eve_rec.attribute4 := p6_a11;
798 ddp_eve_rec.attribute5 := p6_a12;
799 ddp_eve_rec.attribute6 := p6_a13;
800 ddp_eve_rec.attribute7 := p6_a14;
801 ddp_eve_rec.attribute8 := p6_a15;
802 ddp_eve_rec.attribute9 := p6_a16;
803 ddp_eve_rec.attribute10 := p6_a17;
804 ddp_eve_rec.attribute11 := p6_a18;
805 ddp_eve_rec.attribute12 := p6_a19;
806 ddp_eve_rec.attribute13 := p6_a20;
807 ddp_eve_rec.attribute14 := p6_a21;
808 ddp_eve_rec.attribute15 := p6_a22;
809 ddp_eve_rec.created_by := p6_a23;
810 ddp_eve_rec.creation_date := p6_a24;
811 ddp_eve_rec.last_updated_by := p6_a25;
812 ddp_eve_rec.last_update_date := p6_a26;
813 ddp_eve_rec.last_update_login := p6_a27;
814
815 okl_eto_pvt_w.rosetta_table_copy_in_p1(ddp_eto_tbl, p7_a0
816 , p7_a1
817 , p7_a2
818 , p7_a3
819 , p7_a4
820 , p7_a5
821 , p7_a6
822 , p7_a7
823 , p7_a8
824 , p7_a9
825 , p7_a10
826 , p7_a11
827 , p7_a12
828 , p7_a13
829 , p7_a14
830 , p7_a15
831 , p7_a16
832 , p7_a17
833 , p7_a18
834 , p7_a19
835 , p7_a20
836 , p7_a21
837 , p7_a22
838 , p7_a23
839 , p7_a24
840 , p7_a25
841 , p7_a26
842 , p7_a27
843 , p7_a28
844 );
845
846 okl_etv_pvt_w.rosetta_table_copy_in_p1(ddp_etv_tbl, p8_a0
847 , p8_a1
848 , p8_a2
849 , p8_a3
850 , p8_a4
851 , p8_a5
852 , p8_a6
853 , p8_a7
854 , p8_a8
855 , p8_a9
856 , p8_a10
857 , p8_a11
858 , p8_a12
859 , p8_a13
860 , p8_a14
861 , p8_a15
862 , p8_a16
863 , p8_a17
864 , p8_a18
865 , p8_a19
866 , p8_a20
867 , p8_a21
868 , p8_a22
869 , p8_a23
870 , p8_a24
871 , p8_a25
872 );
873
874
875
876
877
878 -- here's the delegated call to the old PL/SQL routine
879 okl_fe_eo_term_options_pub.insert_end_of_term_option(p_api_version,
880 p_init_msg_list,
881 x_return_status,
882 x_msg_count,
883 x_msg_data,
884 ddp_ethv_rec,
885 ddp_eve_rec,
886 ddp_eto_tbl,
887 ddp_etv_tbl,
888 ddx_ethv_rec,
889 ddx_eve_rec,
890 ddx_eto_tbl,
891 ddx_etv_tbl);
892
893 -- copy data back from the local variables to OUT or IN-OUT args, if any
894
895
896
897
898
899
900
901
902
903 p9_a0 := ddx_ethv_rec.end_of_term_id;
904 p9_a1 := ddx_ethv_rec.object_version_number;
905 p9_a2 := ddx_ethv_rec.end_of_term_name;
906 p9_a3 := ddx_ethv_rec.end_of_term_desc;
907 p9_a4 := ddx_ethv_rec.org_id;
908 p9_a5 := ddx_ethv_rec.currency_code;
909 p9_a6 := ddx_ethv_rec.eot_type_code;
910 p9_a7 := ddx_ethv_rec.product_id;
911 p9_a8 := ddx_ethv_rec.category_type_code;
912 p9_a9 := ddx_ethv_rec.orig_end_of_term_id;
913 p9_a10 := ddx_ethv_rec.sts_code;
914 p9_a11 := ddx_ethv_rec.effective_from_date;
915 p9_a12 := ddx_ethv_rec.effective_to_date;
916 p9_a13 := ddx_ethv_rec.attribute_category;
917 p9_a14 := ddx_ethv_rec.attribute1;
918 p9_a15 := ddx_ethv_rec.attribute2;
919 p9_a16 := ddx_ethv_rec.attribute3;
920 p9_a17 := ddx_ethv_rec.attribute4;
921 p9_a18 := ddx_ethv_rec.attribute5;
922 p9_a19 := ddx_ethv_rec.attribute6;
923 p9_a20 := ddx_ethv_rec.attribute7;
924 p9_a21 := ddx_ethv_rec.attribute8;
925 p9_a22 := ddx_ethv_rec.attribute9;
926 p9_a23 := ddx_ethv_rec.attribute10;
927 p9_a24 := ddx_ethv_rec.attribute11;
928 p9_a25 := ddx_ethv_rec.attribute12;
929 p9_a26 := ddx_ethv_rec.attribute13;
930 p9_a27 := ddx_ethv_rec.attribute14;
931 p9_a28 := ddx_ethv_rec.attribute15;
932 p9_a29 := ddx_ethv_rec.created_by;
933 p9_a30 := ddx_ethv_rec.creation_date;
934 p9_a31 := ddx_ethv_rec.last_updated_by;
935 p9_a32 := ddx_ethv_rec.last_update_date;
936 p9_a33 := ddx_ethv_rec.last_update_login;
937
938 p10_a0 := ddx_eve_rec.end_of_term_ver_id;
939 p10_a1 := ddx_eve_rec.object_version_number;
940 p10_a2 := ddx_eve_rec.version_number;
941 p10_a3 := ddx_eve_rec.effective_from_date;
942 p10_a4 := ddx_eve_rec.effective_to_date;
943 p10_a5 := ddx_eve_rec.sts_code;
944 p10_a6 := ddx_eve_rec.end_of_term_id;
945 p10_a7 := ddx_eve_rec.attribute_category;
946 p10_a8 := ddx_eve_rec.attribute1;
947 p10_a9 := ddx_eve_rec.attribute2;
948 p10_a10 := ddx_eve_rec.attribute3;
949 p10_a11 := ddx_eve_rec.attribute4;
950 p10_a12 := ddx_eve_rec.attribute5;
951 p10_a13 := ddx_eve_rec.attribute6;
952 p10_a14 := ddx_eve_rec.attribute7;
953 p10_a15 := ddx_eve_rec.attribute8;
954 p10_a16 := ddx_eve_rec.attribute9;
955 p10_a17 := ddx_eve_rec.attribute10;
956 p10_a18 := ddx_eve_rec.attribute11;
957 p10_a19 := ddx_eve_rec.attribute12;
958 p10_a20 := ddx_eve_rec.attribute13;
959 p10_a21 := ddx_eve_rec.attribute14;
960 p10_a22 := ddx_eve_rec.attribute15;
961 p10_a23 := ddx_eve_rec.created_by;
962 p10_a24 := ddx_eve_rec.creation_date;
963 p10_a25 := ddx_eve_rec.last_updated_by;
964 p10_a26 := ddx_eve_rec.last_update_date;
965 p10_a27 := ddx_eve_rec.last_update_login;
966
967 okl_eto_pvt_w.rosetta_table_copy_out_p1(ddx_eto_tbl, p11_a0
968 , p11_a1
969 , p11_a2
970 , p11_a3
971 , p11_a4
972 , p11_a5
973 , p11_a6
974 , p11_a7
975 , p11_a8
976 , p11_a9
977 , p11_a10
978 , p11_a11
979 , p11_a12
980 , p11_a13
981 , p11_a14
982 , p11_a15
983 , p11_a16
984 , p11_a17
985 , p11_a18
986 , p11_a19
987 , p11_a20
988 , p11_a21
989 , p11_a22
990 , p11_a23
991 , p11_a24
992 , p11_a25
993 , p11_a26
994 , p11_a27
995 , p11_a28
996 );
997
998 okl_etv_pvt_w.rosetta_table_copy_out_p1(ddx_etv_tbl, p12_a0
999 , p12_a1
1000 , p12_a2
1001 , p12_a3
1002 , p12_a4
1003 , p12_a5
1004 , p12_a6
1005 , p12_a7
1006 , p12_a8
1007 , p12_a9
1008 , p12_a10
1009 , p12_a11
1010 , p12_a12
1011 , p12_a13
1012 , p12_a14
1013 , p12_a15
1014 , p12_a16
1015 , p12_a17
1016 , p12_a18
1017 , p12_a19
1018 , p12_a20
1019 , p12_a21
1020 , p12_a22
1021 , p12_a23
1022 , p12_a24
1023 , p12_a25
1024 );
1025 end;
1026
1027 procedure update_end_of_term_option(p_api_version NUMBER
1028 , p_init_msg_list VARCHAR2
1029 , x_return_status out nocopy VARCHAR2
1030 , x_msg_count out nocopy NUMBER
1031 , x_msg_data out nocopy VARCHAR2
1032 , p5_a0 NUMBER
1033 , p5_a1 NUMBER
1034 , p5_a2 VARCHAR2
1035 , p5_a3 DATE
1036 , p5_a4 DATE
1037 , p5_a5 VARCHAR2
1038 , p5_a6 NUMBER
1039 , p5_a7 VARCHAR2
1040 , p5_a8 VARCHAR2
1041 , p5_a9 VARCHAR2
1042 , p5_a10 VARCHAR2
1043 , p5_a11 VARCHAR2
1044 , p5_a12 VARCHAR2
1045 , p5_a13 VARCHAR2
1046 , p5_a14 VARCHAR2
1047 , p5_a15 VARCHAR2
1048 , p5_a16 VARCHAR2
1049 , p5_a17 VARCHAR2
1050 , p5_a18 VARCHAR2
1051 , p5_a19 VARCHAR2
1052 , p5_a20 VARCHAR2
1053 , p5_a21 VARCHAR2
1054 , p5_a22 VARCHAR2
1055 , p5_a23 NUMBER
1056 , p5_a24 DATE
1057 , p5_a25 NUMBER
1058 , p5_a26 DATE
1059 , p5_a27 NUMBER
1060 , p6_a0 JTF_NUMBER_TABLE
1061 , p6_a1 JTF_NUMBER_TABLE
1062 , p6_a2 JTF_NUMBER_TABLE
1063 , p6_a3 JTF_NUMBER_TABLE
1064 , p6_a4 JTF_NUMBER_TABLE
1065 , p6_a5 JTF_NUMBER_TABLE
1066 , p6_a6 JTF_NUMBER_TABLE
1067 , p6_a7 JTF_NUMBER_TABLE
1068 , p6_a8 JTF_VARCHAR2_TABLE_100
1069 , p6_a9 JTF_VARCHAR2_TABLE_500
1070 , p6_a10 JTF_VARCHAR2_TABLE_500
1071 , p6_a11 JTF_VARCHAR2_TABLE_500
1072 , p6_a12 JTF_VARCHAR2_TABLE_500
1073 , p6_a13 JTF_VARCHAR2_TABLE_500
1074 , p6_a14 JTF_VARCHAR2_TABLE_500
1075 , p6_a15 JTF_VARCHAR2_TABLE_500
1076 , p6_a16 JTF_VARCHAR2_TABLE_500
1077 , p6_a17 JTF_VARCHAR2_TABLE_500
1078 , p6_a18 JTF_VARCHAR2_TABLE_500
1079 , p6_a19 JTF_VARCHAR2_TABLE_500
1080 , p6_a20 JTF_VARCHAR2_TABLE_500
1081 , p6_a21 JTF_VARCHAR2_TABLE_500
1082 , p6_a22 JTF_VARCHAR2_TABLE_500
1083 , p6_a23 JTF_VARCHAR2_TABLE_500
1084 , p6_a24 JTF_NUMBER_TABLE
1085 , p6_a25 JTF_DATE_TABLE
1086 , p6_a26 JTF_NUMBER_TABLE
1087 , p6_a27 JTF_DATE_TABLE
1088 , p6_a28 JTF_NUMBER_TABLE
1089 , p7_a0 JTF_NUMBER_TABLE
1090 , p7_a1 JTF_NUMBER_TABLE
1091 , p7_a2 JTF_NUMBER_TABLE
1092 , p7_a3 JTF_NUMBER_TABLE
1093 , p7_a4 JTF_NUMBER_TABLE
1094 , p7_a5 JTF_VARCHAR2_TABLE_100
1095 , p7_a6 JTF_VARCHAR2_TABLE_500
1096 , p7_a7 JTF_VARCHAR2_TABLE_500
1097 , p7_a8 JTF_VARCHAR2_TABLE_500
1098 , p7_a9 JTF_VARCHAR2_TABLE_500
1099 , p7_a10 JTF_VARCHAR2_TABLE_500
1100 , p7_a11 JTF_VARCHAR2_TABLE_500
1101 , p7_a12 JTF_VARCHAR2_TABLE_500
1102 , p7_a13 JTF_VARCHAR2_TABLE_500
1103 , p7_a14 JTF_VARCHAR2_TABLE_500
1104 , p7_a15 JTF_VARCHAR2_TABLE_500
1105 , p7_a16 JTF_VARCHAR2_TABLE_500
1106 , p7_a17 JTF_VARCHAR2_TABLE_500
1107 , p7_a18 JTF_VARCHAR2_TABLE_500
1108 , p7_a19 JTF_VARCHAR2_TABLE_500
1109 , p7_a20 JTF_VARCHAR2_TABLE_500
1110 , p7_a21 JTF_NUMBER_TABLE
1111 , p7_a22 JTF_DATE_TABLE
1112 , p7_a23 JTF_NUMBER_TABLE
1113 , p7_a24 JTF_DATE_TABLE
1114 , p7_a25 JTF_NUMBER_TABLE
1115 , p8_a0 out nocopy NUMBER
1116 , p8_a1 out nocopy NUMBER
1117 , p8_a2 out nocopy VARCHAR2
1118 , p8_a3 out nocopy DATE
1119 , p8_a4 out nocopy DATE
1120 , p8_a5 out nocopy VARCHAR2
1121 , p8_a6 out nocopy NUMBER
1122 , p8_a7 out nocopy VARCHAR2
1123 , p8_a8 out nocopy VARCHAR2
1124 , p8_a9 out nocopy VARCHAR2
1125 , p8_a10 out nocopy VARCHAR2
1126 , p8_a11 out nocopy VARCHAR2
1127 , p8_a12 out nocopy VARCHAR2
1128 , p8_a13 out nocopy VARCHAR2
1129 , p8_a14 out nocopy VARCHAR2
1130 , p8_a15 out nocopy VARCHAR2
1131 , p8_a16 out nocopy VARCHAR2
1132 , p8_a17 out nocopy VARCHAR2
1133 , p8_a18 out nocopy VARCHAR2
1134 , p8_a19 out nocopy VARCHAR2
1135 , p8_a20 out nocopy VARCHAR2
1136 , p8_a21 out nocopy VARCHAR2
1137 , p8_a22 out nocopy VARCHAR2
1138 , p8_a23 out nocopy NUMBER
1139 , p8_a24 out nocopy DATE
1140 , p8_a25 out nocopy NUMBER
1141 , p8_a26 out nocopy DATE
1142 , p8_a27 out nocopy NUMBER
1143 , p9_a0 out nocopy JTF_NUMBER_TABLE
1144 , p9_a1 out nocopy JTF_NUMBER_TABLE
1145 , p9_a2 out nocopy JTF_NUMBER_TABLE
1146 , p9_a3 out nocopy JTF_NUMBER_TABLE
1147 , p9_a4 out nocopy JTF_NUMBER_TABLE
1148 , p9_a5 out nocopy JTF_NUMBER_TABLE
1149 , p9_a6 out nocopy JTF_NUMBER_TABLE
1150 , p9_a7 out nocopy JTF_NUMBER_TABLE
1151 , p9_a8 out nocopy JTF_VARCHAR2_TABLE_100
1152 , p9_a9 out nocopy JTF_VARCHAR2_TABLE_500
1153 , p9_a10 out nocopy JTF_VARCHAR2_TABLE_500
1154 , p9_a11 out nocopy JTF_VARCHAR2_TABLE_500
1155 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_500
1156 , p9_a13 out nocopy JTF_VARCHAR2_TABLE_500
1157 , p9_a14 out nocopy JTF_VARCHAR2_TABLE_500
1158 , p9_a15 out nocopy JTF_VARCHAR2_TABLE_500
1159 , p9_a16 out nocopy JTF_VARCHAR2_TABLE_500
1160 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_500
1161 , p9_a18 out nocopy JTF_VARCHAR2_TABLE_500
1162 , p9_a19 out nocopy JTF_VARCHAR2_TABLE_500
1163 , p9_a20 out nocopy JTF_VARCHAR2_TABLE_500
1164 , p9_a21 out nocopy JTF_VARCHAR2_TABLE_500
1165 , p9_a22 out nocopy JTF_VARCHAR2_TABLE_500
1166 , p9_a23 out nocopy JTF_VARCHAR2_TABLE_500
1167 , p9_a24 out nocopy JTF_NUMBER_TABLE
1168 , p9_a25 out nocopy JTF_DATE_TABLE
1169 , p9_a26 out nocopy JTF_NUMBER_TABLE
1170 , p9_a27 out nocopy JTF_DATE_TABLE
1171 , p9_a28 out nocopy JTF_NUMBER_TABLE
1172 , p10_a0 out nocopy JTF_NUMBER_TABLE
1173 , p10_a1 out nocopy JTF_NUMBER_TABLE
1174 , p10_a2 out nocopy JTF_NUMBER_TABLE
1175 , p10_a3 out nocopy JTF_NUMBER_TABLE
1176 , p10_a4 out nocopy JTF_NUMBER_TABLE
1177 , p10_a5 out nocopy JTF_VARCHAR2_TABLE_100
1178 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_500
1179 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_500
1180 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_500
1181 , p10_a9 out nocopy JTF_VARCHAR2_TABLE_500
1182 , p10_a10 out nocopy JTF_VARCHAR2_TABLE_500
1183 , p10_a11 out nocopy JTF_VARCHAR2_TABLE_500
1184 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_500
1185 , p10_a13 out nocopy JTF_VARCHAR2_TABLE_500
1186 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_500
1187 , p10_a15 out nocopy JTF_VARCHAR2_TABLE_500
1188 , p10_a16 out nocopy JTF_VARCHAR2_TABLE_500
1189 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_500
1190 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_500
1191 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_500
1192 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_500
1193 , p10_a21 out nocopy JTF_NUMBER_TABLE
1194 , p10_a22 out nocopy JTF_DATE_TABLE
1195 , p10_a23 out nocopy JTF_NUMBER_TABLE
1196 , p10_a24 out nocopy JTF_DATE_TABLE
1197 , p10_a25 out nocopy JTF_NUMBER_TABLE
1198 )
1199
1200 as
1201 ddp_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
1202 ddp_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
1203 ddp_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
1204 ddx_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
1205 ddx_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
1206 ddx_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
1207 ddindx binary_integer; indx binary_integer;
1208 begin
1209
1210 -- copy data to the local IN or IN-OUT args, if any
1211
1212
1213
1214
1215
1216 ddp_eve_rec.end_of_term_ver_id := p5_a0;
1217 ddp_eve_rec.object_version_number := p5_a1;
1218 ddp_eve_rec.version_number := p5_a2;
1219 ddp_eve_rec.effective_from_date := p5_a3;
1220 ddp_eve_rec.effective_to_date := p5_a4;
1221 ddp_eve_rec.sts_code := p5_a5;
1222 ddp_eve_rec.end_of_term_id := p5_a6;
1223 ddp_eve_rec.attribute_category := p5_a7;
1224 ddp_eve_rec.attribute1 := p5_a8;
1225 ddp_eve_rec.attribute2 := p5_a9;
1226 ddp_eve_rec.attribute3 := p5_a10;
1227 ddp_eve_rec.attribute4 := p5_a11;
1228 ddp_eve_rec.attribute5 := p5_a12;
1229 ddp_eve_rec.attribute6 := p5_a13;
1230 ddp_eve_rec.attribute7 := p5_a14;
1231 ddp_eve_rec.attribute8 := p5_a15;
1232 ddp_eve_rec.attribute9 := p5_a16;
1233 ddp_eve_rec.attribute10 := p5_a17;
1234 ddp_eve_rec.attribute11 := p5_a18;
1235 ddp_eve_rec.attribute12 := p5_a19;
1236 ddp_eve_rec.attribute13 := p5_a20;
1237 ddp_eve_rec.attribute14 := p5_a21;
1238 ddp_eve_rec.attribute15 := p5_a22;
1239 ddp_eve_rec.created_by := p5_a23;
1240 ddp_eve_rec.creation_date := p5_a24;
1241 ddp_eve_rec.last_updated_by := p5_a25;
1242 ddp_eve_rec.last_update_date := p5_a26;
1243 ddp_eve_rec.last_update_login := p5_a27;
1244
1245 okl_eto_pvt_w.rosetta_table_copy_in_p1(ddp_eto_tbl, p6_a0
1246 , p6_a1
1247 , p6_a2
1248 , p6_a3
1249 , p6_a4
1250 , p6_a5
1251 , p6_a6
1252 , p6_a7
1253 , p6_a8
1254 , p6_a9
1255 , p6_a10
1256 , p6_a11
1257 , p6_a12
1258 , p6_a13
1259 , p6_a14
1260 , p6_a15
1261 , p6_a16
1262 , p6_a17
1263 , p6_a18
1264 , p6_a19
1265 , p6_a20
1266 , p6_a21
1267 , p6_a22
1268 , p6_a23
1269 , p6_a24
1270 , p6_a25
1271 , p6_a26
1272 , p6_a27
1273 , p6_a28
1274 );
1275
1276 okl_etv_pvt_w.rosetta_table_copy_in_p1(ddp_etv_tbl, p7_a0
1277 , p7_a1
1278 , p7_a2
1279 , p7_a3
1280 , p7_a4
1281 , p7_a5
1282 , p7_a6
1283 , p7_a7
1284 , p7_a8
1285 , p7_a9
1286 , p7_a10
1287 , p7_a11
1288 , p7_a12
1289 , p7_a13
1290 , p7_a14
1291 , p7_a15
1292 , p7_a16
1293 , p7_a17
1294 , p7_a18
1295 , p7_a19
1296 , p7_a20
1297 , p7_a21
1298 , p7_a22
1299 , p7_a23
1300 , p7_a24
1301 , p7_a25
1302 );
1303
1304
1305
1306
1307 -- here's the delegated call to the old PL/SQL routine
1308 okl_fe_eo_term_options_pub.update_end_of_term_option(p_api_version,
1309 p_init_msg_list,
1310 x_return_status,
1311 x_msg_count,
1312 x_msg_data,
1313 ddp_eve_rec,
1314 ddp_eto_tbl,
1315 ddp_etv_tbl,
1316 ddx_eve_rec,
1317 ddx_eto_tbl,
1318 ddx_etv_tbl);
1319
1320 -- copy data back from the local variables to OUT or IN-OUT args, if any
1321
1322
1323
1324
1325
1326
1327
1328
1329 p8_a0 := ddx_eve_rec.end_of_term_ver_id;
1330 p8_a1 := ddx_eve_rec.object_version_number;
1331 p8_a2 := ddx_eve_rec.version_number;
1332 p8_a3 := ddx_eve_rec.effective_from_date;
1333 p8_a4 := ddx_eve_rec.effective_to_date;
1334 p8_a5 := ddx_eve_rec.sts_code;
1335 p8_a6 := ddx_eve_rec.end_of_term_id;
1336 p8_a7 := ddx_eve_rec.attribute_category;
1337 p8_a8 := ddx_eve_rec.attribute1;
1338 p8_a9 := ddx_eve_rec.attribute2;
1339 p8_a10 := ddx_eve_rec.attribute3;
1340 p8_a11 := ddx_eve_rec.attribute4;
1341 p8_a12 := ddx_eve_rec.attribute5;
1342 p8_a13 := ddx_eve_rec.attribute6;
1343 p8_a14 := ddx_eve_rec.attribute7;
1344 p8_a15 := ddx_eve_rec.attribute8;
1345 p8_a16 := ddx_eve_rec.attribute9;
1346 p8_a17 := ddx_eve_rec.attribute10;
1347 p8_a18 := ddx_eve_rec.attribute11;
1348 p8_a19 := ddx_eve_rec.attribute12;
1349 p8_a20 := ddx_eve_rec.attribute13;
1350 p8_a21 := ddx_eve_rec.attribute14;
1351 p8_a22 := ddx_eve_rec.attribute15;
1352 p8_a23 := ddx_eve_rec.created_by;
1353 p8_a24 := ddx_eve_rec.creation_date;
1354 p8_a25 := ddx_eve_rec.last_updated_by;
1355 p8_a26 := ddx_eve_rec.last_update_date;
1356 p8_a27 := ddx_eve_rec.last_update_login;
1357
1358 okl_eto_pvt_w.rosetta_table_copy_out_p1(ddx_eto_tbl, p9_a0
1359 , p9_a1
1360 , p9_a2
1361 , p9_a3
1362 , p9_a4
1363 , p9_a5
1364 , p9_a6
1365 , p9_a7
1366 , p9_a8
1367 , p9_a9
1368 , p9_a10
1369 , p9_a11
1370 , p9_a12
1371 , p9_a13
1372 , p9_a14
1373 , p9_a15
1374 , p9_a16
1375 , p9_a17
1376 , p9_a18
1377 , p9_a19
1378 , p9_a20
1379 , p9_a21
1380 , p9_a22
1381 , p9_a23
1382 , p9_a24
1383 , p9_a25
1384 , p9_a26
1385 , p9_a27
1386 , p9_a28
1387 );
1388
1389 okl_etv_pvt_w.rosetta_table_copy_out_p1(ddx_etv_tbl, p10_a0
1390 , p10_a1
1391 , p10_a2
1392 , p10_a3
1393 , p10_a4
1394 , p10_a5
1395 , p10_a6
1396 , p10_a7
1397 , p10_a8
1398 , p10_a9
1399 , p10_a10
1400 , p10_a11
1401 , p10_a12
1402 , p10_a13
1403 , p10_a14
1404 , p10_a15
1405 , p10_a16
1406 , p10_a17
1407 , p10_a18
1408 , p10_a19
1409 , p10_a20
1410 , p10_a21
1411 , p10_a22
1412 , p10_a23
1413 , p10_a24
1414 , p10_a25
1415 );
1416 end;
1417
1418 procedure create_version(p_api_version NUMBER
1419 , p_init_msg_list VARCHAR2
1420 , x_return_status out nocopy VARCHAR2
1421 , x_msg_count out nocopy NUMBER
1422 , x_msg_data out nocopy VARCHAR2
1423 , p5_a0 NUMBER
1424 , p5_a1 NUMBER
1425 , p5_a2 VARCHAR2
1426 , p5_a3 DATE
1427 , p5_a4 DATE
1428 , p5_a5 VARCHAR2
1429 , p5_a6 NUMBER
1430 , p5_a7 VARCHAR2
1431 , p5_a8 VARCHAR2
1432 , p5_a9 VARCHAR2
1433 , p5_a10 VARCHAR2
1434 , p5_a11 VARCHAR2
1435 , p5_a12 VARCHAR2
1436 , p5_a13 VARCHAR2
1437 , p5_a14 VARCHAR2
1438 , p5_a15 VARCHAR2
1439 , p5_a16 VARCHAR2
1440 , p5_a17 VARCHAR2
1441 , p5_a18 VARCHAR2
1442 , p5_a19 VARCHAR2
1443 , p5_a20 VARCHAR2
1444 , p5_a21 VARCHAR2
1445 , p5_a22 VARCHAR2
1446 , p5_a23 NUMBER
1447 , p5_a24 DATE
1448 , p5_a25 NUMBER
1449 , p5_a26 DATE
1450 , p5_a27 NUMBER
1451 , p6_a0 JTF_NUMBER_TABLE
1452 , p6_a1 JTF_NUMBER_TABLE
1453 , p6_a2 JTF_NUMBER_TABLE
1454 , p6_a3 JTF_NUMBER_TABLE
1455 , p6_a4 JTF_NUMBER_TABLE
1456 , p6_a5 JTF_NUMBER_TABLE
1457 , p6_a6 JTF_NUMBER_TABLE
1458 , p6_a7 JTF_NUMBER_TABLE
1459 , p6_a8 JTF_VARCHAR2_TABLE_100
1460 , p6_a9 JTF_VARCHAR2_TABLE_500
1461 , p6_a10 JTF_VARCHAR2_TABLE_500
1462 , p6_a11 JTF_VARCHAR2_TABLE_500
1463 , p6_a12 JTF_VARCHAR2_TABLE_500
1464 , p6_a13 JTF_VARCHAR2_TABLE_500
1465 , p6_a14 JTF_VARCHAR2_TABLE_500
1466 , p6_a15 JTF_VARCHAR2_TABLE_500
1467 , p6_a16 JTF_VARCHAR2_TABLE_500
1468 , p6_a17 JTF_VARCHAR2_TABLE_500
1469 , p6_a18 JTF_VARCHAR2_TABLE_500
1470 , p6_a19 JTF_VARCHAR2_TABLE_500
1471 , p6_a20 JTF_VARCHAR2_TABLE_500
1472 , p6_a21 JTF_VARCHAR2_TABLE_500
1473 , p6_a22 JTF_VARCHAR2_TABLE_500
1474 , p6_a23 JTF_VARCHAR2_TABLE_500
1475 , p6_a24 JTF_NUMBER_TABLE
1476 , p6_a25 JTF_DATE_TABLE
1477 , p6_a26 JTF_NUMBER_TABLE
1478 , p6_a27 JTF_DATE_TABLE
1479 , p6_a28 JTF_NUMBER_TABLE
1480 , p7_a0 JTF_NUMBER_TABLE
1481 , p7_a1 JTF_NUMBER_TABLE
1482 , p7_a2 JTF_NUMBER_TABLE
1483 , p7_a3 JTF_NUMBER_TABLE
1484 , p7_a4 JTF_NUMBER_TABLE
1485 , p7_a5 JTF_VARCHAR2_TABLE_100
1486 , p7_a6 JTF_VARCHAR2_TABLE_500
1487 , p7_a7 JTF_VARCHAR2_TABLE_500
1488 , p7_a8 JTF_VARCHAR2_TABLE_500
1489 , p7_a9 JTF_VARCHAR2_TABLE_500
1490 , p7_a10 JTF_VARCHAR2_TABLE_500
1491 , p7_a11 JTF_VARCHAR2_TABLE_500
1492 , p7_a12 JTF_VARCHAR2_TABLE_500
1493 , p7_a13 JTF_VARCHAR2_TABLE_500
1494 , p7_a14 JTF_VARCHAR2_TABLE_500
1495 , p7_a15 JTF_VARCHAR2_TABLE_500
1496 , p7_a16 JTF_VARCHAR2_TABLE_500
1497 , p7_a17 JTF_VARCHAR2_TABLE_500
1498 , p7_a18 JTF_VARCHAR2_TABLE_500
1499 , p7_a19 JTF_VARCHAR2_TABLE_500
1500 , p7_a20 JTF_VARCHAR2_TABLE_500
1501 , p7_a21 JTF_NUMBER_TABLE
1502 , p7_a22 JTF_DATE_TABLE
1503 , p7_a23 JTF_NUMBER_TABLE
1504 , p7_a24 JTF_DATE_TABLE
1505 , p7_a25 JTF_NUMBER_TABLE
1506 , p8_a0 out nocopy NUMBER
1507 , p8_a1 out nocopy NUMBER
1508 , p8_a2 out nocopy VARCHAR2
1509 , p8_a3 out nocopy DATE
1510 , p8_a4 out nocopy DATE
1511 , p8_a5 out nocopy VARCHAR2
1512 , p8_a6 out nocopy NUMBER
1513 , p8_a7 out nocopy VARCHAR2
1514 , p8_a8 out nocopy VARCHAR2
1515 , p8_a9 out nocopy VARCHAR2
1516 , p8_a10 out nocopy VARCHAR2
1517 , p8_a11 out nocopy VARCHAR2
1518 , p8_a12 out nocopy VARCHAR2
1519 , p8_a13 out nocopy VARCHAR2
1520 , p8_a14 out nocopy VARCHAR2
1521 , p8_a15 out nocopy VARCHAR2
1522 , p8_a16 out nocopy VARCHAR2
1523 , p8_a17 out nocopy VARCHAR2
1524 , p8_a18 out nocopy VARCHAR2
1525 , p8_a19 out nocopy VARCHAR2
1526 , p8_a20 out nocopy VARCHAR2
1527 , p8_a21 out nocopy VARCHAR2
1528 , p8_a22 out nocopy VARCHAR2
1529 , p8_a23 out nocopy NUMBER
1530 , p8_a24 out nocopy DATE
1531 , p8_a25 out nocopy NUMBER
1532 , p8_a26 out nocopy DATE
1533 , p8_a27 out nocopy NUMBER
1534 , p9_a0 out nocopy JTF_NUMBER_TABLE
1535 , p9_a1 out nocopy JTF_NUMBER_TABLE
1536 , p9_a2 out nocopy JTF_NUMBER_TABLE
1537 , p9_a3 out nocopy JTF_NUMBER_TABLE
1538 , p9_a4 out nocopy JTF_NUMBER_TABLE
1539 , p9_a5 out nocopy JTF_NUMBER_TABLE
1540 , p9_a6 out nocopy JTF_NUMBER_TABLE
1541 , p9_a7 out nocopy JTF_NUMBER_TABLE
1542 , p9_a8 out nocopy JTF_VARCHAR2_TABLE_100
1543 , p9_a9 out nocopy JTF_VARCHAR2_TABLE_500
1544 , p9_a10 out nocopy JTF_VARCHAR2_TABLE_500
1545 , p9_a11 out nocopy JTF_VARCHAR2_TABLE_500
1546 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_500
1547 , p9_a13 out nocopy JTF_VARCHAR2_TABLE_500
1548 , p9_a14 out nocopy JTF_VARCHAR2_TABLE_500
1549 , p9_a15 out nocopy JTF_VARCHAR2_TABLE_500
1550 , p9_a16 out nocopy JTF_VARCHAR2_TABLE_500
1551 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_500
1552 , p9_a18 out nocopy JTF_VARCHAR2_TABLE_500
1553 , p9_a19 out nocopy JTF_VARCHAR2_TABLE_500
1554 , p9_a20 out nocopy JTF_VARCHAR2_TABLE_500
1555 , p9_a21 out nocopy JTF_VARCHAR2_TABLE_500
1556 , p9_a22 out nocopy JTF_VARCHAR2_TABLE_500
1557 , p9_a23 out nocopy JTF_VARCHAR2_TABLE_500
1558 , p9_a24 out nocopy JTF_NUMBER_TABLE
1559 , p9_a25 out nocopy JTF_DATE_TABLE
1560 , p9_a26 out nocopy JTF_NUMBER_TABLE
1561 , p9_a27 out nocopy JTF_DATE_TABLE
1562 , p9_a28 out nocopy JTF_NUMBER_TABLE
1563 , p10_a0 out nocopy JTF_NUMBER_TABLE
1564 , p10_a1 out nocopy JTF_NUMBER_TABLE
1565 , p10_a2 out nocopy JTF_NUMBER_TABLE
1566 , p10_a3 out nocopy JTF_NUMBER_TABLE
1567 , p10_a4 out nocopy JTF_NUMBER_TABLE
1568 , p10_a5 out nocopy JTF_VARCHAR2_TABLE_100
1569 , p10_a6 out nocopy JTF_VARCHAR2_TABLE_500
1570 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_500
1571 , p10_a8 out nocopy JTF_VARCHAR2_TABLE_500
1572 , p10_a9 out nocopy JTF_VARCHAR2_TABLE_500
1573 , p10_a10 out nocopy JTF_VARCHAR2_TABLE_500
1574 , p10_a11 out nocopy JTF_VARCHAR2_TABLE_500
1575 , p10_a12 out nocopy JTF_VARCHAR2_TABLE_500
1576 , p10_a13 out nocopy JTF_VARCHAR2_TABLE_500
1577 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_500
1578 , p10_a15 out nocopy JTF_VARCHAR2_TABLE_500
1579 , p10_a16 out nocopy JTF_VARCHAR2_TABLE_500
1580 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_500
1581 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_500
1582 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_500
1583 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_500
1584 , p10_a21 out nocopy JTF_NUMBER_TABLE
1585 , p10_a22 out nocopy JTF_DATE_TABLE
1586 , p10_a23 out nocopy JTF_NUMBER_TABLE
1587 , p10_a24 out nocopy JTF_DATE_TABLE
1588 , p10_a25 out nocopy JTF_NUMBER_TABLE
1589 )
1590
1591 as
1592 ddp_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
1593 ddp_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
1594 ddp_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
1595 ddx_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
1596 ddx_eto_tbl okl_fe_eo_term_options_pub.okl_eto_tbl;
1597 ddx_etv_tbl okl_fe_eo_term_options_pub.okl_etv_tbl;
1598 ddindx binary_integer; indx binary_integer;
1599 begin
1600
1601 -- copy data to the local IN or IN-OUT args, if any
1602
1603
1604
1605
1606
1607 ddp_eve_rec.end_of_term_ver_id := p5_a0;
1608 ddp_eve_rec.object_version_number := p5_a1;
1609 ddp_eve_rec.version_number := p5_a2;
1610 ddp_eve_rec.effective_from_date := p5_a3;
1611 ddp_eve_rec.effective_to_date := p5_a4;
1612 ddp_eve_rec.sts_code := p5_a5;
1613 ddp_eve_rec.end_of_term_id := p5_a6;
1614 ddp_eve_rec.attribute_category := p5_a7;
1615 ddp_eve_rec.attribute1 := p5_a8;
1616 ddp_eve_rec.attribute2 := p5_a9;
1617 ddp_eve_rec.attribute3 := p5_a10;
1618 ddp_eve_rec.attribute4 := p5_a11;
1619 ddp_eve_rec.attribute5 := p5_a12;
1620 ddp_eve_rec.attribute6 := p5_a13;
1621 ddp_eve_rec.attribute7 := p5_a14;
1622 ddp_eve_rec.attribute8 := p5_a15;
1623 ddp_eve_rec.attribute9 := p5_a16;
1624 ddp_eve_rec.attribute10 := p5_a17;
1625 ddp_eve_rec.attribute11 := p5_a18;
1626 ddp_eve_rec.attribute12 := p5_a19;
1627 ddp_eve_rec.attribute13 := p5_a20;
1628 ddp_eve_rec.attribute14 := p5_a21;
1629 ddp_eve_rec.attribute15 := p5_a22;
1630 ddp_eve_rec.created_by := p5_a23;
1631 ddp_eve_rec.creation_date := p5_a24;
1632 ddp_eve_rec.last_updated_by := p5_a25;
1633 ddp_eve_rec.last_update_date := p5_a26;
1634 ddp_eve_rec.last_update_login := p5_a27;
1635
1636 okl_eto_pvt_w.rosetta_table_copy_in_p1(ddp_eto_tbl, p6_a0
1637 , p6_a1
1638 , p6_a2
1639 , p6_a3
1640 , p6_a4
1641 , p6_a5
1642 , p6_a6
1643 , p6_a7
1644 , p6_a8
1645 , p6_a9
1646 , p6_a10
1647 , p6_a11
1648 , p6_a12
1649 , p6_a13
1650 , p6_a14
1651 , p6_a15
1652 , p6_a16
1653 , p6_a17
1654 , p6_a18
1655 , p6_a19
1656 , p6_a20
1657 , p6_a21
1658 , p6_a22
1659 , p6_a23
1660 , p6_a24
1661 , p6_a25
1662 , p6_a26
1663 , p6_a27
1664 , p6_a28
1665 );
1666
1667 okl_etv_pvt_w.rosetta_table_copy_in_p1(ddp_etv_tbl, p7_a0
1668 , p7_a1
1669 , p7_a2
1670 , p7_a3
1671 , p7_a4
1672 , p7_a5
1673 , p7_a6
1674 , p7_a7
1675 , p7_a8
1676 , p7_a9
1677 , p7_a10
1678 , p7_a11
1679 , p7_a12
1680 , p7_a13
1681 , p7_a14
1682 , p7_a15
1683 , p7_a16
1684 , p7_a17
1685 , p7_a18
1686 , p7_a19
1687 , p7_a20
1688 , p7_a21
1689 , p7_a22
1690 , p7_a23
1691 , p7_a24
1692 , p7_a25
1693 );
1694
1695
1696
1697
1698 -- here's the delegated call to the old PL/SQL routine
1699 okl_fe_eo_term_options_pub.create_version(p_api_version,
1700 p_init_msg_list,
1701 x_return_status,
1702 x_msg_count,
1703 x_msg_data,
1704 ddp_eve_rec,
1705 ddp_eto_tbl,
1706 ddp_etv_tbl,
1707 ddx_eve_rec,
1708 ddx_eto_tbl,
1709 ddx_etv_tbl);
1710
1711 -- copy data back from the local variables to OUT or IN-OUT args, if any
1712
1713
1714
1715
1716
1717
1718
1719
1720 p8_a0 := ddx_eve_rec.end_of_term_ver_id;
1721 p8_a1 := ddx_eve_rec.object_version_number;
1722 p8_a2 := ddx_eve_rec.version_number;
1723 p8_a3 := ddx_eve_rec.effective_from_date;
1724 p8_a4 := ddx_eve_rec.effective_to_date;
1725 p8_a5 := ddx_eve_rec.sts_code;
1726 p8_a6 := ddx_eve_rec.end_of_term_id;
1727 p8_a7 := ddx_eve_rec.attribute_category;
1728 p8_a8 := ddx_eve_rec.attribute1;
1729 p8_a9 := ddx_eve_rec.attribute2;
1730 p8_a10 := ddx_eve_rec.attribute3;
1731 p8_a11 := ddx_eve_rec.attribute4;
1732 p8_a12 := ddx_eve_rec.attribute5;
1733 p8_a13 := ddx_eve_rec.attribute6;
1734 p8_a14 := ddx_eve_rec.attribute7;
1735 p8_a15 := ddx_eve_rec.attribute8;
1736 p8_a16 := ddx_eve_rec.attribute9;
1737 p8_a17 := ddx_eve_rec.attribute10;
1738 p8_a18 := ddx_eve_rec.attribute11;
1739 p8_a19 := ddx_eve_rec.attribute12;
1740 p8_a20 := ddx_eve_rec.attribute13;
1741 p8_a21 := ddx_eve_rec.attribute14;
1742 p8_a22 := ddx_eve_rec.attribute15;
1743 p8_a23 := ddx_eve_rec.created_by;
1744 p8_a24 := ddx_eve_rec.creation_date;
1745 p8_a25 := ddx_eve_rec.last_updated_by;
1746 p8_a26 := ddx_eve_rec.last_update_date;
1747 p8_a27 := ddx_eve_rec.last_update_login;
1748
1749 okl_eto_pvt_w.rosetta_table_copy_out_p1(ddx_eto_tbl, p9_a0
1750 , p9_a1
1751 , p9_a2
1752 , p9_a3
1753 , p9_a4
1754 , p9_a5
1755 , p9_a6
1756 , p9_a7
1757 , p9_a8
1758 , p9_a9
1759 , p9_a10
1760 , p9_a11
1761 , p9_a12
1762 , p9_a13
1763 , p9_a14
1764 , p9_a15
1765 , p9_a16
1766 , p9_a17
1767 , p9_a18
1768 , p9_a19
1769 , p9_a20
1770 , p9_a21
1771 , p9_a22
1772 , p9_a23
1773 , p9_a24
1774 , p9_a25
1775 , p9_a26
1776 , p9_a27
1777 , p9_a28
1778 );
1779
1780 okl_etv_pvt_w.rosetta_table_copy_out_p1(ddx_etv_tbl, p10_a0
1781 , p10_a1
1782 , p10_a2
1783 , p10_a3
1784 , p10_a4
1785 , p10_a5
1786 , p10_a6
1787 , p10_a7
1788 , p10_a8
1789 , p10_a9
1790 , p10_a10
1791 , p10_a11
1792 , p10_a12
1793 , p10_a13
1794 , p10_a14
1795 , p10_a15
1796 , p10_a16
1797 , p10_a17
1798 , p10_a18
1799 , p10_a19
1800 , p10_a20
1801 , p10_a21
1802 , p10_a22
1803 , p10_a23
1804 , p10_a24
1805 , p10_a25
1806 );
1807 end;
1808
1809 procedure invalid_objects(p_api_version NUMBER
1810 , p_init_msg_list VARCHAR2
1811 , x_return_status out nocopy VARCHAR2
1812 , x_msg_count out nocopy NUMBER
1813 , x_msg_data out nocopy VARCHAR2
1814 , p_version_id NUMBER
1815 , p6_a0 out nocopy JTF_NUMBER_TABLE
1816 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_300
1817 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1818 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1819 )
1820
1821 as
1822 ddx_obj_tbl okl_fe_eo_term_options_pub.invalid_object_tbl;
1823 ddindx binary_integer; indx binary_integer;
1824 begin
1825
1826 -- copy data to the local IN or IN-OUT args, if any
1827
1828
1829
1830
1831
1832
1833
1834 -- here's the delegated call to the old PL/SQL routine
1835 okl_fe_eo_term_options_pub.invalid_objects(p_api_version,
1836 p_init_msg_list,
1837 x_return_status,
1838 x_msg_count,
1839 x_msg_data,
1840 p_version_id,
1841 ddx_obj_tbl);
1842
1843 -- copy data back from the local variables to OUT or IN-OUT args, if any
1844
1845
1846
1847
1848
1849
1850 okl_fe_eo_term_options_pvt_w.rosetta_table_copy_out_p9(ddx_obj_tbl, p6_a0
1851 , p6_a1
1852 , p6_a2
1853 , p6_a3
1854 );
1855 end;
1856
1857 procedure calc_start_date(p_api_version NUMBER
1858 , p_init_msg_list VARCHAR2
1859 , x_return_status out nocopy VARCHAR2
1860 , x_msg_count out nocopy NUMBER
1861 , x_msg_data out nocopy VARCHAR2
1862 , p5_a0 NUMBER
1863 , p5_a1 NUMBER
1864 , p5_a2 VARCHAR2
1865 , p5_a3 DATE
1866 , p5_a4 DATE
1867 , p5_a5 VARCHAR2
1868 , p5_a6 NUMBER
1869 , p5_a7 VARCHAR2
1870 , p5_a8 VARCHAR2
1871 , p5_a9 VARCHAR2
1872 , p5_a10 VARCHAR2
1873 , p5_a11 VARCHAR2
1874 , p5_a12 VARCHAR2
1875 , p5_a13 VARCHAR2
1876 , p5_a14 VARCHAR2
1877 , p5_a15 VARCHAR2
1878 , p5_a16 VARCHAR2
1879 , p5_a17 VARCHAR2
1880 , p5_a18 VARCHAR2
1881 , p5_a19 VARCHAR2
1882 , p5_a20 VARCHAR2
1883 , p5_a21 VARCHAR2
1884 , p5_a22 VARCHAR2
1885 , p5_a23 NUMBER
1886 , p5_a24 DATE
1887 , p5_a25 NUMBER
1888 , p5_a26 DATE
1889 , p5_a27 NUMBER
1890 , x_cal_eff_from out nocopy DATE
1891 )
1892
1893 as
1894 ddp_eve_rec okl_fe_eo_term_options_pub.okl_eve_rec;
1895 ddindx binary_integer; indx binary_integer;
1896 begin
1897
1898 -- copy data to the local IN or IN-OUT args, if any
1899
1900
1901
1902
1903
1904 ddp_eve_rec.end_of_term_ver_id := p5_a0;
1905 ddp_eve_rec.object_version_number := p5_a1;
1906 ddp_eve_rec.version_number := p5_a2;
1907 ddp_eve_rec.effective_from_date := p5_a3;
1908 ddp_eve_rec.effective_to_date := p5_a4;
1909 ddp_eve_rec.sts_code := p5_a5;
1910 ddp_eve_rec.end_of_term_id := p5_a6;
1911 ddp_eve_rec.attribute_category := p5_a7;
1912 ddp_eve_rec.attribute1 := p5_a8;
1913 ddp_eve_rec.attribute2 := p5_a9;
1914 ddp_eve_rec.attribute3 := p5_a10;
1915 ddp_eve_rec.attribute4 := p5_a11;
1916 ddp_eve_rec.attribute5 := p5_a12;
1917 ddp_eve_rec.attribute6 := p5_a13;
1918 ddp_eve_rec.attribute7 := p5_a14;
1919 ddp_eve_rec.attribute8 := p5_a15;
1920 ddp_eve_rec.attribute9 := p5_a16;
1921 ddp_eve_rec.attribute10 := p5_a17;
1922 ddp_eve_rec.attribute11 := p5_a18;
1923 ddp_eve_rec.attribute12 := p5_a19;
1924 ddp_eve_rec.attribute13 := p5_a20;
1925 ddp_eve_rec.attribute14 := p5_a21;
1926 ddp_eve_rec.attribute15 := p5_a22;
1927 ddp_eve_rec.created_by := p5_a23;
1928 ddp_eve_rec.creation_date := p5_a24;
1929 ddp_eve_rec.last_updated_by := p5_a25;
1930 ddp_eve_rec.last_update_date := p5_a26;
1931 ddp_eve_rec.last_update_login := p5_a27;
1932
1933
1934 -- here's the delegated call to the old PL/SQL routine
1935 okl_fe_eo_term_options_pub.calc_start_date(p_api_version,
1936 p_init_msg_list,
1937 x_return_status,
1938 x_msg_count,
1939 x_msg_data,
1940 ddp_eve_rec,
1941 x_cal_eff_from);
1942
1943 -- copy data back from the local variables to OUT or IN-OUT args, if any
1944
1945
1946
1947
1948
1949
1950 end;
1951
1952 end okl_fe_eo_term_options_pub_w;