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