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