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