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