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