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