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