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