[Home] [Help]
PACKAGE BODY: APPS.OKL_ITM_CAT_RV_PRCS_PUB_W
Source
1 package body okl_itm_cat_rv_prcs_pub_w as
2 /* $Header: OKLUICPB.pls 120.1 2005/07/08 07:10:13 smadhava 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_itm_cat_rv_prcs(p_api_version NUMBER
23 , p_init_msg_list VARCHAR2
24 , x_return_status out nocopy VARCHAR2
25 , x_msg_count out nocopy NUMBER
26 , x_msg_data out nocopy VARCHAR2
27 , p5_a0 JTF_NUMBER_TABLE
28 , p5_a1 JTF_NUMBER_TABLE
29 , p5_a2 JTF_NUMBER_TABLE
30 , p5_a3 JTF_NUMBER_TABLE
31 , p5_a4 JTF_NUMBER_TABLE
32 , p5_a5 JTF_NUMBER_TABLE
33 , p5_a6 JTF_NUMBER_TABLE
34 , p5_a7 JTF_VARCHAR2_TABLE_100
35 , p5_a8 JTF_VARCHAR2_TABLE_100
36 , p5_a9 JTF_DATE_TABLE
37 , p5_a10 JTF_DATE_TABLE
38 , p5_a11 JTF_NUMBER_TABLE
39 , p5_a12 JTF_DATE_TABLE
40 , p5_a13 JTF_NUMBER_TABLE
41 , p5_a14 JTF_DATE_TABLE
42 , p5_a15 JTF_NUMBER_TABLE
43 , p5_a16 JTF_VARCHAR2_TABLE_100
44 , p5_a17 JTF_VARCHAR2_TABLE_500
45 , p5_a18 JTF_VARCHAR2_TABLE_500
46 , p5_a19 JTF_VARCHAR2_TABLE_500
47 , p5_a20 JTF_VARCHAR2_TABLE_500
48 , p5_a21 JTF_VARCHAR2_TABLE_500
49 , p5_a22 JTF_VARCHAR2_TABLE_500
50 , p5_a23 JTF_VARCHAR2_TABLE_500
51 , p5_a24 JTF_VARCHAR2_TABLE_500
52 , p5_a25 JTF_VARCHAR2_TABLE_500
53 , p5_a26 JTF_VARCHAR2_TABLE_500
54 , p5_a27 JTF_VARCHAR2_TABLE_500
55 , p5_a28 JTF_VARCHAR2_TABLE_500
56 , p5_a29 JTF_VARCHAR2_TABLE_500
57 , p5_a30 JTF_VARCHAR2_TABLE_500
58 , p5_a31 JTF_VARCHAR2_TABLE_500
59 , p6_a0 out nocopy JTF_NUMBER_TABLE
60 , p6_a1 out nocopy JTF_NUMBER_TABLE
61 , p6_a2 out nocopy JTF_NUMBER_TABLE
62 , p6_a3 out nocopy JTF_NUMBER_TABLE
63 , p6_a4 out nocopy JTF_NUMBER_TABLE
64 , p6_a5 out nocopy JTF_NUMBER_TABLE
65 , p6_a6 out nocopy JTF_NUMBER_TABLE
66 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
67 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
68 , p6_a9 out nocopy JTF_DATE_TABLE
69 , p6_a10 out nocopy JTF_DATE_TABLE
70 , p6_a11 out nocopy JTF_NUMBER_TABLE
71 , p6_a12 out nocopy JTF_DATE_TABLE
72 , p6_a13 out nocopy JTF_NUMBER_TABLE
73 , p6_a14 out nocopy JTF_DATE_TABLE
74 , p6_a15 out nocopy JTF_NUMBER_TABLE
75 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
76 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
77 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
78 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
79 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
80 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
81 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
82 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
83 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
84 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
85 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
86 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
87 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
88 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
89 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
90 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
91 )
92
93 as
94 ddp_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_type;
95 ddx_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_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 okl_icp_pvt_w.rosetta_table_copy_in_p27(ddp_icpv_tbl, p5_a0
106 , p5_a1
107 , p5_a2
108 , p5_a3
109 , p5_a4
110 , p5_a5
111 , p5_a6
112 , p5_a7
113 , p5_a8
114 , p5_a9
115 , p5_a10
116 , p5_a11
117 , p5_a12
118 , p5_a13
119 , p5_a14
120 , p5_a15
121 , p5_a16
122 , p5_a17
123 , p5_a18
124 , p5_a19
125 , p5_a20
126 , p5_a21
127 , p5_a22
128 , p5_a23
129 , p5_a24
130 , p5_a25
131 , p5_a26
132 , p5_a27
133 , p5_a28
134 , p5_a29
135 , p5_a30
136 , p5_a31
137 );
138
139
140 -- here's the delegated call to the old PL/SQL routine
141 okl_itm_cat_rv_prcs_pub.insert_itm_cat_rv_prcs(p_api_version,
142 p_init_msg_list,
143 x_return_status,
144 x_msg_count,
145 x_msg_data,
146 ddp_icpv_tbl,
147 ddx_icpv_tbl);
148
149 -- copy data back from the local variables to OUT or IN-OUT args, if any
150
151
152
153
154
155
156 okl_icp_pvt_w.rosetta_table_copy_out_p27(ddx_icpv_tbl, p6_a0
157 , p6_a1
158 , p6_a2
159 , p6_a3
160 , p6_a4
161 , p6_a5
162 , p6_a6
163 , p6_a7
164 , p6_a8
165 , p6_a9
166 , p6_a10
167 , p6_a11
168 , p6_a12
169 , p6_a13
170 , p6_a14
171 , p6_a15
172 , p6_a16
173 , p6_a17
174 , p6_a18
175 , p6_a19
176 , p6_a20
177 , p6_a21
178 , p6_a22
179 , p6_a23
180 , p6_a24
181 , p6_a25
182 , p6_a26
183 , p6_a27
184 , p6_a28
185 , p6_a29
186 , p6_a30
187 , p6_a31
188 );
189 end;
190
191 procedure insert_itm_cat_rv_prcs(p_api_version NUMBER
192 , p_init_msg_list VARCHAR2
193 , x_return_status out nocopy VARCHAR2
194 , x_msg_count out nocopy NUMBER
195 , x_msg_data out nocopy VARCHAR2
196 , p6_a0 out nocopy NUMBER
197 , p6_a1 out nocopy NUMBER
198 , p6_a2 out nocopy NUMBER
199 , p6_a3 out nocopy NUMBER
200 , p6_a4 out nocopy NUMBER
201 , p6_a5 out nocopy NUMBER
202 , p6_a6 out nocopy NUMBER
203 , p6_a7 out nocopy VARCHAR2
204 , p6_a8 out nocopy VARCHAR2
205 , p6_a9 out nocopy DATE
206 , p6_a10 out nocopy DATE
207 , p6_a11 out nocopy NUMBER
208 , p6_a12 out nocopy DATE
209 , p6_a13 out nocopy NUMBER
210 , p6_a14 out nocopy DATE
211 , p6_a15 out nocopy NUMBER
212 , p6_a16 out nocopy VARCHAR2
213 , p6_a17 out nocopy VARCHAR2
214 , p6_a18 out nocopy VARCHAR2
215 , p6_a19 out nocopy VARCHAR2
216 , p6_a20 out nocopy VARCHAR2
217 , p6_a21 out nocopy VARCHAR2
218 , p6_a22 out nocopy VARCHAR2
219 , p6_a23 out nocopy VARCHAR2
220 , p6_a24 out nocopy VARCHAR2
221 , p6_a25 out nocopy VARCHAR2
222 , p6_a26 out nocopy VARCHAR2
223 , p6_a27 out nocopy VARCHAR2
224 , p6_a28 out nocopy VARCHAR2
225 , p6_a29 out nocopy VARCHAR2
226 , p6_a30 out nocopy VARCHAR2
227 , p6_a31 out nocopy VARCHAR2
228 , p5_a0 NUMBER := 0-1962.0724
229 , p5_a1 NUMBER := 0-1962.0724
230 , p5_a2 NUMBER := 0-1962.0724
231 , p5_a3 NUMBER := 0-1962.0724
232 , p5_a4 NUMBER := 0-1962.0724
233 , p5_a5 NUMBER := 0-1962.0724
234 , p5_a6 NUMBER := 0-1962.0724
235 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
236 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
237 , p5_a9 DATE := fnd_api.g_miss_date
238 , p5_a10 DATE := fnd_api.g_miss_date
239 , p5_a11 NUMBER := 0-1962.0724
240 , p5_a12 DATE := fnd_api.g_miss_date
241 , p5_a13 NUMBER := 0-1962.0724
242 , p5_a14 DATE := fnd_api.g_miss_date
243 , p5_a15 NUMBER := 0-1962.0724
244 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
245 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
246 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
247 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
248 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
249 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
250 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
251 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
252 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
253 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
254 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
255 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
256 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
257 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
258 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
259 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
260 )
261
262 as
263 ddp_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
264 ddx_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
265 ddindx binary_integer; indx binary_integer;
266 begin
267
268 -- copy data to the local IN or IN-OUT args, if any
269
270
271
272
273
274 ddp_icpv_rec.id := rosetta_g_miss_num_map(p5_a0);
275 ddp_icpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
276 ddp_icpv_rec.cat_id1 := rosetta_g_miss_num_map(p5_a2);
277 ddp_icpv_rec.cat_id2 := rosetta_g_miss_num_map(p5_a3);
278 ddp_icpv_rec.term_in_months := rosetta_g_miss_num_map(p5_a4);
279 ddp_icpv_rec.residual_value_percent := rosetta_g_miss_num_map(p5_a5);
280 ddp_icpv_rec.item_residual_id := rosetta_g_miss_num_map(p5_a6);
281 ddp_icpv_rec.sts_code := p5_a7;
282 ddp_icpv_rec.version_number := p5_a8;
283 ddp_icpv_rec.start_date := rosetta_g_miss_date_in_map(p5_a9);
284 ddp_icpv_rec.end_date := rosetta_g_miss_date_in_map(p5_a10);
285 ddp_icpv_rec.created_by := rosetta_g_miss_num_map(p5_a11);
286 ddp_icpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a12);
287 ddp_icpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a13);
288 ddp_icpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a14);
289 ddp_icpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a15);
290 ddp_icpv_rec.attribute_category := p5_a16;
291 ddp_icpv_rec.attribute1 := p5_a17;
292 ddp_icpv_rec.attribute2 := p5_a18;
293 ddp_icpv_rec.attribute3 := p5_a19;
294 ddp_icpv_rec.attribute4 := p5_a20;
295 ddp_icpv_rec.attribute5 := p5_a21;
296 ddp_icpv_rec.attribute6 := p5_a22;
297 ddp_icpv_rec.attribute7 := p5_a23;
298 ddp_icpv_rec.attribute8 := p5_a24;
299 ddp_icpv_rec.attribute9 := p5_a25;
300 ddp_icpv_rec.attribute10 := p5_a26;
301 ddp_icpv_rec.attribute11 := p5_a27;
302 ddp_icpv_rec.attribute12 := p5_a28;
303 ddp_icpv_rec.attribute13 := p5_a29;
304 ddp_icpv_rec.attribute14 := p5_a30;
305 ddp_icpv_rec.attribute15 := p5_a31;
306
307
308 -- here's the delegated call to the old PL/SQL routine
309 okl_itm_cat_rv_prcs_pub.insert_itm_cat_rv_prcs(p_api_version,
310 p_init_msg_list,
311 x_return_status,
312 x_msg_count,
313 x_msg_data,
314 ddp_icpv_rec,
315 ddx_icpv_rec);
316
317 -- copy data back from the local variables to OUT or IN-OUT args, if any
318
319
320
321
322
323
324 p6_a0 := rosetta_g_miss_num_map(ddx_icpv_rec.id);
325 p6_a1 := rosetta_g_miss_num_map(ddx_icpv_rec.object_version_number);
326 p6_a2 := rosetta_g_miss_num_map(ddx_icpv_rec.cat_id1);
327 p6_a3 := rosetta_g_miss_num_map(ddx_icpv_rec.cat_id2);
328 p6_a4 := rosetta_g_miss_num_map(ddx_icpv_rec.term_in_months);
329 p6_a5 := rosetta_g_miss_num_map(ddx_icpv_rec.residual_value_percent);
330 p6_a6 := rosetta_g_miss_num_map(ddx_icpv_rec.item_residual_id);
331 p6_a7 := ddx_icpv_rec.sts_code;
332 p6_a8 := ddx_icpv_rec.version_number;
333 p6_a9 := ddx_icpv_rec.start_date;
334 p6_a10 := ddx_icpv_rec.end_date;
335 p6_a11 := rosetta_g_miss_num_map(ddx_icpv_rec.created_by);
336 p6_a12 := ddx_icpv_rec.creation_date;
337 p6_a13 := rosetta_g_miss_num_map(ddx_icpv_rec.last_updated_by);
338 p6_a14 := ddx_icpv_rec.last_update_date;
339 p6_a15 := rosetta_g_miss_num_map(ddx_icpv_rec.last_update_login);
340 p6_a16 := ddx_icpv_rec.attribute_category;
341 p6_a17 := ddx_icpv_rec.attribute1;
342 p6_a18 := ddx_icpv_rec.attribute2;
343 p6_a19 := ddx_icpv_rec.attribute3;
344 p6_a20 := ddx_icpv_rec.attribute4;
345 p6_a21 := ddx_icpv_rec.attribute5;
346 p6_a22 := ddx_icpv_rec.attribute6;
347 p6_a23 := ddx_icpv_rec.attribute7;
348 p6_a24 := ddx_icpv_rec.attribute8;
349 p6_a25 := ddx_icpv_rec.attribute9;
350 p6_a26 := ddx_icpv_rec.attribute10;
351 p6_a27 := ddx_icpv_rec.attribute11;
352 p6_a28 := ddx_icpv_rec.attribute12;
353 p6_a29 := ddx_icpv_rec.attribute13;
354 p6_a30 := ddx_icpv_rec.attribute14;
355 p6_a31 := ddx_icpv_rec.attribute15;
356 end;
357
358 procedure lock_itm_cat_rv_prcs(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 JTF_NUMBER_TABLE
364 , p5_a1 JTF_NUMBER_TABLE
365 , p5_a2 JTF_NUMBER_TABLE
366 , p5_a3 JTF_NUMBER_TABLE
367 , p5_a4 JTF_NUMBER_TABLE
368 , p5_a5 JTF_NUMBER_TABLE
369 , p5_a6 JTF_NUMBER_TABLE
370 , p5_a7 JTF_VARCHAR2_TABLE_100
371 , p5_a8 JTF_VARCHAR2_TABLE_100
372 , p5_a9 JTF_DATE_TABLE
373 , p5_a10 JTF_DATE_TABLE
374 , p5_a11 JTF_NUMBER_TABLE
375 , p5_a12 JTF_DATE_TABLE
376 , p5_a13 JTF_NUMBER_TABLE
377 , p5_a14 JTF_DATE_TABLE
378 , p5_a15 JTF_NUMBER_TABLE
379 , p5_a16 JTF_VARCHAR2_TABLE_100
380 , p5_a17 JTF_VARCHAR2_TABLE_500
381 , p5_a18 JTF_VARCHAR2_TABLE_500
382 , p5_a19 JTF_VARCHAR2_TABLE_500
383 , p5_a20 JTF_VARCHAR2_TABLE_500
384 , p5_a21 JTF_VARCHAR2_TABLE_500
385 , p5_a22 JTF_VARCHAR2_TABLE_500
386 , p5_a23 JTF_VARCHAR2_TABLE_500
387 , p5_a24 JTF_VARCHAR2_TABLE_500
388 , p5_a25 JTF_VARCHAR2_TABLE_500
389 , p5_a26 JTF_VARCHAR2_TABLE_500
390 , p5_a27 JTF_VARCHAR2_TABLE_500
391 , p5_a28 JTF_VARCHAR2_TABLE_500
392 , p5_a29 JTF_VARCHAR2_TABLE_500
393 , p5_a30 JTF_VARCHAR2_TABLE_500
394 , p5_a31 JTF_VARCHAR2_TABLE_500
395 )
396
397 as
398 ddp_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_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 okl_icp_pvt_w.rosetta_table_copy_in_p27(ddp_icpv_tbl, p5_a0
409 , p5_a1
410 , p5_a2
411 , p5_a3
412 , p5_a4
413 , p5_a5
414 , p5_a6
415 , p5_a7
416 , p5_a8
417 , p5_a9
418 , p5_a10
419 , p5_a11
420 , p5_a12
421 , p5_a13
422 , p5_a14
423 , p5_a15
424 , p5_a16
425 , p5_a17
426 , p5_a18
427 , p5_a19
428 , p5_a20
429 , p5_a21
430 , p5_a22
431 , p5_a23
432 , p5_a24
433 , p5_a25
434 , p5_a26
435 , p5_a27
436 , p5_a28
437 , p5_a29
438 , p5_a30
439 , p5_a31
440 );
441
442 -- here's the delegated call to the old PL/SQL routine
443 okl_itm_cat_rv_prcs_pub.lock_itm_cat_rv_prcs(p_api_version,
444 p_init_msg_list,
445 x_return_status,
446 x_msg_count,
447 x_msg_data,
448 ddp_icpv_tbl);
449
450 -- copy data back from the local variables to OUT or IN-OUT args, if any
451
452
453
454
455
456 end;
457
458 procedure lock_itm_cat_rv_prcs(p_api_version NUMBER
459 , p_init_msg_list VARCHAR2
460 , x_return_status out nocopy VARCHAR2
461 , x_msg_count out nocopy NUMBER
462 , x_msg_data out nocopy VARCHAR2
463 , p5_a0 NUMBER := 0-1962.0724
464 , p5_a1 NUMBER := 0-1962.0724
465 , p5_a2 NUMBER := 0-1962.0724
466 , p5_a3 NUMBER := 0-1962.0724
467 , p5_a4 NUMBER := 0-1962.0724
468 , p5_a5 NUMBER := 0-1962.0724
469 , p5_a6 NUMBER := 0-1962.0724
470 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
471 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
472 , p5_a9 DATE := fnd_api.g_miss_date
473 , p5_a10 DATE := fnd_api.g_miss_date
474 , p5_a11 NUMBER := 0-1962.0724
475 , p5_a12 DATE := fnd_api.g_miss_date
476 , p5_a13 NUMBER := 0-1962.0724
477 , p5_a14 DATE := fnd_api.g_miss_date
478 , p5_a15 NUMBER := 0-1962.0724
479 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
480 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
481 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
482 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
483 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
484 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
485 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
486 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
487 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
488 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
489 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
490 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
491 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
492 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
493 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
494 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
495 )
496
497 as
498 ddp_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
499 ddindx binary_integer; indx binary_integer;
500 begin
501
502 -- copy data to the local IN or IN-OUT args, if any
503
504
505
506
507
508 ddp_icpv_rec.id := rosetta_g_miss_num_map(p5_a0);
509 ddp_icpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
510 ddp_icpv_rec.cat_id1 := rosetta_g_miss_num_map(p5_a2);
511 ddp_icpv_rec.cat_id2 := rosetta_g_miss_num_map(p5_a3);
512 ddp_icpv_rec.term_in_months := rosetta_g_miss_num_map(p5_a4);
513 ddp_icpv_rec.residual_value_percent := rosetta_g_miss_num_map(p5_a5);
514 ddp_icpv_rec.item_residual_id := rosetta_g_miss_num_map(p5_a6);
515 ddp_icpv_rec.sts_code := p5_a7;
516 ddp_icpv_rec.version_number := p5_a8;
517 ddp_icpv_rec.start_date := rosetta_g_miss_date_in_map(p5_a9);
518 ddp_icpv_rec.end_date := rosetta_g_miss_date_in_map(p5_a10);
519 ddp_icpv_rec.created_by := rosetta_g_miss_num_map(p5_a11);
520 ddp_icpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a12);
521 ddp_icpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a13);
522 ddp_icpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a14);
523 ddp_icpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a15);
524 ddp_icpv_rec.attribute_category := p5_a16;
525 ddp_icpv_rec.attribute1 := p5_a17;
526 ddp_icpv_rec.attribute2 := p5_a18;
527 ddp_icpv_rec.attribute3 := p5_a19;
528 ddp_icpv_rec.attribute4 := p5_a20;
529 ddp_icpv_rec.attribute5 := p5_a21;
530 ddp_icpv_rec.attribute6 := p5_a22;
531 ddp_icpv_rec.attribute7 := p5_a23;
532 ddp_icpv_rec.attribute8 := p5_a24;
533 ddp_icpv_rec.attribute9 := p5_a25;
534 ddp_icpv_rec.attribute10 := p5_a26;
535 ddp_icpv_rec.attribute11 := p5_a27;
536 ddp_icpv_rec.attribute12 := p5_a28;
537 ddp_icpv_rec.attribute13 := p5_a29;
538 ddp_icpv_rec.attribute14 := p5_a30;
539 ddp_icpv_rec.attribute15 := p5_a31;
540
541 -- here's the delegated call to the old PL/SQL routine
542 okl_itm_cat_rv_prcs_pub.lock_itm_cat_rv_prcs(p_api_version,
543 p_init_msg_list,
544 x_return_status,
545 x_msg_count,
546 x_msg_data,
547 ddp_icpv_rec);
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_itm_cat_rv_prcs(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 , p5_a0 JTF_NUMBER_TABLE
563 , p5_a1 JTF_NUMBER_TABLE
564 , p5_a2 JTF_NUMBER_TABLE
565 , p5_a3 JTF_NUMBER_TABLE
566 , p5_a4 JTF_NUMBER_TABLE
567 , p5_a5 JTF_NUMBER_TABLE
568 , p5_a6 JTF_NUMBER_TABLE
569 , p5_a7 JTF_VARCHAR2_TABLE_100
570 , p5_a8 JTF_VARCHAR2_TABLE_100
571 , p5_a9 JTF_DATE_TABLE
572 , p5_a10 JTF_DATE_TABLE
573 , p5_a11 JTF_NUMBER_TABLE
574 , p5_a12 JTF_DATE_TABLE
575 , p5_a13 JTF_NUMBER_TABLE
576 , p5_a14 JTF_DATE_TABLE
577 , p5_a15 JTF_NUMBER_TABLE
578 , p5_a16 JTF_VARCHAR2_TABLE_100
579 , p5_a17 JTF_VARCHAR2_TABLE_500
580 , p5_a18 JTF_VARCHAR2_TABLE_500
581 , p5_a19 JTF_VARCHAR2_TABLE_500
582 , p5_a20 JTF_VARCHAR2_TABLE_500
583 , p5_a21 JTF_VARCHAR2_TABLE_500
584 , p5_a22 JTF_VARCHAR2_TABLE_500
585 , p5_a23 JTF_VARCHAR2_TABLE_500
586 , p5_a24 JTF_VARCHAR2_TABLE_500
587 , p5_a25 JTF_VARCHAR2_TABLE_500
588 , p5_a26 JTF_VARCHAR2_TABLE_500
589 , p5_a27 JTF_VARCHAR2_TABLE_500
590 , p5_a28 JTF_VARCHAR2_TABLE_500
591 , p5_a29 JTF_VARCHAR2_TABLE_500
592 , p5_a30 JTF_VARCHAR2_TABLE_500
593 , p5_a31 JTF_VARCHAR2_TABLE_500
594 , p6_a0 out nocopy JTF_NUMBER_TABLE
595 , p6_a1 out nocopy JTF_NUMBER_TABLE
596 , p6_a2 out nocopy JTF_NUMBER_TABLE
597 , p6_a3 out nocopy JTF_NUMBER_TABLE
598 , p6_a4 out nocopy JTF_NUMBER_TABLE
599 , p6_a5 out nocopy JTF_NUMBER_TABLE
600 , p6_a6 out nocopy JTF_NUMBER_TABLE
601 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
602 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
603 , p6_a9 out nocopy JTF_DATE_TABLE
604 , p6_a10 out nocopy JTF_DATE_TABLE
605 , p6_a11 out nocopy JTF_NUMBER_TABLE
606 , p6_a12 out nocopy JTF_DATE_TABLE
607 , p6_a13 out nocopy JTF_NUMBER_TABLE
608 , p6_a14 out nocopy JTF_DATE_TABLE
609 , p6_a15 out nocopy JTF_NUMBER_TABLE
610 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_100
611 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
612 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
613 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
614 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
615 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
616 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_500
617 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_500
618 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_500
619 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_500
620 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_500
621 , p6_a27 out nocopy JTF_VARCHAR2_TABLE_500
622 , p6_a28 out nocopy JTF_VARCHAR2_TABLE_500
623 , p6_a29 out nocopy JTF_VARCHAR2_TABLE_500
624 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_500
625 , p6_a31 out nocopy JTF_VARCHAR2_TABLE_500
626 )
627
628 as
629 ddp_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_type;
630 ddx_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_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 okl_icp_pvt_w.rosetta_table_copy_in_p27(ddp_icpv_tbl, p5_a0
641 , p5_a1
642 , p5_a2
643 , p5_a3
644 , p5_a4
645 , p5_a5
646 , p5_a6
647 , p5_a7
648 , p5_a8
649 , p5_a9
650 , p5_a10
651 , p5_a11
652 , p5_a12
653 , p5_a13
654 , p5_a14
655 , p5_a15
656 , p5_a16
657 , p5_a17
658 , p5_a18
659 , p5_a19
660 , p5_a20
661 , p5_a21
662 , p5_a22
663 , p5_a23
664 , p5_a24
665 , p5_a25
666 , p5_a26
667 , p5_a27
668 , p5_a28
669 , p5_a29
670 , p5_a30
671 , p5_a31
672 );
673
674
675 -- here's the delegated call to the old PL/SQL routine
676 okl_itm_cat_rv_prcs_pub.update_itm_cat_rv_prcs(p_api_version,
677 p_init_msg_list,
678 x_return_status,
679 x_msg_count,
680 x_msg_data,
681 ddp_icpv_tbl,
682 ddx_icpv_tbl);
683
684 -- copy data back from the local variables to OUT or IN-OUT args, if any
685
686
687
688
689
690
691 okl_icp_pvt_w.rosetta_table_copy_out_p27(ddx_icpv_tbl, p6_a0
692 , p6_a1
693 , p6_a2
694 , p6_a3
695 , p6_a4
696 , p6_a5
697 , p6_a6
698 , p6_a7
699 , p6_a8
700 , p6_a9
701 , p6_a10
702 , p6_a11
703 , p6_a12
704 , p6_a13
705 , p6_a14
706 , p6_a15
707 , p6_a16
708 , p6_a17
709 , p6_a18
710 , p6_a19
711 , p6_a20
712 , p6_a21
713 , p6_a22
714 , p6_a23
715 , p6_a24
716 , p6_a25
717 , p6_a26
718 , p6_a27
719 , p6_a28
720 , p6_a29
721 , p6_a30
722 , p6_a31
723 );
724 end;
725
726 procedure update_itm_cat_rv_prcs(p_api_version NUMBER
727 , p_init_msg_list VARCHAR2
728 , x_return_status out nocopy VARCHAR2
729 , x_msg_count out nocopy NUMBER
730 , x_msg_data out nocopy VARCHAR2
731 , p6_a0 out nocopy NUMBER
732 , p6_a1 out nocopy NUMBER
733 , p6_a2 out nocopy NUMBER
734 , p6_a3 out nocopy NUMBER
735 , p6_a4 out nocopy NUMBER
736 , p6_a5 out nocopy NUMBER
737 , p6_a6 out nocopy NUMBER
738 , p6_a7 out nocopy VARCHAR2
739 , p6_a8 out nocopy VARCHAR2
740 , p6_a9 out nocopy DATE
741 , p6_a10 out nocopy DATE
742 , p6_a11 out nocopy NUMBER
743 , p6_a12 out nocopy DATE
744 , p6_a13 out nocopy NUMBER
745 , p6_a14 out nocopy DATE
746 , p6_a15 out nocopy NUMBER
747 , p6_a16 out nocopy VARCHAR2
748 , p6_a17 out nocopy VARCHAR2
749 , p6_a18 out nocopy VARCHAR2
750 , p6_a19 out nocopy VARCHAR2
751 , p6_a20 out nocopy VARCHAR2
752 , p6_a21 out nocopy VARCHAR2
753 , p6_a22 out nocopy VARCHAR2
754 , p6_a23 out nocopy VARCHAR2
755 , p6_a24 out nocopy VARCHAR2
756 , p6_a25 out nocopy VARCHAR2
757 , p6_a26 out nocopy VARCHAR2
758 , p6_a27 out nocopy VARCHAR2
759 , p6_a28 out nocopy VARCHAR2
760 , p6_a29 out nocopy VARCHAR2
761 , p6_a30 out nocopy VARCHAR2
762 , p6_a31 out nocopy VARCHAR2
763 , p5_a0 NUMBER := 0-1962.0724
764 , p5_a1 NUMBER := 0-1962.0724
765 , p5_a2 NUMBER := 0-1962.0724
766 , p5_a3 NUMBER := 0-1962.0724
767 , p5_a4 NUMBER := 0-1962.0724
768 , p5_a5 NUMBER := 0-1962.0724
769 , p5_a6 NUMBER := 0-1962.0724
770 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
771 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
772 , p5_a9 DATE := fnd_api.g_miss_date
773 , p5_a10 DATE := fnd_api.g_miss_date
774 , p5_a11 NUMBER := 0-1962.0724
775 , p5_a12 DATE := fnd_api.g_miss_date
776 , p5_a13 NUMBER := 0-1962.0724
777 , p5_a14 DATE := fnd_api.g_miss_date
778 , p5_a15 NUMBER := 0-1962.0724
779 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
780 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
781 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
782 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
783 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
784 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
785 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
786 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
787 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
788 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
789 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
790 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
791 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
792 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
793 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
794 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
795 )
796
797 as
798 ddp_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
799 ddx_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
800 ddindx binary_integer; indx binary_integer;
801 begin
802
803 -- copy data to the local IN or IN-OUT args, if any
804
805
806
807
808
809 ddp_icpv_rec.id := rosetta_g_miss_num_map(p5_a0);
810 ddp_icpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
811 ddp_icpv_rec.cat_id1 := rosetta_g_miss_num_map(p5_a2);
812 ddp_icpv_rec.cat_id2 := rosetta_g_miss_num_map(p5_a3);
813 ddp_icpv_rec.term_in_months := rosetta_g_miss_num_map(p5_a4);
814 ddp_icpv_rec.residual_value_percent := rosetta_g_miss_num_map(p5_a5);
815 ddp_icpv_rec.item_residual_id := rosetta_g_miss_num_map(p5_a6);
816 ddp_icpv_rec.sts_code := p5_a7;
817 ddp_icpv_rec.version_number := p5_a8;
818 ddp_icpv_rec.start_date := rosetta_g_miss_date_in_map(p5_a9);
819 ddp_icpv_rec.end_date := rosetta_g_miss_date_in_map(p5_a10);
820 ddp_icpv_rec.created_by := rosetta_g_miss_num_map(p5_a11);
821 ddp_icpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a12);
822 ddp_icpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a13);
823 ddp_icpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a14);
824 ddp_icpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a15);
825 ddp_icpv_rec.attribute_category := p5_a16;
826 ddp_icpv_rec.attribute1 := p5_a17;
827 ddp_icpv_rec.attribute2 := p5_a18;
828 ddp_icpv_rec.attribute3 := p5_a19;
829 ddp_icpv_rec.attribute4 := p5_a20;
830 ddp_icpv_rec.attribute5 := p5_a21;
831 ddp_icpv_rec.attribute6 := p5_a22;
832 ddp_icpv_rec.attribute7 := p5_a23;
833 ddp_icpv_rec.attribute8 := p5_a24;
834 ddp_icpv_rec.attribute9 := p5_a25;
835 ddp_icpv_rec.attribute10 := p5_a26;
836 ddp_icpv_rec.attribute11 := p5_a27;
837 ddp_icpv_rec.attribute12 := p5_a28;
838 ddp_icpv_rec.attribute13 := p5_a29;
839 ddp_icpv_rec.attribute14 := p5_a30;
840 ddp_icpv_rec.attribute15 := p5_a31;
841
842
843 -- here's the delegated call to the old PL/SQL routine
844 okl_itm_cat_rv_prcs_pub.update_itm_cat_rv_prcs(p_api_version,
845 p_init_msg_list,
846 x_return_status,
847 x_msg_count,
848 x_msg_data,
849 ddp_icpv_rec,
850 ddx_icpv_rec);
851
852 -- copy data back from the local variables to OUT or IN-OUT args, if any
853
854
855
856
857
858
859 p6_a0 := rosetta_g_miss_num_map(ddx_icpv_rec.id);
860 p6_a1 := rosetta_g_miss_num_map(ddx_icpv_rec.object_version_number);
861 p6_a2 := rosetta_g_miss_num_map(ddx_icpv_rec.cat_id1);
862 p6_a3 := rosetta_g_miss_num_map(ddx_icpv_rec.cat_id2);
863 p6_a4 := rosetta_g_miss_num_map(ddx_icpv_rec.term_in_months);
864 p6_a5 := rosetta_g_miss_num_map(ddx_icpv_rec.residual_value_percent);
865 p6_a6 := rosetta_g_miss_num_map(ddx_icpv_rec.item_residual_id);
866 p6_a7 := ddx_icpv_rec.sts_code;
867 p6_a8 := ddx_icpv_rec.version_number;
868 p6_a9 := ddx_icpv_rec.start_date;
869 p6_a10 := ddx_icpv_rec.end_date;
870 p6_a11 := rosetta_g_miss_num_map(ddx_icpv_rec.created_by);
871 p6_a12 := ddx_icpv_rec.creation_date;
872 p6_a13 := rosetta_g_miss_num_map(ddx_icpv_rec.last_updated_by);
873 p6_a14 := ddx_icpv_rec.last_update_date;
874 p6_a15 := rosetta_g_miss_num_map(ddx_icpv_rec.last_update_login);
875 p6_a16 := ddx_icpv_rec.attribute_category;
876 p6_a17 := ddx_icpv_rec.attribute1;
877 p6_a18 := ddx_icpv_rec.attribute2;
878 p6_a19 := ddx_icpv_rec.attribute3;
879 p6_a20 := ddx_icpv_rec.attribute4;
880 p6_a21 := ddx_icpv_rec.attribute5;
881 p6_a22 := ddx_icpv_rec.attribute6;
882 p6_a23 := ddx_icpv_rec.attribute7;
883 p6_a24 := ddx_icpv_rec.attribute8;
884 p6_a25 := ddx_icpv_rec.attribute9;
885 p6_a26 := ddx_icpv_rec.attribute10;
886 p6_a27 := ddx_icpv_rec.attribute11;
887 p6_a28 := ddx_icpv_rec.attribute12;
888 p6_a29 := ddx_icpv_rec.attribute13;
889 p6_a30 := ddx_icpv_rec.attribute14;
890 p6_a31 := ddx_icpv_rec.attribute15;
891 end;
892
893 procedure delete_itm_cat_rv_prcs(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 , p5_a0 JTF_NUMBER_TABLE
899 , p5_a1 JTF_NUMBER_TABLE
900 , p5_a2 JTF_NUMBER_TABLE
901 , p5_a3 JTF_NUMBER_TABLE
902 , p5_a4 JTF_NUMBER_TABLE
903 , p5_a5 JTF_NUMBER_TABLE
904 , p5_a6 JTF_NUMBER_TABLE
905 , p5_a7 JTF_VARCHAR2_TABLE_100
906 , p5_a8 JTF_VARCHAR2_TABLE_100
907 , p5_a9 JTF_DATE_TABLE
908 , p5_a10 JTF_DATE_TABLE
909 , p5_a11 JTF_NUMBER_TABLE
910 , p5_a12 JTF_DATE_TABLE
911 , p5_a13 JTF_NUMBER_TABLE
912 , p5_a14 JTF_DATE_TABLE
913 , p5_a15 JTF_NUMBER_TABLE
914 , p5_a16 JTF_VARCHAR2_TABLE_100
915 , p5_a17 JTF_VARCHAR2_TABLE_500
916 , p5_a18 JTF_VARCHAR2_TABLE_500
917 , p5_a19 JTF_VARCHAR2_TABLE_500
918 , p5_a20 JTF_VARCHAR2_TABLE_500
919 , p5_a21 JTF_VARCHAR2_TABLE_500
920 , p5_a22 JTF_VARCHAR2_TABLE_500
921 , p5_a23 JTF_VARCHAR2_TABLE_500
922 , p5_a24 JTF_VARCHAR2_TABLE_500
923 , p5_a25 JTF_VARCHAR2_TABLE_500
924 , p5_a26 JTF_VARCHAR2_TABLE_500
925 , p5_a27 JTF_VARCHAR2_TABLE_500
926 , p5_a28 JTF_VARCHAR2_TABLE_500
927 , p5_a29 JTF_VARCHAR2_TABLE_500
928 , p5_a30 JTF_VARCHAR2_TABLE_500
929 , p5_a31 JTF_VARCHAR2_TABLE_500
930 )
931
932 as
933 ddp_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_type;
934 ddindx binary_integer; indx binary_integer;
935 begin
936
937 -- copy data to the local IN or IN-OUT args, if any
938
939
940
941
942
943 okl_icp_pvt_w.rosetta_table_copy_in_p27(ddp_icpv_tbl, p5_a0
944 , p5_a1
945 , p5_a2
946 , p5_a3
947 , p5_a4
948 , p5_a5
949 , p5_a6
950 , p5_a7
951 , p5_a8
952 , p5_a9
953 , p5_a10
954 , p5_a11
955 , p5_a12
956 , p5_a13
957 , p5_a14
958 , p5_a15
959 , p5_a16
960 , p5_a17
961 , p5_a18
962 , p5_a19
963 , p5_a20
964 , p5_a21
965 , p5_a22
966 , p5_a23
967 , p5_a24
968 , p5_a25
969 , p5_a26
970 , p5_a27
971 , p5_a28
972 , p5_a29
973 , p5_a30
974 , p5_a31
975 );
976
977 -- here's the delegated call to the old PL/SQL routine
978 okl_itm_cat_rv_prcs_pub.delete_itm_cat_rv_prcs(p_api_version,
979 p_init_msg_list,
980 x_return_status,
981 x_msg_count,
982 x_msg_data,
983 ddp_icpv_tbl);
984
985 -- copy data back from the local variables to OUT or IN-OUT args, if any
986
987
988
989
990
991 end;
992
993 procedure delete_itm_cat_rv_prcs(p_api_version NUMBER
994 , p_init_msg_list VARCHAR2
995 , x_return_status out nocopy VARCHAR2
996 , x_msg_count out nocopy NUMBER
997 , x_msg_data out nocopy VARCHAR2
998 , p5_a0 NUMBER := 0-1962.0724
999 , p5_a1 NUMBER := 0-1962.0724
1000 , p5_a2 NUMBER := 0-1962.0724
1001 , p5_a3 NUMBER := 0-1962.0724
1002 , p5_a4 NUMBER := 0-1962.0724
1003 , p5_a5 NUMBER := 0-1962.0724
1004 , p5_a6 NUMBER := 0-1962.0724
1005 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1006 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1007 , p5_a9 DATE := fnd_api.g_miss_date
1008 , p5_a10 DATE := fnd_api.g_miss_date
1009 , p5_a11 NUMBER := 0-1962.0724
1010 , p5_a12 DATE := fnd_api.g_miss_date
1011 , p5_a13 NUMBER := 0-1962.0724
1012 , p5_a14 DATE := fnd_api.g_miss_date
1013 , p5_a15 NUMBER := 0-1962.0724
1014 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1015 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1016 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1017 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1018 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1019 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1020 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1021 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1022 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1023 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1024 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1025 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1026 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1027 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
1028 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1029 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1030 )
1031
1032 as
1033 ddp_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
1034 ddindx binary_integer; indx binary_integer;
1035 begin
1036
1037 -- copy data to the local IN or IN-OUT args, if any
1038
1039
1040
1041
1042
1043 ddp_icpv_rec.id := rosetta_g_miss_num_map(p5_a0);
1044 ddp_icpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1045 ddp_icpv_rec.cat_id1 := rosetta_g_miss_num_map(p5_a2);
1046 ddp_icpv_rec.cat_id2 := rosetta_g_miss_num_map(p5_a3);
1047 ddp_icpv_rec.term_in_months := rosetta_g_miss_num_map(p5_a4);
1048 ddp_icpv_rec.residual_value_percent := rosetta_g_miss_num_map(p5_a5);
1049 ddp_icpv_rec.item_residual_id := rosetta_g_miss_num_map(p5_a6);
1050 ddp_icpv_rec.sts_code := p5_a7;
1051 ddp_icpv_rec.version_number := p5_a8;
1052 ddp_icpv_rec.start_date := rosetta_g_miss_date_in_map(p5_a9);
1053 ddp_icpv_rec.end_date := rosetta_g_miss_date_in_map(p5_a10);
1054 ddp_icpv_rec.created_by := rosetta_g_miss_num_map(p5_a11);
1055 ddp_icpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a12);
1056 ddp_icpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a13);
1057 ddp_icpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a14);
1058 ddp_icpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a15);
1059 ddp_icpv_rec.attribute_category := p5_a16;
1060 ddp_icpv_rec.attribute1 := p5_a17;
1061 ddp_icpv_rec.attribute2 := p5_a18;
1062 ddp_icpv_rec.attribute3 := p5_a19;
1063 ddp_icpv_rec.attribute4 := p5_a20;
1064 ddp_icpv_rec.attribute5 := p5_a21;
1065 ddp_icpv_rec.attribute6 := p5_a22;
1066 ddp_icpv_rec.attribute7 := p5_a23;
1067 ddp_icpv_rec.attribute8 := p5_a24;
1068 ddp_icpv_rec.attribute9 := p5_a25;
1069 ddp_icpv_rec.attribute10 := p5_a26;
1070 ddp_icpv_rec.attribute11 := p5_a27;
1071 ddp_icpv_rec.attribute12 := p5_a28;
1072 ddp_icpv_rec.attribute13 := p5_a29;
1073 ddp_icpv_rec.attribute14 := p5_a30;
1074 ddp_icpv_rec.attribute15 := p5_a31;
1075
1076 -- here's the delegated call to the old PL/SQL routine
1077 okl_itm_cat_rv_prcs_pub.delete_itm_cat_rv_prcs(p_api_version,
1078 p_init_msg_list,
1079 x_return_status,
1080 x_msg_count,
1081 x_msg_data,
1082 ddp_icpv_rec);
1083
1084 -- copy data back from the local variables to OUT or IN-OUT args, if any
1085
1086
1087
1088
1089
1090 end;
1091
1092 procedure validate_itm_cat_rv_prcs(p_api_version NUMBER
1093 , p_init_msg_list VARCHAR2
1094 , x_return_status out nocopy VARCHAR2
1095 , x_msg_count out nocopy NUMBER
1096 , x_msg_data out nocopy VARCHAR2
1097 , p5_a0 JTF_NUMBER_TABLE
1098 , p5_a1 JTF_NUMBER_TABLE
1099 , p5_a2 JTF_NUMBER_TABLE
1100 , p5_a3 JTF_NUMBER_TABLE
1101 , p5_a4 JTF_NUMBER_TABLE
1102 , p5_a5 JTF_NUMBER_TABLE
1103 , p5_a6 JTF_NUMBER_TABLE
1104 , p5_a7 JTF_VARCHAR2_TABLE_100
1105 , p5_a8 JTF_VARCHAR2_TABLE_100
1106 , p5_a9 JTF_DATE_TABLE
1107 , p5_a10 JTF_DATE_TABLE
1108 , p5_a11 JTF_NUMBER_TABLE
1109 , p5_a12 JTF_DATE_TABLE
1110 , p5_a13 JTF_NUMBER_TABLE
1111 , p5_a14 JTF_DATE_TABLE
1112 , p5_a15 JTF_NUMBER_TABLE
1113 , p5_a16 JTF_VARCHAR2_TABLE_100
1114 , p5_a17 JTF_VARCHAR2_TABLE_500
1115 , p5_a18 JTF_VARCHAR2_TABLE_500
1116 , p5_a19 JTF_VARCHAR2_TABLE_500
1117 , p5_a20 JTF_VARCHAR2_TABLE_500
1118 , p5_a21 JTF_VARCHAR2_TABLE_500
1119 , p5_a22 JTF_VARCHAR2_TABLE_500
1120 , p5_a23 JTF_VARCHAR2_TABLE_500
1121 , p5_a24 JTF_VARCHAR2_TABLE_500
1122 , p5_a25 JTF_VARCHAR2_TABLE_500
1123 , p5_a26 JTF_VARCHAR2_TABLE_500
1124 , p5_a27 JTF_VARCHAR2_TABLE_500
1125 , p5_a28 JTF_VARCHAR2_TABLE_500
1126 , p5_a29 JTF_VARCHAR2_TABLE_500
1127 , p5_a30 JTF_VARCHAR2_TABLE_500
1128 , p5_a31 JTF_VARCHAR2_TABLE_500
1129 )
1130
1131 as
1132 ddp_icpv_tbl okl_itm_cat_rv_prcs_pub.icpv_tbl_type;
1133 ddindx binary_integer; indx binary_integer;
1134 begin
1135
1136 -- copy data to the local IN or IN-OUT args, if any
1137
1138
1139
1140
1141
1142 okl_icp_pvt_w.rosetta_table_copy_in_p27(ddp_icpv_tbl, p5_a0
1143 , p5_a1
1144 , p5_a2
1145 , p5_a3
1146 , p5_a4
1147 , p5_a5
1148 , p5_a6
1149 , p5_a7
1150 , p5_a8
1151 , p5_a9
1152 , p5_a10
1153 , p5_a11
1154 , p5_a12
1155 , p5_a13
1156 , p5_a14
1157 , p5_a15
1158 , p5_a16
1159 , p5_a17
1160 , p5_a18
1161 , p5_a19
1162 , p5_a20
1163 , p5_a21
1164 , p5_a22
1165 , p5_a23
1166 , p5_a24
1167 , p5_a25
1168 , p5_a26
1169 , p5_a27
1170 , p5_a28
1171 , p5_a29
1172 , p5_a30
1173 , p5_a31
1174 );
1175
1176 -- here's the delegated call to the old PL/SQL routine
1177 okl_itm_cat_rv_prcs_pub.validate_itm_cat_rv_prcs(p_api_version,
1178 p_init_msg_list,
1179 x_return_status,
1180 x_msg_count,
1181 x_msg_data,
1182 ddp_icpv_tbl);
1183
1184 -- copy data back from the local variables to OUT or IN-OUT args, if any
1185
1186
1187
1188
1189
1190 end;
1191
1192 procedure validate_itm_cat_rv_prcs(p_api_version NUMBER
1193 , p_init_msg_list VARCHAR2
1194 , x_return_status out nocopy VARCHAR2
1195 , x_msg_count out nocopy NUMBER
1196 , x_msg_data out nocopy VARCHAR2
1197 , p5_a0 NUMBER := 0-1962.0724
1198 , p5_a1 NUMBER := 0-1962.0724
1199 , p5_a2 NUMBER := 0-1962.0724
1200 , p5_a3 NUMBER := 0-1962.0724
1201 , p5_a4 NUMBER := 0-1962.0724
1202 , p5_a5 NUMBER := 0-1962.0724
1203 , p5_a6 NUMBER := 0-1962.0724
1204 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1205 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1206 , p5_a9 DATE := fnd_api.g_miss_date
1207 , p5_a10 DATE := fnd_api.g_miss_date
1208 , p5_a11 NUMBER := 0-1962.0724
1209 , p5_a12 DATE := fnd_api.g_miss_date
1210 , p5_a13 NUMBER := 0-1962.0724
1211 , p5_a14 DATE := fnd_api.g_miss_date
1212 , p5_a15 NUMBER := 0-1962.0724
1213 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1214 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1215 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1216 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1217 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1218 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1219 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
1220 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
1221 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
1222 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
1223 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
1224 , p5_a27 VARCHAR2 := fnd_api.g_miss_char
1225 , p5_a28 VARCHAR2 := fnd_api.g_miss_char
1226 , p5_a29 VARCHAR2 := fnd_api.g_miss_char
1227 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
1228 , p5_a31 VARCHAR2 := fnd_api.g_miss_char
1229 )
1230
1231 as
1232 ddp_icpv_rec okl_itm_cat_rv_prcs_pub.icpv_rec_type;
1233 ddindx binary_integer; indx binary_integer;
1234 begin
1235
1236 -- copy data to the local IN or IN-OUT args, if any
1237
1238
1239
1240
1241
1242 ddp_icpv_rec.id := rosetta_g_miss_num_map(p5_a0);
1243 ddp_icpv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1244 ddp_icpv_rec.cat_id1 := rosetta_g_miss_num_map(p5_a2);
1245 ddp_icpv_rec.cat_id2 := rosetta_g_miss_num_map(p5_a3);
1246 ddp_icpv_rec.term_in_months := rosetta_g_miss_num_map(p5_a4);
1247 ddp_icpv_rec.residual_value_percent := rosetta_g_miss_num_map(p5_a5);
1248 ddp_icpv_rec.item_residual_id := rosetta_g_miss_num_map(p5_a6);
1249 ddp_icpv_rec.sts_code := p5_a7;
1250 ddp_icpv_rec.version_number := p5_a8;
1251 ddp_icpv_rec.start_date := rosetta_g_miss_date_in_map(p5_a9);
1252 ddp_icpv_rec.end_date := rosetta_g_miss_date_in_map(p5_a10);
1253 ddp_icpv_rec.created_by := rosetta_g_miss_num_map(p5_a11);
1254 ddp_icpv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a12);
1255 ddp_icpv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a13);
1256 ddp_icpv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a14);
1257 ddp_icpv_rec.last_update_login := rosetta_g_miss_num_map(p5_a15);
1258 ddp_icpv_rec.attribute_category := p5_a16;
1259 ddp_icpv_rec.attribute1 := p5_a17;
1260 ddp_icpv_rec.attribute2 := p5_a18;
1261 ddp_icpv_rec.attribute3 := p5_a19;
1262 ddp_icpv_rec.attribute4 := p5_a20;
1263 ddp_icpv_rec.attribute5 := p5_a21;
1264 ddp_icpv_rec.attribute6 := p5_a22;
1265 ddp_icpv_rec.attribute7 := p5_a23;
1266 ddp_icpv_rec.attribute8 := p5_a24;
1267 ddp_icpv_rec.attribute9 := p5_a25;
1268 ddp_icpv_rec.attribute10 := p5_a26;
1269 ddp_icpv_rec.attribute11 := p5_a27;
1270 ddp_icpv_rec.attribute12 := p5_a28;
1271 ddp_icpv_rec.attribute13 := p5_a29;
1272 ddp_icpv_rec.attribute14 := p5_a30;
1273 ddp_icpv_rec.attribute15 := p5_a31;
1274
1275 -- here's the delegated call to the old PL/SQL routine
1276 okl_itm_cat_rv_prcs_pub.validate_itm_cat_rv_prcs(p_api_version,
1277 p_init_msg_list,
1278 x_return_status,
1279 x_msg_count,
1280 x_msg_data,
1281 ddp_icpv_rec);
1282
1283 -- copy data back from the local variables to OUT or IN-OUT args, if any
1284
1285
1286
1287
1288
1289 end;
1290
1291 end okl_itm_cat_rv_prcs_pub_w;