[Home] [Help]
PACKAGE BODY: APPS.OKL_SIF_STREAM_TYPES_PUB_W
Source
1 package body okl_sif_stream_types_pub_w as
2 /* $Header: OKLUSITB.pls 120.1 2005/07/19 09:45:30 viselvar 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_sif_stream_types(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 NUMBER
32 , p6_a5 out nocopy NUMBER
33 , p6_a6 out nocopy NUMBER
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 , p6_a11 out nocopy VARCHAR2
39 , p5_a0 NUMBER := 0-1962.0724
40 , p5_a1 NUMBER := 0-1962.0724
41 , p5_a2 NUMBER := 0-1962.0724
42 , p5_a3 NUMBER := 0-1962.0724
43 , p5_a4 NUMBER := 0-1962.0724
44 , p5_a5 NUMBER := 0-1962.0724
45 , p5_a6 NUMBER := 0-1962.0724
46 , p5_a7 DATE := fnd_api.g_miss_date
47 , p5_a8 NUMBER := 0-1962.0724
48 , p5_a9 DATE := fnd_api.g_miss_date
49 , p5_a10 NUMBER := 0-1962.0724
50 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
51 )
52
53 as
54 ddp_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
55 ddx_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
56 ddindx binary_integer; indx binary_integer;
57 begin
58
59 -- copy data to the local IN or IN-OUT args, if any
60
61
62
63
64
65 ddp_sitv_rec.id := rosetta_g_miss_num_map(p5_a0);
66 ddp_sitv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
67 ddp_sitv_rec.sif_id := rosetta_g_miss_num_map(p5_a2);
68 ddp_sitv_rec.sty_id := rosetta_g_miss_num_map(p5_a3);
69 ddp_sitv_rec.sil_id := rosetta_g_miss_num_map(p5_a4);
70 ddp_sitv_rec.sfe_id := rosetta_g_miss_num_map(p5_a5);
71 ddp_sitv_rec.created_by := rosetta_g_miss_num_map(p5_a6);
72 ddp_sitv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
73 ddp_sitv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
74 ddp_sitv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
75 ddp_sitv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
76 ddp_sitv_rec.pricing_name := p5_a11;
77
78
79 -- here's the delegated call to the old PL/SQL routine
80 okl_sif_stream_types_pub.insert_sif_stream_types(p_api_version,
81 p_init_msg_list,
82 x_return_status,
83 x_msg_count,
84 x_msg_data,
85 ddp_sitv_rec,
86 ddx_sitv_rec);
87
88 -- copy data back from the local variables to OUT or IN-OUT args, if any
89
90
91
92
93
94
95 p6_a0 := rosetta_g_miss_num_map(ddx_sitv_rec.id);
96 p6_a1 := rosetta_g_miss_num_map(ddx_sitv_rec.object_version_number);
97 p6_a2 := rosetta_g_miss_num_map(ddx_sitv_rec.sif_id);
98 p6_a3 := rosetta_g_miss_num_map(ddx_sitv_rec.sty_id);
99 p6_a4 := rosetta_g_miss_num_map(ddx_sitv_rec.sil_id);
100 p6_a5 := rosetta_g_miss_num_map(ddx_sitv_rec.sfe_id);
101 p6_a6 := rosetta_g_miss_num_map(ddx_sitv_rec.created_by);
102 p6_a7 := ddx_sitv_rec.creation_date;
103 p6_a8 := rosetta_g_miss_num_map(ddx_sitv_rec.last_updated_by);
104 p6_a9 := ddx_sitv_rec.last_update_date;
105 p6_a10 := rosetta_g_miss_num_map(ddx_sitv_rec.last_update_login);
106 p6_a11 := ddx_sitv_rec.pricing_name;
107 end;
108
109 procedure insert_sif_stream_types(p_api_version NUMBER
110 , p_init_msg_list VARCHAR2
111 , x_return_status out nocopy VARCHAR2
112 , x_msg_count out nocopy NUMBER
113 , x_msg_data out nocopy VARCHAR2
114 , p5_a0 JTF_NUMBER_TABLE
115 , p5_a1 JTF_NUMBER_TABLE
116 , p5_a2 JTF_NUMBER_TABLE
117 , p5_a3 JTF_NUMBER_TABLE
118 , p5_a4 JTF_NUMBER_TABLE
119 , p5_a5 JTF_NUMBER_TABLE
120 , p5_a6 JTF_NUMBER_TABLE
121 , p5_a7 JTF_DATE_TABLE
122 , p5_a8 JTF_NUMBER_TABLE
123 , p5_a9 JTF_DATE_TABLE
124 , p5_a10 JTF_NUMBER_TABLE
125 , p5_a11 JTF_VARCHAR2_TABLE_200
126 , p6_a0 out nocopy JTF_NUMBER_TABLE
127 , p6_a1 out nocopy JTF_NUMBER_TABLE
128 , p6_a2 out nocopy JTF_NUMBER_TABLE
129 , p6_a3 out nocopy JTF_NUMBER_TABLE
130 , p6_a4 out nocopy JTF_NUMBER_TABLE
131 , p6_a5 out nocopy JTF_NUMBER_TABLE
132 , p6_a6 out nocopy JTF_NUMBER_TABLE
133 , p6_a7 out nocopy JTF_DATE_TABLE
134 , p6_a8 out nocopy JTF_NUMBER_TABLE
135 , p6_a9 out nocopy JTF_DATE_TABLE
136 , p6_a10 out nocopy JTF_NUMBER_TABLE
137 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_200
138 )
139
140 as
141 ddp_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
142 ddx_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
143 ddindx binary_integer; indx binary_integer;
144 begin
145
146 -- copy data to the local IN or IN-OUT args, if any
147
148
149
150
151
152 okl_sit_pvt_w.rosetta_table_copy_in_p5(ddp_sitv_tbl, p5_a0
153 , p5_a1
154 , p5_a2
155 , p5_a3
156 , p5_a4
157 , p5_a5
158 , p5_a6
159 , p5_a7
160 , p5_a8
161 , p5_a9
162 , p5_a10
163 , p5_a11
164 );
165
166
167 -- here's the delegated call to the old PL/SQL routine
168 okl_sif_stream_types_pub.insert_sif_stream_types(p_api_version,
169 p_init_msg_list,
170 x_return_status,
171 x_msg_count,
172 x_msg_data,
173 ddp_sitv_tbl,
174 ddx_sitv_tbl);
175
176 -- copy data back from the local variables to OUT or IN-OUT args, if any
177
178
179
180
181
182
183 okl_sit_pvt_w.rosetta_table_copy_out_p5(ddx_sitv_tbl, p6_a0
184 , p6_a1
185 , p6_a2
186 , p6_a3
187 , p6_a4
188 , p6_a5
189 , p6_a6
190 , p6_a7
191 , p6_a8
192 , p6_a9
193 , p6_a10
194 , p6_a11
195 );
196 end;
197
198 procedure lock_sif_stream_types(p_api_version NUMBER
199 , p_init_msg_list VARCHAR2
200 , x_return_status out nocopy VARCHAR2
201 , x_msg_count out nocopy NUMBER
202 , x_msg_data out nocopy VARCHAR2
203 , p5_a0 NUMBER := 0-1962.0724
204 , p5_a1 NUMBER := 0-1962.0724
205 , p5_a2 NUMBER := 0-1962.0724
206 , p5_a3 NUMBER := 0-1962.0724
207 , p5_a4 NUMBER := 0-1962.0724
208 , p5_a5 NUMBER := 0-1962.0724
209 , p5_a6 NUMBER := 0-1962.0724
210 , p5_a7 DATE := fnd_api.g_miss_date
211 , p5_a8 NUMBER := 0-1962.0724
212 , p5_a9 DATE := fnd_api.g_miss_date
213 , p5_a10 NUMBER := 0-1962.0724
214 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
215 )
216
217 as
218 ddp_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
219 ddindx binary_integer; indx binary_integer;
220 begin
221
222 -- copy data to the local IN or IN-OUT args, if any
223
224
225
226
227
228 ddp_sitv_rec.id := rosetta_g_miss_num_map(p5_a0);
229 ddp_sitv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
230 ddp_sitv_rec.sif_id := rosetta_g_miss_num_map(p5_a2);
231 ddp_sitv_rec.sty_id := rosetta_g_miss_num_map(p5_a3);
232 ddp_sitv_rec.sil_id := rosetta_g_miss_num_map(p5_a4);
233 ddp_sitv_rec.sfe_id := rosetta_g_miss_num_map(p5_a5);
234 ddp_sitv_rec.created_by := rosetta_g_miss_num_map(p5_a6);
235 ddp_sitv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
236 ddp_sitv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
237 ddp_sitv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
238 ddp_sitv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
239 ddp_sitv_rec.pricing_name := p5_a11;
240
241 -- here's the delegated call to the old PL/SQL routine
242 okl_sif_stream_types_pub.lock_sif_stream_types(p_api_version,
243 p_init_msg_list,
244 x_return_status,
245 x_msg_count,
246 x_msg_data,
247 ddp_sitv_rec);
248
249 -- copy data back from the local variables to OUT or IN-OUT args, if any
250
251
252
253
254
255 end;
256
257 procedure lock_sif_stream_types(p_api_version NUMBER
258 , p_init_msg_list VARCHAR2
259 , x_return_status out nocopy VARCHAR2
260 , x_msg_count out nocopy NUMBER
261 , x_msg_data out nocopy VARCHAR2
262 , p5_a0 JTF_NUMBER_TABLE
263 , p5_a1 JTF_NUMBER_TABLE
264 , p5_a2 JTF_NUMBER_TABLE
265 , p5_a3 JTF_NUMBER_TABLE
266 , p5_a4 JTF_NUMBER_TABLE
267 , p5_a5 JTF_NUMBER_TABLE
268 , p5_a6 JTF_NUMBER_TABLE
269 , p5_a7 JTF_DATE_TABLE
270 , p5_a8 JTF_NUMBER_TABLE
271 , p5_a9 JTF_DATE_TABLE
272 , p5_a10 JTF_NUMBER_TABLE
273 , p5_a11 JTF_VARCHAR2_TABLE_200
274 )
275
276 as
277 ddp_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
278 ddindx binary_integer; indx binary_integer;
279 begin
280
281 -- copy data to the local IN or IN-OUT args, if any
282
283
284
285
286
287 okl_sit_pvt_w.rosetta_table_copy_in_p5(ddp_sitv_tbl, p5_a0
288 , p5_a1
289 , p5_a2
290 , p5_a3
291 , p5_a4
292 , p5_a5
293 , p5_a6
294 , p5_a7
295 , p5_a8
296 , p5_a9
297 , p5_a10
298 , p5_a11
299 );
300
301 -- here's the delegated call to the old PL/SQL routine
302 okl_sif_stream_types_pub.lock_sif_stream_types(p_api_version,
303 p_init_msg_list,
304 x_return_status,
305 x_msg_count,
306 x_msg_data,
307 ddp_sitv_tbl);
308
309 -- copy data back from the local variables to OUT or IN-OUT args, if any
310
311
312
313
314
315 end;
316
317 procedure update_sif_stream_types(p_api_version NUMBER
318 , p_init_msg_list VARCHAR2
319 , x_return_status out nocopy VARCHAR2
320 , x_msg_count out nocopy NUMBER
321 , x_msg_data out nocopy VARCHAR2
322 , p6_a0 out nocopy NUMBER
323 , p6_a1 out nocopy NUMBER
324 , p6_a2 out nocopy NUMBER
325 , p6_a3 out nocopy NUMBER
326 , p6_a4 out nocopy NUMBER
327 , p6_a5 out nocopy NUMBER
328 , p6_a6 out nocopy NUMBER
329 , p6_a7 out nocopy DATE
330 , p6_a8 out nocopy NUMBER
331 , p6_a9 out nocopy DATE
332 , p6_a10 out nocopy NUMBER
333 , p6_a11 out nocopy VARCHAR2
334 , p5_a0 NUMBER := 0-1962.0724
335 , p5_a1 NUMBER := 0-1962.0724
336 , p5_a2 NUMBER := 0-1962.0724
337 , p5_a3 NUMBER := 0-1962.0724
338 , p5_a4 NUMBER := 0-1962.0724
339 , p5_a5 NUMBER := 0-1962.0724
340 , p5_a6 NUMBER := 0-1962.0724
341 , p5_a7 DATE := fnd_api.g_miss_date
342 , p5_a8 NUMBER := 0-1962.0724
343 , p5_a9 DATE := fnd_api.g_miss_date
344 , p5_a10 NUMBER := 0-1962.0724
345 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
346 )
347
348 as
349 ddp_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
350 ddx_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
351 ddindx binary_integer; indx binary_integer;
352 begin
353
354 -- copy data to the local IN or IN-OUT args, if any
355
356
357
358
359
360 ddp_sitv_rec.id := rosetta_g_miss_num_map(p5_a0);
361 ddp_sitv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
362 ddp_sitv_rec.sif_id := rosetta_g_miss_num_map(p5_a2);
363 ddp_sitv_rec.sty_id := rosetta_g_miss_num_map(p5_a3);
364 ddp_sitv_rec.sil_id := rosetta_g_miss_num_map(p5_a4);
365 ddp_sitv_rec.sfe_id := rosetta_g_miss_num_map(p5_a5);
366 ddp_sitv_rec.created_by := rosetta_g_miss_num_map(p5_a6);
367 ddp_sitv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
368 ddp_sitv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
369 ddp_sitv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
370 ddp_sitv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
371 ddp_sitv_rec.pricing_name := p5_a11;
372
373
374 -- here's the delegated call to the old PL/SQL routine
375 okl_sif_stream_types_pub.update_sif_stream_types(p_api_version,
376 p_init_msg_list,
377 x_return_status,
378 x_msg_count,
379 x_msg_data,
380 ddp_sitv_rec,
381 ddx_sitv_rec);
382
383 -- copy data back from the local variables to OUT or IN-OUT args, if any
384
385
386
387
388
389
390 p6_a0 := rosetta_g_miss_num_map(ddx_sitv_rec.id);
391 p6_a1 := rosetta_g_miss_num_map(ddx_sitv_rec.object_version_number);
392 p6_a2 := rosetta_g_miss_num_map(ddx_sitv_rec.sif_id);
393 p6_a3 := rosetta_g_miss_num_map(ddx_sitv_rec.sty_id);
394 p6_a4 := rosetta_g_miss_num_map(ddx_sitv_rec.sil_id);
395 p6_a5 := rosetta_g_miss_num_map(ddx_sitv_rec.sfe_id);
396 p6_a6 := rosetta_g_miss_num_map(ddx_sitv_rec.created_by);
397 p6_a7 := ddx_sitv_rec.creation_date;
398 p6_a8 := rosetta_g_miss_num_map(ddx_sitv_rec.last_updated_by);
399 p6_a9 := ddx_sitv_rec.last_update_date;
400 p6_a10 := rosetta_g_miss_num_map(ddx_sitv_rec.last_update_login);
401 p6_a11 := ddx_sitv_rec.pricing_name;
402 end;
403
404 procedure update_sif_stream_types(p_api_version NUMBER
405 , p_init_msg_list VARCHAR2
406 , x_return_status out nocopy VARCHAR2
407 , x_msg_count out nocopy NUMBER
408 , x_msg_data out nocopy VARCHAR2
409 , p5_a0 JTF_NUMBER_TABLE
410 , p5_a1 JTF_NUMBER_TABLE
411 , p5_a2 JTF_NUMBER_TABLE
412 , p5_a3 JTF_NUMBER_TABLE
413 , p5_a4 JTF_NUMBER_TABLE
414 , p5_a5 JTF_NUMBER_TABLE
415 , p5_a6 JTF_NUMBER_TABLE
416 , p5_a7 JTF_DATE_TABLE
417 , p5_a8 JTF_NUMBER_TABLE
418 , p5_a9 JTF_DATE_TABLE
419 , p5_a10 JTF_NUMBER_TABLE
420 , p5_a11 JTF_VARCHAR2_TABLE_200
421 , p6_a0 out nocopy JTF_NUMBER_TABLE
422 , p6_a1 out nocopy JTF_NUMBER_TABLE
423 , p6_a2 out nocopy JTF_NUMBER_TABLE
424 , p6_a3 out nocopy JTF_NUMBER_TABLE
425 , p6_a4 out nocopy JTF_NUMBER_TABLE
426 , p6_a5 out nocopy JTF_NUMBER_TABLE
427 , p6_a6 out nocopy JTF_NUMBER_TABLE
428 , p6_a7 out nocopy JTF_DATE_TABLE
429 , p6_a8 out nocopy JTF_NUMBER_TABLE
430 , p6_a9 out nocopy JTF_DATE_TABLE
431 , p6_a10 out nocopy JTF_NUMBER_TABLE
432 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_200
433 )
434
435 as
436 ddp_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
437 ddx_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
438 ddindx binary_integer; indx binary_integer;
439 begin
440
441 -- copy data to the local IN or IN-OUT args, if any
442
443
444
445
446
447 okl_sit_pvt_w.rosetta_table_copy_in_p5(ddp_sitv_tbl, p5_a0
448 , p5_a1
449 , p5_a2
450 , p5_a3
451 , p5_a4
452 , p5_a5
453 , p5_a6
454 , p5_a7
455 , p5_a8
456 , p5_a9
457 , p5_a10
458 , p5_a11
459 );
460
461
462 -- here's the delegated call to the old PL/SQL routine
463 okl_sif_stream_types_pub.update_sif_stream_types(p_api_version,
464 p_init_msg_list,
465 x_return_status,
466 x_msg_count,
467 x_msg_data,
468 ddp_sitv_tbl,
469 ddx_sitv_tbl);
470
471 -- copy data back from the local variables to OUT or IN-OUT args, if any
472
473
474
475
476
477
478 okl_sit_pvt_w.rosetta_table_copy_out_p5(ddx_sitv_tbl, p6_a0
479 , p6_a1
480 , p6_a2
481 , p6_a3
482 , p6_a4
483 , p6_a5
484 , p6_a6
485 , p6_a7
486 , p6_a8
487 , p6_a9
488 , p6_a10
489 , p6_a11
490 );
491 end;
492
493 procedure delete_sif_stream_types(p_api_version NUMBER
494 , p_init_msg_list VARCHAR2
495 , x_return_status out nocopy VARCHAR2
496 , x_msg_count out nocopy NUMBER
497 , x_msg_data out nocopy VARCHAR2
498 , p6_a0 out nocopy NUMBER
499 , p6_a1 out nocopy NUMBER
500 , p6_a2 out nocopy NUMBER
501 , p6_a3 out nocopy NUMBER
502 , p6_a4 out nocopy NUMBER
503 , p6_a5 out nocopy NUMBER
504 , p6_a6 out nocopy NUMBER
505 , p6_a7 out nocopy DATE
506 , p6_a8 out nocopy NUMBER
507 , p6_a9 out nocopy DATE
508 , p6_a10 out nocopy NUMBER
509 , p6_a11 out nocopy VARCHAR2
510 , p5_a0 NUMBER := 0-1962.0724
511 , p5_a1 NUMBER := 0-1962.0724
512 , p5_a2 NUMBER := 0-1962.0724
513 , p5_a3 NUMBER := 0-1962.0724
514 , p5_a4 NUMBER := 0-1962.0724
515 , p5_a5 NUMBER := 0-1962.0724
516 , p5_a6 NUMBER := 0-1962.0724
517 , p5_a7 DATE := fnd_api.g_miss_date
518 , p5_a8 NUMBER := 0-1962.0724
519 , p5_a9 DATE := fnd_api.g_miss_date
520 , p5_a10 NUMBER := 0-1962.0724
521 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
522 )
523
524 as
525 ddp_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
526 ddx_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
527 ddindx binary_integer; indx binary_integer;
528 begin
529
530 -- copy data to the local IN or IN-OUT args, if any
531
532
533
534
535
536 ddp_sitv_rec.id := rosetta_g_miss_num_map(p5_a0);
537 ddp_sitv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
538 ddp_sitv_rec.sif_id := rosetta_g_miss_num_map(p5_a2);
539 ddp_sitv_rec.sty_id := rosetta_g_miss_num_map(p5_a3);
540 ddp_sitv_rec.sil_id := rosetta_g_miss_num_map(p5_a4);
541 ddp_sitv_rec.sfe_id := rosetta_g_miss_num_map(p5_a5);
542 ddp_sitv_rec.created_by := rosetta_g_miss_num_map(p5_a6);
543 ddp_sitv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
544 ddp_sitv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
545 ddp_sitv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
546 ddp_sitv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
547 ddp_sitv_rec.pricing_name := p5_a11;
548
549
550 -- here's the delegated call to the old PL/SQL routine
551 okl_sif_stream_types_pub.delete_sif_stream_types(p_api_version,
552 p_init_msg_list,
553 x_return_status,
554 x_msg_count,
555 x_msg_data,
556 ddp_sitv_rec,
557 ddx_sitv_rec);
558
559 -- copy data back from the local variables to OUT or IN-OUT args, if any
560
561
562
563
564
565
566 p6_a0 := rosetta_g_miss_num_map(ddx_sitv_rec.id);
567 p6_a1 := rosetta_g_miss_num_map(ddx_sitv_rec.object_version_number);
568 p6_a2 := rosetta_g_miss_num_map(ddx_sitv_rec.sif_id);
569 p6_a3 := rosetta_g_miss_num_map(ddx_sitv_rec.sty_id);
570 p6_a4 := rosetta_g_miss_num_map(ddx_sitv_rec.sil_id);
571 p6_a5 := rosetta_g_miss_num_map(ddx_sitv_rec.sfe_id);
572 p6_a6 := rosetta_g_miss_num_map(ddx_sitv_rec.created_by);
573 p6_a7 := ddx_sitv_rec.creation_date;
574 p6_a8 := rosetta_g_miss_num_map(ddx_sitv_rec.last_updated_by);
575 p6_a9 := ddx_sitv_rec.last_update_date;
576 p6_a10 := rosetta_g_miss_num_map(ddx_sitv_rec.last_update_login);
577 p6_a11 := ddx_sitv_rec.pricing_name;
578 end;
579
580 procedure delete_sif_stream_types(p_api_version NUMBER
581 , p_init_msg_list VARCHAR2
582 , x_return_status out nocopy VARCHAR2
583 , x_msg_count out nocopy NUMBER
584 , x_msg_data out nocopy VARCHAR2
585 , p5_a0 JTF_NUMBER_TABLE
586 , p5_a1 JTF_NUMBER_TABLE
587 , p5_a2 JTF_NUMBER_TABLE
588 , p5_a3 JTF_NUMBER_TABLE
589 , p5_a4 JTF_NUMBER_TABLE
590 , p5_a5 JTF_NUMBER_TABLE
591 , p5_a6 JTF_NUMBER_TABLE
592 , p5_a7 JTF_DATE_TABLE
593 , p5_a8 JTF_NUMBER_TABLE
594 , p5_a9 JTF_DATE_TABLE
595 , p5_a10 JTF_NUMBER_TABLE
596 , p5_a11 JTF_VARCHAR2_TABLE_200
597 , p6_a0 out nocopy JTF_NUMBER_TABLE
598 , p6_a1 out nocopy JTF_NUMBER_TABLE
599 , p6_a2 out nocopy JTF_NUMBER_TABLE
600 , p6_a3 out nocopy JTF_NUMBER_TABLE
601 , p6_a4 out nocopy JTF_NUMBER_TABLE
602 , p6_a5 out nocopy JTF_NUMBER_TABLE
603 , p6_a6 out nocopy JTF_NUMBER_TABLE
604 , p6_a7 out nocopy JTF_DATE_TABLE
605 , p6_a8 out nocopy JTF_NUMBER_TABLE
606 , p6_a9 out nocopy JTF_DATE_TABLE
607 , p6_a10 out nocopy JTF_NUMBER_TABLE
608 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_200
609 )
610
611 as
612 ddp_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
613 ddx_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
614 ddindx binary_integer; indx binary_integer;
615 begin
616
617 -- copy data to the local IN or IN-OUT args, if any
618
619
620
621
622
623 okl_sit_pvt_w.rosetta_table_copy_in_p5(ddp_sitv_tbl, p5_a0
624 , p5_a1
625 , p5_a2
626 , p5_a3
627 , p5_a4
628 , p5_a5
629 , p5_a6
630 , p5_a7
631 , p5_a8
632 , p5_a9
633 , p5_a10
634 , p5_a11
635 );
636
637
638 -- here's the delegated call to the old PL/SQL routine
639 okl_sif_stream_types_pub.delete_sif_stream_types(p_api_version,
640 p_init_msg_list,
641 x_return_status,
642 x_msg_count,
643 x_msg_data,
644 ddp_sitv_tbl,
645 ddx_sitv_tbl);
646
647 -- copy data back from the local variables to OUT or IN-OUT args, if any
648
649
650
651
652
653
654 okl_sit_pvt_w.rosetta_table_copy_out_p5(ddx_sitv_tbl, p6_a0
655 , p6_a1
656 , p6_a2
657 , p6_a3
658 , p6_a4
659 , p6_a5
660 , p6_a6
661 , p6_a7
662 , p6_a8
663 , p6_a9
664 , p6_a10
665 , p6_a11
666 );
667 end;
668
669 procedure validate_sif_stream_types(p_api_version NUMBER
670 , p_init_msg_list VARCHAR2
671 , x_return_status out nocopy VARCHAR2
672 , x_msg_count out nocopy NUMBER
673 , x_msg_data out nocopy VARCHAR2
674 , p6_a0 out nocopy NUMBER
675 , p6_a1 out nocopy NUMBER
676 , p6_a2 out nocopy NUMBER
677 , p6_a3 out nocopy NUMBER
678 , p6_a4 out nocopy NUMBER
679 , p6_a5 out nocopy NUMBER
680 , p6_a6 out nocopy NUMBER
681 , p6_a7 out nocopy DATE
682 , p6_a8 out nocopy NUMBER
683 , p6_a9 out nocopy DATE
684 , p6_a10 out nocopy NUMBER
685 , p6_a11 out nocopy VARCHAR2
686 , p5_a0 NUMBER := 0-1962.0724
687 , p5_a1 NUMBER := 0-1962.0724
688 , p5_a2 NUMBER := 0-1962.0724
689 , p5_a3 NUMBER := 0-1962.0724
690 , p5_a4 NUMBER := 0-1962.0724
691 , p5_a5 NUMBER := 0-1962.0724
692 , p5_a6 NUMBER := 0-1962.0724
693 , p5_a7 DATE := fnd_api.g_miss_date
694 , p5_a8 NUMBER := 0-1962.0724
695 , p5_a9 DATE := fnd_api.g_miss_date
696 , p5_a10 NUMBER := 0-1962.0724
697 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
698 )
699
700 as
701 ddp_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
702 ddx_sitv_rec okl_sif_stream_types_pub.sitv_rec_type;
703 ddindx binary_integer; indx binary_integer;
704 begin
705
706 -- copy data to the local IN or IN-OUT args, if any
707
708
709
710
711
712 ddp_sitv_rec.id := rosetta_g_miss_num_map(p5_a0);
713 ddp_sitv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
714 ddp_sitv_rec.sif_id := rosetta_g_miss_num_map(p5_a2);
715 ddp_sitv_rec.sty_id := rosetta_g_miss_num_map(p5_a3);
716 ddp_sitv_rec.sil_id := rosetta_g_miss_num_map(p5_a4);
717 ddp_sitv_rec.sfe_id := rosetta_g_miss_num_map(p5_a5);
718 ddp_sitv_rec.created_by := rosetta_g_miss_num_map(p5_a6);
719 ddp_sitv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a7);
720 ddp_sitv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a8);
721 ddp_sitv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a9);
722 ddp_sitv_rec.last_update_login := rosetta_g_miss_num_map(p5_a10);
723 ddp_sitv_rec.pricing_name := p5_a11;
724
725
726 -- here's the delegated call to the old PL/SQL routine
727 okl_sif_stream_types_pub.validate_sif_stream_types(p_api_version,
728 p_init_msg_list,
729 x_return_status,
730 x_msg_count,
731 x_msg_data,
732 ddp_sitv_rec,
733 ddx_sitv_rec);
734
735 -- copy data back from the local variables to OUT or IN-OUT args, if any
736
737
738
739
740
741
742 p6_a0 := rosetta_g_miss_num_map(ddx_sitv_rec.id);
743 p6_a1 := rosetta_g_miss_num_map(ddx_sitv_rec.object_version_number);
744 p6_a2 := rosetta_g_miss_num_map(ddx_sitv_rec.sif_id);
745 p6_a3 := rosetta_g_miss_num_map(ddx_sitv_rec.sty_id);
746 p6_a4 := rosetta_g_miss_num_map(ddx_sitv_rec.sil_id);
747 p6_a5 := rosetta_g_miss_num_map(ddx_sitv_rec.sfe_id);
748 p6_a6 := rosetta_g_miss_num_map(ddx_sitv_rec.created_by);
749 p6_a7 := ddx_sitv_rec.creation_date;
750 p6_a8 := rosetta_g_miss_num_map(ddx_sitv_rec.last_updated_by);
751 p6_a9 := ddx_sitv_rec.last_update_date;
752 p6_a10 := rosetta_g_miss_num_map(ddx_sitv_rec.last_update_login);
753 p6_a11 := ddx_sitv_rec.pricing_name;
754 end;
755
756 procedure validate_sif_stream_types(p_api_version NUMBER
757 , p_init_msg_list VARCHAR2
758 , x_return_status out nocopy VARCHAR2
759 , x_msg_count out nocopy NUMBER
760 , x_msg_data out nocopy VARCHAR2
761 , p5_a0 JTF_NUMBER_TABLE
762 , p5_a1 JTF_NUMBER_TABLE
763 , p5_a2 JTF_NUMBER_TABLE
764 , p5_a3 JTF_NUMBER_TABLE
765 , p5_a4 JTF_NUMBER_TABLE
766 , p5_a5 JTF_NUMBER_TABLE
767 , p5_a6 JTF_NUMBER_TABLE
768 , p5_a7 JTF_DATE_TABLE
769 , p5_a8 JTF_NUMBER_TABLE
770 , p5_a9 JTF_DATE_TABLE
771 , p5_a10 JTF_NUMBER_TABLE
772 , p5_a11 JTF_VARCHAR2_TABLE_200
773 , p6_a0 out nocopy JTF_NUMBER_TABLE
774 , p6_a1 out nocopy JTF_NUMBER_TABLE
775 , p6_a2 out nocopy JTF_NUMBER_TABLE
776 , p6_a3 out nocopy JTF_NUMBER_TABLE
777 , p6_a4 out nocopy JTF_NUMBER_TABLE
778 , p6_a5 out nocopy JTF_NUMBER_TABLE
779 , p6_a6 out nocopy JTF_NUMBER_TABLE
780 , p6_a7 out nocopy JTF_DATE_TABLE
781 , p6_a8 out nocopy JTF_NUMBER_TABLE
782 , p6_a9 out nocopy JTF_DATE_TABLE
783 , p6_a10 out nocopy JTF_NUMBER_TABLE
784 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_200
785 )
786
787 as
788 ddp_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
789 ddx_sitv_tbl okl_sif_stream_types_pub.sitv_tbl_type;
790 ddindx binary_integer; indx binary_integer;
791 begin
792
793 -- copy data to the local IN or IN-OUT args, if any
794
795
796
797
798
799 okl_sit_pvt_w.rosetta_table_copy_in_p5(ddp_sitv_tbl, p5_a0
800 , p5_a1
801 , p5_a2
802 , p5_a3
803 , p5_a4
804 , p5_a5
805 , p5_a6
806 , p5_a7
807 , p5_a8
808 , p5_a9
809 , p5_a10
810 , p5_a11
811 );
812
813
814 -- here's the delegated call to the old PL/SQL routine
815 okl_sif_stream_types_pub.validate_sif_stream_types(p_api_version,
816 p_init_msg_list,
817 x_return_status,
818 x_msg_count,
819 x_msg_data,
820 ddp_sitv_tbl,
821 ddx_sitv_tbl);
822
823 -- copy data back from the local variables to OUT or IN-OUT args, if any
824
825
826
827
828
829
830 okl_sit_pvt_w.rosetta_table_copy_out_p5(ddx_sitv_tbl, p6_a0
831 , p6_a1
832 , p6_a2
833 , p6_a3
834 , p6_a4
835 , p6_a5
836 , p6_a6
837 , p6_a7
838 , p6_a8
839 , p6_a9
840 , p6_a10
841 , p6_a11
842 );
843 end;
844
845 end okl_sif_stream_types_pub_w;