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