[Home] [Help]
PACKAGE BODY: APPS.OKL_INSURER_RANKINGS_PUB_W
Source
1 package body okl_insurer_rankings_pub_w as
2 /* $Header: OKLOIRKB.pls 120.1 2005/07/14 12:01:16 asawanka 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_insurer_rankings(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_NUMBER_TABLE
30 , p5_a3 JTF_DATE_TABLE
31 , p5_a4 JTF_DATE_TABLE
32 , p5_a5 JTF_NUMBER_TABLE
33 , p5_a6 JTF_VARCHAR2_TABLE_100
34 , p5_a7 JTF_VARCHAR2_TABLE_300
35 , p5_a8 JTF_VARCHAR2_TABLE_300
36 , p5_a9 JTF_VARCHAR2_TABLE_300
37 , p5_a10 JTF_VARCHAR2_TABLE_300
38 , p5_a11 JTF_VARCHAR2_TABLE_300
39 , p5_a12 JTF_VARCHAR2_TABLE_300
40 , p5_a13 JTF_VARCHAR2_TABLE_300
41 , p5_a14 JTF_VARCHAR2_TABLE_300
42 , p5_a15 JTF_VARCHAR2_TABLE_300
43 , p5_a16 JTF_VARCHAR2_TABLE_300
44 , p5_a17 JTF_VARCHAR2_TABLE_300
45 , p5_a18 JTF_VARCHAR2_TABLE_300
46 , p5_a19 JTF_VARCHAR2_TABLE_300
47 , p5_a20 JTF_VARCHAR2_TABLE_300
48 , p5_a21 JTF_VARCHAR2_TABLE_300
49 , p5_a22 JTF_VARCHAR2_TABLE_300
50 , p5_a23 JTF_NUMBER_TABLE
51 , p5_a24 JTF_DATE_TABLE
52 , p5_a25 JTF_NUMBER_TABLE
53 , p5_a26 JTF_DATE_TABLE
54 , p5_a27 JTF_NUMBER_TABLE
55 , p6_a0 out nocopy JTF_NUMBER_TABLE
56 , p6_a1 out nocopy JTF_NUMBER_TABLE
57 , p6_a2 out nocopy JTF_NUMBER_TABLE
58 , p6_a3 out nocopy JTF_DATE_TABLE
59 , p6_a4 out nocopy JTF_DATE_TABLE
60 , p6_a5 out nocopy JTF_NUMBER_TABLE
61 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
62 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_300
63 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_300
64 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_300
65 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_300
66 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_300
67 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_300
68 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_300
69 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_300
70 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_300
71 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_300
72 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_300
73 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_300
74 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_300
75 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_300
76 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_300
77 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_300
78 , p6_a23 out nocopy JTF_NUMBER_TABLE
79 , p6_a24 out nocopy JTF_DATE_TABLE
80 , p6_a25 out nocopy JTF_NUMBER_TABLE
81 , p6_a26 out nocopy JTF_DATE_TABLE
82 , p6_a27 out nocopy JTF_NUMBER_TABLE
83 )
84
85 as
86 ddp_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
87 ddx_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
88 ddindx binary_integer; indx binary_integer;
89 begin
90
91 -- copy data to the local IN or IN-OUT args, if any
92
93
94
95
96
97 okl_irk_pvt_w.rosetta_table_copy_in_p2(ddp_irkv_tbl, p5_a0
98 , p5_a1
99 , p5_a2
100 , p5_a3
101 , p5_a4
102 , p5_a5
103 , p5_a6
104 , p5_a7
105 , p5_a8
106 , p5_a9
107 , p5_a10
108 , p5_a11
109 , p5_a12
110 , p5_a13
111 , p5_a14
112 , p5_a15
113 , p5_a16
114 , p5_a17
115 , p5_a18
116 , p5_a19
117 , p5_a20
118 , p5_a21
119 , p5_a22
120 , p5_a23
121 , p5_a24
122 , p5_a25
123 , p5_a26
124 , p5_a27
125 );
126
127
128 -- here's the delegated call to the old PL/SQL routine
129 okl_insurer_rankings_pub.insert_insurer_rankings(p_api_version,
130 p_init_msg_list,
131 x_return_status,
132 x_msg_count,
133 x_msg_data,
134 ddp_irkv_tbl,
135 ddx_irkv_tbl);
136
137 -- copy data back from the local variables to OUT or IN-OUT args, if any
138
139
140
141
142
143
144 okl_irk_pvt_w.rosetta_table_copy_out_p2(ddx_irkv_tbl, p6_a0
145 , p6_a1
146 , p6_a2
147 , p6_a3
148 , p6_a4
149 , p6_a5
150 , p6_a6
151 , p6_a7
152 , p6_a8
153 , p6_a9
154 , p6_a10
155 , p6_a11
156 , p6_a12
157 , p6_a13
158 , p6_a14
159 , p6_a15
160 , p6_a16
161 , p6_a17
162 , p6_a18
163 , p6_a19
164 , p6_a20
165 , p6_a21
166 , p6_a22
167 , p6_a23
168 , p6_a24
169 , p6_a25
170 , p6_a26
171 , p6_a27
172 );
173 end;
174
175 procedure insert_insurer_rankings(p_api_version NUMBER
176 , p_init_msg_list VARCHAR2
177 , x_return_status out nocopy VARCHAR2
178 , x_msg_count out nocopy NUMBER
179 , x_msg_data out nocopy VARCHAR2
180 , p6_a0 out nocopy NUMBER
181 , p6_a1 out nocopy NUMBER
182 , p6_a2 out nocopy NUMBER
183 , p6_a3 out nocopy DATE
184 , p6_a4 out nocopy DATE
185 , p6_a5 out nocopy NUMBER
186 , p6_a6 out nocopy VARCHAR2
187 , p6_a7 out nocopy VARCHAR2
188 , p6_a8 out nocopy VARCHAR2
189 , p6_a9 out nocopy VARCHAR2
190 , p6_a10 out nocopy VARCHAR2
191 , p6_a11 out nocopy VARCHAR2
192 , p6_a12 out nocopy VARCHAR2
193 , p6_a13 out nocopy VARCHAR2
194 , p6_a14 out nocopy VARCHAR2
195 , p6_a15 out nocopy VARCHAR2
196 , p6_a16 out nocopy VARCHAR2
197 , p6_a17 out nocopy VARCHAR2
198 , p6_a18 out nocopy VARCHAR2
199 , p6_a19 out nocopy VARCHAR2
200 , p6_a20 out nocopy VARCHAR2
201 , p6_a21 out nocopy VARCHAR2
202 , p6_a22 out nocopy VARCHAR2
203 , p6_a23 out nocopy NUMBER
204 , p6_a24 out nocopy DATE
205 , p6_a25 out nocopy NUMBER
206 , p6_a26 out nocopy DATE
207 , p6_a27 out nocopy NUMBER
208 , p5_a0 NUMBER := 0-1962.0724
209 , p5_a1 NUMBER := 0-1962.0724
210 , p5_a2 NUMBER := 0-1962.0724
211 , p5_a3 DATE := fnd_api.g_miss_date
212 , p5_a4 DATE := fnd_api.g_miss_date
213 , p5_a5 NUMBER := 0-1962.0724
214 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
215 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
216 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
217 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
218 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
219 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
220 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
221 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
222 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
223 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
224 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
225 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
226 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
227 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
228 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
229 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
230 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
231 , p5_a23 NUMBER := 0-1962.0724
232 , p5_a24 DATE := fnd_api.g_miss_date
233 , p5_a25 NUMBER := 0-1962.0724
234 , p5_a26 DATE := fnd_api.g_miss_date
235 , p5_a27 NUMBER := 0-1962.0724
236 )
237
238 as
239 ddp_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
240 ddx_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
241 ddindx binary_integer; indx binary_integer;
242 begin
243
244 -- copy data to the local IN or IN-OUT args, if any
245
246
247
248
249
250 ddp_irkv_rec.id := rosetta_g_miss_num_map(p5_a0);
251 ddp_irkv_rec.ranking_seq := rosetta_g_miss_num_map(p5_a1);
252 ddp_irkv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
253 ddp_irkv_rec.date_from := rosetta_g_miss_date_in_map(p5_a3);
254 ddp_irkv_rec.date_to := rosetta_g_miss_date_in_map(p5_a4);
255 ddp_irkv_rec.isu_id := rosetta_g_miss_num_map(p5_a5);
256 ddp_irkv_rec.ic_code := p5_a6;
257 ddp_irkv_rec.attribute_category := p5_a7;
258 ddp_irkv_rec.attribute1 := p5_a8;
259 ddp_irkv_rec.attribute2 := p5_a9;
260 ddp_irkv_rec.attribute3 := p5_a10;
261 ddp_irkv_rec.attribute4 := p5_a11;
262 ddp_irkv_rec.attribute5 := p5_a12;
263 ddp_irkv_rec.attribute6 := p5_a13;
264 ddp_irkv_rec.attribute7 := p5_a14;
265 ddp_irkv_rec.attribute8 := p5_a15;
266 ddp_irkv_rec.attribute9 := p5_a16;
267 ddp_irkv_rec.attribute10 := p5_a17;
268 ddp_irkv_rec.attribute11 := p5_a18;
269 ddp_irkv_rec.attribute12 := p5_a19;
270 ddp_irkv_rec.attribute13 := p5_a20;
271 ddp_irkv_rec.attribute14 := p5_a21;
272 ddp_irkv_rec.attribute15 := p5_a22;
273 ddp_irkv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
274 ddp_irkv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
275 ddp_irkv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
276 ddp_irkv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
277 ddp_irkv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
278
279
280 -- here's the delegated call to the old PL/SQL routine
281 okl_insurer_rankings_pub.insert_insurer_rankings(p_api_version,
282 p_init_msg_list,
283 x_return_status,
284 x_msg_count,
285 x_msg_data,
286 ddp_irkv_rec,
287 ddx_irkv_rec);
288
289 -- copy data back from the local variables to OUT or IN-OUT args, if any
290
291
292
293
294
295
296 p6_a0 := rosetta_g_miss_num_map(ddx_irkv_rec.id);
297 p6_a1 := rosetta_g_miss_num_map(ddx_irkv_rec.ranking_seq);
298 p6_a2 := rosetta_g_miss_num_map(ddx_irkv_rec.object_version_number);
299 p6_a3 := ddx_irkv_rec.date_from;
300 p6_a4 := ddx_irkv_rec.date_to;
301 p6_a5 := rosetta_g_miss_num_map(ddx_irkv_rec.isu_id);
302 p6_a6 := ddx_irkv_rec.ic_code;
303 p6_a7 := ddx_irkv_rec.attribute_category;
304 p6_a8 := ddx_irkv_rec.attribute1;
305 p6_a9 := ddx_irkv_rec.attribute2;
306 p6_a10 := ddx_irkv_rec.attribute3;
307 p6_a11 := ddx_irkv_rec.attribute4;
308 p6_a12 := ddx_irkv_rec.attribute5;
309 p6_a13 := ddx_irkv_rec.attribute6;
310 p6_a14 := ddx_irkv_rec.attribute7;
311 p6_a15 := ddx_irkv_rec.attribute8;
312 p6_a16 := ddx_irkv_rec.attribute9;
313 p6_a17 := ddx_irkv_rec.attribute10;
314 p6_a18 := ddx_irkv_rec.attribute11;
315 p6_a19 := ddx_irkv_rec.attribute12;
316 p6_a20 := ddx_irkv_rec.attribute13;
317 p6_a21 := ddx_irkv_rec.attribute14;
318 p6_a22 := ddx_irkv_rec.attribute15;
319 p6_a23 := rosetta_g_miss_num_map(ddx_irkv_rec.created_by);
320 p6_a24 := ddx_irkv_rec.creation_date;
321 p6_a25 := rosetta_g_miss_num_map(ddx_irkv_rec.last_updated_by);
322 p6_a26 := ddx_irkv_rec.last_update_date;
323 p6_a27 := rosetta_g_miss_num_map(ddx_irkv_rec.last_update_login);
324 end;
325
326 procedure lock_insurer_rankings(p_api_version NUMBER
327 , p_init_msg_list VARCHAR2
328 , x_return_status out nocopy VARCHAR2
329 , x_msg_count out nocopy NUMBER
330 , x_msg_data out nocopy VARCHAR2
331 , p5_a0 JTF_NUMBER_TABLE
332 , p5_a1 JTF_NUMBER_TABLE
333 , p5_a2 JTF_NUMBER_TABLE
334 , p5_a3 JTF_DATE_TABLE
335 , p5_a4 JTF_DATE_TABLE
336 , p5_a5 JTF_NUMBER_TABLE
337 , p5_a6 JTF_VARCHAR2_TABLE_100
338 , p5_a7 JTF_VARCHAR2_TABLE_300
339 , p5_a8 JTF_VARCHAR2_TABLE_300
340 , p5_a9 JTF_VARCHAR2_TABLE_300
341 , p5_a10 JTF_VARCHAR2_TABLE_300
342 , p5_a11 JTF_VARCHAR2_TABLE_300
343 , p5_a12 JTF_VARCHAR2_TABLE_300
344 , p5_a13 JTF_VARCHAR2_TABLE_300
345 , p5_a14 JTF_VARCHAR2_TABLE_300
346 , p5_a15 JTF_VARCHAR2_TABLE_300
347 , p5_a16 JTF_VARCHAR2_TABLE_300
348 , p5_a17 JTF_VARCHAR2_TABLE_300
349 , p5_a18 JTF_VARCHAR2_TABLE_300
350 , p5_a19 JTF_VARCHAR2_TABLE_300
351 , p5_a20 JTF_VARCHAR2_TABLE_300
352 , p5_a21 JTF_VARCHAR2_TABLE_300
353 , p5_a22 JTF_VARCHAR2_TABLE_300
354 , p5_a23 JTF_NUMBER_TABLE
355 , p5_a24 JTF_DATE_TABLE
356 , p5_a25 JTF_NUMBER_TABLE
357 , p5_a26 JTF_DATE_TABLE
358 , p5_a27 JTF_NUMBER_TABLE
359 )
360
361 as
362 ddp_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
363 ddindx binary_integer; indx binary_integer;
364 begin
365
366 -- copy data to the local IN or IN-OUT args, if any
367
368
369
370
371
372 okl_irk_pvt_w.rosetta_table_copy_in_p2(ddp_irkv_tbl, p5_a0
373 , p5_a1
374 , p5_a2
375 , p5_a3
376 , p5_a4
377 , p5_a5
378 , p5_a6
379 , p5_a7
380 , p5_a8
381 , p5_a9
382 , p5_a10
383 , p5_a11
384 , p5_a12
385 , p5_a13
386 , p5_a14
387 , p5_a15
388 , p5_a16
389 , p5_a17
390 , p5_a18
391 , p5_a19
392 , p5_a20
393 , p5_a21
394 , p5_a22
395 , p5_a23
396 , p5_a24
397 , p5_a25
398 , p5_a26
399 , p5_a27
400 );
401
402 -- here's the delegated call to the old PL/SQL routine
403 okl_insurer_rankings_pub.lock_insurer_rankings(p_api_version,
404 p_init_msg_list,
405 x_return_status,
406 x_msg_count,
407 x_msg_data,
408 ddp_irkv_tbl);
409
410 -- copy data back from the local variables to OUT or IN-OUT args, if any
411
412
413
414
415
416 end;
417
418 procedure lock_insurer_rankings(p_api_version NUMBER
419 , p_init_msg_list VARCHAR2
420 , x_return_status out nocopy VARCHAR2
421 , x_msg_count out nocopy NUMBER
422 , x_msg_data out nocopy VARCHAR2
423 , p5_a0 NUMBER := 0-1962.0724
424 , p5_a1 NUMBER := 0-1962.0724
425 , p5_a2 NUMBER := 0-1962.0724
426 , p5_a3 DATE := fnd_api.g_miss_date
427 , p5_a4 DATE := fnd_api.g_miss_date
428 , p5_a5 NUMBER := 0-1962.0724
429 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
430 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
431 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
432 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
433 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
434 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
435 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
436 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
437 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
438 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
439 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
440 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
441 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
442 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
443 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
444 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
445 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
446 , p5_a23 NUMBER := 0-1962.0724
447 , p5_a24 DATE := fnd_api.g_miss_date
448 , p5_a25 NUMBER := 0-1962.0724
449 , p5_a26 DATE := fnd_api.g_miss_date
450 , p5_a27 NUMBER := 0-1962.0724
451 )
452
453 as
454 ddp_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
455 ddindx binary_integer; indx binary_integer;
456 begin
457
458 -- copy data to the local IN or IN-OUT args, if any
459
460
461
462
463
464 ddp_irkv_rec.id := rosetta_g_miss_num_map(p5_a0);
465 ddp_irkv_rec.ranking_seq := rosetta_g_miss_num_map(p5_a1);
466 ddp_irkv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
467 ddp_irkv_rec.date_from := rosetta_g_miss_date_in_map(p5_a3);
468 ddp_irkv_rec.date_to := rosetta_g_miss_date_in_map(p5_a4);
469 ddp_irkv_rec.isu_id := rosetta_g_miss_num_map(p5_a5);
470 ddp_irkv_rec.ic_code := p5_a6;
471 ddp_irkv_rec.attribute_category := p5_a7;
472 ddp_irkv_rec.attribute1 := p5_a8;
473 ddp_irkv_rec.attribute2 := p5_a9;
474 ddp_irkv_rec.attribute3 := p5_a10;
475 ddp_irkv_rec.attribute4 := p5_a11;
476 ddp_irkv_rec.attribute5 := p5_a12;
477 ddp_irkv_rec.attribute6 := p5_a13;
478 ddp_irkv_rec.attribute7 := p5_a14;
479 ddp_irkv_rec.attribute8 := p5_a15;
480 ddp_irkv_rec.attribute9 := p5_a16;
481 ddp_irkv_rec.attribute10 := p5_a17;
482 ddp_irkv_rec.attribute11 := p5_a18;
483 ddp_irkv_rec.attribute12 := p5_a19;
484 ddp_irkv_rec.attribute13 := p5_a20;
485 ddp_irkv_rec.attribute14 := p5_a21;
486 ddp_irkv_rec.attribute15 := p5_a22;
487 ddp_irkv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
488 ddp_irkv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
489 ddp_irkv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
490 ddp_irkv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
491 ddp_irkv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
492
493 -- here's the delegated call to the old PL/SQL routine
494 okl_insurer_rankings_pub.lock_insurer_rankings(p_api_version,
495 p_init_msg_list,
496 x_return_status,
497 x_msg_count,
498 x_msg_data,
499 ddp_irkv_rec);
500
501 -- copy data back from the local variables to OUT or IN-OUT args, if any
502
503
504
505
506
507 end;
508
509 procedure update_insurer_rankings(p_api_version NUMBER
510 , p_init_msg_list VARCHAR2
511 , x_return_status out nocopy VARCHAR2
512 , x_msg_count out nocopy NUMBER
513 , x_msg_data out nocopy VARCHAR2
514 , p5_a0 JTF_NUMBER_TABLE
515 , p5_a1 JTF_NUMBER_TABLE
516 , p5_a2 JTF_NUMBER_TABLE
517 , p5_a3 JTF_DATE_TABLE
518 , p5_a4 JTF_DATE_TABLE
519 , p5_a5 JTF_NUMBER_TABLE
520 , p5_a6 JTF_VARCHAR2_TABLE_100
521 , p5_a7 JTF_VARCHAR2_TABLE_300
522 , p5_a8 JTF_VARCHAR2_TABLE_300
523 , p5_a9 JTF_VARCHAR2_TABLE_300
524 , p5_a10 JTF_VARCHAR2_TABLE_300
525 , p5_a11 JTF_VARCHAR2_TABLE_300
526 , p5_a12 JTF_VARCHAR2_TABLE_300
527 , p5_a13 JTF_VARCHAR2_TABLE_300
528 , p5_a14 JTF_VARCHAR2_TABLE_300
529 , p5_a15 JTF_VARCHAR2_TABLE_300
530 , p5_a16 JTF_VARCHAR2_TABLE_300
531 , p5_a17 JTF_VARCHAR2_TABLE_300
532 , p5_a18 JTF_VARCHAR2_TABLE_300
533 , p5_a19 JTF_VARCHAR2_TABLE_300
534 , p5_a20 JTF_VARCHAR2_TABLE_300
535 , p5_a21 JTF_VARCHAR2_TABLE_300
536 , p5_a22 JTF_VARCHAR2_TABLE_300
537 , p5_a23 JTF_NUMBER_TABLE
538 , p5_a24 JTF_DATE_TABLE
539 , p5_a25 JTF_NUMBER_TABLE
540 , p5_a26 JTF_DATE_TABLE
541 , p5_a27 JTF_NUMBER_TABLE
542 , p6_a0 out nocopy JTF_NUMBER_TABLE
543 , p6_a1 out nocopy JTF_NUMBER_TABLE
544 , p6_a2 out nocopy JTF_NUMBER_TABLE
545 , p6_a3 out nocopy JTF_DATE_TABLE
546 , p6_a4 out nocopy JTF_DATE_TABLE
547 , p6_a5 out nocopy JTF_NUMBER_TABLE
548 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
549 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_300
550 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_300
551 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_300
552 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_300
553 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_300
554 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_300
555 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_300
556 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_300
557 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_300
558 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_300
559 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_300
560 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_300
561 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_300
562 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_300
563 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_300
564 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_300
565 , p6_a23 out nocopy JTF_NUMBER_TABLE
566 , p6_a24 out nocopy JTF_DATE_TABLE
567 , p6_a25 out nocopy JTF_NUMBER_TABLE
568 , p6_a26 out nocopy JTF_DATE_TABLE
569 , p6_a27 out nocopy JTF_NUMBER_TABLE
570 )
571
572 as
573 ddp_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
574 ddx_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
575 ddindx binary_integer; indx binary_integer;
576 begin
577
578 -- copy data to the local IN or IN-OUT args, if any
579
580
581
582
583
584 okl_irk_pvt_w.rosetta_table_copy_in_p2(ddp_irkv_tbl, p5_a0
585 , p5_a1
586 , p5_a2
587 , p5_a3
588 , p5_a4
589 , p5_a5
590 , p5_a6
591 , p5_a7
592 , p5_a8
593 , p5_a9
594 , p5_a10
595 , p5_a11
596 , p5_a12
597 , p5_a13
598 , p5_a14
599 , p5_a15
600 , p5_a16
601 , p5_a17
602 , p5_a18
603 , p5_a19
604 , p5_a20
605 , p5_a21
606 , p5_a22
607 , p5_a23
608 , p5_a24
609 , p5_a25
610 , p5_a26
611 , p5_a27
612 );
613
614
615 -- here's the delegated call to the old PL/SQL routine
616 okl_insurer_rankings_pub.update_insurer_rankings(p_api_version,
617 p_init_msg_list,
618 x_return_status,
619 x_msg_count,
620 x_msg_data,
621 ddp_irkv_tbl,
622 ddx_irkv_tbl);
623
624 -- copy data back from the local variables to OUT or IN-OUT args, if any
625
626
627
628
629
630
631 okl_irk_pvt_w.rosetta_table_copy_out_p2(ddx_irkv_tbl, p6_a0
632 , p6_a1
633 , p6_a2
634 , p6_a3
635 , p6_a4
636 , p6_a5
637 , p6_a6
638 , p6_a7
639 , p6_a8
640 , p6_a9
641 , p6_a10
642 , p6_a11
643 , p6_a12
644 , p6_a13
645 , p6_a14
646 , p6_a15
647 , p6_a16
648 , p6_a17
649 , p6_a18
650 , p6_a19
651 , p6_a20
652 , p6_a21
653 , p6_a22
654 , p6_a23
655 , p6_a24
656 , p6_a25
657 , p6_a26
658 , p6_a27
659 );
660 end;
661
662 procedure update_insurer_rankings(p_api_version NUMBER
663 , p_init_msg_list VARCHAR2
664 , x_return_status out nocopy VARCHAR2
665 , x_msg_count out nocopy NUMBER
666 , x_msg_data out nocopy VARCHAR2
667 , p6_a0 out nocopy NUMBER
668 , p6_a1 out nocopy NUMBER
669 , p6_a2 out nocopy NUMBER
670 , p6_a3 out nocopy DATE
671 , p6_a4 out nocopy DATE
672 , p6_a5 out nocopy NUMBER
673 , p6_a6 out nocopy VARCHAR2
674 , p6_a7 out nocopy VARCHAR2
675 , p6_a8 out nocopy VARCHAR2
676 , p6_a9 out nocopy VARCHAR2
677 , p6_a10 out nocopy VARCHAR2
678 , p6_a11 out nocopy VARCHAR2
679 , p6_a12 out nocopy VARCHAR2
680 , p6_a13 out nocopy VARCHAR2
681 , p6_a14 out nocopy VARCHAR2
682 , p6_a15 out nocopy VARCHAR2
683 , p6_a16 out nocopy VARCHAR2
684 , p6_a17 out nocopy VARCHAR2
685 , p6_a18 out nocopy VARCHAR2
686 , p6_a19 out nocopy VARCHAR2
687 , p6_a20 out nocopy VARCHAR2
688 , p6_a21 out nocopy VARCHAR2
689 , p6_a22 out nocopy VARCHAR2
690 , p6_a23 out nocopy NUMBER
691 , p6_a24 out nocopy DATE
692 , p6_a25 out nocopy NUMBER
693 , p6_a26 out nocopy DATE
694 , p6_a27 out nocopy NUMBER
695 , p5_a0 NUMBER := 0-1962.0724
696 , p5_a1 NUMBER := 0-1962.0724
697 , p5_a2 NUMBER := 0-1962.0724
698 , p5_a3 DATE := fnd_api.g_miss_date
699 , p5_a4 DATE := fnd_api.g_miss_date
700 , p5_a5 NUMBER := 0-1962.0724
701 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
702 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
703 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
704 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
705 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
706 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
707 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
708 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
709 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
710 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
711 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
712 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
713 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
714 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
715 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
716 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
717 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
718 , p5_a23 NUMBER := 0-1962.0724
719 , p5_a24 DATE := fnd_api.g_miss_date
720 , p5_a25 NUMBER := 0-1962.0724
721 , p5_a26 DATE := fnd_api.g_miss_date
722 , p5_a27 NUMBER := 0-1962.0724
723 )
724
725 as
726 ddp_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
727 ddx_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
728 ddindx binary_integer; indx binary_integer;
729 begin
730
731 -- copy data to the local IN or IN-OUT args, if any
732
733
734
735
736
737 ddp_irkv_rec.id := rosetta_g_miss_num_map(p5_a0);
738 ddp_irkv_rec.ranking_seq := rosetta_g_miss_num_map(p5_a1);
739 ddp_irkv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
740 ddp_irkv_rec.date_from := rosetta_g_miss_date_in_map(p5_a3);
741 ddp_irkv_rec.date_to := rosetta_g_miss_date_in_map(p5_a4);
742 ddp_irkv_rec.isu_id := rosetta_g_miss_num_map(p5_a5);
743 ddp_irkv_rec.ic_code := p5_a6;
744 ddp_irkv_rec.attribute_category := p5_a7;
745 ddp_irkv_rec.attribute1 := p5_a8;
746 ddp_irkv_rec.attribute2 := p5_a9;
747 ddp_irkv_rec.attribute3 := p5_a10;
748 ddp_irkv_rec.attribute4 := p5_a11;
749 ddp_irkv_rec.attribute5 := p5_a12;
750 ddp_irkv_rec.attribute6 := p5_a13;
751 ddp_irkv_rec.attribute7 := p5_a14;
752 ddp_irkv_rec.attribute8 := p5_a15;
753 ddp_irkv_rec.attribute9 := p5_a16;
754 ddp_irkv_rec.attribute10 := p5_a17;
755 ddp_irkv_rec.attribute11 := p5_a18;
756 ddp_irkv_rec.attribute12 := p5_a19;
757 ddp_irkv_rec.attribute13 := p5_a20;
758 ddp_irkv_rec.attribute14 := p5_a21;
759 ddp_irkv_rec.attribute15 := p5_a22;
760 ddp_irkv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
761 ddp_irkv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
762 ddp_irkv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
763 ddp_irkv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
764 ddp_irkv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
765
766
767 -- here's the delegated call to the old PL/SQL routine
768 okl_insurer_rankings_pub.update_insurer_rankings(p_api_version,
769 p_init_msg_list,
770 x_return_status,
771 x_msg_count,
772 x_msg_data,
773 ddp_irkv_rec,
774 ddx_irkv_rec);
775
776 -- copy data back from the local variables to OUT or IN-OUT args, if any
777
778
779
780
781
782
783 p6_a0 := rosetta_g_miss_num_map(ddx_irkv_rec.id);
784 p6_a1 := rosetta_g_miss_num_map(ddx_irkv_rec.ranking_seq);
785 p6_a2 := rosetta_g_miss_num_map(ddx_irkv_rec.object_version_number);
786 p6_a3 := ddx_irkv_rec.date_from;
787 p6_a4 := ddx_irkv_rec.date_to;
788 p6_a5 := rosetta_g_miss_num_map(ddx_irkv_rec.isu_id);
789 p6_a6 := ddx_irkv_rec.ic_code;
790 p6_a7 := ddx_irkv_rec.attribute_category;
791 p6_a8 := ddx_irkv_rec.attribute1;
792 p6_a9 := ddx_irkv_rec.attribute2;
793 p6_a10 := ddx_irkv_rec.attribute3;
794 p6_a11 := ddx_irkv_rec.attribute4;
795 p6_a12 := ddx_irkv_rec.attribute5;
796 p6_a13 := ddx_irkv_rec.attribute6;
797 p6_a14 := ddx_irkv_rec.attribute7;
798 p6_a15 := ddx_irkv_rec.attribute8;
799 p6_a16 := ddx_irkv_rec.attribute9;
800 p6_a17 := ddx_irkv_rec.attribute10;
801 p6_a18 := ddx_irkv_rec.attribute11;
802 p6_a19 := ddx_irkv_rec.attribute12;
803 p6_a20 := ddx_irkv_rec.attribute13;
804 p6_a21 := ddx_irkv_rec.attribute14;
805 p6_a22 := ddx_irkv_rec.attribute15;
806 p6_a23 := rosetta_g_miss_num_map(ddx_irkv_rec.created_by);
807 p6_a24 := ddx_irkv_rec.creation_date;
808 p6_a25 := rosetta_g_miss_num_map(ddx_irkv_rec.last_updated_by);
809 p6_a26 := ddx_irkv_rec.last_update_date;
810 p6_a27 := rosetta_g_miss_num_map(ddx_irkv_rec.last_update_login);
811 end;
812
813 procedure delete_insurer_rankings(p_api_version NUMBER
814 , p_init_msg_list VARCHAR2
815 , x_return_status out nocopy VARCHAR2
816 , x_msg_count out nocopy NUMBER
817 , x_msg_data out nocopy VARCHAR2
818 , p5_a0 JTF_NUMBER_TABLE
819 , p5_a1 JTF_NUMBER_TABLE
820 , p5_a2 JTF_NUMBER_TABLE
821 , p5_a3 JTF_DATE_TABLE
822 , p5_a4 JTF_DATE_TABLE
823 , p5_a5 JTF_NUMBER_TABLE
824 , p5_a6 JTF_VARCHAR2_TABLE_100
825 , p5_a7 JTF_VARCHAR2_TABLE_300
826 , p5_a8 JTF_VARCHAR2_TABLE_300
827 , p5_a9 JTF_VARCHAR2_TABLE_300
828 , p5_a10 JTF_VARCHAR2_TABLE_300
829 , p5_a11 JTF_VARCHAR2_TABLE_300
830 , p5_a12 JTF_VARCHAR2_TABLE_300
831 , p5_a13 JTF_VARCHAR2_TABLE_300
832 , p5_a14 JTF_VARCHAR2_TABLE_300
833 , p5_a15 JTF_VARCHAR2_TABLE_300
834 , p5_a16 JTF_VARCHAR2_TABLE_300
835 , p5_a17 JTF_VARCHAR2_TABLE_300
836 , p5_a18 JTF_VARCHAR2_TABLE_300
837 , p5_a19 JTF_VARCHAR2_TABLE_300
838 , p5_a20 JTF_VARCHAR2_TABLE_300
839 , p5_a21 JTF_VARCHAR2_TABLE_300
840 , p5_a22 JTF_VARCHAR2_TABLE_300
841 , p5_a23 JTF_NUMBER_TABLE
842 , p5_a24 JTF_DATE_TABLE
843 , p5_a25 JTF_NUMBER_TABLE
844 , p5_a26 JTF_DATE_TABLE
845 , p5_a27 JTF_NUMBER_TABLE
846 )
847
848 as
849 ddp_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
850 ddindx binary_integer; indx binary_integer;
851 begin
852
853 -- copy data to the local IN or IN-OUT args, if any
854
855
856
857
858
859 okl_irk_pvt_w.rosetta_table_copy_in_p2(ddp_irkv_tbl, p5_a0
860 , p5_a1
861 , p5_a2
862 , p5_a3
863 , p5_a4
864 , p5_a5
865 , p5_a6
866 , p5_a7
867 , p5_a8
868 , p5_a9
869 , p5_a10
870 , p5_a11
871 , p5_a12
872 , p5_a13
873 , p5_a14
874 , p5_a15
875 , p5_a16
876 , p5_a17
877 , p5_a18
878 , p5_a19
879 , p5_a20
880 , p5_a21
881 , p5_a22
882 , p5_a23
883 , p5_a24
884 , p5_a25
885 , p5_a26
886 , p5_a27
887 );
888
889 -- here's the delegated call to the old PL/SQL routine
890 okl_insurer_rankings_pub.delete_insurer_rankings(p_api_version,
891 p_init_msg_list,
892 x_return_status,
893 x_msg_count,
894 x_msg_data,
895 ddp_irkv_tbl);
896
897 -- copy data back from the local variables to OUT or IN-OUT args, if any
898
899
900
901
902
903 end;
904
905 procedure delete_insurer_rankings(p_api_version NUMBER
906 , p_init_msg_list VARCHAR2
907 , x_return_status out nocopy VARCHAR2
908 , x_msg_count out nocopy NUMBER
909 , x_msg_data out nocopy VARCHAR2
910 , p5_a0 NUMBER := 0-1962.0724
911 , p5_a1 NUMBER := 0-1962.0724
912 , p5_a2 NUMBER := 0-1962.0724
913 , p5_a3 DATE := fnd_api.g_miss_date
914 , p5_a4 DATE := fnd_api.g_miss_date
915 , p5_a5 NUMBER := 0-1962.0724
916 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
917 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
918 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
919 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
920 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
921 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
922 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
923 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
924 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
925 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
926 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
927 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
928 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
929 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
930 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
931 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
932 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
933 , p5_a23 NUMBER := 0-1962.0724
934 , p5_a24 DATE := fnd_api.g_miss_date
935 , p5_a25 NUMBER := 0-1962.0724
936 , p5_a26 DATE := fnd_api.g_miss_date
937 , p5_a27 NUMBER := 0-1962.0724
938 )
939
940 as
941 ddp_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
942 ddindx binary_integer; indx binary_integer;
943 begin
944
945 -- copy data to the local IN or IN-OUT args, if any
946
947
948
949
950
951 ddp_irkv_rec.id := rosetta_g_miss_num_map(p5_a0);
952 ddp_irkv_rec.ranking_seq := rosetta_g_miss_num_map(p5_a1);
953 ddp_irkv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
954 ddp_irkv_rec.date_from := rosetta_g_miss_date_in_map(p5_a3);
955 ddp_irkv_rec.date_to := rosetta_g_miss_date_in_map(p5_a4);
956 ddp_irkv_rec.isu_id := rosetta_g_miss_num_map(p5_a5);
957 ddp_irkv_rec.ic_code := p5_a6;
958 ddp_irkv_rec.attribute_category := p5_a7;
959 ddp_irkv_rec.attribute1 := p5_a8;
960 ddp_irkv_rec.attribute2 := p5_a9;
961 ddp_irkv_rec.attribute3 := p5_a10;
962 ddp_irkv_rec.attribute4 := p5_a11;
963 ddp_irkv_rec.attribute5 := p5_a12;
964 ddp_irkv_rec.attribute6 := p5_a13;
965 ddp_irkv_rec.attribute7 := p5_a14;
966 ddp_irkv_rec.attribute8 := p5_a15;
967 ddp_irkv_rec.attribute9 := p5_a16;
968 ddp_irkv_rec.attribute10 := p5_a17;
969 ddp_irkv_rec.attribute11 := p5_a18;
970 ddp_irkv_rec.attribute12 := p5_a19;
971 ddp_irkv_rec.attribute13 := p5_a20;
972 ddp_irkv_rec.attribute14 := p5_a21;
973 ddp_irkv_rec.attribute15 := p5_a22;
974 ddp_irkv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
975 ddp_irkv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
976 ddp_irkv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
977 ddp_irkv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
978 ddp_irkv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
979
980 -- here's the delegated call to the old PL/SQL routine
981 okl_insurer_rankings_pub.delete_insurer_rankings(p_api_version,
982 p_init_msg_list,
983 x_return_status,
984 x_msg_count,
985 x_msg_data,
986 ddp_irkv_rec);
987
988 -- copy data back from the local variables to OUT or IN-OUT args, if any
989
990
991
992
993
994 end;
995
996 procedure validate_insurer_rankings(p_api_version NUMBER
997 , p_init_msg_list VARCHAR2
998 , x_return_status out nocopy VARCHAR2
999 , x_msg_count out nocopy NUMBER
1000 , x_msg_data out nocopy VARCHAR2
1001 , p5_a0 JTF_NUMBER_TABLE
1002 , p5_a1 JTF_NUMBER_TABLE
1003 , p5_a2 JTF_NUMBER_TABLE
1004 , p5_a3 JTF_DATE_TABLE
1005 , p5_a4 JTF_DATE_TABLE
1006 , p5_a5 JTF_NUMBER_TABLE
1007 , p5_a6 JTF_VARCHAR2_TABLE_100
1008 , p5_a7 JTF_VARCHAR2_TABLE_300
1009 , p5_a8 JTF_VARCHAR2_TABLE_300
1010 , p5_a9 JTF_VARCHAR2_TABLE_300
1011 , p5_a10 JTF_VARCHAR2_TABLE_300
1012 , p5_a11 JTF_VARCHAR2_TABLE_300
1013 , p5_a12 JTF_VARCHAR2_TABLE_300
1014 , p5_a13 JTF_VARCHAR2_TABLE_300
1015 , p5_a14 JTF_VARCHAR2_TABLE_300
1016 , p5_a15 JTF_VARCHAR2_TABLE_300
1017 , p5_a16 JTF_VARCHAR2_TABLE_300
1018 , p5_a17 JTF_VARCHAR2_TABLE_300
1019 , p5_a18 JTF_VARCHAR2_TABLE_300
1020 , p5_a19 JTF_VARCHAR2_TABLE_300
1021 , p5_a20 JTF_VARCHAR2_TABLE_300
1022 , p5_a21 JTF_VARCHAR2_TABLE_300
1023 , p5_a22 JTF_VARCHAR2_TABLE_300
1024 , p5_a23 JTF_NUMBER_TABLE
1025 , p5_a24 JTF_DATE_TABLE
1026 , p5_a25 JTF_NUMBER_TABLE
1027 , p5_a26 JTF_DATE_TABLE
1028 , p5_a27 JTF_NUMBER_TABLE
1029 )
1030
1031 as
1032 ddp_irkv_tbl okl_insurer_rankings_pub.irkv_tbl_type;
1033 ddindx binary_integer; indx binary_integer;
1034 begin
1035
1036 -- copy data to the local IN or IN-OUT args, if any
1037
1038
1039
1040
1041
1042 okl_irk_pvt_w.rosetta_table_copy_in_p2(ddp_irkv_tbl, p5_a0
1043 , p5_a1
1044 , p5_a2
1045 , p5_a3
1046 , p5_a4
1047 , p5_a5
1048 , p5_a6
1049 , p5_a7
1050 , p5_a8
1051 , p5_a9
1052 , p5_a10
1053 , p5_a11
1054 , p5_a12
1055 , p5_a13
1056 , p5_a14
1057 , p5_a15
1058 , p5_a16
1059 , p5_a17
1060 , p5_a18
1061 , p5_a19
1062 , p5_a20
1063 , p5_a21
1064 , p5_a22
1065 , p5_a23
1066 , p5_a24
1067 , p5_a25
1068 , p5_a26
1069 , p5_a27
1070 );
1071
1072 -- here's the delegated call to the old PL/SQL routine
1073 okl_insurer_rankings_pub.validate_insurer_rankings(p_api_version,
1074 p_init_msg_list,
1075 x_return_status,
1076 x_msg_count,
1077 x_msg_data,
1078 ddp_irkv_tbl);
1079
1080 -- copy data back from the local variables to OUT or IN-OUT args, if any
1081
1082
1083
1084
1085
1086 end;
1087
1088 procedure validate_insurer_rankings(p_api_version NUMBER
1089 , p_init_msg_list VARCHAR2
1090 , x_return_status out nocopy VARCHAR2
1091 , x_msg_count out nocopy NUMBER
1092 , x_msg_data out nocopy VARCHAR2
1093 , p5_a0 NUMBER := 0-1962.0724
1094 , p5_a1 NUMBER := 0-1962.0724
1095 , p5_a2 NUMBER := 0-1962.0724
1096 , p5_a3 DATE := fnd_api.g_miss_date
1097 , p5_a4 DATE := fnd_api.g_miss_date
1098 , p5_a5 NUMBER := 0-1962.0724
1099 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1100 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1101 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1102 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1103 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1104 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1105 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1106 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1107 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1108 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1109 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1110 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1111 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1112 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1113 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1114 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1115 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1116 , p5_a23 NUMBER := 0-1962.0724
1117 , p5_a24 DATE := fnd_api.g_miss_date
1118 , p5_a25 NUMBER := 0-1962.0724
1119 , p5_a26 DATE := fnd_api.g_miss_date
1120 , p5_a27 NUMBER := 0-1962.0724
1121 )
1122
1123 as
1124 ddp_irkv_rec okl_insurer_rankings_pub.irkv_rec_type;
1125 ddindx binary_integer; indx binary_integer;
1126 begin
1127
1128 -- copy data to the local IN or IN-OUT args, if any
1129
1130
1131
1132
1133
1134 ddp_irkv_rec.id := rosetta_g_miss_num_map(p5_a0);
1135 ddp_irkv_rec.ranking_seq := rosetta_g_miss_num_map(p5_a1);
1136 ddp_irkv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
1137 ddp_irkv_rec.date_from := rosetta_g_miss_date_in_map(p5_a3);
1138 ddp_irkv_rec.date_to := rosetta_g_miss_date_in_map(p5_a4);
1139 ddp_irkv_rec.isu_id := rosetta_g_miss_num_map(p5_a5);
1140 ddp_irkv_rec.ic_code := p5_a6;
1141 ddp_irkv_rec.attribute_category := p5_a7;
1142 ddp_irkv_rec.attribute1 := p5_a8;
1143 ddp_irkv_rec.attribute2 := p5_a9;
1144 ddp_irkv_rec.attribute3 := p5_a10;
1145 ddp_irkv_rec.attribute4 := p5_a11;
1146 ddp_irkv_rec.attribute5 := p5_a12;
1147 ddp_irkv_rec.attribute6 := p5_a13;
1148 ddp_irkv_rec.attribute7 := p5_a14;
1149 ddp_irkv_rec.attribute8 := p5_a15;
1150 ddp_irkv_rec.attribute9 := p5_a16;
1151 ddp_irkv_rec.attribute10 := p5_a17;
1152 ddp_irkv_rec.attribute11 := p5_a18;
1153 ddp_irkv_rec.attribute12 := p5_a19;
1154 ddp_irkv_rec.attribute13 := p5_a20;
1155 ddp_irkv_rec.attribute14 := p5_a21;
1156 ddp_irkv_rec.attribute15 := p5_a22;
1157 ddp_irkv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
1158 ddp_irkv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
1159 ddp_irkv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
1160 ddp_irkv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
1161 ddp_irkv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1162
1163 -- here's the delegated call to the old PL/SQL routine
1164 okl_insurer_rankings_pub.validate_insurer_rankings(p_api_version,
1165 p_init_msg_list,
1166 x_return_status,
1167 x_msg_count,
1168 x_msg_data,
1169 ddp_irkv_rec);
1170
1171 -- copy data back from the local variables to OUT or IN-OUT args, if any
1172
1173
1174
1175
1176
1177 end;
1178
1179 end okl_insurer_rankings_pub_w;