[Home] [Help]
PACKAGE BODY: APPS.OKL_CLG_PVT_W
Source
1 package body okl_clg_pvt_w as
2 /* $Header: OKLICLGB.pls 120.2 2006/11/22 13:57:13 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 rosetta_table_copy_in_p2(t out nocopy okl_clg_pvt.clg_tbl_type, a0 JTF_NUMBER_TABLE
23 , a1 JTF_NUMBER_TABLE
24 , a2 JTF_VARCHAR2_TABLE_100
25 , a3 JTF_NUMBER_TABLE
26 , a4 JTF_NUMBER_TABLE
27 , a5 JTF_NUMBER_TABLE
28 , a6 JTF_NUMBER_TABLE
29 , a7 JTF_NUMBER_TABLE
30 , a8 JTF_NUMBER_TABLE
31 , a9 JTF_VARCHAR2_TABLE_100
32 , a10 JTF_VARCHAR2_TABLE_500
33 , a11 JTF_VARCHAR2_TABLE_500
34 , a12 JTF_VARCHAR2_TABLE_500
35 , a13 JTF_VARCHAR2_TABLE_500
36 , a14 JTF_VARCHAR2_TABLE_500
37 , a15 JTF_VARCHAR2_TABLE_500
38 , a16 JTF_VARCHAR2_TABLE_500
39 , a17 JTF_VARCHAR2_TABLE_500
40 , a18 JTF_VARCHAR2_TABLE_500
41 , a19 JTF_VARCHAR2_TABLE_500
42 , a20 JTF_VARCHAR2_TABLE_500
43 , a21 JTF_VARCHAR2_TABLE_500
44 , a22 JTF_VARCHAR2_TABLE_500
45 , a23 JTF_VARCHAR2_TABLE_500
46 , a24 JTF_VARCHAR2_TABLE_500
47 , a25 JTF_NUMBER_TABLE
48 , a26 JTF_DATE_TABLE
49 , a27 JTF_NUMBER_TABLE
50 , a28 JTF_DATE_TABLE
51 , a29 JTF_NUMBER_TABLE
52 , a30 JTF_DATE_TABLE
53 , a31 JTF_DATE_TABLE
54 , a32 JTF_NUMBER_TABLE
55 , a33 JTF_NUMBER_TABLE
56 ) as
57 ddindx binary_integer; indx binary_integer;
58 begin
59 if a0 is not null and a0.count > 0 then
60 if a0.count > 0 then
61 indx := a0.first;
62 ddindx := 1;
63 while true loop
64 t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
65 t(ddindx).org_id := rosetta_g_miss_num_map(a1(indx));
66 t(ddindx).currency_code := a2(indx);
67 t(ddindx).inf_id := rosetta_g_miss_num_map(a3(indx));
68 t(ddindx).ica_id := rosetta_g_miss_num_map(a4(indx));
69 t(ddindx).ibt_id := rosetta_g_miss_num_map(a5(indx));
70 t(ddindx).irm_id := rosetta_g_miss_num_map(a6(indx));
71 t(ddindx).iuv_id := rosetta_g_miss_num_map(a7(indx));
72 t(ddindx).object_version_number := rosetta_g_miss_num_map(a8(indx));
73 t(ddindx).attribute_category := a9(indx);
74 t(ddindx).attribute1 := a10(indx);
75 t(ddindx).attribute2 := a11(indx);
76 t(ddindx).attribute3 := a12(indx);
77 t(ddindx).attribute4 := a13(indx);
78 t(ddindx).attribute5 := a14(indx);
79 t(ddindx).attribute6 := a15(indx);
80 t(ddindx).attribute7 := a16(indx);
81 t(ddindx).attribute8 := a17(indx);
82 t(ddindx).attribute9 := a18(indx);
83 t(ddindx).attribute10 := a19(indx);
84 t(ddindx).attribute11 := a20(indx);
85 t(ddindx).attribute12 := a21(indx);
86 t(ddindx).attribute13 := a22(indx);
87 t(ddindx).attribute14 := a23(indx);
88 t(ddindx).attribute15 := a24(indx);
89 t(ddindx).created_by := rosetta_g_miss_num_map(a25(indx));
90 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a26(indx));
91 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a27(indx));
92 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a28(indx));
93 t(ddindx).last_update_login := rosetta_g_miss_num_map(a29(indx));
94 t(ddindx).effective_date_from := rosetta_g_miss_date_in_map(a30(indx));
95 t(ddindx).effective_date_to := rosetta_g_miss_date_in_map(a31(indx));
96 t(ddindx).ipl_id := rosetta_g_miss_num_map(a32(indx));
97 t(ddindx).legal_entity_id := rosetta_g_miss_num_map(a33(indx));
98 ddindx := ddindx+1;
99 if a0.last =indx
100 then exit;
101 end if;
102 indx := a0.next(indx);
103 end loop;
104 end if;
105 end if;
106 end rosetta_table_copy_in_p2;
107 procedure rosetta_table_copy_out_p2(t okl_clg_pvt.clg_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
108 , a1 out nocopy JTF_NUMBER_TABLE
109 , a2 out nocopy JTF_VARCHAR2_TABLE_100
110 , a3 out nocopy JTF_NUMBER_TABLE
111 , a4 out nocopy JTF_NUMBER_TABLE
112 , a5 out nocopy JTF_NUMBER_TABLE
113 , a6 out nocopy JTF_NUMBER_TABLE
114 , a7 out nocopy JTF_NUMBER_TABLE
115 , a8 out nocopy JTF_NUMBER_TABLE
116 , a9 out nocopy JTF_VARCHAR2_TABLE_100
117 , a10 out nocopy JTF_VARCHAR2_TABLE_500
118 , a11 out nocopy JTF_VARCHAR2_TABLE_500
119 , a12 out nocopy JTF_VARCHAR2_TABLE_500
120 , a13 out nocopy JTF_VARCHAR2_TABLE_500
121 , a14 out nocopy JTF_VARCHAR2_TABLE_500
122 , a15 out nocopy JTF_VARCHAR2_TABLE_500
123 , a16 out nocopy JTF_VARCHAR2_TABLE_500
124 , a17 out nocopy JTF_VARCHAR2_TABLE_500
125 , a18 out nocopy JTF_VARCHAR2_TABLE_500
126 , a19 out nocopy JTF_VARCHAR2_TABLE_500
127 , a20 out nocopy JTF_VARCHAR2_TABLE_500
128 , a21 out nocopy JTF_VARCHAR2_TABLE_500
129 , a22 out nocopy JTF_VARCHAR2_TABLE_500
130 , a23 out nocopy JTF_VARCHAR2_TABLE_500
131 , a24 out nocopy JTF_VARCHAR2_TABLE_500
132 , a25 out nocopy JTF_NUMBER_TABLE
133 , a26 out nocopy JTF_DATE_TABLE
134 , a27 out nocopy JTF_NUMBER_TABLE
135 , a28 out nocopy JTF_DATE_TABLE
136 , a29 out nocopy JTF_NUMBER_TABLE
137 , a30 out nocopy JTF_DATE_TABLE
138 , a31 out nocopy JTF_DATE_TABLE
139 , a32 out nocopy JTF_NUMBER_TABLE
140 , a33 out nocopy JTF_NUMBER_TABLE
141 ) as
142 ddindx binary_integer; indx binary_integer;
143 begin
144 if t is null or t.count = 0 then
145 a0 := JTF_NUMBER_TABLE();
146 a1 := JTF_NUMBER_TABLE();
147 a2 := JTF_VARCHAR2_TABLE_100();
148 a3 := JTF_NUMBER_TABLE();
149 a4 := JTF_NUMBER_TABLE();
150 a5 := JTF_NUMBER_TABLE();
151 a6 := JTF_NUMBER_TABLE();
152 a7 := JTF_NUMBER_TABLE();
153 a8 := JTF_NUMBER_TABLE();
154 a9 := JTF_VARCHAR2_TABLE_100();
155 a10 := JTF_VARCHAR2_TABLE_500();
156 a11 := JTF_VARCHAR2_TABLE_500();
157 a12 := JTF_VARCHAR2_TABLE_500();
158 a13 := JTF_VARCHAR2_TABLE_500();
159 a14 := JTF_VARCHAR2_TABLE_500();
160 a15 := JTF_VARCHAR2_TABLE_500();
161 a16 := JTF_VARCHAR2_TABLE_500();
162 a17 := JTF_VARCHAR2_TABLE_500();
163 a18 := JTF_VARCHAR2_TABLE_500();
164 a19 := JTF_VARCHAR2_TABLE_500();
165 a20 := JTF_VARCHAR2_TABLE_500();
166 a21 := JTF_VARCHAR2_TABLE_500();
167 a22 := JTF_VARCHAR2_TABLE_500();
168 a23 := JTF_VARCHAR2_TABLE_500();
169 a24 := JTF_VARCHAR2_TABLE_500();
170 a25 := JTF_NUMBER_TABLE();
171 a26 := JTF_DATE_TABLE();
172 a27 := JTF_NUMBER_TABLE();
173 a28 := JTF_DATE_TABLE();
174 a29 := JTF_NUMBER_TABLE();
175 a30 := JTF_DATE_TABLE();
176 a31 := JTF_DATE_TABLE();
177 a32 := JTF_NUMBER_TABLE();
178 a33 := JTF_NUMBER_TABLE();
179 else
180 a0 := JTF_NUMBER_TABLE();
181 a1 := JTF_NUMBER_TABLE();
182 a2 := JTF_VARCHAR2_TABLE_100();
183 a3 := JTF_NUMBER_TABLE();
184 a4 := JTF_NUMBER_TABLE();
185 a5 := JTF_NUMBER_TABLE();
186 a6 := JTF_NUMBER_TABLE();
187 a7 := JTF_NUMBER_TABLE();
188 a8 := JTF_NUMBER_TABLE();
189 a9 := JTF_VARCHAR2_TABLE_100();
190 a10 := JTF_VARCHAR2_TABLE_500();
191 a11 := JTF_VARCHAR2_TABLE_500();
192 a12 := JTF_VARCHAR2_TABLE_500();
193 a13 := JTF_VARCHAR2_TABLE_500();
194 a14 := JTF_VARCHAR2_TABLE_500();
195 a15 := JTF_VARCHAR2_TABLE_500();
196 a16 := JTF_VARCHAR2_TABLE_500();
197 a17 := JTF_VARCHAR2_TABLE_500();
198 a18 := JTF_VARCHAR2_TABLE_500();
199 a19 := JTF_VARCHAR2_TABLE_500();
200 a20 := JTF_VARCHAR2_TABLE_500();
201 a21 := JTF_VARCHAR2_TABLE_500();
202 a22 := JTF_VARCHAR2_TABLE_500();
203 a23 := JTF_VARCHAR2_TABLE_500();
204 a24 := JTF_VARCHAR2_TABLE_500();
205 a25 := JTF_NUMBER_TABLE();
206 a26 := JTF_DATE_TABLE();
207 a27 := JTF_NUMBER_TABLE();
208 a28 := JTF_DATE_TABLE();
209 a29 := JTF_NUMBER_TABLE();
210 a30 := JTF_DATE_TABLE();
211 a31 := JTF_DATE_TABLE();
212 a32 := JTF_NUMBER_TABLE();
213 a33 := JTF_NUMBER_TABLE();
214 if t.count > 0 then
215 a0.extend(t.count);
216 a1.extend(t.count);
217 a2.extend(t.count);
218 a3.extend(t.count);
219 a4.extend(t.count);
220 a5.extend(t.count);
221 a6.extend(t.count);
222 a7.extend(t.count);
223 a8.extend(t.count);
224 a9.extend(t.count);
225 a10.extend(t.count);
226 a11.extend(t.count);
227 a12.extend(t.count);
228 a13.extend(t.count);
229 a14.extend(t.count);
230 a15.extend(t.count);
231 a16.extend(t.count);
232 a17.extend(t.count);
233 a18.extend(t.count);
234 a19.extend(t.count);
235 a20.extend(t.count);
236 a21.extend(t.count);
237 a22.extend(t.count);
238 a23.extend(t.count);
239 a24.extend(t.count);
240 a25.extend(t.count);
241 a26.extend(t.count);
242 a27.extend(t.count);
243 a28.extend(t.count);
244 a29.extend(t.count);
245 a30.extend(t.count);
246 a31.extend(t.count);
247 a32.extend(t.count);
248 a33.extend(t.count);
249 ddindx := t.first;
250 indx := 1;
251 while true loop
252 a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
253 a1(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
254 a2(indx) := t(ddindx).currency_code;
255 a3(indx) := rosetta_g_miss_num_map(t(ddindx).inf_id);
256 a4(indx) := rosetta_g_miss_num_map(t(ddindx).ica_id);
257 a5(indx) := rosetta_g_miss_num_map(t(ddindx).ibt_id);
258 a6(indx) := rosetta_g_miss_num_map(t(ddindx).irm_id);
259 a7(indx) := rosetta_g_miss_num_map(t(ddindx).iuv_id);
260 a8(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
261 a9(indx) := t(ddindx).attribute_category;
262 a10(indx) := t(ddindx).attribute1;
263 a11(indx) := t(ddindx).attribute2;
264 a12(indx) := t(ddindx).attribute3;
265 a13(indx) := t(ddindx).attribute4;
266 a14(indx) := t(ddindx).attribute5;
267 a15(indx) := t(ddindx).attribute6;
268 a16(indx) := t(ddindx).attribute7;
269 a17(indx) := t(ddindx).attribute8;
270 a18(indx) := t(ddindx).attribute9;
271 a19(indx) := t(ddindx).attribute10;
272 a20(indx) := t(ddindx).attribute11;
273 a21(indx) := t(ddindx).attribute12;
274 a22(indx) := t(ddindx).attribute13;
275 a23(indx) := t(ddindx).attribute14;
276 a24(indx) := t(ddindx).attribute15;
277 a25(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
278 a26(indx) := t(ddindx).creation_date;
279 a27(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
280 a28(indx) := t(ddindx).last_update_date;
281 a29(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
282 a30(indx) := t(ddindx).effective_date_from;
283 a31(indx) := t(ddindx).effective_date_to;
284 a32(indx) := rosetta_g_miss_num_map(t(ddindx).ipl_id);
285 a33(indx) := rosetta_g_miss_num_map(t(ddindx).legal_entity_id);
286 indx := indx+1;
287 if t.last =ddindx
288 then exit;
289 end if;
290 ddindx := t.next(ddindx);
291 end loop;
292 end if;
293 end if;
294 end rosetta_table_copy_out_p2;
295
296 procedure rosetta_table_copy_in_p5(t out nocopy okl_clg_pvt.oklcntrlvlnggrpstltbltype, a0 JTF_NUMBER_TABLE
297 , a1 JTF_VARCHAR2_TABLE_100
298 , a2 JTF_VARCHAR2_TABLE_100
299 , a3 JTF_VARCHAR2_TABLE_100
300 , a4 JTF_VARCHAR2_TABLE_200
301 , a5 JTF_VARCHAR2_TABLE_2000
302 , a6 JTF_VARCHAR2_TABLE_2000
303 , a7 JTF_NUMBER_TABLE
304 , a8 JTF_DATE_TABLE
305 , a9 JTF_NUMBER_TABLE
306 , a10 JTF_DATE_TABLE
307 , a11 JTF_NUMBER_TABLE
308 ) as
309 ddindx binary_integer; indx binary_integer;
310 begin
311 if a0 is not null and a0.count > 0 then
312 if a0.count > 0 then
313 indx := a0.first;
314 ddindx := 1;
315 while true loop
316 t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
317 t(ddindx).language := a1(indx);
318 t(ddindx).source_lang := a2(indx);
319 t(ddindx).sfwt_flag := a3(indx);
320 t(ddindx).name := a4(indx);
321 t(ddindx).description := a5(indx);
322 t(ddindx).private_label_logo_url := a6(indx);
323 t(ddindx).created_by := rosetta_g_miss_num_map(a7(indx));
324 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a8(indx));
325 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a9(indx));
326 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a10(indx));
327 t(ddindx).last_update_login := rosetta_g_miss_num_map(a11(indx));
328 ddindx := ddindx+1;
329 if a0.last =indx
330 then exit;
331 end if;
332 indx := a0.next(indx);
333 end loop;
334 end if;
335 end if;
336 end rosetta_table_copy_in_p5;
337 procedure rosetta_table_copy_out_p5(t okl_clg_pvt.oklcntrlvlnggrpstltbltype, a0 out nocopy JTF_NUMBER_TABLE
338 , a1 out nocopy JTF_VARCHAR2_TABLE_100
339 , a2 out nocopy JTF_VARCHAR2_TABLE_100
340 , a3 out nocopy JTF_VARCHAR2_TABLE_100
341 , a4 out nocopy JTF_VARCHAR2_TABLE_200
342 , a5 out nocopy JTF_VARCHAR2_TABLE_2000
343 , a6 out nocopy JTF_VARCHAR2_TABLE_2000
344 , a7 out nocopy JTF_NUMBER_TABLE
345 , a8 out nocopy JTF_DATE_TABLE
346 , a9 out nocopy JTF_NUMBER_TABLE
347 , a10 out nocopy JTF_DATE_TABLE
348 , a11 out nocopy JTF_NUMBER_TABLE
349 ) as
350 ddindx binary_integer; indx binary_integer;
351 begin
352 if t is null or t.count = 0 then
353 a0 := JTF_NUMBER_TABLE();
354 a1 := JTF_VARCHAR2_TABLE_100();
355 a2 := JTF_VARCHAR2_TABLE_100();
356 a3 := JTF_VARCHAR2_TABLE_100();
357 a4 := JTF_VARCHAR2_TABLE_200();
358 a5 := JTF_VARCHAR2_TABLE_2000();
359 a6 := JTF_VARCHAR2_TABLE_2000();
360 a7 := JTF_NUMBER_TABLE();
361 a8 := JTF_DATE_TABLE();
362 a9 := JTF_NUMBER_TABLE();
363 a10 := JTF_DATE_TABLE();
364 a11 := JTF_NUMBER_TABLE();
365 else
366 a0 := JTF_NUMBER_TABLE();
367 a1 := JTF_VARCHAR2_TABLE_100();
368 a2 := JTF_VARCHAR2_TABLE_100();
369 a3 := JTF_VARCHAR2_TABLE_100();
370 a4 := JTF_VARCHAR2_TABLE_200();
371 a5 := JTF_VARCHAR2_TABLE_2000();
372 a6 := JTF_VARCHAR2_TABLE_2000();
373 a7 := JTF_NUMBER_TABLE();
374 a8 := JTF_DATE_TABLE();
375 a9 := JTF_NUMBER_TABLE();
376 a10 := JTF_DATE_TABLE();
377 a11 := JTF_NUMBER_TABLE();
378 if t.count > 0 then
379 a0.extend(t.count);
380 a1.extend(t.count);
381 a2.extend(t.count);
382 a3.extend(t.count);
383 a4.extend(t.count);
384 a5.extend(t.count);
385 a6.extend(t.count);
386 a7.extend(t.count);
387 a8.extend(t.count);
388 a9.extend(t.count);
389 a10.extend(t.count);
390 a11.extend(t.count);
391 ddindx := t.first;
392 indx := 1;
393 while true loop
394 a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
395 a1(indx) := t(ddindx).language;
396 a2(indx) := t(ddindx).source_lang;
397 a3(indx) := t(ddindx).sfwt_flag;
398 a4(indx) := t(ddindx).name;
399 a5(indx) := t(ddindx).description;
400 a6(indx) := t(ddindx).private_label_logo_url;
401 a7(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
402 a8(indx) := t(ddindx).creation_date;
403 a9(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
404 a10(indx) := t(ddindx).last_update_date;
405 a11(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
406 indx := indx+1;
407 if t.last =ddindx
408 then exit;
409 end if;
410 ddindx := t.next(ddindx);
411 end loop;
412 end if;
413 end if;
414 end rosetta_table_copy_out_p5;
415
416 procedure rosetta_table_copy_in_p8(t out nocopy okl_clg_pvt.clgv_tbl_type, a0 JTF_NUMBER_TABLE
417 , a1 JTF_NUMBER_TABLE
418 , a2 JTF_NUMBER_TABLE
419 , a3 JTF_VARCHAR2_TABLE_100
420 , a4 JTF_NUMBER_TABLE
421 , a5 JTF_NUMBER_TABLE
422 , a6 JTF_NUMBER_TABLE
423 , a7 JTF_VARCHAR2_TABLE_100
424 , a8 JTF_NUMBER_TABLE
425 , a9 JTF_NUMBER_TABLE
426 , a10 JTF_VARCHAR2_TABLE_200
427 , a11 JTF_VARCHAR2_TABLE_2000
428 , a12 JTF_VARCHAR2_TABLE_2000
429 , a13 JTF_VARCHAR2_TABLE_100
430 , a14 JTF_VARCHAR2_TABLE_500
431 , a15 JTF_VARCHAR2_TABLE_500
432 , a16 JTF_VARCHAR2_TABLE_500
433 , a17 JTF_VARCHAR2_TABLE_500
434 , a18 JTF_VARCHAR2_TABLE_500
435 , a19 JTF_VARCHAR2_TABLE_500
436 , a20 JTF_VARCHAR2_TABLE_500
437 , a21 JTF_VARCHAR2_TABLE_500
438 , a22 JTF_VARCHAR2_TABLE_500
439 , a23 JTF_VARCHAR2_TABLE_500
440 , a24 JTF_VARCHAR2_TABLE_500
441 , a25 JTF_VARCHAR2_TABLE_500
442 , a26 JTF_VARCHAR2_TABLE_500
443 , a27 JTF_VARCHAR2_TABLE_500
444 , a28 JTF_VARCHAR2_TABLE_500
445 , a29 JTF_NUMBER_TABLE
446 , a30 JTF_DATE_TABLE
447 , a31 JTF_NUMBER_TABLE
448 , a32 JTF_DATE_TABLE
449 , a33 JTF_NUMBER_TABLE
450 , a34 JTF_DATE_TABLE
451 , a35 JTF_DATE_TABLE
452 , a36 JTF_NUMBER_TABLE
453 , a37 JTF_NUMBER_TABLE
454 ) as
455 ddindx binary_integer; indx binary_integer;
456 begin
457 if a0 is not null and a0.count > 0 then
458 if a0.count > 0 then
459 indx := a0.first;
460 ddindx := 1;
461 while true loop
462 t(ddindx).id := rosetta_g_miss_num_map(a0(indx));
463 t(ddindx).org_id := rosetta_g_miss_num_map(a1(indx));
464 t(ddindx).object_version_number := rosetta_g_miss_num_map(a2(indx));
465 t(ddindx).sfwt_flag := a3(indx);
466 t(ddindx).inf_id := rosetta_g_miss_num_map(a4(indx));
467 t(ddindx).ica_id := rosetta_g_miss_num_map(a5(indx));
468 t(ddindx).ibt_id := rosetta_g_miss_num_map(a6(indx));
469 t(ddindx).currency_code := a7(indx);
470 t(ddindx).irm_id := rosetta_g_miss_num_map(a8(indx));
471 t(ddindx).iuv_id := rosetta_g_miss_num_map(a9(indx));
472 t(ddindx).name := a10(indx);
473 t(ddindx).description := a11(indx);
474 t(ddindx).private_label_logo_url := a12(indx);
475 t(ddindx).attribute_category := a13(indx);
476 t(ddindx).attribute1 := a14(indx);
477 t(ddindx).attribute2 := a15(indx);
478 t(ddindx).attribute3 := a16(indx);
479 t(ddindx).attribute4 := a17(indx);
480 t(ddindx).attribute5 := a18(indx);
481 t(ddindx).attribute6 := a19(indx);
482 t(ddindx).attribute7 := a20(indx);
483 t(ddindx).attribute8 := a21(indx);
484 t(ddindx).attribute9 := a22(indx);
485 t(ddindx).attribute10 := a23(indx);
486 t(ddindx).attribute11 := a24(indx);
487 t(ddindx).attribute12 := a25(indx);
488 t(ddindx).attribute13 := a26(indx);
489 t(ddindx).attribute14 := a27(indx);
490 t(ddindx).attribute15 := a28(indx);
491 t(ddindx).created_by := rosetta_g_miss_num_map(a29(indx));
492 t(ddindx).creation_date := rosetta_g_miss_date_in_map(a30(indx));
493 t(ddindx).last_updated_by := rosetta_g_miss_num_map(a31(indx));
494 t(ddindx).last_update_date := rosetta_g_miss_date_in_map(a32(indx));
495 t(ddindx).last_update_login := rosetta_g_miss_num_map(a33(indx));
496 t(ddindx).effective_date_from := rosetta_g_miss_date_in_map(a34(indx));
497 t(ddindx).effective_date_to := rosetta_g_miss_date_in_map(a35(indx));
498 t(ddindx).ipl_id := rosetta_g_miss_num_map(a36(indx));
499 t(ddindx).legal_entity_id := rosetta_g_miss_num_map(a37(indx));
500 ddindx := ddindx+1;
501 if a0.last =indx
502 then exit;
503 end if;
504 indx := a0.next(indx);
505 end loop;
506 end if;
507 end if;
508 end rosetta_table_copy_in_p8;
509 procedure rosetta_table_copy_out_p8(t okl_clg_pvt.clgv_tbl_type, a0 out nocopy JTF_NUMBER_TABLE
510 , a1 out nocopy JTF_NUMBER_TABLE
511 , a2 out nocopy JTF_NUMBER_TABLE
512 , a3 out nocopy JTF_VARCHAR2_TABLE_100
513 , a4 out nocopy JTF_NUMBER_TABLE
514 , a5 out nocopy JTF_NUMBER_TABLE
515 , a6 out nocopy JTF_NUMBER_TABLE
516 , a7 out nocopy JTF_VARCHAR2_TABLE_100
517 , a8 out nocopy JTF_NUMBER_TABLE
518 , a9 out nocopy JTF_NUMBER_TABLE
519 , a10 out nocopy JTF_VARCHAR2_TABLE_200
520 , a11 out nocopy JTF_VARCHAR2_TABLE_2000
521 , a12 out nocopy JTF_VARCHAR2_TABLE_2000
522 , a13 out nocopy JTF_VARCHAR2_TABLE_100
523 , a14 out nocopy JTF_VARCHAR2_TABLE_500
524 , a15 out nocopy JTF_VARCHAR2_TABLE_500
525 , a16 out nocopy JTF_VARCHAR2_TABLE_500
526 , a17 out nocopy JTF_VARCHAR2_TABLE_500
527 , a18 out nocopy JTF_VARCHAR2_TABLE_500
528 , a19 out nocopy JTF_VARCHAR2_TABLE_500
529 , a20 out nocopy JTF_VARCHAR2_TABLE_500
530 , a21 out nocopy JTF_VARCHAR2_TABLE_500
531 , a22 out nocopy JTF_VARCHAR2_TABLE_500
532 , a23 out nocopy JTF_VARCHAR2_TABLE_500
533 , a24 out nocopy JTF_VARCHAR2_TABLE_500
534 , a25 out nocopy JTF_VARCHAR2_TABLE_500
535 , a26 out nocopy JTF_VARCHAR2_TABLE_500
536 , a27 out nocopy JTF_VARCHAR2_TABLE_500
537 , a28 out nocopy JTF_VARCHAR2_TABLE_500
538 , a29 out nocopy JTF_NUMBER_TABLE
539 , a30 out nocopy JTF_DATE_TABLE
540 , a31 out nocopy JTF_NUMBER_TABLE
541 , a32 out nocopy JTF_DATE_TABLE
542 , a33 out nocopy JTF_NUMBER_TABLE
543 , a34 out nocopy JTF_DATE_TABLE
544 , a35 out nocopy JTF_DATE_TABLE
545 , a36 out nocopy JTF_NUMBER_TABLE
546 , a37 out nocopy JTF_NUMBER_TABLE
547 ) as
548 ddindx binary_integer; indx binary_integer;
549 begin
550 if t is null or t.count = 0 then
551 a0 := JTF_NUMBER_TABLE();
552 a1 := JTF_NUMBER_TABLE();
553 a2 := JTF_NUMBER_TABLE();
554 a3 := JTF_VARCHAR2_TABLE_100();
555 a4 := JTF_NUMBER_TABLE();
556 a5 := JTF_NUMBER_TABLE();
557 a6 := JTF_NUMBER_TABLE();
558 a7 := JTF_VARCHAR2_TABLE_100();
559 a8 := JTF_NUMBER_TABLE();
560 a9 := JTF_NUMBER_TABLE();
561 a10 := JTF_VARCHAR2_TABLE_200();
562 a11 := JTF_VARCHAR2_TABLE_2000();
563 a12 := JTF_VARCHAR2_TABLE_2000();
564 a13 := JTF_VARCHAR2_TABLE_100();
565 a14 := JTF_VARCHAR2_TABLE_500();
566 a15 := JTF_VARCHAR2_TABLE_500();
567 a16 := JTF_VARCHAR2_TABLE_500();
568 a17 := JTF_VARCHAR2_TABLE_500();
569 a18 := JTF_VARCHAR2_TABLE_500();
570 a19 := JTF_VARCHAR2_TABLE_500();
571 a20 := JTF_VARCHAR2_TABLE_500();
572 a21 := JTF_VARCHAR2_TABLE_500();
573 a22 := JTF_VARCHAR2_TABLE_500();
574 a23 := JTF_VARCHAR2_TABLE_500();
575 a24 := JTF_VARCHAR2_TABLE_500();
576 a25 := JTF_VARCHAR2_TABLE_500();
577 a26 := JTF_VARCHAR2_TABLE_500();
578 a27 := JTF_VARCHAR2_TABLE_500();
579 a28 := JTF_VARCHAR2_TABLE_500();
580 a29 := JTF_NUMBER_TABLE();
581 a30 := JTF_DATE_TABLE();
582 a31 := JTF_NUMBER_TABLE();
583 a32 := JTF_DATE_TABLE();
584 a33 := JTF_NUMBER_TABLE();
585 a34 := JTF_DATE_TABLE();
586 a35 := JTF_DATE_TABLE();
587 a36 := JTF_NUMBER_TABLE();
588 a37 := JTF_NUMBER_TABLE();
589 else
590 a0 := JTF_NUMBER_TABLE();
591 a1 := JTF_NUMBER_TABLE();
592 a2 := JTF_NUMBER_TABLE();
593 a3 := JTF_VARCHAR2_TABLE_100();
594 a4 := JTF_NUMBER_TABLE();
595 a5 := JTF_NUMBER_TABLE();
596 a6 := JTF_NUMBER_TABLE();
597 a7 := JTF_VARCHAR2_TABLE_100();
598 a8 := JTF_NUMBER_TABLE();
599 a9 := JTF_NUMBER_TABLE();
600 a10 := JTF_VARCHAR2_TABLE_200();
601 a11 := JTF_VARCHAR2_TABLE_2000();
602 a12 := JTF_VARCHAR2_TABLE_2000();
603 a13 := JTF_VARCHAR2_TABLE_100();
604 a14 := JTF_VARCHAR2_TABLE_500();
605 a15 := JTF_VARCHAR2_TABLE_500();
606 a16 := JTF_VARCHAR2_TABLE_500();
607 a17 := JTF_VARCHAR2_TABLE_500();
608 a18 := JTF_VARCHAR2_TABLE_500();
609 a19 := JTF_VARCHAR2_TABLE_500();
610 a20 := JTF_VARCHAR2_TABLE_500();
611 a21 := JTF_VARCHAR2_TABLE_500();
612 a22 := JTF_VARCHAR2_TABLE_500();
613 a23 := JTF_VARCHAR2_TABLE_500();
614 a24 := JTF_VARCHAR2_TABLE_500();
615 a25 := JTF_VARCHAR2_TABLE_500();
616 a26 := JTF_VARCHAR2_TABLE_500();
617 a27 := JTF_VARCHAR2_TABLE_500();
618 a28 := JTF_VARCHAR2_TABLE_500();
619 a29 := JTF_NUMBER_TABLE();
620 a30 := JTF_DATE_TABLE();
621 a31 := JTF_NUMBER_TABLE();
622 a32 := JTF_DATE_TABLE();
623 a33 := JTF_NUMBER_TABLE();
624 a34 := JTF_DATE_TABLE();
625 a35 := JTF_DATE_TABLE();
626 a36 := JTF_NUMBER_TABLE();
627 a37 := JTF_NUMBER_TABLE();
628 if t.count > 0 then
629 a0.extend(t.count);
630 a1.extend(t.count);
631 a2.extend(t.count);
632 a3.extend(t.count);
633 a4.extend(t.count);
634 a5.extend(t.count);
635 a6.extend(t.count);
636 a7.extend(t.count);
637 a8.extend(t.count);
638 a9.extend(t.count);
639 a10.extend(t.count);
640 a11.extend(t.count);
641 a12.extend(t.count);
642 a13.extend(t.count);
643 a14.extend(t.count);
644 a15.extend(t.count);
645 a16.extend(t.count);
646 a17.extend(t.count);
647 a18.extend(t.count);
648 a19.extend(t.count);
649 a20.extend(t.count);
650 a21.extend(t.count);
651 a22.extend(t.count);
652 a23.extend(t.count);
653 a24.extend(t.count);
654 a25.extend(t.count);
655 a26.extend(t.count);
656 a27.extend(t.count);
657 a28.extend(t.count);
658 a29.extend(t.count);
659 a30.extend(t.count);
660 a31.extend(t.count);
661 a32.extend(t.count);
662 a33.extend(t.count);
663 a34.extend(t.count);
664 a35.extend(t.count);
665 a36.extend(t.count);
666 a37.extend(t.count);
667 ddindx := t.first;
668 indx := 1;
669 while true loop
670 a0(indx) := rosetta_g_miss_num_map(t(ddindx).id);
671 a1(indx) := rosetta_g_miss_num_map(t(ddindx).org_id);
672 a2(indx) := rosetta_g_miss_num_map(t(ddindx).object_version_number);
673 a3(indx) := t(ddindx).sfwt_flag;
674 a4(indx) := rosetta_g_miss_num_map(t(ddindx).inf_id);
675 a5(indx) := rosetta_g_miss_num_map(t(ddindx).ica_id);
676 a6(indx) := rosetta_g_miss_num_map(t(ddindx).ibt_id);
677 a7(indx) := t(ddindx).currency_code;
678 a8(indx) := rosetta_g_miss_num_map(t(ddindx).irm_id);
679 a9(indx) := rosetta_g_miss_num_map(t(ddindx).iuv_id);
680 a10(indx) := t(ddindx).name;
681 a11(indx) := t(ddindx).description;
682 a12(indx) := t(ddindx).private_label_logo_url;
683 a13(indx) := t(ddindx).attribute_category;
684 a14(indx) := t(ddindx).attribute1;
685 a15(indx) := t(ddindx).attribute2;
686 a16(indx) := t(ddindx).attribute3;
687 a17(indx) := t(ddindx).attribute4;
688 a18(indx) := t(ddindx).attribute5;
689 a19(indx) := t(ddindx).attribute6;
690 a20(indx) := t(ddindx).attribute7;
691 a21(indx) := t(ddindx).attribute8;
692 a22(indx) := t(ddindx).attribute9;
693 a23(indx) := t(ddindx).attribute10;
694 a24(indx) := t(ddindx).attribute11;
695 a25(indx) := t(ddindx).attribute12;
696 a26(indx) := t(ddindx).attribute13;
697 a27(indx) := t(ddindx).attribute14;
698 a28(indx) := t(ddindx).attribute15;
699 a29(indx) := rosetta_g_miss_num_map(t(ddindx).created_by);
700 a30(indx) := t(ddindx).creation_date;
701 a31(indx) := rosetta_g_miss_num_map(t(ddindx).last_updated_by);
702 a32(indx) := t(ddindx).last_update_date;
703 a33(indx) := rosetta_g_miss_num_map(t(ddindx).last_update_login);
704 a34(indx) := t(ddindx).effective_date_from;
705 a35(indx) := t(ddindx).effective_date_to;
706 a36(indx) := rosetta_g_miss_num_map(t(ddindx).ipl_id);
707 a37(indx) := rosetta_g_miss_num_map(t(ddindx).legal_entity_id);
708 indx := indx+1;
709 if t.last =ddindx
710 then exit;
711 end if;
712 ddindx := t.next(ddindx);
713 end loop;
714 end if;
715 end if;
716 end rosetta_table_copy_out_p8;
717
718 procedure insert_row(p_api_version NUMBER
719 , p_init_msg_list VARCHAR2
720 , x_return_status out nocopy VARCHAR2
721 , x_msg_count out nocopy NUMBER
722 , x_msg_data out nocopy VARCHAR2
723 , p6_a0 out nocopy NUMBER
724 , p6_a1 out nocopy NUMBER
725 , p6_a2 out nocopy NUMBER
726 , p6_a3 out nocopy VARCHAR2
727 , p6_a4 out nocopy NUMBER
728 , p6_a5 out nocopy NUMBER
729 , p6_a6 out nocopy NUMBER
730 , p6_a7 out nocopy VARCHAR2
731 , p6_a8 out nocopy NUMBER
732 , p6_a9 out nocopy NUMBER
733 , p6_a10 out nocopy VARCHAR2
734 , p6_a11 out nocopy VARCHAR2
735 , p6_a12 out nocopy VARCHAR2
736 , p6_a13 out nocopy VARCHAR2
737 , p6_a14 out nocopy VARCHAR2
738 , p6_a15 out nocopy VARCHAR2
739 , p6_a16 out nocopy VARCHAR2
740 , p6_a17 out nocopy VARCHAR2
741 , p6_a18 out nocopy VARCHAR2
742 , p6_a19 out nocopy VARCHAR2
743 , p6_a20 out nocopy VARCHAR2
744 , p6_a21 out nocopy VARCHAR2
745 , p6_a22 out nocopy VARCHAR2
746 , p6_a23 out nocopy VARCHAR2
747 , p6_a24 out nocopy VARCHAR2
748 , p6_a25 out nocopy VARCHAR2
749 , p6_a26 out nocopy VARCHAR2
750 , p6_a27 out nocopy VARCHAR2
751 , p6_a28 out nocopy VARCHAR2
752 , p6_a29 out nocopy NUMBER
753 , p6_a30 out nocopy DATE
754 , p6_a31 out nocopy NUMBER
755 , p6_a32 out nocopy DATE
756 , p6_a33 out nocopy NUMBER
757 , p6_a34 out nocopy DATE
758 , p6_a35 out nocopy DATE
759 , p6_a36 out nocopy NUMBER
760 , p6_a37 out nocopy NUMBER
761 , p5_a0 NUMBER := 0-1962.0724
762 , p5_a1 NUMBER := 0-1962.0724
763 , p5_a2 NUMBER := 0-1962.0724
764 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
765 , p5_a4 NUMBER := 0-1962.0724
766 , p5_a5 NUMBER := 0-1962.0724
767 , p5_a6 NUMBER := 0-1962.0724
768 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
769 , p5_a8 NUMBER := 0-1962.0724
770 , p5_a9 NUMBER := 0-1962.0724
771 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
772 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
773 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
774 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
775 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
776 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
777 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
778 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
779 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
780 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
781 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
782 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
783 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
784 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
785 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
786 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
787 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
788 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
789 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
790 , p5_a29 NUMBER := 0-1962.0724
791 , p5_a30 DATE := fnd_api.g_miss_date
792 , p5_a31 NUMBER := 0-1962.0724
793 , p5_a32 DATE := fnd_api.g_miss_date
794 , p5_a33 NUMBER := 0-1962.0724
795 , p5_a34 DATE := fnd_api.g_miss_date
796 , p5_a35 DATE := fnd_api.g_miss_date
797 , p5_a36 NUMBER := 0-1962.0724
798 , p5_a37 NUMBER := 0-1962.0724
799 )
800
801 as
802 ddp_clgv_rec okl_clg_pvt.clgv_rec_type;
803 ddx_clgv_rec okl_clg_pvt.clgv_rec_type;
804 ddindx binary_integer; indx binary_integer;
805 begin
806
807 -- copy data to the local IN or IN-OUT args, if any
808
809
810
811
812
813 ddp_clgv_rec.id := rosetta_g_miss_num_map(p5_a0);
814 ddp_clgv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
815 ddp_clgv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
816 ddp_clgv_rec.sfwt_flag := p5_a3;
817 ddp_clgv_rec.inf_id := rosetta_g_miss_num_map(p5_a4);
818 ddp_clgv_rec.ica_id := rosetta_g_miss_num_map(p5_a5);
819 ddp_clgv_rec.ibt_id := rosetta_g_miss_num_map(p5_a6);
820 ddp_clgv_rec.currency_code := p5_a7;
821 ddp_clgv_rec.irm_id := rosetta_g_miss_num_map(p5_a8);
822 ddp_clgv_rec.iuv_id := rosetta_g_miss_num_map(p5_a9);
823 ddp_clgv_rec.name := p5_a10;
824 ddp_clgv_rec.description := p5_a11;
825 ddp_clgv_rec.private_label_logo_url := p5_a12;
826 ddp_clgv_rec.attribute_category := p5_a13;
827 ddp_clgv_rec.attribute1 := p5_a14;
828 ddp_clgv_rec.attribute2 := p5_a15;
829 ddp_clgv_rec.attribute3 := p5_a16;
830 ddp_clgv_rec.attribute4 := p5_a17;
831 ddp_clgv_rec.attribute5 := p5_a18;
832 ddp_clgv_rec.attribute6 := p5_a19;
833 ddp_clgv_rec.attribute7 := p5_a20;
834 ddp_clgv_rec.attribute8 := p5_a21;
835 ddp_clgv_rec.attribute9 := p5_a22;
836 ddp_clgv_rec.attribute10 := p5_a23;
837 ddp_clgv_rec.attribute11 := p5_a24;
838 ddp_clgv_rec.attribute12 := p5_a25;
839 ddp_clgv_rec.attribute13 := p5_a26;
840 ddp_clgv_rec.attribute14 := p5_a27;
841 ddp_clgv_rec.attribute15 := p5_a28;
842 ddp_clgv_rec.created_by := rosetta_g_miss_num_map(p5_a29);
843 ddp_clgv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a30);
844 ddp_clgv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a31);
845 ddp_clgv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a32);
846 ddp_clgv_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
847 ddp_clgv_rec.effective_date_from := rosetta_g_miss_date_in_map(p5_a34);
848 ddp_clgv_rec.effective_date_to := rosetta_g_miss_date_in_map(p5_a35);
849 ddp_clgv_rec.ipl_id := rosetta_g_miss_num_map(p5_a36);
850 ddp_clgv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a37);
851
852
853 -- here's the delegated call to the old PL/SQL routine
854 okl_clg_pvt.insert_row(p_api_version,
855 p_init_msg_list,
856 x_return_status,
857 x_msg_count,
858 x_msg_data,
859 ddp_clgv_rec,
860 ddx_clgv_rec);
861
862 -- copy data back from the local variables to OUT or IN-OUT args, if any
863
864
865
866
867
868
869 p6_a0 := rosetta_g_miss_num_map(ddx_clgv_rec.id);
870 p6_a1 := rosetta_g_miss_num_map(ddx_clgv_rec.org_id);
871 p6_a2 := rosetta_g_miss_num_map(ddx_clgv_rec.object_version_number);
872 p6_a3 := ddx_clgv_rec.sfwt_flag;
873 p6_a4 := rosetta_g_miss_num_map(ddx_clgv_rec.inf_id);
874 p6_a5 := rosetta_g_miss_num_map(ddx_clgv_rec.ica_id);
875 p6_a6 := rosetta_g_miss_num_map(ddx_clgv_rec.ibt_id);
876 p6_a7 := ddx_clgv_rec.currency_code;
877 p6_a8 := rosetta_g_miss_num_map(ddx_clgv_rec.irm_id);
878 p6_a9 := rosetta_g_miss_num_map(ddx_clgv_rec.iuv_id);
879 p6_a10 := ddx_clgv_rec.name;
880 p6_a11 := ddx_clgv_rec.description;
881 p6_a12 := ddx_clgv_rec.private_label_logo_url;
882 p6_a13 := ddx_clgv_rec.attribute_category;
883 p6_a14 := ddx_clgv_rec.attribute1;
884 p6_a15 := ddx_clgv_rec.attribute2;
885 p6_a16 := ddx_clgv_rec.attribute3;
886 p6_a17 := ddx_clgv_rec.attribute4;
887 p6_a18 := ddx_clgv_rec.attribute5;
888 p6_a19 := ddx_clgv_rec.attribute6;
889 p6_a20 := ddx_clgv_rec.attribute7;
890 p6_a21 := ddx_clgv_rec.attribute8;
891 p6_a22 := ddx_clgv_rec.attribute9;
892 p6_a23 := ddx_clgv_rec.attribute10;
893 p6_a24 := ddx_clgv_rec.attribute11;
894 p6_a25 := ddx_clgv_rec.attribute12;
895 p6_a26 := ddx_clgv_rec.attribute13;
896 p6_a27 := ddx_clgv_rec.attribute14;
897 p6_a28 := ddx_clgv_rec.attribute15;
898 p6_a29 := rosetta_g_miss_num_map(ddx_clgv_rec.created_by);
899 p6_a30 := ddx_clgv_rec.creation_date;
900 p6_a31 := rosetta_g_miss_num_map(ddx_clgv_rec.last_updated_by);
901 p6_a32 := ddx_clgv_rec.last_update_date;
902 p6_a33 := rosetta_g_miss_num_map(ddx_clgv_rec.last_update_login);
903 p6_a34 := ddx_clgv_rec.effective_date_from;
904 p6_a35 := ddx_clgv_rec.effective_date_to;
905 p6_a36 := rosetta_g_miss_num_map(ddx_clgv_rec.ipl_id);
906 p6_a37 := rosetta_g_miss_num_map(ddx_clgv_rec.legal_entity_id);
907 end;
908
909 procedure insert_row(p_api_version NUMBER
910 , p_init_msg_list VARCHAR2
911 , x_return_status out nocopy VARCHAR2
912 , x_msg_count out nocopy NUMBER
913 , x_msg_data out nocopy VARCHAR2
914 , p5_a0 JTF_NUMBER_TABLE
915 , p5_a1 JTF_NUMBER_TABLE
916 , p5_a2 JTF_NUMBER_TABLE
917 , p5_a3 JTF_VARCHAR2_TABLE_100
918 , p5_a4 JTF_NUMBER_TABLE
919 , p5_a5 JTF_NUMBER_TABLE
920 , p5_a6 JTF_NUMBER_TABLE
921 , p5_a7 JTF_VARCHAR2_TABLE_100
922 , p5_a8 JTF_NUMBER_TABLE
923 , p5_a9 JTF_NUMBER_TABLE
924 , p5_a10 JTF_VARCHAR2_TABLE_200
925 , p5_a11 JTF_VARCHAR2_TABLE_2000
926 , p5_a12 JTF_VARCHAR2_TABLE_2000
927 , p5_a13 JTF_VARCHAR2_TABLE_100
928 , p5_a14 JTF_VARCHAR2_TABLE_500
929 , p5_a15 JTF_VARCHAR2_TABLE_500
930 , p5_a16 JTF_VARCHAR2_TABLE_500
931 , p5_a17 JTF_VARCHAR2_TABLE_500
932 , p5_a18 JTF_VARCHAR2_TABLE_500
933 , p5_a19 JTF_VARCHAR2_TABLE_500
934 , p5_a20 JTF_VARCHAR2_TABLE_500
935 , p5_a21 JTF_VARCHAR2_TABLE_500
936 , p5_a22 JTF_VARCHAR2_TABLE_500
937 , p5_a23 JTF_VARCHAR2_TABLE_500
938 , p5_a24 JTF_VARCHAR2_TABLE_500
939 , p5_a25 JTF_VARCHAR2_TABLE_500
940 , p5_a26 JTF_VARCHAR2_TABLE_500
941 , p5_a27 JTF_VARCHAR2_TABLE_500
942 , p5_a28 JTF_VARCHAR2_TABLE_500
943 , p5_a29 JTF_NUMBER_TABLE
944 , p5_a30 JTF_DATE_TABLE
945 , p5_a31 JTF_NUMBER_TABLE
946 , p5_a32 JTF_DATE_TABLE
947 , p5_a33 JTF_NUMBER_TABLE
948 , p5_a34 JTF_DATE_TABLE
949 , p5_a35 JTF_DATE_TABLE
950 , p5_a36 JTF_NUMBER_TABLE
951 , p5_a37 JTF_NUMBER_TABLE
952 , p6_a0 out nocopy JTF_NUMBER_TABLE
953 , p6_a1 out nocopy JTF_NUMBER_TABLE
954 , p6_a2 out nocopy JTF_NUMBER_TABLE
955 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
956 , p6_a4 out nocopy JTF_NUMBER_TABLE
957 , p6_a5 out nocopy JTF_NUMBER_TABLE
958 , p6_a6 out nocopy JTF_NUMBER_TABLE
959 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
960 , p6_a8 out nocopy JTF_NUMBER_TABLE
961 , p6_a9 out nocopy JTF_NUMBER_TABLE
962 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_200
963 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_2000
964 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_2000
965 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
966 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
967 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
968 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
969 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
970 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
971 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
972 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
973 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
974 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
975 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
976 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
977 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
978 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
979 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
980 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
981 , p6_a29 out nocopy JTF_NUMBER_TABLE
982 , p6_a30 out nocopy JTF_DATE_TABLE
983 , p6_a31 out nocopy JTF_NUMBER_TABLE
984 , p6_a32 out nocopy JTF_DATE_TABLE
985 , p6_a33 out nocopy JTF_NUMBER_TABLE
986 , p6_a34 out nocopy JTF_DATE_TABLE
987 , p6_a35 out nocopy JTF_DATE_TABLE
988 , p6_a36 out nocopy JTF_NUMBER_TABLE
989 , p6_a37 out nocopy JTF_NUMBER_TABLE
990 )
991
992 as
993 ddp_clgv_tbl okl_clg_pvt.clgv_tbl_type;
994 ddx_clgv_tbl okl_clg_pvt.clgv_tbl_type;
995 ddindx binary_integer; indx binary_integer;
996 begin
997
998 -- copy data to the local IN or IN-OUT args, if any
999
1000
1001
1002
1003
1004 okl_clg_pvt_w.rosetta_table_copy_in_p8(ddp_clgv_tbl, p5_a0
1005 , p5_a1
1006 , p5_a2
1007 , p5_a3
1008 , p5_a4
1009 , p5_a5
1010 , p5_a6
1011 , p5_a7
1012 , p5_a8
1013 , p5_a9
1014 , p5_a10
1015 , p5_a11
1016 , p5_a12
1017 , p5_a13
1018 , p5_a14
1019 , p5_a15
1020 , p5_a16
1021 , p5_a17
1022 , p5_a18
1023 , p5_a19
1024 , p5_a20
1025 , p5_a21
1026 , p5_a22
1027 , p5_a23
1028 , p5_a24
1029 , p5_a25
1030 , p5_a26
1031 , p5_a27
1032 , p5_a28
1033 , p5_a29
1034 , p5_a30
1035 , p5_a31
1036 , p5_a32
1037 , p5_a33
1038 , p5_a34
1039 , p5_a35
1040 , p5_a36
1041 , p5_a37
1042 );
1043
1044
1045 -- here's the delegated call to the old PL/SQL routine
1046 okl_clg_pvt.insert_row(p_api_version,
1047 p_init_msg_list,
1048 x_return_status,
1049 x_msg_count,
1050 x_msg_data,
1051 ddp_clgv_tbl,
1052 ddx_clgv_tbl);
1053
1054 -- copy data back from the local variables to OUT or IN-OUT args, if any
1055
1056
1057
1058
1059
1060
1061 okl_clg_pvt_w.rosetta_table_copy_out_p8(ddx_clgv_tbl, p6_a0
1062 , p6_a1
1063 , p6_a2
1064 , p6_a3
1065 , p6_a4
1066 , p6_a5
1067 , p6_a6
1068 , p6_a7
1069 , p6_a8
1070 , p6_a9
1071 , p6_a10
1072 , p6_a11
1073 , p6_a12
1074 , p6_a13
1075 , p6_a14
1076 , p6_a15
1077 , p6_a16
1078 , p6_a17
1079 , p6_a18
1080 , p6_a19
1081 , p6_a20
1082 , p6_a21
1083 , p6_a22
1084 , p6_a23
1085 , p6_a24
1086 , p6_a25
1087 , p6_a26
1088 , p6_a27
1089 , p6_a28
1090 , p6_a29
1091 , p6_a30
1092 , p6_a31
1093 , p6_a32
1094 , p6_a33
1095 , p6_a34
1096 , p6_a35
1097 , p6_a36
1098 , p6_a37
1099 );
1100 end;
1101
1102 procedure lock_row(p_api_version NUMBER
1103 , p_init_msg_list VARCHAR2
1104 , x_return_status out nocopy VARCHAR2
1105 , x_msg_count out nocopy NUMBER
1106 , x_msg_data out nocopy VARCHAR2
1107 , p5_a0 NUMBER := 0-1962.0724
1108 , p5_a1 NUMBER := 0-1962.0724
1109 , p5_a2 NUMBER := 0-1962.0724
1110 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1111 , p5_a4 NUMBER := 0-1962.0724
1112 , p5_a5 NUMBER := 0-1962.0724
1113 , p5_a6 NUMBER := 0-1962.0724
1114 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1115 , p5_a8 NUMBER := 0-1962.0724
1116 , p5_a9 NUMBER := 0-1962.0724
1117 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1118 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1119 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1120 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1121 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1122 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1123 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1124 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1125 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1126 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1127 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1128 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1129 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1130 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1131 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1132 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1133 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1134 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1135 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1136 , p5_a29 NUMBER := 0-1962.0724
1137 , p5_a30 DATE := fnd_api.g_miss_date
1138 , p5_a31 NUMBER := 0-1962.0724
1139 , p5_a32 DATE := fnd_api.g_miss_date
1140 , p5_a33 NUMBER := 0-1962.0724
1141 , p5_a34 DATE := fnd_api.g_miss_date
1142 , p5_a35 DATE := fnd_api.g_miss_date
1143 , p5_a36 NUMBER := 0-1962.0724
1144 , p5_a37 NUMBER := 0-1962.0724
1145 )
1146
1147 as
1148 ddp_clgv_rec okl_clg_pvt.clgv_rec_type;
1149 ddindx binary_integer; indx binary_integer;
1150 begin
1151
1152 -- copy data to the local IN or IN-OUT args, if any
1153
1154
1155
1156
1157
1158 ddp_clgv_rec.id := rosetta_g_miss_num_map(p5_a0);
1159 ddp_clgv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1160 ddp_clgv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
1161 ddp_clgv_rec.sfwt_flag := p5_a3;
1162 ddp_clgv_rec.inf_id := rosetta_g_miss_num_map(p5_a4);
1163 ddp_clgv_rec.ica_id := rosetta_g_miss_num_map(p5_a5);
1164 ddp_clgv_rec.ibt_id := rosetta_g_miss_num_map(p5_a6);
1165 ddp_clgv_rec.currency_code := p5_a7;
1166 ddp_clgv_rec.irm_id := rosetta_g_miss_num_map(p5_a8);
1167 ddp_clgv_rec.iuv_id := rosetta_g_miss_num_map(p5_a9);
1168 ddp_clgv_rec.name := p5_a10;
1169 ddp_clgv_rec.description := p5_a11;
1170 ddp_clgv_rec.private_label_logo_url := p5_a12;
1171 ddp_clgv_rec.attribute_category := p5_a13;
1172 ddp_clgv_rec.attribute1 := p5_a14;
1173 ddp_clgv_rec.attribute2 := p5_a15;
1174 ddp_clgv_rec.attribute3 := p5_a16;
1175 ddp_clgv_rec.attribute4 := p5_a17;
1176 ddp_clgv_rec.attribute5 := p5_a18;
1177 ddp_clgv_rec.attribute6 := p5_a19;
1178 ddp_clgv_rec.attribute7 := p5_a20;
1179 ddp_clgv_rec.attribute8 := p5_a21;
1180 ddp_clgv_rec.attribute9 := p5_a22;
1181 ddp_clgv_rec.attribute10 := p5_a23;
1182 ddp_clgv_rec.attribute11 := p5_a24;
1183 ddp_clgv_rec.attribute12 := p5_a25;
1184 ddp_clgv_rec.attribute13 := p5_a26;
1185 ddp_clgv_rec.attribute14 := p5_a27;
1186 ddp_clgv_rec.attribute15 := p5_a28;
1187 ddp_clgv_rec.created_by := rosetta_g_miss_num_map(p5_a29);
1188 ddp_clgv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a30);
1189 ddp_clgv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a31);
1190 ddp_clgv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a32);
1191 ddp_clgv_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
1192 ddp_clgv_rec.effective_date_from := rosetta_g_miss_date_in_map(p5_a34);
1193 ddp_clgv_rec.effective_date_to := rosetta_g_miss_date_in_map(p5_a35);
1194 ddp_clgv_rec.ipl_id := rosetta_g_miss_num_map(p5_a36);
1195 ddp_clgv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a37);
1196
1197 -- here's the delegated call to the old PL/SQL routine
1198 okl_clg_pvt.lock_row(p_api_version,
1199 p_init_msg_list,
1200 x_return_status,
1201 x_msg_count,
1202 x_msg_data,
1203 ddp_clgv_rec);
1204
1205 -- copy data back from the local variables to OUT or IN-OUT args, if any
1206
1207
1208
1209
1210
1211 end;
1212
1213 procedure lock_row(p_api_version NUMBER
1214 , p_init_msg_list VARCHAR2
1215 , x_return_status out nocopy VARCHAR2
1216 , x_msg_count out nocopy NUMBER
1217 , x_msg_data out nocopy VARCHAR2
1218 , p5_a0 JTF_NUMBER_TABLE
1219 , p5_a1 JTF_NUMBER_TABLE
1220 , p5_a2 JTF_NUMBER_TABLE
1221 , p5_a3 JTF_VARCHAR2_TABLE_100
1222 , p5_a4 JTF_NUMBER_TABLE
1223 , p5_a5 JTF_NUMBER_TABLE
1224 , p5_a6 JTF_NUMBER_TABLE
1225 , p5_a7 JTF_VARCHAR2_TABLE_100
1226 , p5_a8 JTF_NUMBER_TABLE
1227 , p5_a9 JTF_NUMBER_TABLE
1228 , p5_a10 JTF_VARCHAR2_TABLE_200
1229 , p5_a11 JTF_VARCHAR2_TABLE_2000
1230 , p5_a12 JTF_VARCHAR2_TABLE_2000
1231 , p5_a13 JTF_VARCHAR2_TABLE_100
1232 , p5_a14 JTF_VARCHAR2_TABLE_500
1233 , p5_a15 JTF_VARCHAR2_TABLE_500
1234 , p5_a16 JTF_VARCHAR2_TABLE_500
1235 , p5_a17 JTF_VARCHAR2_TABLE_500
1236 , p5_a18 JTF_VARCHAR2_TABLE_500
1237 , p5_a19 JTF_VARCHAR2_TABLE_500
1238 , p5_a20 JTF_VARCHAR2_TABLE_500
1239 , p5_a21 JTF_VARCHAR2_TABLE_500
1240 , p5_a22 JTF_VARCHAR2_TABLE_500
1241 , p5_a23 JTF_VARCHAR2_TABLE_500
1242 , p5_a24 JTF_VARCHAR2_TABLE_500
1243 , p5_a25 JTF_VARCHAR2_TABLE_500
1244 , p5_a26 JTF_VARCHAR2_TABLE_500
1245 , p5_a27 JTF_VARCHAR2_TABLE_500
1246 , p5_a28 JTF_VARCHAR2_TABLE_500
1247 , p5_a29 JTF_NUMBER_TABLE
1248 , p5_a30 JTF_DATE_TABLE
1249 , p5_a31 JTF_NUMBER_TABLE
1250 , p5_a32 JTF_DATE_TABLE
1251 , p5_a33 JTF_NUMBER_TABLE
1252 , p5_a34 JTF_DATE_TABLE
1253 , p5_a35 JTF_DATE_TABLE
1254 , p5_a36 JTF_NUMBER_TABLE
1255 , p5_a37 JTF_NUMBER_TABLE
1256 )
1257
1258 as
1259 ddp_clgv_tbl okl_clg_pvt.clgv_tbl_type;
1260 ddindx binary_integer; indx binary_integer;
1261 begin
1262
1263 -- copy data to the local IN or IN-OUT args, if any
1264
1265
1266
1267
1268
1269 okl_clg_pvt_w.rosetta_table_copy_in_p8(ddp_clgv_tbl, p5_a0
1270 , p5_a1
1271 , p5_a2
1272 , p5_a3
1273 , p5_a4
1274 , p5_a5
1275 , p5_a6
1276 , p5_a7
1277 , p5_a8
1278 , p5_a9
1279 , p5_a10
1280 , p5_a11
1281 , p5_a12
1282 , p5_a13
1283 , p5_a14
1284 , p5_a15
1285 , p5_a16
1286 , p5_a17
1287 , p5_a18
1288 , p5_a19
1289 , p5_a20
1290 , p5_a21
1291 , p5_a22
1292 , p5_a23
1293 , p5_a24
1294 , p5_a25
1295 , p5_a26
1296 , p5_a27
1297 , p5_a28
1298 , p5_a29
1299 , p5_a30
1300 , p5_a31
1301 , p5_a32
1302 , p5_a33
1303 , p5_a34
1304 , p5_a35
1305 , p5_a36
1306 , p5_a37
1307 );
1308
1309 -- here's the delegated call to the old PL/SQL routine
1310 okl_clg_pvt.lock_row(p_api_version,
1311 p_init_msg_list,
1312 x_return_status,
1313 x_msg_count,
1314 x_msg_data,
1315 ddp_clgv_tbl);
1316
1317 -- copy data back from the local variables to OUT or IN-OUT args, if any
1318
1319
1320
1321
1322
1323 end;
1324
1325 procedure update_row(p_api_version NUMBER
1326 , p_init_msg_list VARCHAR2
1327 , x_return_status out nocopy VARCHAR2
1328 , x_msg_count out nocopy NUMBER
1329 , x_msg_data out nocopy VARCHAR2
1330 , p6_a0 out nocopy NUMBER
1331 , p6_a1 out nocopy NUMBER
1332 , p6_a2 out nocopy NUMBER
1333 , p6_a3 out nocopy VARCHAR2
1334 , p6_a4 out nocopy NUMBER
1335 , p6_a5 out nocopy NUMBER
1336 , p6_a6 out nocopy NUMBER
1337 , p6_a7 out nocopy VARCHAR2
1338 , p6_a8 out nocopy NUMBER
1339 , p6_a9 out nocopy NUMBER
1340 , p6_a10 out nocopy VARCHAR2
1341 , p6_a11 out nocopy VARCHAR2
1342 , p6_a12 out nocopy VARCHAR2
1343 , p6_a13 out nocopy VARCHAR2
1344 , p6_a14 out nocopy VARCHAR2
1345 , p6_a15 out nocopy VARCHAR2
1346 , p6_a16 out nocopy VARCHAR2
1347 , p6_a17 out nocopy VARCHAR2
1348 , p6_a18 out nocopy VARCHAR2
1349 , p6_a19 out nocopy VARCHAR2
1350 , p6_a20 out nocopy VARCHAR2
1351 , p6_a21 out nocopy VARCHAR2
1352 , p6_a22 out nocopy VARCHAR2
1353 , p6_a23 out nocopy VARCHAR2
1354 , p6_a24 out nocopy VARCHAR2
1355 , p6_a25 out nocopy VARCHAR2
1356 , p6_a26 out nocopy VARCHAR2
1357 , p6_a27 out nocopy VARCHAR2
1358 , p6_a28 out nocopy VARCHAR2
1359 , p6_a29 out nocopy NUMBER
1360 , p6_a30 out nocopy DATE
1361 , p6_a31 out nocopy NUMBER
1362 , p6_a32 out nocopy DATE
1363 , p6_a33 out nocopy NUMBER
1364 , p6_a34 out nocopy DATE
1365 , p6_a35 out nocopy DATE
1366 , p6_a36 out nocopy NUMBER
1367 , p6_a37 out nocopy NUMBER
1368 , p5_a0 NUMBER := 0-1962.0724
1369 , p5_a1 NUMBER := 0-1962.0724
1370 , p5_a2 NUMBER := 0-1962.0724
1371 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1372 , p5_a4 NUMBER := 0-1962.0724
1373 , p5_a5 NUMBER := 0-1962.0724
1374 , p5_a6 NUMBER := 0-1962.0724
1375 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1376 , p5_a8 NUMBER := 0-1962.0724
1377 , p5_a9 NUMBER := 0-1962.0724
1378 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1379 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1380 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1381 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1382 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1383 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1384 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1385 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1386 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1387 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1388 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1389 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1390 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1391 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1392 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1393 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1394 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1395 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1396 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1397 , p5_a29 NUMBER := 0-1962.0724
1398 , p5_a30 DATE := fnd_api.g_miss_date
1399 , p5_a31 NUMBER := 0-1962.0724
1400 , p5_a32 DATE := fnd_api.g_miss_date
1401 , p5_a33 NUMBER := 0-1962.0724
1402 , p5_a34 DATE := fnd_api.g_miss_date
1403 , p5_a35 DATE := fnd_api.g_miss_date
1404 , p5_a36 NUMBER := 0-1962.0724
1405 , p5_a37 NUMBER := 0-1962.0724
1406 )
1407
1408 as
1409 ddp_clgv_rec okl_clg_pvt.clgv_rec_type;
1410 ddx_clgv_rec okl_clg_pvt.clgv_rec_type;
1411 ddindx binary_integer; indx binary_integer;
1412 begin
1413
1414 -- copy data to the local IN or IN-OUT args, if any
1415
1416
1417
1418
1419
1420 ddp_clgv_rec.id := rosetta_g_miss_num_map(p5_a0);
1421 ddp_clgv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1422 ddp_clgv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
1423 ddp_clgv_rec.sfwt_flag := p5_a3;
1424 ddp_clgv_rec.inf_id := rosetta_g_miss_num_map(p5_a4);
1425 ddp_clgv_rec.ica_id := rosetta_g_miss_num_map(p5_a5);
1426 ddp_clgv_rec.ibt_id := rosetta_g_miss_num_map(p5_a6);
1427 ddp_clgv_rec.currency_code := p5_a7;
1428 ddp_clgv_rec.irm_id := rosetta_g_miss_num_map(p5_a8);
1429 ddp_clgv_rec.iuv_id := rosetta_g_miss_num_map(p5_a9);
1430 ddp_clgv_rec.name := p5_a10;
1431 ddp_clgv_rec.description := p5_a11;
1432 ddp_clgv_rec.private_label_logo_url := p5_a12;
1433 ddp_clgv_rec.attribute_category := p5_a13;
1434 ddp_clgv_rec.attribute1 := p5_a14;
1435 ddp_clgv_rec.attribute2 := p5_a15;
1436 ddp_clgv_rec.attribute3 := p5_a16;
1437 ddp_clgv_rec.attribute4 := p5_a17;
1438 ddp_clgv_rec.attribute5 := p5_a18;
1439 ddp_clgv_rec.attribute6 := p5_a19;
1440 ddp_clgv_rec.attribute7 := p5_a20;
1441 ddp_clgv_rec.attribute8 := p5_a21;
1442 ddp_clgv_rec.attribute9 := p5_a22;
1443 ddp_clgv_rec.attribute10 := p5_a23;
1444 ddp_clgv_rec.attribute11 := p5_a24;
1445 ddp_clgv_rec.attribute12 := p5_a25;
1446 ddp_clgv_rec.attribute13 := p5_a26;
1447 ddp_clgv_rec.attribute14 := p5_a27;
1448 ddp_clgv_rec.attribute15 := p5_a28;
1449 ddp_clgv_rec.created_by := rosetta_g_miss_num_map(p5_a29);
1450 ddp_clgv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a30);
1451 ddp_clgv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a31);
1452 ddp_clgv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a32);
1453 ddp_clgv_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
1454 ddp_clgv_rec.effective_date_from := rosetta_g_miss_date_in_map(p5_a34);
1455 ddp_clgv_rec.effective_date_to := rosetta_g_miss_date_in_map(p5_a35);
1456 ddp_clgv_rec.ipl_id := rosetta_g_miss_num_map(p5_a36);
1457 ddp_clgv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a37);
1458
1459
1460 -- here's the delegated call to the old PL/SQL routine
1461 okl_clg_pvt.update_row(p_api_version,
1462 p_init_msg_list,
1463 x_return_status,
1464 x_msg_count,
1465 x_msg_data,
1466 ddp_clgv_rec,
1467 ddx_clgv_rec);
1468
1469 -- copy data back from the local variables to OUT or IN-OUT args, if any
1470
1471
1472
1473
1474
1475
1476 p6_a0 := rosetta_g_miss_num_map(ddx_clgv_rec.id);
1477 p6_a1 := rosetta_g_miss_num_map(ddx_clgv_rec.org_id);
1478 p6_a2 := rosetta_g_miss_num_map(ddx_clgv_rec.object_version_number);
1479 p6_a3 := ddx_clgv_rec.sfwt_flag;
1480 p6_a4 := rosetta_g_miss_num_map(ddx_clgv_rec.inf_id);
1481 p6_a5 := rosetta_g_miss_num_map(ddx_clgv_rec.ica_id);
1482 p6_a6 := rosetta_g_miss_num_map(ddx_clgv_rec.ibt_id);
1483 p6_a7 := ddx_clgv_rec.currency_code;
1484 p6_a8 := rosetta_g_miss_num_map(ddx_clgv_rec.irm_id);
1485 p6_a9 := rosetta_g_miss_num_map(ddx_clgv_rec.iuv_id);
1486 p6_a10 := ddx_clgv_rec.name;
1487 p6_a11 := ddx_clgv_rec.description;
1488 p6_a12 := ddx_clgv_rec.private_label_logo_url;
1489 p6_a13 := ddx_clgv_rec.attribute_category;
1490 p6_a14 := ddx_clgv_rec.attribute1;
1491 p6_a15 := ddx_clgv_rec.attribute2;
1492 p6_a16 := ddx_clgv_rec.attribute3;
1493 p6_a17 := ddx_clgv_rec.attribute4;
1494 p6_a18 := ddx_clgv_rec.attribute5;
1495 p6_a19 := ddx_clgv_rec.attribute6;
1496 p6_a20 := ddx_clgv_rec.attribute7;
1497 p6_a21 := ddx_clgv_rec.attribute8;
1498 p6_a22 := ddx_clgv_rec.attribute9;
1499 p6_a23 := ddx_clgv_rec.attribute10;
1500 p6_a24 := ddx_clgv_rec.attribute11;
1501 p6_a25 := ddx_clgv_rec.attribute12;
1502 p6_a26 := ddx_clgv_rec.attribute13;
1503 p6_a27 := ddx_clgv_rec.attribute14;
1504 p6_a28 := ddx_clgv_rec.attribute15;
1505 p6_a29 := rosetta_g_miss_num_map(ddx_clgv_rec.created_by);
1506 p6_a30 := ddx_clgv_rec.creation_date;
1507 p6_a31 := rosetta_g_miss_num_map(ddx_clgv_rec.last_updated_by);
1508 p6_a32 := ddx_clgv_rec.last_update_date;
1509 p6_a33 := rosetta_g_miss_num_map(ddx_clgv_rec.last_update_login);
1510 p6_a34 := ddx_clgv_rec.effective_date_from;
1511 p6_a35 := ddx_clgv_rec.effective_date_to;
1512 p6_a36 := rosetta_g_miss_num_map(ddx_clgv_rec.ipl_id);
1513 p6_a37 := rosetta_g_miss_num_map(ddx_clgv_rec.legal_entity_id);
1514 end;
1515
1516 procedure update_row(p_api_version NUMBER
1517 , p_init_msg_list VARCHAR2
1518 , x_return_status out nocopy VARCHAR2
1519 , x_msg_count out nocopy NUMBER
1520 , x_msg_data out nocopy VARCHAR2
1521 , p5_a0 JTF_NUMBER_TABLE
1522 , p5_a1 JTF_NUMBER_TABLE
1523 , p5_a2 JTF_NUMBER_TABLE
1524 , p5_a3 JTF_VARCHAR2_TABLE_100
1525 , p5_a4 JTF_NUMBER_TABLE
1526 , p5_a5 JTF_NUMBER_TABLE
1527 , p5_a6 JTF_NUMBER_TABLE
1528 , p5_a7 JTF_VARCHAR2_TABLE_100
1529 , p5_a8 JTF_NUMBER_TABLE
1530 , p5_a9 JTF_NUMBER_TABLE
1531 , p5_a10 JTF_VARCHAR2_TABLE_200
1532 , p5_a11 JTF_VARCHAR2_TABLE_2000
1533 , p5_a12 JTF_VARCHAR2_TABLE_2000
1534 , p5_a13 JTF_VARCHAR2_TABLE_100
1535 , p5_a14 JTF_VARCHAR2_TABLE_500
1536 , p5_a15 JTF_VARCHAR2_TABLE_500
1537 , p5_a16 JTF_VARCHAR2_TABLE_500
1538 , p5_a17 JTF_VARCHAR2_TABLE_500
1539 , p5_a18 JTF_VARCHAR2_TABLE_500
1540 , p5_a19 JTF_VARCHAR2_TABLE_500
1541 , p5_a20 JTF_VARCHAR2_TABLE_500
1542 , p5_a21 JTF_VARCHAR2_TABLE_500
1543 , p5_a22 JTF_VARCHAR2_TABLE_500
1544 , p5_a23 JTF_VARCHAR2_TABLE_500
1545 , p5_a24 JTF_VARCHAR2_TABLE_500
1546 , p5_a25 JTF_VARCHAR2_TABLE_500
1547 , p5_a26 JTF_VARCHAR2_TABLE_500
1548 , p5_a27 JTF_VARCHAR2_TABLE_500
1549 , p5_a28 JTF_VARCHAR2_TABLE_500
1550 , p5_a29 JTF_NUMBER_TABLE
1551 , p5_a30 JTF_DATE_TABLE
1552 , p5_a31 JTF_NUMBER_TABLE
1553 , p5_a32 JTF_DATE_TABLE
1554 , p5_a33 JTF_NUMBER_TABLE
1555 , p5_a34 JTF_DATE_TABLE
1556 , p5_a35 JTF_DATE_TABLE
1557 , p5_a36 JTF_NUMBER_TABLE
1558 , p5_a37 JTF_NUMBER_TABLE
1559 , p6_a0 out nocopy JTF_NUMBER_TABLE
1560 , p6_a1 out nocopy JTF_NUMBER_TABLE
1561 , p6_a2 out nocopy JTF_NUMBER_TABLE
1562 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1563 , p6_a4 out nocopy JTF_NUMBER_TABLE
1564 , p6_a5 out nocopy JTF_NUMBER_TABLE
1565 , p6_a6 out nocopy JTF_NUMBER_TABLE
1566 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
1567 , p6_a8 out nocopy JTF_NUMBER_TABLE
1568 , p6_a9 out nocopy JTF_NUMBER_TABLE
1569 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_200
1570 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_2000
1571 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_2000
1572 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
1573 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1574 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1575 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1576 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1577 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1578 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1579 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1580 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1581 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
1582 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
1583 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
1584 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
1585 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
1586 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
1587 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
1588 , p6_a29 out nocopy JTF_NUMBER_TABLE
1589 , p6_a30 out nocopy JTF_DATE_TABLE
1590 , p6_a31 out nocopy JTF_NUMBER_TABLE
1591 , p6_a32 out nocopy JTF_DATE_TABLE
1592 , p6_a33 out nocopy JTF_NUMBER_TABLE
1593 , p6_a34 out nocopy JTF_DATE_TABLE
1594 , p6_a35 out nocopy JTF_DATE_TABLE
1595 , p6_a36 out nocopy JTF_NUMBER_TABLE
1596 , p6_a37 out nocopy JTF_NUMBER_TABLE
1597 )
1598
1599 as
1600 ddp_clgv_tbl okl_clg_pvt.clgv_tbl_type;
1601 ddx_clgv_tbl okl_clg_pvt.clgv_tbl_type;
1602 ddindx binary_integer; indx binary_integer;
1603 begin
1604
1605 -- copy data to the local IN or IN-OUT args, if any
1606
1607
1608
1609
1610
1611 okl_clg_pvt_w.rosetta_table_copy_in_p8(ddp_clgv_tbl, p5_a0
1612 , p5_a1
1613 , p5_a2
1614 , p5_a3
1615 , p5_a4
1616 , p5_a5
1617 , p5_a6
1618 , p5_a7
1619 , p5_a8
1620 , p5_a9
1621 , p5_a10
1622 , p5_a11
1623 , p5_a12
1624 , p5_a13
1625 , p5_a14
1626 , p5_a15
1627 , p5_a16
1628 , p5_a17
1629 , p5_a18
1630 , p5_a19
1631 , p5_a20
1632 , p5_a21
1633 , p5_a22
1634 , p5_a23
1635 , p5_a24
1636 , p5_a25
1637 , p5_a26
1638 , p5_a27
1639 , p5_a28
1640 , p5_a29
1641 , p5_a30
1642 , p5_a31
1643 , p5_a32
1644 , p5_a33
1645 , p5_a34
1646 , p5_a35
1647 , p5_a36
1648 , p5_a37
1649 );
1650
1651
1652 -- here's the delegated call to the old PL/SQL routine
1653 okl_clg_pvt.update_row(p_api_version,
1654 p_init_msg_list,
1655 x_return_status,
1656 x_msg_count,
1657 x_msg_data,
1658 ddp_clgv_tbl,
1659 ddx_clgv_tbl);
1660
1661 -- copy data back from the local variables to OUT or IN-OUT args, if any
1662
1663
1664
1665
1666
1667
1668 okl_clg_pvt_w.rosetta_table_copy_out_p8(ddx_clgv_tbl, p6_a0
1669 , p6_a1
1670 , p6_a2
1671 , p6_a3
1672 , p6_a4
1673 , p6_a5
1674 , p6_a6
1675 , p6_a7
1676 , p6_a8
1677 , p6_a9
1678 , p6_a10
1679 , p6_a11
1680 , p6_a12
1681 , p6_a13
1682 , p6_a14
1683 , p6_a15
1684 , p6_a16
1685 , p6_a17
1686 , p6_a18
1687 , p6_a19
1688 , p6_a20
1689 , p6_a21
1690 , p6_a22
1691 , p6_a23
1692 , p6_a24
1693 , p6_a25
1694 , p6_a26
1695 , p6_a27
1696 , p6_a28
1697 , p6_a29
1698 , p6_a30
1699 , p6_a31
1700 , p6_a32
1701 , p6_a33
1702 , p6_a34
1703 , p6_a35
1704 , p6_a36
1705 , p6_a37
1706 );
1707 end;
1708
1709 procedure delete_row(p_api_version NUMBER
1710 , p_init_msg_list VARCHAR2
1711 , x_return_status out nocopy VARCHAR2
1712 , x_msg_count out nocopy NUMBER
1713 , x_msg_data out nocopy VARCHAR2
1714 , p5_a0 NUMBER := 0-1962.0724
1715 , p5_a1 NUMBER := 0-1962.0724
1716 , p5_a2 NUMBER := 0-1962.0724
1717 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1718 , p5_a4 NUMBER := 0-1962.0724
1719 , p5_a5 NUMBER := 0-1962.0724
1720 , p5_a6 NUMBER := 0-1962.0724
1721 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1722 , p5_a8 NUMBER := 0-1962.0724
1723 , p5_a9 NUMBER := 0-1962.0724
1724 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1725 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1726 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1727 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1728 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1729 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1730 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1731 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1732 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1733 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1734 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1735 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1736 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1737 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1738 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1739 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1740 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1741 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1742 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1743 , p5_a29 NUMBER := 0-1962.0724
1744 , p5_a30 DATE := fnd_api.g_miss_date
1745 , p5_a31 NUMBER := 0-1962.0724
1746 , p5_a32 DATE := fnd_api.g_miss_date
1747 , p5_a33 NUMBER := 0-1962.0724
1748 , p5_a34 DATE := fnd_api.g_miss_date
1749 , p5_a35 DATE := fnd_api.g_miss_date
1750 , p5_a36 NUMBER := 0-1962.0724
1751 , p5_a37 NUMBER := 0-1962.0724
1752 )
1753
1754 as
1755 ddp_clgv_rec okl_clg_pvt.clgv_rec_type;
1756 ddindx binary_integer; indx binary_integer;
1757 begin
1758
1759 -- copy data to the local IN or IN-OUT args, if any
1760
1761
1762
1763
1764
1765 ddp_clgv_rec.id := rosetta_g_miss_num_map(p5_a0);
1766 ddp_clgv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1767 ddp_clgv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
1768 ddp_clgv_rec.sfwt_flag := p5_a3;
1769 ddp_clgv_rec.inf_id := rosetta_g_miss_num_map(p5_a4);
1770 ddp_clgv_rec.ica_id := rosetta_g_miss_num_map(p5_a5);
1771 ddp_clgv_rec.ibt_id := rosetta_g_miss_num_map(p5_a6);
1772 ddp_clgv_rec.currency_code := p5_a7;
1773 ddp_clgv_rec.irm_id := rosetta_g_miss_num_map(p5_a8);
1774 ddp_clgv_rec.iuv_id := rosetta_g_miss_num_map(p5_a9);
1775 ddp_clgv_rec.name := p5_a10;
1776 ddp_clgv_rec.description := p5_a11;
1777 ddp_clgv_rec.private_label_logo_url := p5_a12;
1778 ddp_clgv_rec.attribute_category := p5_a13;
1779 ddp_clgv_rec.attribute1 := p5_a14;
1780 ddp_clgv_rec.attribute2 := p5_a15;
1781 ddp_clgv_rec.attribute3 := p5_a16;
1782 ddp_clgv_rec.attribute4 := p5_a17;
1783 ddp_clgv_rec.attribute5 := p5_a18;
1784 ddp_clgv_rec.attribute6 := p5_a19;
1785 ddp_clgv_rec.attribute7 := p5_a20;
1786 ddp_clgv_rec.attribute8 := p5_a21;
1787 ddp_clgv_rec.attribute9 := p5_a22;
1788 ddp_clgv_rec.attribute10 := p5_a23;
1789 ddp_clgv_rec.attribute11 := p5_a24;
1790 ddp_clgv_rec.attribute12 := p5_a25;
1791 ddp_clgv_rec.attribute13 := p5_a26;
1792 ddp_clgv_rec.attribute14 := p5_a27;
1793 ddp_clgv_rec.attribute15 := p5_a28;
1794 ddp_clgv_rec.created_by := rosetta_g_miss_num_map(p5_a29);
1795 ddp_clgv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a30);
1796 ddp_clgv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a31);
1797 ddp_clgv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a32);
1798 ddp_clgv_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
1799 ddp_clgv_rec.effective_date_from := rosetta_g_miss_date_in_map(p5_a34);
1800 ddp_clgv_rec.effective_date_to := rosetta_g_miss_date_in_map(p5_a35);
1801 ddp_clgv_rec.ipl_id := rosetta_g_miss_num_map(p5_a36);
1802 ddp_clgv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a37);
1803
1804 -- here's the delegated call to the old PL/SQL routine
1805 okl_clg_pvt.delete_row(p_api_version,
1806 p_init_msg_list,
1807 x_return_status,
1808 x_msg_count,
1809 x_msg_data,
1810 ddp_clgv_rec);
1811
1812 -- copy data back from the local variables to OUT or IN-OUT args, if any
1813
1814
1815
1816
1817
1818 end;
1819
1820 procedure delete_row(p_api_version NUMBER
1821 , p_init_msg_list VARCHAR2
1822 , x_return_status out nocopy VARCHAR2
1823 , x_msg_count out nocopy NUMBER
1824 , x_msg_data out nocopy VARCHAR2
1825 , p5_a0 JTF_NUMBER_TABLE
1826 , p5_a1 JTF_NUMBER_TABLE
1827 , p5_a2 JTF_NUMBER_TABLE
1828 , p5_a3 JTF_VARCHAR2_TABLE_100
1829 , p5_a4 JTF_NUMBER_TABLE
1830 , p5_a5 JTF_NUMBER_TABLE
1831 , p5_a6 JTF_NUMBER_TABLE
1832 , p5_a7 JTF_VARCHAR2_TABLE_100
1833 , p5_a8 JTF_NUMBER_TABLE
1834 , p5_a9 JTF_NUMBER_TABLE
1835 , p5_a10 JTF_VARCHAR2_TABLE_200
1836 , p5_a11 JTF_VARCHAR2_TABLE_2000
1837 , p5_a12 JTF_VARCHAR2_TABLE_2000
1838 , p5_a13 JTF_VARCHAR2_TABLE_100
1839 , p5_a14 JTF_VARCHAR2_TABLE_500
1840 , p5_a15 JTF_VARCHAR2_TABLE_500
1841 , p5_a16 JTF_VARCHAR2_TABLE_500
1842 , p5_a17 JTF_VARCHAR2_TABLE_500
1843 , p5_a18 JTF_VARCHAR2_TABLE_500
1844 , p5_a19 JTF_VARCHAR2_TABLE_500
1845 , p5_a20 JTF_VARCHAR2_TABLE_500
1846 , p5_a21 JTF_VARCHAR2_TABLE_500
1847 , p5_a22 JTF_VARCHAR2_TABLE_500
1848 , p5_a23 JTF_VARCHAR2_TABLE_500
1849 , p5_a24 JTF_VARCHAR2_TABLE_500
1850 , p5_a25 JTF_VARCHAR2_TABLE_500
1851 , p5_a26 JTF_VARCHAR2_TABLE_500
1852 , p5_a27 JTF_VARCHAR2_TABLE_500
1853 , p5_a28 JTF_VARCHAR2_TABLE_500
1854 , p5_a29 JTF_NUMBER_TABLE
1855 , p5_a30 JTF_DATE_TABLE
1856 , p5_a31 JTF_NUMBER_TABLE
1857 , p5_a32 JTF_DATE_TABLE
1858 , p5_a33 JTF_NUMBER_TABLE
1859 , p5_a34 JTF_DATE_TABLE
1860 , p5_a35 JTF_DATE_TABLE
1861 , p5_a36 JTF_NUMBER_TABLE
1862 , p5_a37 JTF_NUMBER_TABLE
1863 )
1864
1865 as
1866 ddp_clgv_tbl okl_clg_pvt.clgv_tbl_type;
1867 ddindx binary_integer; indx binary_integer;
1868 begin
1869
1870 -- copy data to the local IN or IN-OUT args, if any
1871
1872
1873
1874
1875
1876 okl_clg_pvt_w.rosetta_table_copy_in_p8(ddp_clgv_tbl, p5_a0
1877 , p5_a1
1878 , p5_a2
1879 , p5_a3
1880 , p5_a4
1881 , p5_a5
1882 , p5_a6
1883 , p5_a7
1884 , p5_a8
1885 , p5_a9
1886 , p5_a10
1887 , p5_a11
1888 , p5_a12
1889 , p5_a13
1890 , p5_a14
1891 , p5_a15
1892 , p5_a16
1893 , p5_a17
1894 , p5_a18
1895 , p5_a19
1896 , p5_a20
1897 , p5_a21
1898 , p5_a22
1899 , p5_a23
1900 , p5_a24
1901 , p5_a25
1902 , p5_a26
1903 , p5_a27
1904 , p5_a28
1905 , p5_a29
1906 , p5_a30
1907 , p5_a31
1908 , p5_a32
1909 , p5_a33
1910 , p5_a34
1911 , p5_a35
1912 , p5_a36
1913 , p5_a37
1914 );
1915
1916 -- here's the delegated call to the old PL/SQL routine
1917 okl_clg_pvt.delete_row(p_api_version,
1918 p_init_msg_list,
1919 x_return_status,
1920 x_msg_count,
1921 x_msg_data,
1922 ddp_clgv_tbl);
1923
1924 -- copy data back from the local variables to OUT or IN-OUT args, if any
1925
1926
1927
1928
1929
1930 end;
1931
1932 procedure validate_row(p_api_version NUMBER
1933 , p_init_msg_list VARCHAR2
1934 , x_return_status out nocopy VARCHAR2
1935 , x_msg_count out nocopy NUMBER
1936 , x_msg_data out nocopy VARCHAR2
1937 , p5_a0 NUMBER := 0-1962.0724
1938 , p5_a1 NUMBER := 0-1962.0724
1939 , p5_a2 NUMBER := 0-1962.0724
1940 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1941 , p5_a4 NUMBER := 0-1962.0724
1942 , p5_a5 NUMBER := 0-1962.0724
1943 , p5_a6 NUMBER := 0-1962.0724
1944 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1945 , p5_a8 NUMBER := 0-1962.0724
1946 , p5_a9 NUMBER := 0-1962.0724
1947 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1948 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1949 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1950 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1951 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1952 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1953 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1954 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1955 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1956 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1957 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1958 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1959 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1960 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1961 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1962 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1963 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1964 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1965 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1966 , p5_a29 NUMBER := 0-1962.0724
1967 , p5_a30 DATE := fnd_api.g_miss_date
1968 , p5_a31 NUMBER := 0-1962.0724
1969 , p5_a32 DATE := fnd_api.g_miss_date
1970 , p5_a33 NUMBER := 0-1962.0724
1971 , p5_a34 DATE := fnd_api.g_miss_date
1972 , p5_a35 DATE := fnd_api.g_miss_date
1973 , p5_a36 NUMBER := 0-1962.0724
1974 , p5_a37 NUMBER := 0-1962.0724
1975 )
1976
1977 as
1978 ddp_clgv_rec okl_clg_pvt.clgv_rec_type;
1979 ddindx binary_integer; indx binary_integer;
1980 begin
1981
1982 -- copy data to the local IN or IN-OUT args, if any
1983
1984
1985
1986
1987
1988 ddp_clgv_rec.id := rosetta_g_miss_num_map(p5_a0);
1989 ddp_clgv_rec.org_id := rosetta_g_miss_num_map(p5_a1);
1990 ddp_clgv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
1991 ddp_clgv_rec.sfwt_flag := p5_a3;
1992 ddp_clgv_rec.inf_id := rosetta_g_miss_num_map(p5_a4);
1993 ddp_clgv_rec.ica_id := rosetta_g_miss_num_map(p5_a5);
1994 ddp_clgv_rec.ibt_id := rosetta_g_miss_num_map(p5_a6);
1995 ddp_clgv_rec.currency_code := p5_a7;
1996 ddp_clgv_rec.irm_id := rosetta_g_miss_num_map(p5_a8);
1997 ddp_clgv_rec.iuv_id := rosetta_g_miss_num_map(p5_a9);
1998 ddp_clgv_rec.name := p5_a10;
1999 ddp_clgv_rec.description := p5_a11;
2000 ddp_clgv_rec.private_label_logo_url := p5_a12;
2001 ddp_clgv_rec.attribute_category := p5_a13;
2002 ddp_clgv_rec.attribute1 := p5_a14;
2003 ddp_clgv_rec.attribute2 := p5_a15;
2004 ddp_clgv_rec.attribute3 := p5_a16;
2005 ddp_clgv_rec.attribute4 := p5_a17;
2006 ddp_clgv_rec.attribute5 := p5_a18;
2007 ddp_clgv_rec.attribute6 := p5_a19;
2008 ddp_clgv_rec.attribute7 := p5_a20;
2009 ddp_clgv_rec.attribute8 := p5_a21;
2010 ddp_clgv_rec.attribute9 := p5_a22;
2011 ddp_clgv_rec.attribute10 := p5_a23;
2012 ddp_clgv_rec.attribute11 := p5_a24;
2013 ddp_clgv_rec.attribute12 := p5_a25;
2014 ddp_clgv_rec.attribute13 := p5_a26;
2015 ddp_clgv_rec.attribute14 := p5_a27;
2016 ddp_clgv_rec.attribute15 := p5_a28;
2017 ddp_clgv_rec.created_by := rosetta_g_miss_num_map(p5_a29);
2018 ddp_clgv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a30);
2019 ddp_clgv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a31);
2020 ddp_clgv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a32);
2021 ddp_clgv_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
2022 ddp_clgv_rec.effective_date_from := rosetta_g_miss_date_in_map(p5_a34);
2023 ddp_clgv_rec.effective_date_to := rosetta_g_miss_date_in_map(p5_a35);
2024 ddp_clgv_rec.ipl_id := rosetta_g_miss_num_map(p5_a36);
2025 ddp_clgv_rec.legal_entity_id := rosetta_g_miss_num_map(p5_a37);
2026
2027 -- here's the delegated call to the old PL/SQL routine
2028 okl_clg_pvt.validate_row(p_api_version,
2029 p_init_msg_list,
2030 x_return_status,
2031 x_msg_count,
2032 x_msg_data,
2033 ddp_clgv_rec);
2034
2035 -- copy data back from the local variables to OUT or IN-OUT args, if any
2036
2037
2038
2039
2040
2041 end;
2042
2043 procedure validate_row(p_api_version NUMBER
2044 , p_init_msg_list VARCHAR2
2045 , x_return_status out nocopy VARCHAR2
2046 , x_msg_count out nocopy NUMBER
2047 , x_msg_data out nocopy VARCHAR2
2048 , p5_a0 JTF_NUMBER_TABLE
2049 , p5_a1 JTF_NUMBER_TABLE
2050 , p5_a2 JTF_NUMBER_TABLE
2051 , p5_a3 JTF_VARCHAR2_TABLE_100
2052 , p5_a4 JTF_NUMBER_TABLE
2053 , p5_a5 JTF_NUMBER_TABLE
2054 , p5_a6 JTF_NUMBER_TABLE
2055 , p5_a7 JTF_VARCHAR2_TABLE_100
2056 , p5_a8 JTF_NUMBER_TABLE
2057 , p5_a9 JTF_NUMBER_TABLE
2058 , p5_a10 JTF_VARCHAR2_TABLE_200
2059 , p5_a11 JTF_VARCHAR2_TABLE_2000
2060 , p5_a12 JTF_VARCHAR2_TABLE_2000
2061 , p5_a13 JTF_VARCHAR2_TABLE_100
2062 , p5_a14 JTF_VARCHAR2_TABLE_500
2063 , p5_a15 JTF_VARCHAR2_TABLE_500
2064 , p5_a16 JTF_VARCHAR2_TABLE_500
2065 , p5_a17 JTF_VARCHAR2_TABLE_500
2066 , p5_a18 JTF_VARCHAR2_TABLE_500
2067 , p5_a19 JTF_VARCHAR2_TABLE_500
2068 , p5_a20 JTF_VARCHAR2_TABLE_500
2069 , p5_a21 JTF_VARCHAR2_TABLE_500
2070 , p5_a22 JTF_VARCHAR2_TABLE_500
2071 , p5_a23 JTF_VARCHAR2_TABLE_500
2072 , p5_a24 JTF_VARCHAR2_TABLE_500
2073 , p5_a25 JTF_VARCHAR2_TABLE_500
2074 , p5_a26 JTF_VARCHAR2_TABLE_500
2075 , p5_a27 JTF_VARCHAR2_TABLE_500
2076 , p5_a28 JTF_VARCHAR2_TABLE_500
2077 , p5_a29 JTF_NUMBER_TABLE
2078 , p5_a30 JTF_DATE_TABLE
2079 , p5_a31 JTF_NUMBER_TABLE
2080 , p5_a32 JTF_DATE_TABLE
2081 , p5_a33 JTF_NUMBER_TABLE
2082 , p5_a34 JTF_DATE_TABLE
2083 , p5_a35 JTF_DATE_TABLE
2084 , p5_a36 JTF_NUMBER_TABLE
2085 , p5_a37 JTF_NUMBER_TABLE
2086 )
2087
2088 as
2089 ddp_clgv_tbl okl_clg_pvt.clgv_tbl_type;
2090 ddindx binary_integer; indx binary_integer;
2091 begin
2092
2093 -- copy data to the local IN or IN-OUT args, if any
2094
2095
2096
2097
2098
2099 okl_clg_pvt_w.rosetta_table_copy_in_p8(ddp_clgv_tbl, p5_a0
2100 , p5_a1
2101 , p5_a2
2102 , p5_a3
2103 , p5_a4
2104 , p5_a5
2105 , p5_a6
2106 , p5_a7
2107 , p5_a8
2108 , p5_a9
2109 , p5_a10
2110 , p5_a11
2111 , p5_a12
2112 , p5_a13
2113 , p5_a14
2114 , p5_a15
2115 , p5_a16
2116 , p5_a17
2117 , p5_a18
2118 , p5_a19
2119 , p5_a20
2120 , p5_a21
2121 , p5_a22
2122 , p5_a23
2123 , p5_a24
2124 , p5_a25
2125 , p5_a26
2126 , p5_a27
2127 , p5_a28
2128 , p5_a29
2129 , p5_a30
2130 , p5_a31
2131 , p5_a32
2132 , p5_a33
2133 , p5_a34
2134 , p5_a35
2135 , p5_a36
2136 , p5_a37
2137 );
2138
2139 -- here's the delegated call to the old PL/SQL routine
2140 okl_clg_pvt.validate_row(p_api_version,
2141 p_init_msg_list,
2142 x_return_status,
2143 x_msg_count,
2144 x_msg_data,
2145 ddp_clgv_tbl);
2146
2147 -- copy data back from the local variables to OUT or IN-OUT args, if any
2148
2149
2150
2151
2152
2153 end;
2154
2155 end okl_clg_pvt_w;