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