[Home] [Help]
PACKAGE BODY: APPS.OKL_PDT_OPT_VALS_PUB_W
Source
1 package body okl_pdt_opt_vals_pub_w as
2 /* $Header: OKLUPOVB.pls 115.7 2002/12/24 04:15:20 sgorantl noship $ */
3 rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4 rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5
6 -- this is to workaround the JDBC bug regarding IN DATE of value GMiss
7 function rosetta_g_miss_date_in_map(d date) return date as
8 begin
9 if d = rosetta_g_mistake_date then return fnd_api.g_miss_date; end if;
10 return d;
11 end;
12
13 function rosetta_g_miss_num_map(n number) return number as
14 a number := fnd_api.g_miss_num;
15 b number := 0-1962.0724;
16 begin
17 if n=a then return b; end if;
18 if n=b then return a; end if;
19 return n;
20 end;
21
22 procedure insert_pdt_opt_vals(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , x_return_status out nocopy VARCHAR2
25 , x_msg_count out nocopy NUMBER
26 , x_msg_data out nocopy VARCHAR2
27 , p6_a0 out nocopy NUMBER
28 , p6_a1 out nocopy NUMBER
29 , p6_a2 out nocopy NUMBER
30 , p6_a3 out nocopy NUMBER
31 , p6_a4 out nocopy DATE
32 , p6_a5 out nocopy NUMBER
33 , p6_a6 out nocopy DATE
34 , p6_a7 out nocopy DATE
35 , p6_a8 out nocopy NUMBER
36 , p6_a9 out nocopy DATE
37 , p6_a10 out nocopy NUMBER
38 , p5_a0 NUMBER := 0-1962.0724
39 , p5_a1 NUMBER := 0-1962.0724
40 , p5_a2 NUMBER := 0-1962.0724
41 , p5_a3 NUMBER := 0-1962.0724
42 , p5_a4 DATE := fnd_api.g_miss_date
43 , p5_a5 NUMBER := 0-1962.0724
44 , p5_a6 DATE := fnd_api.g_miss_date
45 , p5_a7 DATE := fnd_api.g_miss_date
46 , p5_a8 NUMBER := 0-1962.0724
47 , p5_a9 DATE := fnd_api.g_miss_date
48 , p5_a10 NUMBER := 0-1962.0724
49 )
50
51 as
52 ddp_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
53 ddx_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
54 ddindx binary_integer; indx binary_integer;
55 begin
56
57 -- copy data to the local IN or IN-OUT args, if any
58
59
60
61
62
63 ddp_povv_rec.id := rosetta_g_miss_num_map(p5_a0);
64 ddp_povv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
65 ddp_povv_rec.ove_id := rosetta_g_miss_num_map(p5_a2);
66 ddp_povv_rec.pon_id := rosetta_g_miss_num_map(p5_a3);
67 ddp_povv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
68 ddp_povv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
69 ddp_povv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
70 ddp_povv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
71 ddp_povv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
72 ddp_povv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
73 ddp_povv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
74
75
76 -- here's the delegated call to the old PL/SQL routine
77 okl_pdt_opt_vals_pub.insert_pdt_opt_vals(p_api_version,
78 p_init_msg_list,
79 x_return_status,
80 x_msg_count,
81 x_msg_data,
82 ddp_povv_rec,
83 ddx_povv_rec);
84
85 -- copy data back from the local variables to OUT or IN-OUT args, if any
86
87
88
89
90
91
92 p6_a0 := rosetta_g_miss_num_map(ddx_povv_rec.id);
93 p6_a1 := rosetta_g_miss_num_map(ddx_povv_rec.object_version_number);
94 p6_a2 := rosetta_g_miss_num_map(ddx_povv_rec.ove_id);
95 p6_a3 := rosetta_g_miss_num_map(ddx_povv_rec.pon_id);
96 p6_a4 := ddx_povv_rec.from_date;
97 p6_a5 := rosetta_g_miss_num_map(ddx_povv_rec.created_by);
98 p6_a6 := ddx_povv_rec.to_date;
99 p6_a7 := ddx_povv_rec.creation_date;
100 p6_a8 := rosetta_g_miss_num_map(ddx_povv_rec.last_updated_by);
101 p6_a9 := ddx_povv_rec.last_update_date;
102 p6_a10 := rosetta_g_miss_num_map(ddx_povv_rec.last_update_login);
103 end;
104
105 procedure insert_pdt_opt_vals(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 , p5_a0 JTF_NUMBER_TABLE
111 , p5_a1 JTF_NUMBER_TABLE
112 , p5_a2 JTF_NUMBER_TABLE
113 , p5_a3 JTF_NUMBER_TABLE
114 , p5_a4 JTF_DATE_TABLE
115 , p5_a5 JTF_NUMBER_TABLE
116 , p5_a6 JTF_DATE_TABLE
117 , p5_a7 JTF_DATE_TABLE
118 , p5_a8 JTF_NUMBER_TABLE
119 , p5_a9 JTF_DATE_TABLE
120 , p5_a10 JTF_NUMBER_TABLE
121 , p6_a0 out nocopy JTF_NUMBER_TABLE
122 , p6_a1 out nocopy JTF_NUMBER_TABLE
123 , p6_a2 out nocopy JTF_NUMBER_TABLE
124 , p6_a3 out nocopy JTF_NUMBER_TABLE
125 , p6_a4 out nocopy JTF_DATE_TABLE
126 , p6_a5 out nocopy JTF_NUMBER_TABLE
127 , p6_a6 out nocopy JTF_DATE_TABLE
128 , p6_a7 out nocopy JTF_DATE_TABLE
129 , p6_a8 out nocopy JTF_NUMBER_TABLE
130 , p6_a9 out nocopy JTF_DATE_TABLE
131 , p6_a10 out nocopy JTF_NUMBER_TABLE
132 )
133
134 as
135 ddp_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
136 ddx_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
137 ddindx binary_integer; indx binary_integer;
138 begin
139
140 -- copy data to the local IN or IN-OUT args, if any
141
142
143
144
145
146 okl_pov_pvt_w.rosetta_table_copy_in_p5(ddp_povv_tbl, p5_a0
147 , p5_a1
148 , p5_a2
149 , p5_a3
150 , p5_a4
151 , p5_a5
152 , p5_a6
153 , p5_a7
154 , p5_a8
155 , p5_a9
156 , p5_a10
157 );
158
159
160 -- here's the delegated call to the old PL/SQL routine
161 okl_pdt_opt_vals_pub.insert_pdt_opt_vals(p_api_version,
162 p_init_msg_list,
163 x_return_status,
164 x_msg_count,
165 x_msg_data,
166 ddp_povv_tbl,
167 ddx_povv_tbl);
168
169 -- copy data back from the local variables to OUT or IN-OUT args, if any
170
171
172
173
174
175
176 okl_pov_pvt_w.rosetta_table_copy_out_p5(ddx_povv_tbl, p6_a0
177 , p6_a1
178 , p6_a2
179 , p6_a3
180 , p6_a4
181 , p6_a5
182 , p6_a6
183 , p6_a7
184 , p6_a8
185 , p6_a9
186 , p6_a10
187 );
188 end;
189
190 procedure lock_pdt_opt_vals(p_api_version NUMBER
191 , p_init_msg_list VARCHAR2
192 , x_return_status out nocopy VARCHAR2
193 , x_msg_count out nocopy NUMBER
194 , x_msg_data out nocopy VARCHAR2
195 , p5_a0 NUMBER := 0-1962.0724
196 , p5_a1 NUMBER := 0-1962.0724
197 , p5_a2 NUMBER := 0-1962.0724
198 , p5_a3 NUMBER := 0-1962.0724
199 , p5_a4 DATE := fnd_api.g_miss_date
200 , p5_a5 NUMBER := 0-1962.0724
201 , p5_a6 DATE := fnd_api.g_miss_date
202 , p5_a7 DATE := fnd_api.g_miss_date
203 , p5_a8 NUMBER := 0-1962.0724
204 , p5_a9 DATE := fnd_api.g_miss_date
205 , p5_a10 NUMBER := 0-1962.0724
206 )
207
208 as
209 ddp_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
210 ddindx binary_integer; indx binary_integer;
211 begin
212
213 -- copy data to the local IN or IN-OUT args, if any
214
215
216
217
218
219 ddp_povv_rec.id := rosetta_g_miss_num_map(p5_a0);
220 ddp_povv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
221 ddp_povv_rec.ove_id := rosetta_g_miss_num_map(p5_a2);
222 ddp_povv_rec.pon_id := rosetta_g_miss_num_map(p5_a3);
223 ddp_povv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
224 ddp_povv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
225 ddp_povv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
226 ddp_povv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
227 ddp_povv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
228 ddp_povv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
229 ddp_povv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
230
231 -- here's the delegated call to the old PL/SQL routine
232 okl_pdt_opt_vals_pub.lock_pdt_opt_vals(p_api_version,
233 p_init_msg_list,
234 x_return_status,
235 x_msg_count,
236 x_msg_data,
237 ddp_povv_rec);
238
239 -- copy data back from the local variables to OUT or IN-OUT args, if any
240
241
242
243
244
245 end;
246
247 procedure lock_pdt_opt_vals(p_api_version NUMBER
248 , p_init_msg_list VARCHAR2
249 , x_return_status out nocopy VARCHAR2
250 , x_msg_count out nocopy NUMBER
251 , x_msg_data out nocopy VARCHAR2
252 , p5_a0 JTF_NUMBER_TABLE
253 , p5_a1 JTF_NUMBER_TABLE
254 , p5_a2 JTF_NUMBER_TABLE
255 , p5_a3 JTF_NUMBER_TABLE
256 , p5_a4 JTF_DATE_TABLE
257 , p5_a5 JTF_NUMBER_TABLE
258 , p5_a6 JTF_DATE_TABLE
259 , p5_a7 JTF_DATE_TABLE
260 , p5_a8 JTF_NUMBER_TABLE
261 , p5_a9 JTF_DATE_TABLE
262 , p5_a10 JTF_NUMBER_TABLE
263 )
264
265 as
266 ddp_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
267 ddindx binary_integer; indx binary_integer;
268 begin
269
270 -- copy data to the local IN or IN-OUT args, if any
271
272
273
274
275
276 okl_pov_pvt_w.rosetta_table_copy_in_p5(ddp_povv_tbl, p5_a0
277 , p5_a1
278 , p5_a2
279 , p5_a3
280 , p5_a4
281 , p5_a5
282 , p5_a6
283 , p5_a7
284 , p5_a8
285 , p5_a9
286 , p5_a10
287 );
288
289 -- here's the delegated call to the old PL/SQL routine
290 okl_pdt_opt_vals_pub.lock_pdt_opt_vals(p_api_version,
291 p_init_msg_list,
292 x_return_status,
293 x_msg_count,
294 x_msg_data,
295 ddp_povv_tbl);
296
297 -- copy data back from the local variables to OUT or IN-OUT args, if any
298
299
300
301
302
303 end;
304
305 procedure update_pdt_opt_vals(p_api_version NUMBER
306 , p_init_msg_list VARCHAR2
307 , x_return_status out nocopy VARCHAR2
308 , x_msg_count out nocopy NUMBER
309 , x_msg_data out nocopy VARCHAR2
310 , p6_a0 out nocopy NUMBER
311 , p6_a1 out nocopy NUMBER
312 , p6_a2 out nocopy NUMBER
313 , p6_a3 out nocopy NUMBER
314 , p6_a4 out nocopy DATE
315 , p6_a5 out nocopy NUMBER
316 , p6_a6 out nocopy DATE
317 , p6_a7 out nocopy DATE
318 , p6_a8 out nocopy NUMBER
319 , p6_a9 out nocopy DATE
320 , p6_a10 out nocopy NUMBER
321 , p5_a0 NUMBER := 0-1962.0724
322 , p5_a1 NUMBER := 0-1962.0724
323 , p5_a2 NUMBER := 0-1962.0724
324 , p5_a3 NUMBER := 0-1962.0724
325 , p5_a4 DATE := fnd_api.g_miss_date
326 , p5_a5 NUMBER := 0-1962.0724
327 , p5_a6 DATE := fnd_api.g_miss_date
328 , p5_a7 DATE := fnd_api.g_miss_date
329 , p5_a8 NUMBER := 0-1962.0724
330 , p5_a9 DATE := fnd_api.g_miss_date
331 , p5_a10 NUMBER := 0-1962.0724
332 )
333
334 as
335 ddp_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
336 ddx_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
337 ddindx binary_integer; indx binary_integer;
338 begin
339
340 -- copy data to the local IN or IN-OUT args, if any
341
342
343
344
345
346 ddp_povv_rec.id := rosetta_g_miss_num_map(p5_a0);
347 ddp_povv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
348 ddp_povv_rec.ove_id := rosetta_g_miss_num_map(p5_a2);
349 ddp_povv_rec.pon_id := rosetta_g_miss_num_map(p5_a3);
350 ddp_povv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
351 ddp_povv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
352 ddp_povv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
353 ddp_povv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
354 ddp_povv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
355 ddp_povv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
356 ddp_povv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
357
358
359 -- here's the delegated call to the old PL/SQL routine
360 okl_pdt_opt_vals_pub.update_pdt_opt_vals(p_api_version,
361 p_init_msg_list,
362 x_return_status,
363 x_msg_count,
364 x_msg_data,
365 ddp_povv_rec,
366 ddx_povv_rec);
367
368 -- copy data back from the local variables to OUT or IN-OUT args, if any
369
370
371
372
373
374
375 p6_a0 := rosetta_g_miss_num_map(ddx_povv_rec.id);
376 p6_a1 := rosetta_g_miss_num_map(ddx_povv_rec.object_version_number);
377 p6_a2 := rosetta_g_miss_num_map(ddx_povv_rec.ove_id);
378 p6_a3 := rosetta_g_miss_num_map(ddx_povv_rec.pon_id);
379 p6_a4 := ddx_povv_rec.from_date;
380 p6_a5 := rosetta_g_miss_num_map(ddx_povv_rec.created_by);
381 p6_a6 := ddx_povv_rec.to_date;
382 p6_a7 := ddx_povv_rec.creation_date;
383 p6_a8 := rosetta_g_miss_num_map(ddx_povv_rec.last_updated_by);
384 p6_a9 := ddx_povv_rec.last_update_date;
385 p6_a10 := rosetta_g_miss_num_map(ddx_povv_rec.last_update_login);
386 end;
387
388 procedure update_pdt_opt_vals(p_api_version NUMBER
389 , p_init_msg_list VARCHAR2
390 , x_return_status out nocopy VARCHAR2
391 , x_msg_count out nocopy NUMBER
392 , x_msg_data out nocopy VARCHAR2
393 , p5_a0 JTF_NUMBER_TABLE
394 , p5_a1 JTF_NUMBER_TABLE
395 , p5_a2 JTF_NUMBER_TABLE
396 , p5_a3 JTF_NUMBER_TABLE
397 , p5_a4 JTF_DATE_TABLE
398 , p5_a5 JTF_NUMBER_TABLE
399 , p5_a6 JTF_DATE_TABLE
400 , p5_a7 JTF_DATE_TABLE
401 , p5_a8 JTF_NUMBER_TABLE
402 , p5_a9 JTF_DATE_TABLE
403 , p5_a10 JTF_NUMBER_TABLE
404 , p6_a0 out nocopy JTF_NUMBER_TABLE
405 , p6_a1 out nocopy JTF_NUMBER_TABLE
406 , p6_a2 out nocopy JTF_NUMBER_TABLE
407 , p6_a3 out nocopy JTF_NUMBER_TABLE
408 , p6_a4 out nocopy JTF_DATE_TABLE
409 , p6_a5 out nocopy JTF_NUMBER_TABLE
410 , p6_a6 out nocopy JTF_DATE_TABLE
411 , p6_a7 out nocopy JTF_DATE_TABLE
412 , p6_a8 out nocopy JTF_NUMBER_TABLE
413 , p6_a9 out nocopy JTF_DATE_TABLE
414 , p6_a10 out nocopy JTF_NUMBER_TABLE
415 )
416
417 as
418 ddp_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
419 ddx_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
420 ddindx binary_integer; indx binary_integer;
421 begin
422
423 -- copy data to the local IN or IN-OUT args, if any
424
425
426
427
428
429 okl_pov_pvt_w.rosetta_table_copy_in_p5(ddp_povv_tbl, p5_a0
430 , p5_a1
431 , p5_a2
432 , p5_a3
433 , p5_a4
434 , p5_a5
435 , p5_a6
436 , p5_a7
437 , p5_a8
438 , p5_a9
439 , p5_a10
440 );
441
442
443 -- here's the delegated call to the old PL/SQL routine
444 okl_pdt_opt_vals_pub.update_pdt_opt_vals(p_api_version,
445 p_init_msg_list,
446 x_return_status,
447 x_msg_count,
448 x_msg_data,
449 ddp_povv_tbl,
450 ddx_povv_tbl);
451
452 -- copy data back from the local variables to OUT or IN-OUT args, if any
453
454
455
456
457
458
459 okl_pov_pvt_w.rosetta_table_copy_out_p5(ddx_povv_tbl, p6_a0
460 , p6_a1
461 , p6_a2
462 , p6_a3
463 , p6_a4
464 , p6_a5
465 , p6_a6
466 , p6_a7
467 , p6_a8
468 , p6_a9
469 , p6_a10
470 );
471 end;
472
473 procedure delete_pdt_opt_vals(p_api_version NUMBER
474 , p_init_msg_list VARCHAR2
475 , x_return_status out nocopy VARCHAR2
476 , x_msg_count out nocopy NUMBER
477 , x_msg_data out nocopy VARCHAR2
478 , p5_a0 NUMBER := 0-1962.0724
479 , p5_a1 NUMBER := 0-1962.0724
480 , p5_a2 NUMBER := 0-1962.0724
481 , p5_a3 NUMBER := 0-1962.0724
482 , p5_a4 DATE := fnd_api.g_miss_date
483 , p5_a5 NUMBER := 0-1962.0724
484 , p5_a6 DATE := fnd_api.g_miss_date
485 , p5_a7 DATE := fnd_api.g_miss_date
486 , p5_a8 NUMBER := 0-1962.0724
487 , p5_a9 DATE := fnd_api.g_miss_date
488 , p5_a10 NUMBER := 0-1962.0724
489 )
490
491 as
492 ddp_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
493 ddindx binary_integer; indx binary_integer;
494 begin
495
496 -- copy data to the local IN or IN-OUT args, if any
497
498
499
500
501
502 ddp_povv_rec.id := rosetta_g_miss_num_map(p5_a0);
503 ddp_povv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
504 ddp_povv_rec.ove_id := rosetta_g_miss_num_map(p5_a2);
505 ddp_povv_rec.pon_id := rosetta_g_miss_num_map(p5_a3);
506 ddp_povv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
507 ddp_povv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
508 ddp_povv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
509 ddp_povv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
510 ddp_povv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
511 ddp_povv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
512 ddp_povv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
513
514 -- here's the delegated call to the old PL/SQL routine
515 okl_pdt_opt_vals_pub.delete_pdt_opt_vals(p_api_version,
516 p_init_msg_list,
517 x_return_status,
518 x_msg_count,
519 x_msg_data,
520 ddp_povv_rec);
521
522 -- copy data back from the local variables to OUT or IN-OUT args, if any
523
524
525
526
527
528 end;
529
530 procedure delete_pdt_opt_vals(p_api_version NUMBER
531 , p_init_msg_list VARCHAR2
532 , x_return_status out nocopy VARCHAR2
533 , x_msg_count out nocopy NUMBER
534 , x_msg_data out nocopy VARCHAR2
535 , p5_a0 JTF_NUMBER_TABLE
536 , p5_a1 JTF_NUMBER_TABLE
537 , p5_a2 JTF_NUMBER_TABLE
538 , p5_a3 JTF_NUMBER_TABLE
539 , p5_a4 JTF_DATE_TABLE
540 , p5_a5 JTF_NUMBER_TABLE
541 , p5_a6 JTF_DATE_TABLE
542 , p5_a7 JTF_DATE_TABLE
543 , p5_a8 JTF_NUMBER_TABLE
544 , p5_a9 JTF_DATE_TABLE
545 , p5_a10 JTF_NUMBER_TABLE
546 )
547
548 as
549 ddp_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
550 ddindx binary_integer; indx binary_integer;
551 begin
552
553 -- copy data to the local IN or IN-OUT args, if any
554
555
556
557
558
559 okl_pov_pvt_w.rosetta_table_copy_in_p5(ddp_povv_tbl, p5_a0
560 , p5_a1
561 , p5_a2
562 , p5_a3
563 , p5_a4
564 , p5_a5
565 , p5_a6
566 , p5_a7
567 , p5_a8
568 , p5_a9
569 , p5_a10
570 );
571
572 -- here's the delegated call to the old PL/SQL routine
573 okl_pdt_opt_vals_pub.delete_pdt_opt_vals(p_api_version,
574 p_init_msg_list,
575 x_return_status,
576 x_msg_count,
577 x_msg_data,
578 ddp_povv_tbl);
579
580 -- copy data back from the local variables to OUT or IN-OUT args, if any
581
582
583
584
585
586 end;
587
588 procedure validate_pdt_opt_vals(p_api_version NUMBER
589 , p_init_msg_list VARCHAR2
590 , x_return_status out nocopy VARCHAR2
591 , x_msg_count out nocopy NUMBER
592 , x_msg_data out nocopy VARCHAR2
593 , p5_a0 NUMBER := 0-1962.0724
594 , p5_a1 NUMBER := 0-1962.0724
595 , p5_a2 NUMBER := 0-1962.0724
596 , p5_a3 NUMBER := 0-1962.0724
597 , p5_a4 DATE := fnd_api.g_miss_date
598 , p5_a5 NUMBER := 0-1962.0724
599 , p5_a6 DATE := fnd_api.g_miss_date
600 , p5_a7 DATE := fnd_api.g_miss_date
601 , p5_a8 NUMBER := 0-1962.0724
602 , p5_a9 DATE := fnd_api.g_miss_date
603 , p5_a10 NUMBER := 0-1962.0724
604 )
605
606 as
607 ddp_povv_rec okl_pdt_opt_vals_pub.povv_rec_type;
608 ddindx binary_integer; indx binary_integer;
609 begin
610
611 -- copy data to the local IN or IN-OUT args, if any
612
613
614
615
616
617 ddp_povv_rec.id := rosetta_g_miss_num_map(p5_a0);
618 ddp_povv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
619 ddp_povv_rec.ove_id := rosetta_g_miss_num_map(p5_a2);
620 ddp_povv_rec.pon_id := rosetta_g_miss_num_map(p5_a3);
621 ddp_povv_rec.from_date := rosetta_g_miss_date_in_map(p5_a4);
622 ddp_povv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
623 ddp_povv_rec.to_date := rosetta_g_miss_date_in_map(p5_a6);
624 ddp_povv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
625 ddp_povv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
626 ddp_povv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
627 ddp_povv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
628
629 -- here's the delegated call to the old PL/SQL routine
630 okl_pdt_opt_vals_pub.validate_pdt_opt_vals(p_api_version,
631 p_init_msg_list,
632 x_return_status,
633 x_msg_count,
634 x_msg_data,
635 ddp_povv_rec);
636
637 -- copy data back from the local variables to OUT or IN-OUT args, if any
638
639
640
641
642
643 end;
644
645 procedure validate_pdt_opt_vals(p_api_version NUMBER
646 , p_init_msg_list VARCHAR2
647 , x_return_status out nocopy VARCHAR2
648 , x_msg_count out nocopy NUMBER
649 , x_msg_data out nocopy VARCHAR2
650 , p5_a0 JTF_NUMBER_TABLE
651 , p5_a1 JTF_NUMBER_TABLE
652 , p5_a2 JTF_NUMBER_TABLE
653 , p5_a3 JTF_NUMBER_TABLE
654 , p5_a4 JTF_DATE_TABLE
655 , p5_a5 JTF_NUMBER_TABLE
656 , p5_a6 JTF_DATE_TABLE
657 , p5_a7 JTF_DATE_TABLE
658 , p5_a8 JTF_NUMBER_TABLE
659 , p5_a9 JTF_DATE_TABLE
660 , p5_a10 JTF_NUMBER_TABLE
661 )
662
663 as
664 ddp_povv_tbl okl_pdt_opt_vals_pub.povv_tbl_type;
665 ddindx binary_integer; indx binary_integer;
666 begin
667
668 -- copy data to the local IN or IN-OUT args, if any
669
670
671
672
673
674 okl_pov_pvt_w.rosetta_table_copy_in_p5(ddp_povv_tbl, p5_a0
675 , p5_a1
676 , p5_a2
677 , p5_a3
678 , p5_a4
679 , p5_a5
680 , p5_a6
681 , p5_a7
682 , p5_a8
683 , p5_a9
684 , p5_a10
685 );
686
687 -- here's the delegated call to the old PL/SQL routine
688 okl_pdt_opt_vals_pub.validate_pdt_opt_vals(p_api_version,
689 p_init_msg_list,
690 x_return_status,
691 x_msg_count,
692 x_msg_data,
693 ddp_povv_tbl);
694
695 -- copy data back from the local variables to OUT or IN-OUT args, if any
696
697
698
699
700
701 end;
702
703 end okl_pdt_opt_vals_pub_w;