[Home] [Help]
PACKAGE BODY: APPS.OKL_ACC_GEN_RULE_PVT_W
Source
1 package body okl_acc_gen_rule_pvt_w as
2 /* $Header: OKLOAGRB.pls 120.1 2005/07/07 13:34:06 dkagrawa 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 create_acc_gen_rule(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 JTF_NUMBER_TABLE
28 , p6_a1 JTF_NUMBER_TABLE
29 , p6_a2 JTF_VARCHAR2_TABLE_100
30 , p6_a3 JTF_VARCHAR2_TABLE_100
31 , p6_a4 JTF_NUMBER_TABLE
32 , p6_a5 JTF_VARCHAR2_TABLE_100
33 , p6_a6 JTF_VARCHAR2_TABLE_500
34 , p6_a7 JTF_VARCHAR2_TABLE_500
35 , p6_a8 JTF_VARCHAR2_TABLE_500
36 , p6_a9 JTF_VARCHAR2_TABLE_500
37 , p6_a10 JTF_VARCHAR2_TABLE_500
38 , p6_a11 JTF_VARCHAR2_TABLE_500
39 , p6_a12 JTF_VARCHAR2_TABLE_500
40 , p6_a13 JTF_VARCHAR2_TABLE_500
41 , p6_a14 JTF_VARCHAR2_TABLE_500
42 , p6_a15 JTF_VARCHAR2_TABLE_500
43 , p6_a16 JTF_VARCHAR2_TABLE_500
44 , p6_a17 JTF_VARCHAR2_TABLE_500
45 , p6_a18 JTF_VARCHAR2_TABLE_500
46 , p6_a19 JTF_VARCHAR2_TABLE_500
47 , p6_a20 JTF_VARCHAR2_TABLE_500
48 , p6_a21 JTF_VARCHAR2_TABLE_500
49 , p6_a22 JTF_NUMBER_TABLE
50 , p6_a23 JTF_NUMBER_TABLE
51 , p6_a24 JTF_DATE_TABLE
52 , p6_a25 JTF_NUMBER_TABLE
53 , p6_a26 JTF_DATE_TABLE
54 , p6_a27 JTF_NUMBER_TABLE
55 , p7_a0 out nocopy NUMBER
56 , p7_a1 out nocopy NUMBER
57 , p7_a2 out nocopy VARCHAR2
58 , p7_a3 out nocopy NUMBER
59 , p7_a4 out nocopy NUMBER
60 , p7_a5 out nocopy NUMBER
61 , p7_a6 out nocopy DATE
62 , p7_a7 out nocopy NUMBER
63 , p7_a8 out nocopy DATE
64 , p7_a9 out nocopy NUMBER
65 , p8_a0 out nocopy JTF_NUMBER_TABLE
66 , p8_a1 out nocopy JTF_NUMBER_TABLE
67 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
68 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_100
69 , p8_a4 out nocopy JTF_NUMBER_TABLE
70 , p8_a5 out nocopy JTF_VARCHAR2_TABLE_100
71 , p8_a6 out nocopy JTF_VARCHAR2_TABLE_500
72 , p8_a7 out nocopy JTF_VARCHAR2_TABLE_500
73 , p8_a8 out nocopy JTF_VARCHAR2_TABLE_500
74 , p8_a9 out nocopy JTF_VARCHAR2_TABLE_500
75 , p8_a10 out nocopy JTF_VARCHAR2_TABLE_500
76 , p8_a11 out nocopy JTF_VARCHAR2_TABLE_500
77 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_500
78 , p8_a13 out nocopy JTF_VARCHAR2_TABLE_500
79 , p8_a14 out nocopy JTF_VARCHAR2_TABLE_500
80 , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
81 , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
82 , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
83 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
84 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
85 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
86 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
87 , p8_a22 out nocopy JTF_NUMBER_TABLE
88 , p8_a23 out nocopy JTF_NUMBER_TABLE
89 , p8_a24 out nocopy JTF_DATE_TABLE
90 , p8_a25 out nocopy JTF_NUMBER_TABLE
91 , p8_a26 out nocopy JTF_DATE_TABLE
92 , p8_a27 out nocopy JTF_NUMBER_TABLE
93 , p5_a0 NUMBER := 0-1962.0724
94 , p5_a1 NUMBER := 0-1962.0724
95 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
96 , p5_a3 NUMBER := 0-1962.0724
97 , p5_a4 NUMBER := 0-1962.0724
98 , p5_a5 NUMBER := 0-1962.0724
99 , p5_a6 DATE := fnd_api.g_miss_date
100 , p5_a7 NUMBER := 0-1962.0724
101 , p5_a8 DATE := fnd_api.g_miss_date
102 , p5_a9 NUMBER := 0-1962.0724
103 )
104
105 as
106 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
107 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
108 ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
109 ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
110 ddindx binary_integer; indx binary_integer;
111 begin
112
113 -- copy data to the local IN or IN-OUT args, if any
114
115
116
117
118
119 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
120 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
121 ddp_agrv_rec.ae_line_type := p5_a2;
122 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
123 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
124 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
125 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
126 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
127 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
128 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
129
130 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p6_a0
131 , p6_a1
132 , p6_a2
133 , p6_a3
134 , p6_a4
135 , p6_a5
136 , p6_a6
137 , p6_a7
138 , p6_a8
139 , p6_a9
140 , p6_a10
141 , p6_a11
142 , p6_a12
143 , p6_a13
144 , p6_a14
145 , p6_a15
146 , p6_a16
147 , p6_a17
148 , p6_a18
149 , p6_a19
150 , p6_a20
151 , p6_a21
152 , p6_a22
153 , p6_a23
154 , p6_a24
155 , p6_a25
156 , p6_a26
157 , p6_a27
158 );
159
160
161
162 -- here's the delegated call to the old PL/SQL routine
163 okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
164 p_init_msg_list,
165 x_return_status,
166 x_msg_count,
167 x_msg_data,
168 ddp_agrv_rec,
169 ddp_aulv_tbl,
170 ddx_agrv_rec,
171 ddx_aulv_tbl);
172
173 -- copy data back from the local variables to OUT or IN-OUT args, if any
174
175
176
177
178
179
180
181 p7_a0 := rosetta_g_miss_num_map(ddx_agrv_rec.id);
182 p7_a1 := rosetta_g_miss_num_map(ddx_agrv_rec.object_version_number);
183 p7_a2 := ddx_agrv_rec.ae_line_type;
184 p7_a3 := rosetta_g_miss_num_map(ddx_agrv_rec.set_of_books_id);
185 p7_a4 := rosetta_g_miss_num_map(ddx_agrv_rec.org_id);
186 p7_a5 := rosetta_g_miss_num_map(ddx_agrv_rec.created_by);
187 p7_a6 := ddx_agrv_rec.creation_date;
188 p7_a7 := rosetta_g_miss_num_map(ddx_agrv_rec.last_updated_by);
189 p7_a8 := ddx_agrv_rec.last_update_date;
190 p7_a9 := rosetta_g_miss_num_map(ddx_agrv_rec.last_update_login);
191
192 okl_aul_pvt_w.rosetta_table_copy_out_p5(ddx_aulv_tbl, p8_a0
193 , p8_a1
194 , p8_a2
195 , p8_a3
196 , p8_a4
197 , p8_a5
198 , p8_a6
199 , p8_a7
200 , p8_a8
201 , p8_a9
202 , p8_a10
203 , p8_a11
204 , p8_a12
205 , p8_a13
206 , p8_a14
207 , p8_a15
208 , p8_a16
209 , p8_a17
210 , p8_a18
211 , p8_a19
212 , p8_a20
213 , p8_a21
214 , p8_a22
215 , p8_a23
216 , p8_a24
217 , p8_a25
218 , p8_a26
219 , p8_a27
220 );
221 end;
222
223 procedure update_acc_gen_rule(p_api_version NUMBER
224 , p_init_msg_list VARCHAR2
225 , x_return_status out nocopy VARCHAR2
226 , x_msg_count out nocopy NUMBER
227 , x_msg_data out nocopy VARCHAR2
228 , p6_a0 JTF_NUMBER_TABLE
229 , p6_a1 JTF_NUMBER_TABLE
230 , p6_a2 JTF_VARCHAR2_TABLE_100
231 , p6_a3 JTF_VARCHAR2_TABLE_100
232 , p6_a4 JTF_NUMBER_TABLE
233 , p6_a5 JTF_VARCHAR2_TABLE_100
234 , p6_a6 JTF_VARCHAR2_TABLE_500
235 , p6_a7 JTF_VARCHAR2_TABLE_500
236 , p6_a8 JTF_VARCHAR2_TABLE_500
237 , p6_a9 JTF_VARCHAR2_TABLE_500
238 , p6_a10 JTF_VARCHAR2_TABLE_500
239 , p6_a11 JTF_VARCHAR2_TABLE_500
240 , p6_a12 JTF_VARCHAR2_TABLE_500
241 , p6_a13 JTF_VARCHAR2_TABLE_500
242 , p6_a14 JTF_VARCHAR2_TABLE_500
243 , p6_a15 JTF_VARCHAR2_TABLE_500
244 , p6_a16 JTF_VARCHAR2_TABLE_500
245 , p6_a17 JTF_VARCHAR2_TABLE_500
246 , p6_a18 JTF_VARCHAR2_TABLE_500
247 , p6_a19 JTF_VARCHAR2_TABLE_500
248 , p6_a20 JTF_VARCHAR2_TABLE_500
249 , p6_a21 JTF_VARCHAR2_TABLE_500
250 , p6_a22 JTF_NUMBER_TABLE
251 , p6_a23 JTF_NUMBER_TABLE
252 , p6_a24 JTF_DATE_TABLE
253 , p6_a25 JTF_NUMBER_TABLE
254 , p6_a26 JTF_DATE_TABLE
255 , p6_a27 JTF_NUMBER_TABLE
256 , p7_a0 out nocopy NUMBER
257 , p7_a1 out nocopy NUMBER
258 , p7_a2 out nocopy VARCHAR2
259 , p7_a3 out nocopy NUMBER
260 , p7_a4 out nocopy NUMBER
261 , p7_a5 out nocopy NUMBER
262 , p7_a6 out nocopy DATE
263 , p7_a7 out nocopy NUMBER
264 , p7_a8 out nocopy DATE
265 , p7_a9 out nocopy NUMBER
266 , p8_a0 out nocopy JTF_NUMBER_TABLE
267 , p8_a1 out nocopy JTF_NUMBER_TABLE
268 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
269 , p8_a3 out nocopy JTF_VARCHAR2_TABLE_100
270 , p8_a4 out nocopy JTF_NUMBER_TABLE
271 , p8_a5 out nocopy JTF_VARCHAR2_TABLE_100
272 , p8_a6 out nocopy JTF_VARCHAR2_TABLE_500
273 , p8_a7 out nocopy JTF_VARCHAR2_TABLE_500
274 , p8_a8 out nocopy JTF_VARCHAR2_TABLE_500
275 , p8_a9 out nocopy JTF_VARCHAR2_TABLE_500
276 , p8_a10 out nocopy JTF_VARCHAR2_TABLE_500
277 , p8_a11 out nocopy JTF_VARCHAR2_TABLE_500
278 , p8_a12 out nocopy JTF_VARCHAR2_TABLE_500
279 , p8_a13 out nocopy JTF_VARCHAR2_TABLE_500
280 , p8_a14 out nocopy JTF_VARCHAR2_TABLE_500
281 , p8_a15 out nocopy JTF_VARCHAR2_TABLE_500
282 , p8_a16 out nocopy JTF_VARCHAR2_TABLE_500
283 , p8_a17 out nocopy JTF_VARCHAR2_TABLE_500
284 , p8_a18 out nocopy JTF_VARCHAR2_TABLE_500
285 , p8_a19 out nocopy JTF_VARCHAR2_TABLE_500
286 , p8_a20 out nocopy JTF_VARCHAR2_TABLE_500
287 , p8_a21 out nocopy JTF_VARCHAR2_TABLE_500
288 , p8_a22 out nocopy JTF_NUMBER_TABLE
289 , p8_a23 out nocopy JTF_NUMBER_TABLE
290 , p8_a24 out nocopy JTF_DATE_TABLE
291 , p8_a25 out nocopy JTF_NUMBER_TABLE
292 , p8_a26 out nocopy JTF_DATE_TABLE
293 , p8_a27 out nocopy JTF_NUMBER_TABLE
294 , p5_a0 NUMBER := 0-1962.0724
295 , p5_a1 NUMBER := 0-1962.0724
296 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
297 , p5_a3 NUMBER := 0-1962.0724
298 , p5_a4 NUMBER := 0-1962.0724
299 , p5_a5 NUMBER := 0-1962.0724
300 , p5_a6 DATE := fnd_api.g_miss_date
301 , p5_a7 NUMBER := 0-1962.0724
302 , p5_a8 DATE := fnd_api.g_miss_date
303 , p5_a9 NUMBER := 0-1962.0724
304 )
305
306 as
307 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
308 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
309 ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
310 ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
311 ddindx binary_integer; indx binary_integer;
312 begin
313
314 -- copy data to the local IN or IN-OUT args, if any
315
316
317
318
319
320 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
321 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
322 ddp_agrv_rec.ae_line_type := p5_a2;
323 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
324 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
325 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
326 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
327 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
328 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
329 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
330
331 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p6_a0
332 , p6_a1
333 , p6_a2
334 , p6_a3
335 , p6_a4
336 , p6_a5
337 , p6_a6
338 , p6_a7
339 , p6_a8
340 , p6_a9
341 , p6_a10
342 , p6_a11
343 , p6_a12
344 , p6_a13
345 , p6_a14
346 , p6_a15
347 , p6_a16
348 , p6_a17
349 , p6_a18
350 , p6_a19
351 , p6_a20
352 , p6_a21
353 , p6_a22
354 , p6_a23
355 , p6_a24
356 , p6_a25
357 , p6_a26
358 , p6_a27
359 );
360
361
362
363 -- here's the delegated call to the old PL/SQL routine
364 okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
365 p_init_msg_list,
366 x_return_status,
367 x_msg_count,
368 x_msg_data,
369 ddp_agrv_rec,
370 ddp_aulv_tbl,
371 ddx_agrv_rec,
372 ddx_aulv_tbl);
373
374 -- copy data back from the local variables to OUT or IN-OUT args, if any
375
376
377
378
379
380
381
382 p7_a0 := rosetta_g_miss_num_map(ddx_agrv_rec.id);
383 p7_a1 := rosetta_g_miss_num_map(ddx_agrv_rec.object_version_number);
384 p7_a2 := ddx_agrv_rec.ae_line_type;
385 p7_a3 := rosetta_g_miss_num_map(ddx_agrv_rec.set_of_books_id);
386 p7_a4 := rosetta_g_miss_num_map(ddx_agrv_rec.org_id);
387 p7_a5 := rosetta_g_miss_num_map(ddx_agrv_rec.created_by);
388 p7_a6 := ddx_agrv_rec.creation_date;
389 p7_a7 := rosetta_g_miss_num_map(ddx_agrv_rec.last_updated_by);
390 p7_a8 := ddx_agrv_rec.last_update_date;
391 p7_a9 := rosetta_g_miss_num_map(ddx_agrv_rec.last_update_login);
392
393 okl_aul_pvt_w.rosetta_table_copy_out_p5(ddx_aulv_tbl, p8_a0
394 , p8_a1
395 , p8_a2
396 , p8_a3
397 , p8_a4
398 , p8_a5
399 , p8_a6
400 , p8_a7
401 , p8_a8
402 , p8_a9
403 , p8_a10
404 , p8_a11
405 , p8_a12
406 , p8_a13
407 , p8_a14
408 , p8_a15
409 , p8_a16
410 , p8_a17
411 , p8_a18
412 , p8_a19
413 , p8_a20
414 , p8_a21
415 , p8_a22
416 , p8_a23
417 , p8_a24
418 , p8_a25
419 , p8_a26
420 , p8_a27
421 );
422 end;
423
424 procedure validate_acc_gen_rule(p_api_version NUMBER
425 , p_init_msg_list VARCHAR2
426 , x_return_status out nocopy VARCHAR2
427 , x_msg_count out nocopy NUMBER
428 , x_msg_data out nocopy VARCHAR2
429 , p6_a0 JTF_NUMBER_TABLE
430 , p6_a1 JTF_NUMBER_TABLE
431 , p6_a2 JTF_VARCHAR2_TABLE_100
432 , p6_a3 JTF_VARCHAR2_TABLE_100
433 , p6_a4 JTF_NUMBER_TABLE
434 , p6_a5 JTF_VARCHAR2_TABLE_100
435 , p6_a6 JTF_VARCHAR2_TABLE_500
436 , p6_a7 JTF_VARCHAR2_TABLE_500
437 , p6_a8 JTF_VARCHAR2_TABLE_500
438 , p6_a9 JTF_VARCHAR2_TABLE_500
439 , p6_a10 JTF_VARCHAR2_TABLE_500
440 , p6_a11 JTF_VARCHAR2_TABLE_500
441 , p6_a12 JTF_VARCHAR2_TABLE_500
442 , p6_a13 JTF_VARCHAR2_TABLE_500
443 , p6_a14 JTF_VARCHAR2_TABLE_500
444 , p6_a15 JTF_VARCHAR2_TABLE_500
445 , p6_a16 JTF_VARCHAR2_TABLE_500
446 , p6_a17 JTF_VARCHAR2_TABLE_500
447 , p6_a18 JTF_VARCHAR2_TABLE_500
448 , p6_a19 JTF_VARCHAR2_TABLE_500
449 , p6_a20 JTF_VARCHAR2_TABLE_500
450 , p6_a21 JTF_VARCHAR2_TABLE_500
451 , p6_a22 JTF_NUMBER_TABLE
452 , p6_a23 JTF_NUMBER_TABLE
453 , p6_a24 JTF_DATE_TABLE
454 , p6_a25 JTF_NUMBER_TABLE
455 , p6_a26 JTF_DATE_TABLE
456 , p6_a27 JTF_NUMBER_TABLE
457 , p5_a0 NUMBER := 0-1962.0724
458 , p5_a1 NUMBER := 0-1962.0724
459 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
460 , p5_a3 NUMBER := 0-1962.0724
461 , p5_a4 NUMBER := 0-1962.0724
462 , p5_a5 NUMBER := 0-1962.0724
463 , p5_a6 DATE := fnd_api.g_miss_date
464 , p5_a7 NUMBER := 0-1962.0724
465 , p5_a8 DATE := fnd_api.g_miss_date
466 , p5_a9 NUMBER := 0-1962.0724
467 )
468
469 as
470 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
471 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
472 ddindx binary_integer; indx binary_integer;
473 begin
474
475 -- copy data to the local IN or IN-OUT args, if any
476
477
478
479
480
481 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
482 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
483 ddp_agrv_rec.ae_line_type := p5_a2;
484 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
485 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
486 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
487 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
488 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
489 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
490 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
491
492 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p6_a0
493 , p6_a1
494 , p6_a2
495 , p6_a3
496 , p6_a4
497 , p6_a5
498 , p6_a6
499 , p6_a7
500 , p6_a8
501 , p6_a9
502 , p6_a10
503 , p6_a11
504 , p6_a12
505 , p6_a13
506 , p6_a14
507 , p6_a15
508 , p6_a16
509 , p6_a17
510 , p6_a18
511 , p6_a19
512 , p6_a20
513 , p6_a21
514 , p6_a22
515 , p6_a23
516 , p6_a24
517 , p6_a25
518 , p6_a26
519 , p6_a27
520 );
521
522 -- here's the delegated call to the old PL/SQL routine
523 okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
524 p_init_msg_list,
525 x_return_status,
526 x_msg_count,
527 x_msg_data,
528 ddp_agrv_rec,
529 ddp_aulv_tbl);
530
531 -- copy data back from the local variables to OUT or IN-OUT args, if any
532
533
534
535
536
537
538 end;
539
540 procedure create_acc_gen_rule(p_api_version NUMBER
541 , p_init_msg_list VARCHAR2
542 , x_return_status out nocopy VARCHAR2
543 , x_msg_count out nocopy NUMBER
544 , x_msg_data out nocopy VARCHAR2
545 , p5_a0 JTF_NUMBER_TABLE
546 , p5_a1 JTF_NUMBER_TABLE
547 , p5_a2 JTF_VARCHAR2_TABLE_100
548 , p5_a3 JTF_NUMBER_TABLE
549 , p5_a4 JTF_NUMBER_TABLE
550 , p5_a5 JTF_NUMBER_TABLE
551 , p5_a6 JTF_DATE_TABLE
552 , p5_a7 JTF_NUMBER_TABLE
553 , p5_a8 JTF_DATE_TABLE
554 , p5_a9 JTF_NUMBER_TABLE
555 , p6_a0 out nocopy JTF_NUMBER_TABLE
556 , p6_a1 out nocopy JTF_NUMBER_TABLE
557 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
558 , p6_a3 out nocopy JTF_NUMBER_TABLE
559 , p6_a4 out nocopy JTF_NUMBER_TABLE
560 , p6_a5 out nocopy JTF_NUMBER_TABLE
561 , p6_a6 out nocopy JTF_DATE_TABLE
562 , p6_a7 out nocopy JTF_NUMBER_TABLE
563 , p6_a8 out nocopy JTF_DATE_TABLE
564 , p6_a9 out nocopy JTF_NUMBER_TABLE
565 )
566
567 as
568 ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
569 ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
570 ddindx binary_integer; indx binary_integer;
571 begin
572
573 -- copy data to the local IN or IN-OUT args, if any
574
575
576
577
578
579 okl_agr_pvt_w.rosetta_table_copy_in_p5(ddp_agrv_tbl, p5_a0
580 , p5_a1
581 , p5_a2
582 , p5_a3
583 , p5_a4
584 , p5_a5
585 , p5_a6
586 , p5_a7
587 , p5_a8
588 , p5_a9
589 );
590
591
592 -- here's the delegated call to the old PL/SQL routine
593 okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
594 p_init_msg_list,
595 x_return_status,
596 x_msg_count,
597 x_msg_data,
598 ddp_agrv_tbl,
599 ddx_agrv_tbl);
600
601 -- copy data back from the local variables to OUT or IN-OUT args, if any
602
603
604
605
606
607
608 okl_agr_pvt_w.rosetta_table_copy_out_p5(ddx_agrv_tbl, p6_a0
609 , p6_a1
610 , p6_a2
611 , p6_a3
612 , p6_a4
613 , p6_a5
614 , p6_a6
615 , p6_a7
616 , p6_a8
617 , p6_a9
618 );
619 end;
620
621 procedure create_acc_gen_rule(p_api_version NUMBER
622 , p_init_msg_list VARCHAR2
623 , x_return_status out nocopy VARCHAR2
624 , x_msg_count out nocopy NUMBER
625 , x_msg_data out nocopy VARCHAR2
626 , p6_a0 out nocopy NUMBER
627 , p6_a1 out nocopy NUMBER
628 , p6_a2 out nocopy VARCHAR2
629 , p6_a3 out nocopy NUMBER
630 , p6_a4 out nocopy NUMBER
631 , p6_a5 out nocopy NUMBER
632 , p6_a6 out nocopy DATE
633 , p6_a7 out nocopy NUMBER
634 , p6_a8 out nocopy DATE
635 , p6_a9 out nocopy NUMBER
636 , p5_a0 NUMBER := 0-1962.0724
637 , p5_a1 NUMBER := 0-1962.0724
638 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
639 , p5_a3 NUMBER := 0-1962.0724
640 , p5_a4 NUMBER := 0-1962.0724
641 , p5_a5 NUMBER := 0-1962.0724
642 , p5_a6 DATE := fnd_api.g_miss_date
643 , p5_a7 NUMBER := 0-1962.0724
644 , p5_a8 DATE := fnd_api.g_miss_date
645 , p5_a9 NUMBER := 0-1962.0724
646 )
647
648 as
649 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
650 ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
651 ddindx binary_integer; indx binary_integer;
652 begin
653
654 -- copy data to the local IN or IN-OUT args, if any
655
656
657
658
659
660 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
661 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
662 ddp_agrv_rec.ae_line_type := p5_a2;
663 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
664 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
665 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
666 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
667 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
668 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
669 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
670
671
672 -- here's the delegated call to the old PL/SQL routine
673 okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
674 p_init_msg_list,
675 x_return_status,
676 x_msg_count,
677 x_msg_data,
678 ddp_agrv_rec,
679 ddx_agrv_rec);
680
681 -- copy data back from the local variables to OUT or IN-OUT args, if any
682
683
684
685
686
687
688 p6_a0 := rosetta_g_miss_num_map(ddx_agrv_rec.id);
689 p6_a1 := rosetta_g_miss_num_map(ddx_agrv_rec.object_version_number);
690 p6_a2 := ddx_agrv_rec.ae_line_type;
691 p6_a3 := rosetta_g_miss_num_map(ddx_agrv_rec.set_of_books_id);
692 p6_a4 := rosetta_g_miss_num_map(ddx_agrv_rec.org_id);
693 p6_a5 := rosetta_g_miss_num_map(ddx_agrv_rec.created_by);
694 p6_a6 := ddx_agrv_rec.creation_date;
695 p6_a7 := rosetta_g_miss_num_map(ddx_agrv_rec.last_updated_by);
696 p6_a8 := ddx_agrv_rec.last_update_date;
697 p6_a9 := rosetta_g_miss_num_map(ddx_agrv_rec.last_update_login);
698 end;
699
700 procedure lock_acc_gen_rule(p_api_version NUMBER
701 , p_init_msg_list VARCHAR2
702 , x_return_status out nocopy VARCHAR2
703 , x_msg_count out nocopy NUMBER
704 , x_msg_data out nocopy VARCHAR2
705 , p5_a0 JTF_NUMBER_TABLE
706 , p5_a1 JTF_NUMBER_TABLE
707 , p5_a2 JTF_VARCHAR2_TABLE_100
708 , p5_a3 JTF_NUMBER_TABLE
709 , p5_a4 JTF_NUMBER_TABLE
710 , p5_a5 JTF_NUMBER_TABLE
711 , p5_a6 JTF_DATE_TABLE
712 , p5_a7 JTF_NUMBER_TABLE
713 , p5_a8 JTF_DATE_TABLE
714 , p5_a9 JTF_NUMBER_TABLE
715 )
716
717 as
718 ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
719 ddindx binary_integer; indx binary_integer;
720 begin
721
722 -- copy data to the local IN or IN-OUT args, if any
723
724
725
726
727
728 okl_agr_pvt_w.rosetta_table_copy_in_p5(ddp_agrv_tbl, p5_a0
729 , p5_a1
730 , p5_a2
731 , p5_a3
732 , p5_a4
733 , p5_a5
734 , p5_a6
735 , p5_a7
736 , p5_a8
737 , p5_a9
738 );
739
740 -- here's the delegated call to the old PL/SQL routine
741 okl_acc_gen_rule_pvt.lock_acc_gen_rule(p_api_version,
742 p_init_msg_list,
743 x_return_status,
744 x_msg_count,
745 x_msg_data,
746 ddp_agrv_tbl);
747
748 -- copy data back from the local variables to OUT or IN-OUT args, if any
749
750
751
752
753
754 end;
755
756 procedure lock_acc_gen_rule(p_api_version NUMBER
757 , p_init_msg_list VARCHAR2
758 , x_return_status out nocopy VARCHAR2
759 , x_msg_count out nocopy NUMBER
760 , x_msg_data out nocopy VARCHAR2
761 , p5_a0 NUMBER := 0-1962.0724
762 , p5_a1 NUMBER := 0-1962.0724
763 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
764 , p5_a3 NUMBER := 0-1962.0724
765 , p5_a4 NUMBER := 0-1962.0724
766 , p5_a5 NUMBER := 0-1962.0724
767 , p5_a6 DATE := fnd_api.g_miss_date
768 , p5_a7 NUMBER := 0-1962.0724
769 , p5_a8 DATE := fnd_api.g_miss_date
770 , p5_a9 NUMBER := 0-1962.0724
771 )
772
773 as
774 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
775 ddindx binary_integer; indx binary_integer;
776 begin
777
778 -- copy data to the local IN or IN-OUT args, if any
779
780
781
782
783
784 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
785 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
786 ddp_agrv_rec.ae_line_type := p5_a2;
787 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
788 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
789 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
790 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
791 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
792 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
793 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
794
795 -- here's the delegated call to the old PL/SQL routine
796 okl_acc_gen_rule_pvt.lock_acc_gen_rule(p_api_version,
797 p_init_msg_list,
798 x_return_status,
799 x_msg_count,
800 x_msg_data,
801 ddp_agrv_rec);
802
803 -- copy data back from the local variables to OUT or IN-OUT args, if any
804
805
806
807
808
809 end;
810
811 procedure update_acc_gen_rule(p_api_version NUMBER
812 , p_init_msg_list VARCHAR2
813 , x_return_status out nocopy VARCHAR2
814 , x_msg_count out nocopy NUMBER
815 , x_msg_data out nocopy VARCHAR2
816 , p5_a0 JTF_NUMBER_TABLE
817 , p5_a1 JTF_NUMBER_TABLE
818 , p5_a2 JTF_VARCHAR2_TABLE_100
819 , p5_a3 JTF_NUMBER_TABLE
820 , p5_a4 JTF_NUMBER_TABLE
821 , p5_a5 JTF_NUMBER_TABLE
822 , p5_a6 JTF_DATE_TABLE
823 , p5_a7 JTF_NUMBER_TABLE
824 , p5_a8 JTF_DATE_TABLE
825 , p5_a9 JTF_NUMBER_TABLE
826 , p6_a0 out nocopy JTF_NUMBER_TABLE
827 , p6_a1 out nocopy JTF_NUMBER_TABLE
828 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
829 , p6_a3 out nocopy JTF_NUMBER_TABLE
830 , p6_a4 out nocopy JTF_NUMBER_TABLE
831 , p6_a5 out nocopy JTF_NUMBER_TABLE
832 , p6_a6 out nocopy JTF_DATE_TABLE
833 , p6_a7 out nocopy JTF_NUMBER_TABLE
834 , p6_a8 out nocopy JTF_DATE_TABLE
835 , p6_a9 out nocopy JTF_NUMBER_TABLE
836 )
837
838 as
839 ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
840 ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
841 ddindx binary_integer; indx binary_integer;
842 begin
843
844 -- copy data to the local IN or IN-OUT args, if any
845
846
847
848
849
850 okl_agr_pvt_w.rosetta_table_copy_in_p5(ddp_agrv_tbl, p5_a0
851 , p5_a1
852 , p5_a2
853 , p5_a3
854 , p5_a4
855 , p5_a5
856 , p5_a6
857 , p5_a7
858 , p5_a8
859 , p5_a9
860 );
861
862
863 -- here's the delegated call to the old PL/SQL routine
864 okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
865 p_init_msg_list,
866 x_return_status,
867 x_msg_count,
868 x_msg_data,
869 ddp_agrv_tbl,
870 ddx_agrv_tbl);
871
872 -- copy data back from the local variables to OUT or IN-OUT args, if any
873
874
875
876
877
878
879 okl_agr_pvt_w.rosetta_table_copy_out_p5(ddx_agrv_tbl, p6_a0
880 , p6_a1
881 , p6_a2
882 , p6_a3
883 , p6_a4
884 , p6_a5
885 , p6_a6
886 , p6_a7
887 , p6_a8
888 , p6_a9
889 );
890 end;
891
892 procedure update_acc_gen_rule(p_api_version NUMBER
893 , p_init_msg_list VARCHAR2
894 , x_return_status out nocopy VARCHAR2
895 , x_msg_count out nocopy NUMBER
896 , x_msg_data out nocopy VARCHAR2
897 , p6_a0 out nocopy NUMBER
898 , p6_a1 out nocopy NUMBER
899 , p6_a2 out nocopy VARCHAR2
900 , p6_a3 out nocopy NUMBER
901 , p6_a4 out nocopy NUMBER
902 , p6_a5 out nocopy NUMBER
903 , p6_a6 out nocopy DATE
904 , p6_a7 out nocopy NUMBER
905 , p6_a8 out nocopy DATE
906 , p6_a9 out nocopy NUMBER
907 , p5_a0 NUMBER := 0-1962.0724
908 , p5_a1 NUMBER := 0-1962.0724
909 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
910 , p5_a3 NUMBER := 0-1962.0724
911 , p5_a4 NUMBER := 0-1962.0724
912 , p5_a5 NUMBER := 0-1962.0724
913 , p5_a6 DATE := fnd_api.g_miss_date
914 , p5_a7 NUMBER := 0-1962.0724
915 , p5_a8 DATE := fnd_api.g_miss_date
916 , p5_a9 NUMBER := 0-1962.0724
917 )
918
919 as
920 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
921 ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
922 ddindx binary_integer; indx binary_integer;
923 begin
924
925 -- copy data to the local IN or IN-OUT args, if any
926
927
928
929
930
931 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
932 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
933 ddp_agrv_rec.ae_line_type := p5_a2;
934 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
935 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
936 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
937 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
938 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
939 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
940 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
941
942
943 -- here's the delegated call to the old PL/SQL routine
944 okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
945 p_init_msg_list,
946 x_return_status,
947 x_msg_count,
948 x_msg_data,
949 ddp_agrv_rec,
950 ddx_agrv_rec);
951
952 -- copy data back from the local variables to OUT or IN-OUT args, if any
953
954
955
956
957
958
959 p6_a0 := rosetta_g_miss_num_map(ddx_agrv_rec.id);
960 p6_a1 := rosetta_g_miss_num_map(ddx_agrv_rec.object_version_number);
961 p6_a2 := ddx_agrv_rec.ae_line_type;
962 p6_a3 := rosetta_g_miss_num_map(ddx_agrv_rec.set_of_books_id);
963 p6_a4 := rosetta_g_miss_num_map(ddx_agrv_rec.org_id);
964 p6_a5 := rosetta_g_miss_num_map(ddx_agrv_rec.created_by);
965 p6_a6 := ddx_agrv_rec.creation_date;
966 p6_a7 := rosetta_g_miss_num_map(ddx_agrv_rec.last_updated_by);
967 p6_a8 := ddx_agrv_rec.last_update_date;
968 p6_a9 := rosetta_g_miss_num_map(ddx_agrv_rec.last_update_login);
969 end;
970
971 procedure delete_acc_gen_rule(p_api_version NUMBER
972 , p_init_msg_list VARCHAR2
973 , x_return_status out nocopy VARCHAR2
974 , x_msg_count out nocopy NUMBER
975 , x_msg_data out nocopy VARCHAR2
976 , p5_a0 JTF_NUMBER_TABLE
977 , p5_a1 JTF_NUMBER_TABLE
978 , p5_a2 JTF_VARCHAR2_TABLE_100
979 , p5_a3 JTF_NUMBER_TABLE
980 , p5_a4 JTF_NUMBER_TABLE
981 , p5_a5 JTF_NUMBER_TABLE
982 , p5_a6 JTF_DATE_TABLE
983 , p5_a7 JTF_NUMBER_TABLE
984 , p5_a8 JTF_DATE_TABLE
985 , p5_a9 JTF_NUMBER_TABLE
986 )
987
988 as
989 ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
990 ddindx binary_integer; indx binary_integer;
991 begin
992
993 -- copy data to the local IN or IN-OUT args, if any
994
995
996
997
998
999 okl_agr_pvt_w.rosetta_table_copy_in_p5(ddp_agrv_tbl, p5_a0
1000 , p5_a1
1001 , p5_a2
1002 , p5_a3
1003 , p5_a4
1004 , p5_a5
1005 , p5_a6
1006 , p5_a7
1007 , p5_a8
1008 , p5_a9
1009 );
1010
1011 -- here's the delegated call to the old PL/SQL routine
1012 okl_acc_gen_rule_pvt.delete_acc_gen_rule(p_api_version,
1013 p_init_msg_list,
1014 x_return_status,
1015 x_msg_count,
1016 x_msg_data,
1017 ddp_agrv_tbl);
1018
1019 -- copy data back from the local variables to OUT or IN-OUT args, if any
1020
1021
1022
1023
1024
1025 end;
1026
1027 procedure delete_acc_gen_rule(p_api_version NUMBER
1028 , p_init_msg_list VARCHAR2
1029 , x_return_status out nocopy VARCHAR2
1030 , x_msg_count out nocopy NUMBER
1031 , x_msg_data out nocopy VARCHAR2
1032 , p5_a0 NUMBER := 0-1962.0724
1033 , p5_a1 NUMBER := 0-1962.0724
1034 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1035 , p5_a3 NUMBER := 0-1962.0724
1036 , p5_a4 NUMBER := 0-1962.0724
1037 , p5_a5 NUMBER := 0-1962.0724
1038 , p5_a6 DATE := fnd_api.g_miss_date
1039 , p5_a7 NUMBER := 0-1962.0724
1040 , p5_a8 DATE := fnd_api.g_miss_date
1041 , p5_a9 NUMBER := 0-1962.0724
1042 )
1043
1044 as
1045 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
1046 ddindx binary_integer; indx binary_integer;
1047 begin
1048
1049 -- copy data to the local IN or IN-OUT args, if any
1050
1051
1052
1053
1054
1055 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
1056 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1057 ddp_agrv_rec.ae_line_type := p5_a2;
1058 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
1059 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
1060 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
1061 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
1062 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
1063 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
1064 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
1065
1066 -- here's the delegated call to the old PL/SQL routine
1067 okl_acc_gen_rule_pvt.delete_acc_gen_rule(p_api_version,
1068 p_init_msg_list,
1069 x_return_status,
1070 x_msg_count,
1071 x_msg_data,
1072 ddp_agrv_rec);
1073
1074 -- copy data back from the local variables to OUT or IN-OUT args, if any
1075
1076
1077
1078
1079
1080 end;
1081
1082 procedure validate_acc_gen_rule(p_api_version NUMBER
1083 , p_init_msg_list VARCHAR2
1084 , x_return_status out nocopy VARCHAR2
1085 , x_msg_count out nocopy NUMBER
1086 , x_msg_data out nocopy VARCHAR2
1087 , p5_a0 JTF_NUMBER_TABLE
1088 , p5_a1 JTF_NUMBER_TABLE
1089 , p5_a2 JTF_VARCHAR2_TABLE_100
1090 , p5_a3 JTF_NUMBER_TABLE
1091 , p5_a4 JTF_NUMBER_TABLE
1092 , p5_a5 JTF_NUMBER_TABLE
1093 , p5_a6 JTF_DATE_TABLE
1094 , p5_a7 JTF_NUMBER_TABLE
1095 , p5_a8 JTF_DATE_TABLE
1096 , p5_a9 JTF_NUMBER_TABLE
1097 )
1098
1099 as
1100 ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
1101 ddindx binary_integer; indx binary_integer;
1102 begin
1103
1104 -- copy data to the local IN or IN-OUT args, if any
1105
1106
1107
1108
1109
1110 okl_agr_pvt_w.rosetta_table_copy_in_p5(ddp_agrv_tbl, p5_a0
1111 , p5_a1
1112 , p5_a2
1113 , p5_a3
1114 , p5_a4
1115 , p5_a5
1116 , p5_a6
1117 , p5_a7
1118 , p5_a8
1119 , p5_a9
1120 );
1121
1122 -- here's the delegated call to the old PL/SQL routine
1123 okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
1124 p_init_msg_list,
1125 x_return_status,
1126 x_msg_count,
1127 x_msg_data,
1128 ddp_agrv_tbl);
1129
1130 -- copy data back from the local variables to OUT or IN-OUT args, if any
1131
1132
1133
1134
1135
1136 end;
1137
1138 procedure validate_acc_gen_rule(p_api_version NUMBER
1139 , p_init_msg_list VARCHAR2
1140 , x_return_status out nocopy VARCHAR2
1141 , x_msg_count out nocopy NUMBER
1142 , x_msg_data out nocopy VARCHAR2
1143 , p5_a0 NUMBER := 0-1962.0724
1144 , p5_a1 NUMBER := 0-1962.0724
1145 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1146 , p5_a3 NUMBER := 0-1962.0724
1147 , p5_a4 NUMBER := 0-1962.0724
1148 , p5_a5 NUMBER := 0-1962.0724
1149 , p5_a6 DATE := fnd_api.g_miss_date
1150 , p5_a7 NUMBER := 0-1962.0724
1151 , p5_a8 DATE := fnd_api.g_miss_date
1152 , p5_a9 NUMBER := 0-1962.0724
1153 )
1154
1155 as
1156 ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
1157 ddindx binary_integer; indx binary_integer;
1158 begin
1159
1160 -- copy data to the local IN or IN-OUT args, if any
1161
1162
1163
1164
1165
1166 ddp_agrv_rec.id := rosetta_g_miss_num_map(p5_a0);
1167 ddp_agrv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1168 ddp_agrv_rec.ae_line_type := p5_a2;
1169 ddp_agrv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a3);
1170 ddp_agrv_rec.org_id := rosetta_g_miss_num_map(p5_a4);
1171 ddp_agrv_rec.created_by := rosetta_g_miss_num_map(p5_a5);
1172 ddp_agrv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a6);
1173 ddp_agrv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a7);
1174 ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
1175 ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
1176
1177 -- here's the delegated call to the old PL/SQL routine
1178 okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
1179 p_init_msg_list,
1180 x_return_status,
1181 x_msg_count,
1182 x_msg_data,
1183 ddp_agrv_rec);
1184
1185 -- copy data back from the local variables to OUT or IN-OUT args, if any
1186
1187
1188
1189
1190
1191 end;
1192
1193 procedure create_acc_gen_rule_lns(p_api_version NUMBER
1194 , p_init_msg_list VARCHAR2
1195 , x_return_status out nocopy VARCHAR2
1196 , x_msg_count out nocopy NUMBER
1197 , x_msg_data out nocopy VARCHAR2
1198 , p5_a0 JTF_NUMBER_TABLE
1199 , p5_a1 JTF_NUMBER_TABLE
1200 , p5_a2 JTF_VARCHAR2_TABLE_100
1201 , p5_a3 JTF_VARCHAR2_TABLE_100
1202 , p5_a4 JTF_NUMBER_TABLE
1203 , p5_a5 JTF_VARCHAR2_TABLE_100
1204 , p5_a6 JTF_VARCHAR2_TABLE_500
1205 , p5_a7 JTF_VARCHAR2_TABLE_500
1206 , p5_a8 JTF_VARCHAR2_TABLE_500
1207 , p5_a9 JTF_VARCHAR2_TABLE_500
1208 , p5_a10 JTF_VARCHAR2_TABLE_500
1209 , p5_a11 JTF_VARCHAR2_TABLE_500
1210 , p5_a12 JTF_VARCHAR2_TABLE_500
1211 , p5_a13 JTF_VARCHAR2_TABLE_500
1212 , p5_a14 JTF_VARCHAR2_TABLE_500
1213 , p5_a15 JTF_VARCHAR2_TABLE_500
1214 , p5_a16 JTF_VARCHAR2_TABLE_500
1215 , p5_a17 JTF_VARCHAR2_TABLE_500
1216 , p5_a18 JTF_VARCHAR2_TABLE_500
1217 , p5_a19 JTF_VARCHAR2_TABLE_500
1218 , p5_a20 JTF_VARCHAR2_TABLE_500
1219 , p5_a21 JTF_VARCHAR2_TABLE_500
1220 , p5_a22 JTF_NUMBER_TABLE
1221 , p5_a23 JTF_NUMBER_TABLE
1222 , p5_a24 JTF_DATE_TABLE
1223 , p5_a25 JTF_NUMBER_TABLE
1224 , p5_a26 JTF_DATE_TABLE
1225 , p5_a27 JTF_NUMBER_TABLE
1226 , p6_a0 out nocopy JTF_NUMBER_TABLE
1227 , p6_a1 out nocopy JTF_NUMBER_TABLE
1228 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1229 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1230 , p6_a4 out nocopy JTF_NUMBER_TABLE
1231 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1232 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
1233 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
1234 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
1235 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
1236 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
1237 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
1238 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
1239 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1240 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1241 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1242 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1243 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1244 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1245 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1246 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1247 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1248 , p6_a22 out nocopy JTF_NUMBER_TABLE
1249 , p6_a23 out nocopy JTF_NUMBER_TABLE
1250 , p6_a24 out nocopy JTF_DATE_TABLE
1251 , p6_a25 out nocopy JTF_NUMBER_TABLE
1252 , p6_a26 out nocopy JTF_DATE_TABLE
1253 , p6_a27 out nocopy JTF_NUMBER_TABLE
1254 )
1255
1256 as
1257 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1258 ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1259 ddindx binary_integer; indx binary_integer;
1260 begin
1261
1262 -- copy data to the local IN or IN-OUT args, if any
1263
1264
1265
1266
1267
1268 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p5_a0
1269 , p5_a1
1270 , p5_a2
1271 , p5_a3
1272 , p5_a4
1273 , p5_a5
1274 , p5_a6
1275 , p5_a7
1276 , p5_a8
1277 , p5_a9
1278 , p5_a10
1279 , p5_a11
1280 , p5_a12
1281 , p5_a13
1282 , p5_a14
1283 , p5_a15
1284 , p5_a16
1285 , p5_a17
1286 , p5_a18
1287 , p5_a19
1288 , p5_a20
1289 , p5_a21
1290 , p5_a22
1291 , p5_a23
1292 , p5_a24
1293 , p5_a25
1294 , p5_a26
1295 , p5_a27
1296 );
1297
1298
1299 -- here's the delegated call to the old PL/SQL routine
1300 okl_acc_gen_rule_pvt.create_acc_gen_rule_lns(p_api_version,
1301 p_init_msg_list,
1302 x_return_status,
1303 x_msg_count,
1304 x_msg_data,
1305 ddp_aulv_tbl,
1306 ddx_aulv_tbl);
1307
1308 -- copy data back from the local variables to OUT or IN-OUT args, if any
1309
1310
1311
1312
1313
1314
1315 okl_aul_pvt_w.rosetta_table_copy_out_p5(ddx_aulv_tbl, p6_a0
1316 , p6_a1
1317 , p6_a2
1318 , p6_a3
1319 , p6_a4
1320 , p6_a5
1321 , p6_a6
1322 , p6_a7
1323 , p6_a8
1324 , p6_a9
1325 , p6_a10
1326 , p6_a11
1327 , p6_a12
1328 , p6_a13
1329 , p6_a14
1330 , p6_a15
1331 , p6_a16
1332 , p6_a17
1333 , p6_a18
1334 , p6_a19
1335 , p6_a20
1336 , p6_a21
1337 , p6_a22
1338 , p6_a23
1339 , p6_a24
1340 , p6_a25
1341 , p6_a26
1342 , p6_a27
1343 );
1344 end;
1345
1346 procedure create_acc_gen_rule_lns(p_api_version NUMBER
1347 , p_init_msg_list VARCHAR2
1348 , x_return_status out nocopy VARCHAR2
1349 , x_msg_count out nocopy NUMBER
1350 , x_msg_data out nocopy VARCHAR2
1351 , p6_a0 out nocopy NUMBER
1352 , p6_a1 out nocopy NUMBER
1353 , p6_a2 out nocopy VARCHAR2
1354 , p6_a3 out nocopy VARCHAR2
1355 , p6_a4 out nocopy NUMBER
1356 , p6_a5 out nocopy VARCHAR2
1357 , p6_a6 out nocopy VARCHAR2
1358 , p6_a7 out nocopy VARCHAR2
1359 , p6_a8 out nocopy VARCHAR2
1360 , p6_a9 out nocopy VARCHAR2
1361 , p6_a10 out nocopy VARCHAR2
1362 , p6_a11 out nocopy VARCHAR2
1363 , p6_a12 out nocopy VARCHAR2
1364 , p6_a13 out nocopy VARCHAR2
1365 , p6_a14 out nocopy VARCHAR2
1366 , p6_a15 out nocopy VARCHAR2
1367 , p6_a16 out nocopy VARCHAR2
1368 , p6_a17 out nocopy VARCHAR2
1369 , p6_a18 out nocopy VARCHAR2
1370 , p6_a19 out nocopy VARCHAR2
1371 , p6_a20 out nocopy VARCHAR2
1372 , p6_a21 out nocopy VARCHAR2
1373 , p6_a22 out nocopy NUMBER
1374 , p6_a23 out nocopy NUMBER
1375 , p6_a24 out nocopy DATE
1376 , p6_a25 out nocopy NUMBER
1377 , p6_a26 out nocopy DATE
1378 , p6_a27 out nocopy NUMBER
1379 , p5_a0 NUMBER := 0-1962.0724
1380 , p5_a1 NUMBER := 0-1962.0724
1381 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1382 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1383 , p5_a4 NUMBER := 0-1962.0724
1384 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1385 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1386 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1387 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1388 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1389 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1390 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1391 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1392 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1393 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1394 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1395 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1396 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1397 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1398 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1399 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1400 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1401 , p5_a22 NUMBER := 0-1962.0724
1402 , p5_a23 NUMBER := 0-1962.0724
1403 , p5_a24 DATE := fnd_api.g_miss_date
1404 , p5_a25 NUMBER := 0-1962.0724
1405 , p5_a26 DATE := fnd_api.g_miss_date
1406 , p5_a27 NUMBER := 0-1962.0724
1407 )
1408
1409 as
1410 ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1411 ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1412 ddindx binary_integer; indx binary_integer;
1413 begin
1414
1415 -- copy data to the local IN or IN-OUT args, if any
1416
1417
1418
1419
1420
1421 ddp_aulv_rec.id := rosetta_g_miss_num_map(p5_a0);
1422 ddp_aulv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1423 ddp_aulv_rec.source := p5_a2;
1424 ddp_aulv_rec.segment := p5_a3;
1425 ddp_aulv_rec.segment_number := rosetta_g_miss_num_map(p5_a4);
1426 ddp_aulv_rec.constants := p5_a5;
1427 ddp_aulv_rec.attribute_category := p5_a6;
1428 ddp_aulv_rec.attribute1 := p5_a7;
1429 ddp_aulv_rec.attribute2 := p5_a8;
1430 ddp_aulv_rec.attribute3 := p5_a9;
1431 ddp_aulv_rec.attribute4 := p5_a10;
1432 ddp_aulv_rec.attribute5 := p5_a11;
1433 ddp_aulv_rec.attribute6 := p5_a12;
1434 ddp_aulv_rec.attribute7 := p5_a13;
1435 ddp_aulv_rec.attribute8 := p5_a14;
1436 ddp_aulv_rec.attribute9 := p5_a15;
1437 ddp_aulv_rec.attribute10 := p5_a16;
1438 ddp_aulv_rec.attribute11 := p5_a17;
1439 ddp_aulv_rec.attribute12 := p5_a18;
1440 ddp_aulv_rec.attribute13 := p5_a19;
1441 ddp_aulv_rec.attribute14 := p5_a20;
1442 ddp_aulv_rec.attribute15 := p5_a21;
1443 ddp_aulv_rec.agr_id := rosetta_g_miss_num_map(p5_a22);
1444 ddp_aulv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
1445 ddp_aulv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
1446 ddp_aulv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
1447 ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
1448 ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1449
1450
1451 -- here's the delegated call to the old PL/SQL routine
1452 okl_acc_gen_rule_pvt.create_acc_gen_rule_lns(p_api_version,
1453 p_init_msg_list,
1454 x_return_status,
1455 x_msg_count,
1456 x_msg_data,
1457 ddp_aulv_rec,
1458 ddx_aulv_rec);
1459
1460 -- copy data back from the local variables to OUT or IN-OUT args, if any
1461
1462
1463
1464
1465
1466
1467 p6_a0 := rosetta_g_miss_num_map(ddx_aulv_rec.id);
1468 p6_a1 := rosetta_g_miss_num_map(ddx_aulv_rec.object_version_number);
1469 p6_a2 := ddx_aulv_rec.source;
1470 p6_a3 := ddx_aulv_rec.segment;
1471 p6_a4 := rosetta_g_miss_num_map(ddx_aulv_rec.segment_number);
1472 p6_a5 := ddx_aulv_rec.constants;
1473 p6_a6 := ddx_aulv_rec.attribute_category;
1474 p6_a7 := ddx_aulv_rec.attribute1;
1475 p6_a8 := ddx_aulv_rec.attribute2;
1476 p6_a9 := ddx_aulv_rec.attribute3;
1477 p6_a10 := ddx_aulv_rec.attribute4;
1478 p6_a11 := ddx_aulv_rec.attribute5;
1479 p6_a12 := ddx_aulv_rec.attribute6;
1480 p6_a13 := ddx_aulv_rec.attribute7;
1481 p6_a14 := ddx_aulv_rec.attribute8;
1482 p6_a15 := ddx_aulv_rec.attribute9;
1483 p6_a16 := ddx_aulv_rec.attribute10;
1484 p6_a17 := ddx_aulv_rec.attribute11;
1485 p6_a18 := ddx_aulv_rec.attribute12;
1486 p6_a19 := ddx_aulv_rec.attribute13;
1487 p6_a20 := ddx_aulv_rec.attribute14;
1488 p6_a21 := ddx_aulv_rec.attribute15;
1489 p6_a22 := rosetta_g_miss_num_map(ddx_aulv_rec.agr_id);
1490 p6_a23 := rosetta_g_miss_num_map(ddx_aulv_rec.created_by);
1491 p6_a24 := ddx_aulv_rec.creation_date;
1492 p6_a25 := rosetta_g_miss_num_map(ddx_aulv_rec.last_updated_by);
1493 p6_a26 := ddx_aulv_rec.last_update_date;
1494 p6_a27 := rosetta_g_miss_num_map(ddx_aulv_rec.last_update_login);
1495 end;
1496
1497 procedure lock_acc_gen_rule_lns(p_api_version NUMBER
1498 , p_init_msg_list VARCHAR2
1499 , x_return_status out nocopy VARCHAR2
1500 , x_msg_count out nocopy NUMBER
1501 , x_msg_data out nocopy VARCHAR2
1502 , p5_a0 JTF_NUMBER_TABLE
1503 , p5_a1 JTF_NUMBER_TABLE
1504 , p5_a2 JTF_VARCHAR2_TABLE_100
1505 , p5_a3 JTF_VARCHAR2_TABLE_100
1506 , p5_a4 JTF_NUMBER_TABLE
1507 , p5_a5 JTF_VARCHAR2_TABLE_100
1508 , p5_a6 JTF_VARCHAR2_TABLE_500
1509 , p5_a7 JTF_VARCHAR2_TABLE_500
1510 , p5_a8 JTF_VARCHAR2_TABLE_500
1511 , p5_a9 JTF_VARCHAR2_TABLE_500
1512 , p5_a10 JTF_VARCHAR2_TABLE_500
1513 , p5_a11 JTF_VARCHAR2_TABLE_500
1514 , p5_a12 JTF_VARCHAR2_TABLE_500
1515 , p5_a13 JTF_VARCHAR2_TABLE_500
1516 , p5_a14 JTF_VARCHAR2_TABLE_500
1517 , p5_a15 JTF_VARCHAR2_TABLE_500
1518 , p5_a16 JTF_VARCHAR2_TABLE_500
1519 , p5_a17 JTF_VARCHAR2_TABLE_500
1520 , p5_a18 JTF_VARCHAR2_TABLE_500
1521 , p5_a19 JTF_VARCHAR2_TABLE_500
1522 , p5_a20 JTF_VARCHAR2_TABLE_500
1523 , p5_a21 JTF_VARCHAR2_TABLE_500
1524 , p5_a22 JTF_NUMBER_TABLE
1525 , p5_a23 JTF_NUMBER_TABLE
1526 , p5_a24 JTF_DATE_TABLE
1527 , p5_a25 JTF_NUMBER_TABLE
1528 , p5_a26 JTF_DATE_TABLE
1529 , p5_a27 JTF_NUMBER_TABLE
1530 )
1531
1532 as
1533 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1534 ddindx binary_integer; indx binary_integer;
1535 begin
1536
1537 -- copy data to the local IN or IN-OUT args, if any
1538
1539
1540
1541
1542
1543 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p5_a0
1544 , p5_a1
1545 , p5_a2
1546 , p5_a3
1547 , p5_a4
1548 , p5_a5
1549 , p5_a6
1550 , p5_a7
1551 , p5_a8
1552 , p5_a9
1553 , p5_a10
1554 , p5_a11
1555 , p5_a12
1556 , p5_a13
1557 , p5_a14
1558 , p5_a15
1559 , p5_a16
1560 , p5_a17
1561 , p5_a18
1562 , p5_a19
1563 , p5_a20
1564 , p5_a21
1565 , p5_a22
1566 , p5_a23
1567 , p5_a24
1568 , p5_a25
1569 , p5_a26
1570 , p5_a27
1571 );
1572
1573 -- here's the delegated call to the old PL/SQL routine
1574 okl_acc_gen_rule_pvt.lock_acc_gen_rule_lns(p_api_version,
1575 p_init_msg_list,
1576 x_return_status,
1577 x_msg_count,
1578 x_msg_data,
1579 ddp_aulv_tbl);
1580
1581 -- copy data back from the local variables to OUT or IN-OUT args, if any
1582
1583
1584
1585
1586
1587 end;
1588
1589 procedure lock_acc_gen_rule_lns(p_api_version NUMBER
1590 , p_init_msg_list VARCHAR2
1591 , x_return_status out nocopy VARCHAR2
1592 , x_msg_count out nocopy NUMBER
1593 , x_msg_data out nocopy VARCHAR2
1594 , p5_a0 NUMBER := 0-1962.0724
1595 , p5_a1 NUMBER := 0-1962.0724
1596 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1597 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1598 , p5_a4 NUMBER := 0-1962.0724
1599 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1600 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1601 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1602 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1603 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1604 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1605 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1606 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1607 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1608 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1609 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1610 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1611 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1612 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1613 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1614 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1615 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1616 , p5_a22 NUMBER := 0-1962.0724
1617 , p5_a23 NUMBER := 0-1962.0724
1618 , p5_a24 DATE := fnd_api.g_miss_date
1619 , p5_a25 NUMBER := 0-1962.0724
1620 , p5_a26 DATE := fnd_api.g_miss_date
1621 , p5_a27 NUMBER := 0-1962.0724
1622 )
1623
1624 as
1625 ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1626 ddindx binary_integer; indx binary_integer;
1627 begin
1628
1629 -- copy data to the local IN or IN-OUT args, if any
1630
1631
1632
1633
1634
1635 ddp_aulv_rec.id := rosetta_g_miss_num_map(p5_a0);
1636 ddp_aulv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1637 ddp_aulv_rec.source := p5_a2;
1638 ddp_aulv_rec.segment := p5_a3;
1639 ddp_aulv_rec.segment_number := rosetta_g_miss_num_map(p5_a4);
1640 ddp_aulv_rec.constants := p5_a5;
1641 ddp_aulv_rec.attribute_category := p5_a6;
1642 ddp_aulv_rec.attribute1 := p5_a7;
1643 ddp_aulv_rec.attribute2 := p5_a8;
1644 ddp_aulv_rec.attribute3 := p5_a9;
1645 ddp_aulv_rec.attribute4 := p5_a10;
1646 ddp_aulv_rec.attribute5 := p5_a11;
1647 ddp_aulv_rec.attribute6 := p5_a12;
1648 ddp_aulv_rec.attribute7 := p5_a13;
1649 ddp_aulv_rec.attribute8 := p5_a14;
1650 ddp_aulv_rec.attribute9 := p5_a15;
1651 ddp_aulv_rec.attribute10 := p5_a16;
1652 ddp_aulv_rec.attribute11 := p5_a17;
1653 ddp_aulv_rec.attribute12 := p5_a18;
1654 ddp_aulv_rec.attribute13 := p5_a19;
1655 ddp_aulv_rec.attribute14 := p5_a20;
1656 ddp_aulv_rec.attribute15 := p5_a21;
1657 ddp_aulv_rec.agr_id := rosetta_g_miss_num_map(p5_a22);
1658 ddp_aulv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
1659 ddp_aulv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
1660 ddp_aulv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
1661 ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
1662 ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1663
1664 -- here's the delegated call to the old PL/SQL routine
1665 okl_acc_gen_rule_pvt.lock_acc_gen_rule_lns(p_api_version,
1666 p_init_msg_list,
1667 x_return_status,
1668 x_msg_count,
1669 x_msg_data,
1670 ddp_aulv_rec);
1671
1672 -- copy data back from the local variables to OUT or IN-OUT args, if any
1673
1674
1675
1676
1677
1678 end;
1679
1680 procedure update_acc_gen_rule_lns(p_api_version NUMBER
1681 , p_init_msg_list VARCHAR2
1682 , x_return_status out nocopy VARCHAR2
1683 , x_msg_count out nocopy NUMBER
1684 , x_msg_data out nocopy VARCHAR2
1685 , p5_a0 JTF_NUMBER_TABLE
1686 , p5_a1 JTF_NUMBER_TABLE
1687 , p5_a2 JTF_VARCHAR2_TABLE_100
1688 , p5_a3 JTF_VARCHAR2_TABLE_100
1689 , p5_a4 JTF_NUMBER_TABLE
1690 , p5_a5 JTF_VARCHAR2_TABLE_100
1691 , p5_a6 JTF_VARCHAR2_TABLE_500
1692 , p5_a7 JTF_VARCHAR2_TABLE_500
1693 , p5_a8 JTF_VARCHAR2_TABLE_500
1694 , p5_a9 JTF_VARCHAR2_TABLE_500
1695 , p5_a10 JTF_VARCHAR2_TABLE_500
1696 , p5_a11 JTF_VARCHAR2_TABLE_500
1697 , p5_a12 JTF_VARCHAR2_TABLE_500
1698 , p5_a13 JTF_VARCHAR2_TABLE_500
1699 , p5_a14 JTF_VARCHAR2_TABLE_500
1700 , p5_a15 JTF_VARCHAR2_TABLE_500
1701 , p5_a16 JTF_VARCHAR2_TABLE_500
1702 , p5_a17 JTF_VARCHAR2_TABLE_500
1703 , p5_a18 JTF_VARCHAR2_TABLE_500
1704 , p5_a19 JTF_VARCHAR2_TABLE_500
1705 , p5_a20 JTF_VARCHAR2_TABLE_500
1706 , p5_a21 JTF_VARCHAR2_TABLE_500
1707 , p5_a22 JTF_NUMBER_TABLE
1708 , p5_a23 JTF_NUMBER_TABLE
1709 , p5_a24 JTF_DATE_TABLE
1710 , p5_a25 JTF_NUMBER_TABLE
1711 , p5_a26 JTF_DATE_TABLE
1712 , p5_a27 JTF_NUMBER_TABLE
1713 , p6_a0 out nocopy JTF_NUMBER_TABLE
1714 , p6_a1 out nocopy JTF_NUMBER_TABLE
1715 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1716 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1717 , p6_a4 out nocopy JTF_NUMBER_TABLE
1718 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
1719 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_500
1720 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_500
1721 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_500
1722 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_500
1723 , p6_a10 out nocopy JTF_VARCHAR2_TABLE_500
1724 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_500
1725 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_500
1726 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_500
1727 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_500
1728 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_500
1729 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_500
1730 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_500
1731 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_500
1732 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_500
1733 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_500
1734 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_500
1735 , p6_a22 out nocopy JTF_NUMBER_TABLE
1736 , p6_a23 out nocopy JTF_NUMBER_TABLE
1737 , p6_a24 out nocopy JTF_DATE_TABLE
1738 , p6_a25 out nocopy JTF_NUMBER_TABLE
1739 , p6_a26 out nocopy JTF_DATE_TABLE
1740 , p6_a27 out nocopy JTF_NUMBER_TABLE
1741 )
1742
1743 as
1744 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1745 ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1746 ddindx binary_integer; indx binary_integer;
1747 begin
1748
1749 -- copy data to the local IN or IN-OUT args, if any
1750
1751
1752
1753
1754
1755 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p5_a0
1756 , p5_a1
1757 , p5_a2
1758 , p5_a3
1759 , p5_a4
1760 , p5_a5
1761 , p5_a6
1762 , p5_a7
1763 , p5_a8
1764 , p5_a9
1765 , p5_a10
1766 , p5_a11
1767 , p5_a12
1768 , p5_a13
1769 , p5_a14
1770 , p5_a15
1771 , p5_a16
1772 , p5_a17
1773 , p5_a18
1774 , p5_a19
1775 , p5_a20
1776 , p5_a21
1777 , p5_a22
1778 , p5_a23
1779 , p5_a24
1780 , p5_a25
1781 , p5_a26
1782 , p5_a27
1783 );
1784
1785
1786 -- here's the delegated call to the old PL/SQL routine
1787 okl_acc_gen_rule_pvt.update_acc_gen_rule_lns(p_api_version,
1788 p_init_msg_list,
1789 x_return_status,
1790 x_msg_count,
1791 x_msg_data,
1792 ddp_aulv_tbl,
1793 ddx_aulv_tbl);
1794
1795 -- copy data back from the local variables to OUT or IN-OUT args, if any
1796
1797
1798
1799
1800
1801
1802 okl_aul_pvt_w.rosetta_table_copy_out_p5(ddx_aulv_tbl, p6_a0
1803 , p6_a1
1804 , p6_a2
1805 , p6_a3
1806 , p6_a4
1807 , p6_a5
1808 , p6_a6
1809 , p6_a7
1810 , p6_a8
1811 , p6_a9
1812 , p6_a10
1813 , p6_a11
1814 , p6_a12
1815 , p6_a13
1816 , p6_a14
1817 , p6_a15
1818 , p6_a16
1819 , p6_a17
1820 , p6_a18
1821 , p6_a19
1822 , p6_a20
1823 , p6_a21
1824 , p6_a22
1825 , p6_a23
1826 , p6_a24
1827 , p6_a25
1828 , p6_a26
1829 , p6_a27
1830 );
1831 end;
1832
1833 procedure update_acc_gen_rule_lns(p_api_version NUMBER
1834 , p_init_msg_list VARCHAR2
1835 , x_return_status out nocopy VARCHAR2
1836 , x_msg_count out nocopy NUMBER
1837 , x_msg_data out nocopy VARCHAR2
1838 , p6_a0 out nocopy NUMBER
1839 , p6_a1 out nocopy NUMBER
1840 , p6_a2 out nocopy VARCHAR2
1841 , p6_a3 out nocopy VARCHAR2
1842 , p6_a4 out nocopy NUMBER
1843 , p6_a5 out nocopy VARCHAR2
1844 , p6_a6 out nocopy VARCHAR2
1845 , p6_a7 out nocopy VARCHAR2
1846 , p6_a8 out nocopy VARCHAR2
1847 , p6_a9 out nocopy VARCHAR2
1848 , p6_a10 out nocopy VARCHAR2
1849 , p6_a11 out nocopy VARCHAR2
1850 , p6_a12 out nocopy VARCHAR2
1851 , p6_a13 out nocopy VARCHAR2
1852 , p6_a14 out nocopy VARCHAR2
1853 , p6_a15 out nocopy VARCHAR2
1854 , p6_a16 out nocopy VARCHAR2
1855 , p6_a17 out nocopy VARCHAR2
1856 , p6_a18 out nocopy VARCHAR2
1857 , p6_a19 out nocopy VARCHAR2
1858 , p6_a20 out nocopy VARCHAR2
1859 , p6_a21 out nocopy VARCHAR2
1860 , p6_a22 out nocopy NUMBER
1861 , p6_a23 out nocopy NUMBER
1862 , p6_a24 out nocopy DATE
1863 , p6_a25 out nocopy NUMBER
1864 , p6_a26 out nocopy DATE
1865 , p6_a27 out nocopy NUMBER
1866 , p5_a0 NUMBER := 0-1962.0724
1867 , p5_a1 NUMBER := 0-1962.0724
1868 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
1869 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1870 , p5_a4 NUMBER := 0-1962.0724
1871 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
1872 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1873 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
1874 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1875 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
1876 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
1877 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
1878 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
1879 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
1880 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
1881 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
1882 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
1883 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
1884 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
1885 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
1886 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
1887 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
1888 , p5_a22 NUMBER := 0-1962.0724
1889 , p5_a23 NUMBER := 0-1962.0724
1890 , p5_a24 DATE := fnd_api.g_miss_date
1891 , p5_a25 NUMBER := 0-1962.0724
1892 , p5_a26 DATE := fnd_api.g_miss_date
1893 , p5_a27 NUMBER := 0-1962.0724
1894 )
1895
1896 as
1897 ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1898 ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1899 ddindx binary_integer; indx binary_integer;
1900 begin
1901
1902 -- copy data to the local IN or IN-OUT args, if any
1903
1904
1905
1906
1907
1908 ddp_aulv_rec.id := rosetta_g_miss_num_map(p5_a0);
1909 ddp_aulv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1910 ddp_aulv_rec.source := p5_a2;
1911 ddp_aulv_rec.segment := p5_a3;
1912 ddp_aulv_rec.segment_number := rosetta_g_miss_num_map(p5_a4);
1913 ddp_aulv_rec.constants := p5_a5;
1914 ddp_aulv_rec.attribute_category := p5_a6;
1915 ddp_aulv_rec.attribute1 := p5_a7;
1916 ddp_aulv_rec.attribute2 := p5_a8;
1917 ddp_aulv_rec.attribute3 := p5_a9;
1918 ddp_aulv_rec.attribute4 := p5_a10;
1919 ddp_aulv_rec.attribute5 := p5_a11;
1920 ddp_aulv_rec.attribute6 := p5_a12;
1921 ddp_aulv_rec.attribute7 := p5_a13;
1922 ddp_aulv_rec.attribute8 := p5_a14;
1923 ddp_aulv_rec.attribute9 := p5_a15;
1924 ddp_aulv_rec.attribute10 := p5_a16;
1925 ddp_aulv_rec.attribute11 := p5_a17;
1926 ddp_aulv_rec.attribute12 := p5_a18;
1927 ddp_aulv_rec.attribute13 := p5_a19;
1928 ddp_aulv_rec.attribute14 := p5_a20;
1929 ddp_aulv_rec.attribute15 := p5_a21;
1930 ddp_aulv_rec.agr_id := rosetta_g_miss_num_map(p5_a22);
1931 ddp_aulv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
1932 ddp_aulv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
1933 ddp_aulv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
1934 ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
1935 ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1936
1937
1938 -- here's the delegated call to the old PL/SQL routine
1939 okl_acc_gen_rule_pvt.update_acc_gen_rule_lns(p_api_version,
1940 p_init_msg_list,
1941 x_return_status,
1942 x_msg_count,
1943 x_msg_data,
1944 ddp_aulv_rec,
1945 ddx_aulv_rec);
1946
1947 -- copy data back from the local variables to OUT or IN-OUT args, if any
1948
1949
1950
1951
1952
1953
1954 p6_a0 := rosetta_g_miss_num_map(ddx_aulv_rec.id);
1955 p6_a1 := rosetta_g_miss_num_map(ddx_aulv_rec.object_version_number);
1956 p6_a2 := ddx_aulv_rec.source;
1957 p6_a3 := ddx_aulv_rec.segment;
1958 p6_a4 := rosetta_g_miss_num_map(ddx_aulv_rec.segment_number);
1959 p6_a5 := ddx_aulv_rec.constants;
1960 p6_a6 := ddx_aulv_rec.attribute_category;
1961 p6_a7 := ddx_aulv_rec.attribute1;
1962 p6_a8 := ddx_aulv_rec.attribute2;
1963 p6_a9 := ddx_aulv_rec.attribute3;
1964 p6_a10 := ddx_aulv_rec.attribute4;
1965 p6_a11 := ddx_aulv_rec.attribute5;
1966 p6_a12 := ddx_aulv_rec.attribute6;
1967 p6_a13 := ddx_aulv_rec.attribute7;
1968 p6_a14 := ddx_aulv_rec.attribute8;
1969 p6_a15 := ddx_aulv_rec.attribute9;
1970 p6_a16 := ddx_aulv_rec.attribute10;
1971 p6_a17 := ddx_aulv_rec.attribute11;
1972 p6_a18 := ddx_aulv_rec.attribute12;
1973 p6_a19 := ddx_aulv_rec.attribute13;
1974 p6_a20 := ddx_aulv_rec.attribute14;
1975 p6_a21 := ddx_aulv_rec.attribute15;
1976 p6_a22 := rosetta_g_miss_num_map(ddx_aulv_rec.agr_id);
1977 p6_a23 := rosetta_g_miss_num_map(ddx_aulv_rec.created_by);
1978 p6_a24 := ddx_aulv_rec.creation_date;
1979 p6_a25 := rosetta_g_miss_num_map(ddx_aulv_rec.last_updated_by);
1980 p6_a26 := ddx_aulv_rec.last_update_date;
1981 p6_a27 := rosetta_g_miss_num_map(ddx_aulv_rec.last_update_login);
1982 end;
1983
1984 procedure delete_acc_gen_rule_lns(p_api_version NUMBER
1985 , p_init_msg_list VARCHAR2
1986 , x_return_status out nocopy VARCHAR2
1987 , x_msg_count out nocopy NUMBER
1988 , x_msg_data out nocopy VARCHAR2
1989 , p5_a0 JTF_NUMBER_TABLE
1990 , p5_a1 JTF_NUMBER_TABLE
1991 , p5_a2 JTF_VARCHAR2_TABLE_100
1992 , p5_a3 JTF_VARCHAR2_TABLE_100
1993 , p5_a4 JTF_NUMBER_TABLE
1994 , p5_a5 JTF_VARCHAR2_TABLE_100
1995 , p5_a6 JTF_VARCHAR2_TABLE_500
1996 , p5_a7 JTF_VARCHAR2_TABLE_500
1997 , p5_a8 JTF_VARCHAR2_TABLE_500
1998 , p5_a9 JTF_VARCHAR2_TABLE_500
1999 , p5_a10 JTF_VARCHAR2_TABLE_500
2000 , p5_a11 JTF_VARCHAR2_TABLE_500
2001 , p5_a12 JTF_VARCHAR2_TABLE_500
2002 , p5_a13 JTF_VARCHAR2_TABLE_500
2003 , p5_a14 JTF_VARCHAR2_TABLE_500
2004 , p5_a15 JTF_VARCHAR2_TABLE_500
2005 , p5_a16 JTF_VARCHAR2_TABLE_500
2006 , p5_a17 JTF_VARCHAR2_TABLE_500
2007 , p5_a18 JTF_VARCHAR2_TABLE_500
2008 , p5_a19 JTF_VARCHAR2_TABLE_500
2009 , p5_a20 JTF_VARCHAR2_TABLE_500
2010 , p5_a21 JTF_VARCHAR2_TABLE_500
2011 , p5_a22 JTF_NUMBER_TABLE
2012 , p5_a23 JTF_NUMBER_TABLE
2013 , p5_a24 JTF_DATE_TABLE
2014 , p5_a25 JTF_NUMBER_TABLE
2015 , p5_a26 JTF_DATE_TABLE
2016 , p5_a27 JTF_NUMBER_TABLE
2017 )
2018
2019 as
2020 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
2021 ddindx binary_integer; indx binary_integer;
2022 begin
2023
2024 -- copy data to the local IN or IN-OUT args, if any
2025
2026
2027
2028
2029
2030 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p5_a0
2031 , p5_a1
2032 , p5_a2
2033 , p5_a3
2034 , p5_a4
2035 , p5_a5
2036 , p5_a6
2037 , p5_a7
2038 , p5_a8
2039 , p5_a9
2040 , p5_a10
2041 , p5_a11
2042 , p5_a12
2043 , p5_a13
2044 , p5_a14
2045 , p5_a15
2046 , p5_a16
2047 , p5_a17
2048 , p5_a18
2049 , p5_a19
2050 , p5_a20
2051 , p5_a21
2052 , p5_a22
2053 , p5_a23
2054 , p5_a24
2055 , p5_a25
2056 , p5_a26
2057 , p5_a27
2058 );
2059
2060 -- here's the delegated call to the old PL/SQL routine
2061 okl_acc_gen_rule_pvt.delete_acc_gen_rule_lns(p_api_version,
2062 p_init_msg_list,
2063 x_return_status,
2064 x_msg_count,
2065 x_msg_data,
2066 ddp_aulv_tbl);
2067
2068 -- copy data back from the local variables to OUT or IN-OUT args, if any
2069
2070
2071
2072
2073
2074 end;
2075
2076 procedure delete_acc_gen_rule_lns(p_api_version NUMBER
2077 , p_init_msg_list VARCHAR2
2078 , x_return_status out nocopy VARCHAR2
2079 , x_msg_count out nocopy NUMBER
2080 , x_msg_data out nocopy VARCHAR2
2081 , p5_a0 NUMBER := 0-1962.0724
2082 , p5_a1 NUMBER := 0-1962.0724
2083 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
2084 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
2085 , p5_a4 NUMBER := 0-1962.0724
2086 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
2087 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2088 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
2089 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
2090 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2091 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
2092 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2093 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2094 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2095 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2096 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2097 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
2098 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2099 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
2100 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
2101 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
2102 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
2103 , p5_a22 NUMBER := 0-1962.0724
2104 , p5_a23 NUMBER := 0-1962.0724
2105 , p5_a24 DATE := fnd_api.g_miss_date
2106 , p5_a25 NUMBER := 0-1962.0724
2107 , p5_a26 DATE := fnd_api.g_miss_date
2108 , p5_a27 NUMBER := 0-1962.0724
2109 )
2110
2111 as
2112 ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
2113 ddindx binary_integer; indx binary_integer;
2114 begin
2115
2116 -- copy data to the local IN or IN-OUT args, if any
2117
2118
2119
2120
2121
2122 ddp_aulv_rec.id := rosetta_g_miss_num_map(p5_a0);
2123 ddp_aulv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2124 ddp_aulv_rec.source := p5_a2;
2125 ddp_aulv_rec.segment := p5_a3;
2126 ddp_aulv_rec.segment_number := rosetta_g_miss_num_map(p5_a4);
2127 ddp_aulv_rec.constants := p5_a5;
2128 ddp_aulv_rec.attribute_category := p5_a6;
2129 ddp_aulv_rec.attribute1 := p5_a7;
2130 ddp_aulv_rec.attribute2 := p5_a8;
2131 ddp_aulv_rec.attribute3 := p5_a9;
2132 ddp_aulv_rec.attribute4 := p5_a10;
2133 ddp_aulv_rec.attribute5 := p5_a11;
2134 ddp_aulv_rec.attribute6 := p5_a12;
2135 ddp_aulv_rec.attribute7 := p5_a13;
2136 ddp_aulv_rec.attribute8 := p5_a14;
2137 ddp_aulv_rec.attribute9 := p5_a15;
2138 ddp_aulv_rec.attribute10 := p5_a16;
2139 ddp_aulv_rec.attribute11 := p5_a17;
2140 ddp_aulv_rec.attribute12 := p5_a18;
2141 ddp_aulv_rec.attribute13 := p5_a19;
2142 ddp_aulv_rec.attribute14 := p5_a20;
2143 ddp_aulv_rec.attribute15 := p5_a21;
2144 ddp_aulv_rec.agr_id := rosetta_g_miss_num_map(p5_a22);
2145 ddp_aulv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
2146 ddp_aulv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
2147 ddp_aulv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
2148 ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
2149 ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
2150
2151 -- here's the delegated call to the old PL/SQL routine
2152 okl_acc_gen_rule_pvt.delete_acc_gen_rule_lns(p_api_version,
2153 p_init_msg_list,
2154 x_return_status,
2155 x_msg_count,
2156 x_msg_data,
2157 ddp_aulv_rec);
2158
2159 -- copy data back from the local variables to OUT or IN-OUT args, if any
2160
2161
2162
2163
2164
2165 end;
2166
2167 procedure validate_acc_gen_rule_lns(p_api_version NUMBER
2168 , p_init_msg_list VARCHAR2
2169 , x_return_status out nocopy VARCHAR2
2170 , x_msg_count out nocopy NUMBER
2171 , x_msg_data out nocopy VARCHAR2
2172 , p5_a0 JTF_NUMBER_TABLE
2173 , p5_a1 JTF_NUMBER_TABLE
2174 , p5_a2 JTF_VARCHAR2_TABLE_100
2175 , p5_a3 JTF_VARCHAR2_TABLE_100
2176 , p5_a4 JTF_NUMBER_TABLE
2177 , p5_a5 JTF_VARCHAR2_TABLE_100
2178 , p5_a6 JTF_VARCHAR2_TABLE_500
2179 , p5_a7 JTF_VARCHAR2_TABLE_500
2180 , p5_a8 JTF_VARCHAR2_TABLE_500
2181 , p5_a9 JTF_VARCHAR2_TABLE_500
2182 , p5_a10 JTF_VARCHAR2_TABLE_500
2183 , p5_a11 JTF_VARCHAR2_TABLE_500
2184 , p5_a12 JTF_VARCHAR2_TABLE_500
2185 , p5_a13 JTF_VARCHAR2_TABLE_500
2186 , p5_a14 JTF_VARCHAR2_TABLE_500
2187 , p5_a15 JTF_VARCHAR2_TABLE_500
2188 , p5_a16 JTF_VARCHAR2_TABLE_500
2189 , p5_a17 JTF_VARCHAR2_TABLE_500
2190 , p5_a18 JTF_VARCHAR2_TABLE_500
2191 , p5_a19 JTF_VARCHAR2_TABLE_500
2192 , p5_a20 JTF_VARCHAR2_TABLE_500
2193 , p5_a21 JTF_VARCHAR2_TABLE_500
2194 , p5_a22 JTF_NUMBER_TABLE
2195 , p5_a23 JTF_NUMBER_TABLE
2196 , p5_a24 JTF_DATE_TABLE
2197 , p5_a25 JTF_NUMBER_TABLE
2198 , p5_a26 JTF_DATE_TABLE
2199 , p5_a27 JTF_NUMBER_TABLE
2200 )
2201
2202 as
2203 ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
2204 ddindx binary_integer; indx binary_integer;
2205 begin
2206
2207 -- copy data to the local IN or IN-OUT args, if any
2208
2209
2210
2211
2212
2213 okl_aul_pvt_w.rosetta_table_copy_in_p5(ddp_aulv_tbl, p5_a0
2214 , p5_a1
2215 , p5_a2
2216 , p5_a3
2217 , p5_a4
2218 , p5_a5
2219 , p5_a6
2220 , p5_a7
2221 , p5_a8
2222 , p5_a9
2223 , p5_a10
2224 , p5_a11
2225 , p5_a12
2226 , p5_a13
2227 , p5_a14
2228 , p5_a15
2229 , p5_a16
2230 , p5_a17
2231 , p5_a18
2232 , p5_a19
2233 , p5_a20
2234 , p5_a21
2235 , p5_a22
2236 , p5_a23
2237 , p5_a24
2238 , p5_a25
2239 , p5_a26
2240 , p5_a27
2241 );
2242
2243 -- here's the delegated call to the old PL/SQL routine
2244 okl_acc_gen_rule_pvt.validate_acc_gen_rule_lns(p_api_version,
2245 p_init_msg_list,
2246 x_return_status,
2247 x_msg_count,
2248 x_msg_data,
2249 ddp_aulv_tbl);
2250
2251 -- copy data back from the local variables to OUT or IN-OUT args, if any
2252
2253
2254
2255
2256
2257 end;
2258
2259 procedure validate_acc_gen_rule_lns(p_api_version NUMBER
2260 , p_init_msg_list VARCHAR2
2261 , x_return_status out nocopy VARCHAR2
2262 , x_msg_count out nocopy NUMBER
2263 , x_msg_data out nocopy VARCHAR2
2264 , p5_a0 NUMBER := 0-1962.0724
2265 , p5_a1 NUMBER := 0-1962.0724
2266 , p5_a2 VARCHAR2 := fnd_api.g_miss_char
2267 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
2268 , p5_a4 NUMBER := 0-1962.0724
2269 , p5_a5 VARCHAR2 := fnd_api.g_miss_char
2270 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2271 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
2272 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
2273 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2274 , p5_a10 VARCHAR2 := fnd_api.g_miss_char
2275 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2276 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2277 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2278 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2279 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2280 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
2281 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2282 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
2283 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
2284 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
2285 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
2286 , p5_a22 NUMBER := 0-1962.0724
2287 , p5_a23 NUMBER := 0-1962.0724
2288 , p5_a24 DATE := fnd_api.g_miss_date
2289 , p5_a25 NUMBER := 0-1962.0724
2290 , p5_a26 DATE := fnd_api.g_miss_date
2291 , p5_a27 NUMBER := 0-1962.0724
2292 )
2293
2294 as
2295 ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
2296 ddindx binary_integer; indx binary_integer;
2297 begin
2298
2299 -- copy data to the local IN or IN-OUT args, if any
2300
2301
2302
2303
2304
2305 ddp_aulv_rec.id := rosetta_g_miss_num_map(p5_a0);
2306 ddp_aulv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2307 ddp_aulv_rec.source := p5_a2;
2308 ddp_aulv_rec.segment := p5_a3;
2309 ddp_aulv_rec.segment_number := rosetta_g_miss_num_map(p5_a4);
2310 ddp_aulv_rec.constants := p5_a5;
2311 ddp_aulv_rec.attribute_category := p5_a6;
2312 ddp_aulv_rec.attribute1 := p5_a7;
2313 ddp_aulv_rec.attribute2 := p5_a8;
2314 ddp_aulv_rec.attribute3 := p5_a9;
2315 ddp_aulv_rec.attribute4 := p5_a10;
2316 ddp_aulv_rec.attribute5 := p5_a11;
2317 ddp_aulv_rec.attribute6 := p5_a12;
2318 ddp_aulv_rec.attribute7 := p5_a13;
2319 ddp_aulv_rec.attribute8 := p5_a14;
2320 ddp_aulv_rec.attribute9 := p5_a15;
2321 ddp_aulv_rec.attribute10 := p5_a16;
2322 ddp_aulv_rec.attribute11 := p5_a17;
2323 ddp_aulv_rec.attribute12 := p5_a18;
2324 ddp_aulv_rec.attribute13 := p5_a19;
2325 ddp_aulv_rec.attribute14 := p5_a20;
2326 ddp_aulv_rec.attribute15 := p5_a21;
2327 ddp_aulv_rec.agr_id := rosetta_g_miss_num_map(p5_a22);
2328 ddp_aulv_rec.created_by := rosetta_g_miss_num_map(p5_a23);
2329 ddp_aulv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a24);
2330 ddp_aulv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a25);
2331 ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
2332 ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
2333
2334 -- here's the delegated call to the old PL/SQL routine
2335 okl_acc_gen_rule_pvt.validate_acc_gen_rule_lns(p_api_version,
2336 p_init_msg_list,
2337 x_return_status,
2338 x_msg_count,
2339 x_msg_data,
2340 ddp_aulv_rec);
2341
2342 -- copy data back from the local variables to OUT or IN-OUT args, if any
2343
2344
2345
2346
2347
2348 end;
2349
2350 end okl_acc_gen_rule_pvt_w;