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