[Home] [Help]
PACKAGE BODY: APPS.OKL_ACCT_EVENT_PVT_W
Source
1 package body okl_acct_event_pvt_w as
2 /* $Header: OKLOAETB.pls 120.1 2005/07/07 13:35:46 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_acct_event(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_VARCHAR2_TABLE_100
28 , p6_a1 JTF_NUMBER_TABLE
29 , p6_a2 JTF_NUMBER_TABLE
30 , p6_a3 JTF_NUMBER_TABLE
31 , p6_a4 JTF_NUMBER_TABLE
32 , p6_a5 JTF_NUMBER_TABLE
33 , p6_a6 JTF_VARCHAR2_TABLE_100
34 , p6_a7 JTF_NUMBER_TABLE
35 , p6_a8 JTF_NUMBER_TABLE
36 , p6_a9 JTF_VARCHAR2_TABLE_100
37 , p6_a10 JTF_DATE_TABLE
38 , p6_a11 JTF_VARCHAR2_TABLE_800
39 , p6_a12 JTF_VARCHAR2_TABLE_100
40 , p6_a13 JTF_VARCHAR2_TABLE_100
41 , p6_a14 JTF_VARCHAR2_TABLE_100
42 , p6_a15 JTF_VARCHAR2_TABLE_100
43 , p6_a16 JTF_NUMBER_TABLE
44 , p6_a17 JTF_VARCHAR2_TABLE_100
45 , p6_a18 JTF_NUMBER_TABLE
46 , p6_a19 JTF_NUMBER_TABLE
47 , p6_a20 JTF_DATE_TABLE
48 , p6_a21 JTF_NUMBER_TABLE
49 , p6_a22 JTF_NUMBER_TABLE
50 , p6_a23 JTF_DATE_TABLE
51 , p6_a24 JTF_NUMBER_TABLE
52 , p6_a25 JTF_DATE_TABLE
53 , p6_a26 JTF_NUMBER_TABLE
54 , p7_a0 JTF_NUMBER_TABLE
55 , p7_a1 JTF_NUMBER_TABLE
56 , p7_a2 JTF_NUMBER_TABLE
57 , p7_a3 JTF_VARCHAR2_TABLE_100
58 , p7_a4 JTF_NUMBER_TABLE
59 , p7_a5 JTF_NUMBER_TABLE
60 , p7_a6 JTF_NUMBER_TABLE
61 , p7_a7 JTF_VARCHAR2_TABLE_100
62 , p7_a8 JTF_DATE_TABLE
63 , p7_a9 JTF_NUMBER_TABLE
64 , p7_a10 JTF_NUMBER_TABLE
65 , p7_a11 JTF_NUMBER_TABLE
66 , p7_a12 JTF_NUMBER_TABLE
67 , p7_a13 JTF_NUMBER_TABLE
68 , p7_a14 JTF_VARCHAR2_TABLE_100
69 , p7_a15 JTF_NUMBER_TABLE
70 , p7_a16 JTF_VARCHAR2_TABLE_800
71 , p7_a17 JTF_VARCHAR2_TABLE_800
72 , p7_a18 JTF_VARCHAR2_TABLE_800
73 , p7_a19 JTF_VARCHAR2_TABLE_800
74 , p7_a20 JTF_VARCHAR2_TABLE_800
75 , p7_a21 JTF_VARCHAR2_TABLE_800
76 , p7_a22 JTF_VARCHAR2_TABLE_800
77 , p7_a23 JTF_VARCHAR2_TABLE_800
78 , p7_a24 JTF_VARCHAR2_TABLE_800
79 , p7_a25 JTF_VARCHAR2_TABLE_800
80 , p7_a26 JTF_VARCHAR2_TABLE_800
81 , p7_a27 JTF_NUMBER_TABLE
82 , p7_a28 JTF_NUMBER_TABLE
83 , p7_a29 JTF_NUMBER_TABLE
84 , p7_a30 JTF_VARCHAR2_TABLE_100
85 , p7_a31 JTF_NUMBER_TABLE
86 , p7_a32 JTF_VARCHAR2_TABLE_100
87 , p7_a33 JTF_VARCHAR2_TABLE_100
88 , p7_a34 JTF_NUMBER_TABLE
89 , p7_a35 JTF_NUMBER_TABLE
90 , p7_a36 JTF_NUMBER_TABLE
91 , p7_a37 JTF_NUMBER_TABLE
92 , p7_a38 JTF_NUMBER_TABLE
93 , p7_a39 JTF_VARCHAR2_TABLE_100
94 , p7_a40 JTF_NUMBER_TABLE
95 , p7_a41 JTF_VARCHAR2_TABLE_100
96 , p7_a42 JTF_NUMBER_TABLE
97 , p7_a43 JTF_NUMBER_TABLE
98 , p7_a44 JTF_VARCHAR2_TABLE_100
99 , p7_a45 JTF_NUMBER_TABLE
100 , p7_a46 JTF_NUMBER_TABLE
101 , p7_a47 JTF_DATE_TABLE
102 , p7_a48 JTF_NUMBER_TABLE
103 , p7_a49 JTF_NUMBER_TABLE
104 , p7_a50 JTF_NUMBER_TABLE
105 , p7_a51 JTF_DATE_TABLE
106 , p7_a52 JTF_NUMBER_TABLE
107 , p7_a53 JTF_DATE_TABLE
108 , p7_a54 JTF_NUMBER_TABLE
109 , p7_a55 JTF_NUMBER_TABLE
110 , p7_a56 JTF_NUMBER_TABLE
111 , p7_a57 JTF_NUMBER_TABLE
112 , p8_a0 out nocopy NUMBER
113 , p8_a1 out nocopy NUMBER
114 , p8_a2 out nocopy NUMBER
115 , p8_a3 out nocopy VARCHAR2
116 , p8_a4 out nocopy DATE
117 , p8_a5 out nocopy NUMBER
118 , p8_a6 out nocopy VARCHAR2
119 , p8_a7 out nocopy NUMBER
120 , p8_a8 out nocopy VARCHAR2
121 , p8_a9 out nocopy NUMBER
122 , p8_a10 out nocopy NUMBER
123 , p8_a11 out nocopy DATE
124 , p8_a12 out nocopy NUMBER
125 , p8_a13 out nocopy NUMBER
126 , p8_a14 out nocopy DATE
127 , p8_a15 out nocopy NUMBER
128 , p8_a16 out nocopy DATE
129 , p8_a17 out nocopy NUMBER
130 , p9_a0 out nocopy JTF_VARCHAR2_TABLE_100
131 , p9_a1 out nocopy JTF_NUMBER_TABLE
132 , p9_a2 out nocopy JTF_NUMBER_TABLE
133 , p9_a3 out nocopy JTF_NUMBER_TABLE
134 , p9_a4 out nocopy JTF_NUMBER_TABLE
135 , p9_a5 out nocopy JTF_NUMBER_TABLE
136 , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
137 , p9_a7 out nocopy JTF_NUMBER_TABLE
138 , p9_a8 out nocopy JTF_NUMBER_TABLE
139 , p9_a9 out nocopy JTF_VARCHAR2_TABLE_100
140 , p9_a10 out nocopy JTF_DATE_TABLE
141 , p9_a11 out nocopy JTF_VARCHAR2_TABLE_800
142 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_100
143 , p9_a13 out nocopy JTF_VARCHAR2_TABLE_100
144 , p9_a14 out nocopy JTF_VARCHAR2_TABLE_100
145 , p9_a15 out nocopy JTF_VARCHAR2_TABLE_100
146 , p9_a16 out nocopy JTF_NUMBER_TABLE
147 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_100
148 , p9_a18 out nocopy JTF_NUMBER_TABLE
149 , p9_a19 out nocopy JTF_NUMBER_TABLE
150 , p9_a20 out nocopy JTF_DATE_TABLE
151 , p9_a21 out nocopy JTF_NUMBER_TABLE
152 , p9_a22 out nocopy JTF_NUMBER_TABLE
153 , p9_a23 out nocopy JTF_DATE_TABLE
154 , p9_a24 out nocopy JTF_NUMBER_TABLE
155 , p9_a25 out nocopy JTF_DATE_TABLE
156 , p9_a26 out nocopy JTF_NUMBER_TABLE
157 , p10_a0 out nocopy JTF_NUMBER_TABLE
158 , p10_a1 out nocopy JTF_NUMBER_TABLE
159 , p10_a2 out nocopy JTF_NUMBER_TABLE
160 , p10_a3 out nocopy JTF_VARCHAR2_TABLE_100
161 , p10_a4 out nocopy JTF_NUMBER_TABLE
162 , p10_a5 out nocopy JTF_NUMBER_TABLE
163 , p10_a6 out nocopy JTF_NUMBER_TABLE
164 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_100
165 , p10_a8 out nocopy JTF_DATE_TABLE
166 , p10_a9 out nocopy JTF_NUMBER_TABLE
167 , p10_a10 out nocopy JTF_NUMBER_TABLE
168 , p10_a11 out nocopy JTF_NUMBER_TABLE
169 , p10_a12 out nocopy JTF_NUMBER_TABLE
170 , p10_a13 out nocopy JTF_NUMBER_TABLE
171 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
172 , p10_a15 out nocopy JTF_NUMBER_TABLE
173 , p10_a16 out nocopy JTF_VARCHAR2_TABLE_800
174 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_800
175 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_800
176 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_800
177 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_800
178 , p10_a21 out nocopy JTF_VARCHAR2_TABLE_800
179 , p10_a22 out nocopy JTF_VARCHAR2_TABLE_800
180 , p10_a23 out nocopy JTF_VARCHAR2_TABLE_800
181 , p10_a24 out nocopy JTF_VARCHAR2_TABLE_800
182 , p10_a25 out nocopy JTF_VARCHAR2_TABLE_800
183 , p10_a26 out nocopy JTF_VARCHAR2_TABLE_800
184 , p10_a27 out nocopy JTF_NUMBER_TABLE
185 , p10_a28 out nocopy JTF_NUMBER_TABLE
186 , p10_a29 out nocopy JTF_NUMBER_TABLE
187 , p10_a30 out nocopy JTF_VARCHAR2_TABLE_100
188 , p10_a31 out nocopy JTF_NUMBER_TABLE
189 , p10_a32 out nocopy JTF_VARCHAR2_TABLE_100
190 , p10_a33 out nocopy JTF_VARCHAR2_TABLE_100
191 , p10_a34 out nocopy JTF_NUMBER_TABLE
192 , p10_a35 out nocopy JTF_NUMBER_TABLE
193 , p10_a36 out nocopy JTF_NUMBER_TABLE
194 , p10_a37 out nocopy JTF_NUMBER_TABLE
195 , p10_a38 out nocopy JTF_NUMBER_TABLE
196 , p10_a39 out nocopy JTF_VARCHAR2_TABLE_100
197 , p10_a40 out nocopy JTF_NUMBER_TABLE
198 , p10_a41 out nocopy JTF_VARCHAR2_TABLE_100
199 , p10_a42 out nocopy JTF_NUMBER_TABLE
200 , p10_a43 out nocopy JTF_NUMBER_TABLE
201 , p10_a44 out nocopy JTF_VARCHAR2_TABLE_100
202 , p10_a45 out nocopy JTF_NUMBER_TABLE
203 , p10_a46 out nocopy JTF_NUMBER_TABLE
204 , p10_a47 out nocopy JTF_DATE_TABLE
205 , p10_a48 out nocopy JTF_NUMBER_TABLE
206 , p10_a49 out nocopy JTF_NUMBER_TABLE
207 , p10_a50 out nocopy JTF_NUMBER_TABLE
208 , p10_a51 out nocopy JTF_DATE_TABLE
209 , p10_a52 out nocopy JTF_NUMBER_TABLE
210 , p10_a53 out nocopy JTF_DATE_TABLE
211 , p10_a54 out nocopy JTF_NUMBER_TABLE
212 , p10_a55 out nocopy JTF_NUMBER_TABLE
213 , p10_a56 out nocopy JTF_NUMBER_TABLE
214 , p10_a57 out nocopy JTF_NUMBER_TABLE
215 , p5_a0 NUMBER := 0-1962.0724
216 , p5_a1 NUMBER := 0-1962.0724
217 , p5_a2 NUMBER := 0-1962.0724
218 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
219 , p5_a4 DATE := fnd_api.g_miss_date
220 , p5_a5 NUMBER := 0-1962.0724
221 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
222 , p5_a7 NUMBER := 0-1962.0724
223 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
224 , p5_a9 NUMBER := 0-1962.0724
225 , p5_a10 NUMBER := 0-1962.0724
226 , p5_a11 DATE := fnd_api.g_miss_date
227 , p5_a12 NUMBER := 0-1962.0724
228 , p5_a13 NUMBER := 0-1962.0724
229 , p5_a14 DATE := fnd_api.g_miss_date
230 , p5_a15 NUMBER := 0-1962.0724
231 , p5_a16 DATE := fnd_api.g_miss_date
232 , p5_a17 NUMBER := 0-1962.0724
233 )
234
235 as
236 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
237 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
238 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
239 ddx_aetv_rec okl_acct_event_pvt.aetv_rec_type;
240 ddx_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
241 ddx_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
242 ddindx binary_integer; indx binary_integer;
243 begin
244
245 -- copy data to the local IN or IN-OUT args, if any
246
247
248
249
250
251 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
252 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
253 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
254 ddp_aetv_rec.event_type_code := p5_a3;
255 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
256 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
257 ddp_aetv_rec.event_status_code := p5_a6;
258 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
259 ddp_aetv_rec.source_table := p5_a8;
260 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
261 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
262 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
263 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
264 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
265 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
266 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
267 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
268 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
269
270 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p6_a0
271 , p6_a1
272 , p6_a2
273 , p6_a3
274 , p6_a4
275 , p6_a5
276 , p6_a6
277 , p6_a7
278 , p6_a8
279 , p6_a9
280 , p6_a10
281 , p6_a11
282 , p6_a12
283 , p6_a13
284 , p6_a14
285 , p6_a15
286 , p6_a16
287 , p6_a17
288 , p6_a18
289 , p6_a19
290 , p6_a20
291 , p6_a21
292 , p6_a22
293 , p6_a23
294 , p6_a24
295 , p6_a25
296 , p6_a26
297 );
298
299 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p7_a0
300 , p7_a1
301 , p7_a2
302 , p7_a3
303 , p7_a4
304 , p7_a5
305 , p7_a6
306 , p7_a7
307 , p7_a8
308 , p7_a9
309 , p7_a10
310 , p7_a11
311 , p7_a12
312 , p7_a13
313 , p7_a14
314 , p7_a15
315 , p7_a16
316 , p7_a17
317 , p7_a18
318 , p7_a19
319 , p7_a20
320 , p7_a21
321 , p7_a22
322 , p7_a23
323 , p7_a24
324 , p7_a25
325 , p7_a26
326 , p7_a27
327 , p7_a28
328 , p7_a29
329 , p7_a30
330 , p7_a31
331 , p7_a32
332 , p7_a33
333 , p7_a34
334 , p7_a35
335 , p7_a36
336 , p7_a37
337 , p7_a38
338 , p7_a39
339 , p7_a40
340 , p7_a41
341 , p7_a42
342 , p7_a43
343 , p7_a44
344 , p7_a45
345 , p7_a46
346 , p7_a47
347 , p7_a48
348 , p7_a49
349 , p7_a50
350 , p7_a51
351 , p7_a52
352 , p7_a53
353 , p7_a54
354 , p7_a55
355 , p7_a56
356 , p7_a57
357 );
358
359
360
361
362 -- here's the delegated call to the old PL/SQL routine
363 okl_acct_event_pvt.create_acct_event(p_api_version,
364 p_init_msg_list,
365 x_return_status,
366 x_msg_count,
367 x_msg_data,
368 ddp_aetv_rec,
369 ddp_aehv_tbl,
370 ddp_aelv_tbl,
371 ddx_aetv_rec,
372 ddx_aehv_tbl,
373 ddx_aelv_tbl);
374
375 -- copy data back from the local variables to OUT or IN-OUT args, if any
376
377
378
379
380
381
382
383
384 p8_a0 := rosetta_g_miss_num_map(ddx_aetv_rec.accounting_event_id);
385 p8_a1 := rosetta_g_miss_num_map(ddx_aetv_rec.object_version_number);
386 p8_a2 := rosetta_g_miss_num_map(ddx_aetv_rec.org_id);
387 p8_a3 := ddx_aetv_rec.event_type_code;
388 p8_a4 := ddx_aetv_rec.accounting_date;
389 p8_a5 := rosetta_g_miss_num_map(ddx_aetv_rec.event_number);
390 p8_a6 := ddx_aetv_rec.event_status_code;
391 p8_a7 := rosetta_g_miss_num_map(ddx_aetv_rec.source_id);
392 p8_a8 := ddx_aetv_rec.source_table;
393 p8_a9 := rosetta_g_miss_num_map(ddx_aetv_rec.program_id);
394 p8_a10 := rosetta_g_miss_num_map(ddx_aetv_rec.program_application_id);
395 p8_a11 := ddx_aetv_rec.program_update_date;
396 p8_a12 := rosetta_g_miss_num_map(ddx_aetv_rec.request_id);
397 p8_a13 := rosetta_g_miss_num_map(ddx_aetv_rec.created_by);
398 p8_a14 := ddx_aetv_rec.creation_date;
399 p8_a15 := rosetta_g_miss_num_map(ddx_aetv_rec.last_updated_by);
400 p8_a16 := ddx_aetv_rec.last_update_date;
401 p8_a17 := rosetta_g_miss_num_map(ddx_aetv_rec.last_update_login);
402
403 okl_aeh_pvt_w.rosetta_table_copy_out_p5(ddx_aehv_tbl, p9_a0
404 , p9_a1
405 , p9_a2
406 , p9_a3
407 , p9_a4
408 , p9_a5
409 , p9_a6
410 , p9_a7
411 , p9_a8
412 , p9_a9
413 , p9_a10
414 , p9_a11
415 , p9_a12
416 , p9_a13
417 , p9_a14
418 , p9_a15
419 , p9_a16
420 , p9_a17
421 , p9_a18
422 , p9_a19
423 , p9_a20
424 , p9_a21
425 , p9_a22
426 , p9_a23
427 , p9_a24
428 , p9_a25
429 , p9_a26
430 );
431
432 okl_ael_pvt_w.rosetta_table_copy_out_p5(ddx_aelv_tbl, p10_a0
433 , p10_a1
434 , p10_a2
435 , p10_a3
436 , p10_a4
437 , p10_a5
438 , p10_a6
439 , p10_a7
440 , p10_a8
441 , p10_a9
442 , p10_a10
443 , p10_a11
444 , p10_a12
445 , p10_a13
446 , p10_a14
447 , p10_a15
448 , p10_a16
449 , p10_a17
450 , p10_a18
451 , p10_a19
452 , p10_a20
453 , p10_a21
454 , p10_a22
455 , p10_a23
456 , p10_a24
457 , p10_a25
458 , p10_a26
459 , p10_a27
460 , p10_a28
461 , p10_a29
462 , p10_a30
463 , p10_a31
464 , p10_a32
465 , p10_a33
466 , p10_a34
467 , p10_a35
468 , p10_a36
469 , p10_a37
470 , p10_a38
471 , p10_a39
472 , p10_a40
473 , p10_a41
474 , p10_a42
475 , p10_a43
476 , p10_a44
477 , p10_a45
478 , p10_a46
479 , p10_a47
480 , p10_a48
481 , p10_a49
482 , p10_a50
483 , p10_a51
484 , p10_a52
485 , p10_a53
486 , p10_a54
487 , p10_a55
488 , p10_a56
489 , p10_a57
490 );
491 end;
492
493 procedure update_acct_event(p_api_version NUMBER
494 , p_init_msg_list VARCHAR2
495 , x_return_status out nocopy VARCHAR2
496 , x_msg_count out nocopy NUMBER
497 , x_msg_data out nocopy VARCHAR2
498 , p6_a0 JTF_VARCHAR2_TABLE_100
499 , p6_a1 JTF_NUMBER_TABLE
500 , p6_a2 JTF_NUMBER_TABLE
501 , p6_a3 JTF_NUMBER_TABLE
502 , p6_a4 JTF_NUMBER_TABLE
503 , p6_a5 JTF_NUMBER_TABLE
504 , p6_a6 JTF_VARCHAR2_TABLE_100
505 , p6_a7 JTF_NUMBER_TABLE
506 , p6_a8 JTF_NUMBER_TABLE
507 , p6_a9 JTF_VARCHAR2_TABLE_100
508 , p6_a10 JTF_DATE_TABLE
509 , p6_a11 JTF_VARCHAR2_TABLE_800
510 , p6_a12 JTF_VARCHAR2_TABLE_100
511 , p6_a13 JTF_VARCHAR2_TABLE_100
512 , p6_a14 JTF_VARCHAR2_TABLE_100
513 , p6_a15 JTF_VARCHAR2_TABLE_100
514 , p6_a16 JTF_NUMBER_TABLE
515 , p6_a17 JTF_VARCHAR2_TABLE_100
516 , p6_a18 JTF_NUMBER_TABLE
517 , p6_a19 JTF_NUMBER_TABLE
518 , p6_a20 JTF_DATE_TABLE
519 , p6_a21 JTF_NUMBER_TABLE
520 , p6_a22 JTF_NUMBER_TABLE
521 , p6_a23 JTF_DATE_TABLE
522 , p6_a24 JTF_NUMBER_TABLE
523 , p6_a25 JTF_DATE_TABLE
524 , p6_a26 JTF_NUMBER_TABLE
525 , p7_a0 JTF_NUMBER_TABLE
526 , p7_a1 JTF_NUMBER_TABLE
527 , p7_a2 JTF_NUMBER_TABLE
528 , p7_a3 JTF_VARCHAR2_TABLE_100
529 , p7_a4 JTF_NUMBER_TABLE
530 , p7_a5 JTF_NUMBER_TABLE
531 , p7_a6 JTF_NUMBER_TABLE
532 , p7_a7 JTF_VARCHAR2_TABLE_100
533 , p7_a8 JTF_DATE_TABLE
534 , p7_a9 JTF_NUMBER_TABLE
535 , p7_a10 JTF_NUMBER_TABLE
536 , p7_a11 JTF_NUMBER_TABLE
537 , p7_a12 JTF_NUMBER_TABLE
538 , p7_a13 JTF_NUMBER_TABLE
539 , p7_a14 JTF_VARCHAR2_TABLE_100
540 , p7_a15 JTF_NUMBER_TABLE
541 , p7_a16 JTF_VARCHAR2_TABLE_800
542 , p7_a17 JTF_VARCHAR2_TABLE_800
543 , p7_a18 JTF_VARCHAR2_TABLE_800
544 , p7_a19 JTF_VARCHAR2_TABLE_800
545 , p7_a20 JTF_VARCHAR2_TABLE_800
546 , p7_a21 JTF_VARCHAR2_TABLE_800
547 , p7_a22 JTF_VARCHAR2_TABLE_800
548 , p7_a23 JTF_VARCHAR2_TABLE_800
549 , p7_a24 JTF_VARCHAR2_TABLE_800
550 , p7_a25 JTF_VARCHAR2_TABLE_800
551 , p7_a26 JTF_VARCHAR2_TABLE_800
552 , p7_a27 JTF_NUMBER_TABLE
553 , p7_a28 JTF_NUMBER_TABLE
554 , p7_a29 JTF_NUMBER_TABLE
555 , p7_a30 JTF_VARCHAR2_TABLE_100
556 , p7_a31 JTF_NUMBER_TABLE
557 , p7_a32 JTF_VARCHAR2_TABLE_100
558 , p7_a33 JTF_VARCHAR2_TABLE_100
559 , p7_a34 JTF_NUMBER_TABLE
560 , p7_a35 JTF_NUMBER_TABLE
561 , p7_a36 JTF_NUMBER_TABLE
562 , p7_a37 JTF_NUMBER_TABLE
563 , p7_a38 JTF_NUMBER_TABLE
564 , p7_a39 JTF_VARCHAR2_TABLE_100
565 , p7_a40 JTF_NUMBER_TABLE
566 , p7_a41 JTF_VARCHAR2_TABLE_100
567 , p7_a42 JTF_NUMBER_TABLE
568 , p7_a43 JTF_NUMBER_TABLE
569 , p7_a44 JTF_VARCHAR2_TABLE_100
570 , p7_a45 JTF_NUMBER_TABLE
571 , p7_a46 JTF_NUMBER_TABLE
572 , p7_a47 JTF_DATE_TABLE
573 , p7_a48 JTF_NUMBER_TABLE
574 , p7_a49 JTF_NUMBER_TABLE
575 , p7_a50 JTF_NUMBER_TABLE
576 , p7_a51 JTF_DATE_TABLE
577 , p7_a52 JTF_NUMBER_TABLE
578 , p7_a53 JTF_DATE_TABLE
579 , p7_a54 JTF_NUMBER_TABLE
580 , p7_a55 JTF_NUMBER_TABLE
581 , p7_a56 JTF_NUMBER_TABLE
582 , p7_a57 JTF_NUMBER_TABLE
583 , p8_a0 out nocopy NUMBER
584 , p8_a1 out nocopy NUMBER
585 , p8_a2 out nocopy NUMBER
586 , p8_a3 out nocopy VARCHAR2
587 , p8_a4 out nocopy DATE
588 , p8_a5 out nocopy NUMBER
589 , p8_a6 out nocopy VARCHAR2
590 , p8_a7 out nocopy NUMBER
591 , p8_a8 out nocopy VARCHAR2
592 , p8_a9 out nocopy NUMBER
593 , p8_a10 out nocopy NUMBER
594 , p8_a11 out nocopy DATE
595 , p8_a12 out nocopy NUMBER
596 , p8_a13 out nocopy NUMBER
597 , p8_a14 out nocopy DATE
598 , p8_a15 out nocopy NUMBER
599 , p8_a16 out nocopy DATE
600 , p8_a17 out nocopy NUMBER
601 , p9_a0 out nocopy JTF_VARCHAR2_TABLE_100
602 , p9_a1 out nocopy JTF_NUMBER_TABLE
603 , p9_a2 out nocopy JTF_NUMBER_TABLE
604 , p9_a3 out nocopy JTF_NUMBER_TABLE
605 , p9_a4 out nocopy JTF_NUMBER_TABLE
606 , p9_a5 out nocopy JTF_NUMBER_TABLE
607 , p9_a6 out nocopy JTF_VARCHAR2_TABLE_100
608 , p9_a7 out nocopy JTF_NUMBER_TABLE
609 , p9_a8 out nocopy JTF_NUMBER_TABLE
610 , p9_a9 out nocopy JTF_VARCHAR2_TABLE_100
611 , p9_a10 out nocopy JTF_DATE_TABLE
612 , p9_a11 out nocopy JTF_VARCHAR2_TABLE_800
613 , p9_a12 out nocopy JTF_VARCHAR2_TABLE_100
614 , p9_a13 out nocopy JTF_VARCHAR2_TABLE_100
615 , p9_a14 out nocopy JTF_VARCHAR2_TABLE_100
616 , p9_a15 out nocopy JTF_VARCHAR2_TABLE_100
617 , p9_a16 out nocopy JTF_NUMBER_TABLE
618 , p9_a17 out nocopy JTF_VARCHAR2_TABLE_100
619 , p9_a18 out nocopy JTF_NUMBER_TABLE
620 , p9_a19 out nocopy JTF_NUMBER_TABLE
621 , p9_a20 out nocopy JTF_DATE_TABLE
622 , p9_a21 out nocopy JTF_NUMBER_TABLE
623 , p9_a22 out nocopy JTF_NUMBER_TABLE
624 , p9_a23 out nocopy JTF_DATE_TABLE
625 , p9_a24 out nocopy JTF_NUMBER_TABLE
626 , p9_a25 out nocopy JTF_DATE_TABLE
627 , p9_a26 out nocopy JTF_NUMBER_TABLE
628 , p10_a0 out nocopy JTF_NUMBER_TABLE
629 , p10_a1 out nocopy JTF_NUMBER_TABLE
630 , p10_a2 out nocopy JTF_NUMBER_TABLE
631 , p10_a3 out nocopy JTF_VARCHAR2_TABLE_100
632 , p10_a4 out nocopy JTF_NUMBER_TABLE
633 , p10_a5 out nocopy JTF_NUMBER_TABLE
634 , p10_a6 out nocopy JTF_NUMBER_TABLE
635 , p10_a7 out nocopy JTF_VARCHAR2_TABLE_100
636 , p10_a8 out nocopy JTF_DATE_TABLE
637 , p10_a9 out nocopy JTF_NUMBER_TABLE
638 , p10_a10 out nocopy JTF_NUMBER_TABLE
639 , p10_a11 out nocopy JTF_NUMBER_TABLE
640 , p10_a12 out nocopy JTF_NUMBER_TABLE
641 , p10_a13 out nocopy JTF_NUMBER_TABLE
642 , p10_a14 out nocopy JTF_VARCHAR2_TABLE_100
643 , p10_a15 out nocopy JTF_NUMBER_TABLE
644 , p10_a16 out nocopy JTF_VARCHAR2_TABLE_800
645 , p10_a17 out nocopy JTF_VARCHAR2_TABLE_800
646 , p10_a18 out nocopy JTF_VARCHAR2_TABLE_800
647 , p10_a19 out nocopy JTF_VARCHAR2_TABLE_800
648 , p10_a20 out nocopy JTF_VARCHAR2_TABLE_800
649 , p10_a21 out nocopy JTF_VARCHAR2_TABLE_800
650 , p10_a22 out nocopy JTF_VARCHAR2_TABLE_800
651 , p10_a23 out nocopy JTF_VARCHAR2_TABLE_800
652 , p10_a24 out nocopy JTF_VARCHAR2_TABLE_800
653 , p10_a25 out nocopy JTF_VARCHAR2_TABLE_800
654 , p10_a26 out nocopy JTF_VARCHAR2_TABLE_800
655 , p10_a27 out nocopy JTF_NUMBER_TABLE
656 , p10_a28 out nocopy JTF_NUMBER_TABLE
657 , p10_a29 out nocopy JTF_NUMBER_TABLE
658 , p10_a30 out nocopy JTF_VARCHAR2_TABLE_100
659 , p10_a31 out nocopy JTF_NUMBER_TABLE
660 , p10_a32 out nocopy JTF_VARCHAR2_TABLE_100
661 , p10_a33 out nocopy JTF_VARCHAR2_TABLE_100
662 , p10_a34 out nocopy JTF_NUMBER_TABLE
663 , p10_a35 out nocopy JTF_NUMBER_TABLE
664 , p10_a36 out nocopy JTF_NUMBER_TABLE
665 , p10_a37 out nocopy JTF_NUMBER_TABLE
666 , p10_a38 out nocopy JTF_NUMBER_TABLE
667 , p10_a39 out nocopy JTF_VARCHAR2_TABLE_100
668 , p10_a40 out nocopy JTF_NUMBER_TABLE
669 , p10_a41 out nocopy JTF_VARCHAR2_TABLE_100
670 , p10_a42 out nocopy JTF_NUMBER_TABLE
671 , p10_a43 out nocopy JTF_NUMBER_TABLE
672 , p10_a44 out nocopy JTF_VARCHAR2_TABLE_100
673 , p10_a45 out nocopy JTF_NUMBER_TABLE
674 , p10_a46 out nocopy JTF_NUMBER_TABLE
675 , p10_a47 out nocopy JTF_DATE_TABLE
676 , p10_a48 out nocopy JTF_NUMBER_TABLE
677 , p10_a49 out nocopy JTF_NUMBER_TABLE
678 , p10_a50 out nocopy JTF_NUMBER_TABLE
679 , p10_a51 out nocopy JTF_DATE_TABLE
680 , p10_a52 out nocopy JTF_NUMBER_TABLE
681 , p10_a53 out nocopy JTF_DATE_TABLE
682 , p10_a54 out nocopy JTF_NUMBER_TABLE
683 , p10_a55 out nocopy JTF_NUMBER_TABLE
684 , p10_a56 out nocopy JTF_NUMBER_TABLE
685 , p10_a57 out nocopy JTF_NUMBER_TABLE
686 , p5_a0 NUMBER := 0-1962.0724
687 , p5_a1 NUMBER := 0-1962.0724
688 , p5_a2 NUMBER := 0-1962.0724
689 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
690 , p5_a4 DATE := fnd_api.g_miss_date
691 , p5_a5 NUMBER := 0-1962.0724
692 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
693 , p5_a7 NUMBER := 0-1962.0724
694 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
695 , p5_a9 NUMBER := 0-1962.0724
696 , p5_a10 NUMBER := 0-1962.0724
697 , p5_a11 DATE := fnd_api.g_miss_date
698 , p5_a12 NUMBER := 0-1962.0724
699 , p5_a13 NUMBER := 0-1962.0724
700 , p5_a14 DATE := fnd_api.g_miss_date
701 , p5_a15 NUMBER := 0-1962.0724
702 , p5_a16 DATE := fnd_api.g_miss_date
703 , p5_a17 NUMBER := 0-1962.0724
704 )
705
706 as
707 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
708 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
709 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
710 ddx_aetv_rec okl_acct_event_pvt.aetv_rec_type;
711 ddx_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
712 ddx_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
713 ddindx binary_integer; indx binary_integer;
714 begin
715
716 -- copy data to the local IN or IN-OUT args, if any
717
718
719
720
721
722 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
723 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
724 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
725 ddp_aetv_rec.event_type_code := p5_a3;
726 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
727 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
728 ddp_aetv_rec.event_status_code := p5_a6;
729 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
730 ddp_aetv_rec.source_table := p5_a8;
731 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
732 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
733 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
734 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
735 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
736 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
737 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
738 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
739 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
740
741 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p6_a0
742 , p6_a1
743 , p6_a2
744 , p6_a3
745 , p6_a4
746 , p6_a5
747 , p6_a6
748 , p6_a7
749 , p6_a8
750 , p6_a9
751 , p6_a10
752 , p6_a11
753 , p6_a12
754 , p6_a13
755 , p6_a14
756 , p6_a15
757 , p6_a16
758 , p6_a17
759 , p6_a18
760 , p6_a19
761 , p6_a20
762 , p6_a21
763 , p6_a22
764 , p6_a23
765 , p6_a24
766 , p6_a25
767 , p6_a26
768 );
769
770 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p7_a0
771 , p7_a1
772 , p7_a2
773 , p7_a3
774 , p7_a4
775 , p7_a5
776 , p7_a6
777 , p7_a7
778 , p7_a8
779 , p7_a9
780 , p7_a10
781 , p7_a11
782 , p7_a12
783 , p7_a13
784 , p7_a14
785 , p7_a15
786 , p7_a16
787 , p7_a17
788 , p7_a18
789 , p7_a19
790 , p7_a20
791 , p7_a21
792 , p7_a22
793 , p7_a23
794 , p7_a24
795 , p7_a25
796 , p7_a26
797 , p7_a27
798 , p7_a28
799 , p7_a29
800 , p7_a30
801 , p7_a31
802 , p7_a32
803 , p7_a33
804 , p7_a34
805 , p7_a35
806 , p7_a36
807 , p7_a37
808 , p7_a38
809 , p7_a39
810 , p7_a40
811 , p7_a41
812 , p7_a42
813 , p7_a43
814 , p7_a44
815 , p7_a45
816 , p7_a46
817 , p7_a47
818 , p7_a48
819 , p7_a49
820 , p7_a50
821 , p7_a51
822 , p7_a52
823 , p7_a53
824 , p7_a54
825 , p7_a55
826 , p7_a56
827 , p7_a57
828 );
829
830
831
832
833 -- here's the delegated call to the old PL/SQL routine
834 okl_acct_event_pvt.update_acct_event(p_api_version,
835 p_init_msg_list,
836 x_return_status,
837 x_msg_count,
838 x_msg_data,
839 ddp_aetv_rec,
840 ddp_aehv_tbl,
841 ddp_aelv_tbl,
842 ddx_aetv_rec,
843 ddx_aehv_tbl,
844 ddx_aelv_tbl);
845
846 -- copy data back from the local variables to OUT or IN-OUT args, if any
847
848
849
850
851
852
853
854
855 p8_a0 := rosetta_g_miss_num_map(ddx_aetv_rec.accounting_event_id);
856 p8_a1 := rosetta_g_miss_num_map(ddx_aetv_rec.object_version_number);
857 p8_a2 := rosetta_g_miss_num_map(ddx_aetv_rec.org_id);
858 p8_a3 := ddx_aetv_rec.event_type_code;
859 p8_a4 := ddx_aetv_rec.accounting_date;
860 p8_a5 := rosetta_g_miss_num_map(ddx_aetv_rec.event_number);
861 p8_a6 := ddx_aetv_rec.event_status_code;
862 p8_a7 := rosetta_g_miss_num_map(ddx_aetv_rec.source_id);
863 p8_a8 := ddx_aetv_rec.source_table;
864 p8_a9 := rosetta_g_miss_num_map(ddx_aetv_rec.program_id);
865 p8_a10 := rosetta_g_miss_num_map(ddx_aetv_rec.program_application_id);
866 p8_a11 := ddx_aetv_rec.program_update_date;
867 p8_a12 := rosetta_g_miss_num_map(ddx_aetv_rec.request_id);
868 p8_a13 := rosetta_g_miss_num_map(ddx_aetv_rec.created_by);
869 p8_a14 := ddx_aetv_rec.creation_date;
870 p8_a15 := rosetta_g_miss_num_map(ddx_aetv_rec.last_updated_by);
871 p8_a16 := ddx_aetv_rec.last_update_date;
872 p8_a17 := rosetta_g_miss_num_map(ddx_aetv_rec.last_update_login);
873
874 okl_aeh_pvt_w.rosetta_table_copy_out_p5(ddx_aehv_tbl, p9_a0
875 , p9_a1
876 , p9_a2
877 , p9_a3
878 , p9_a4
879 , p9_a5
880 , p9_a6
881 , p9_a7
882 , p9_a8
883 , p9_a9
884 , p9_a10
885 , p9_a11
886 , p9_a12
887 , p9_a13
888 , p9_a14
889 , p9_a15
890 , p9_a16
891 , p9_a17
892 , p9_a18
893 , p9_a19
894 , p9_a20
895 , p9_a21
896 , p9_a22
897 , p9_a23
898 , p9_a24
899 , p9_a25
900 , p9_a26
901 );
902
903 okl_ael_pvt_w.rosetta_table_copy_out_p5(ddx_aelv_tbl, p10_a0
904 , p10_a1
905 , p10_a2
906 , p10_a3
907 , p10_a4
908 , p10_a5
909 , p10_a6
910 , p10_a7
911 , p10_a8
912 , p10_a9
913 , p10_a10
914 , p10_a11
915 , p10_a12
916 , p10_a13
917 , p10_a14
918 , p10_a15
919 , p10_a16
920 , p10_a17
921 , p10_a18
922 , p10_a19
923 , p10_a20
924 , p10_a21
925 , p10_a22
926 , p10_a23
927 , p10_a24
928 , p10_a25
929 , p10_a26
930 , p10_a27
931 , p10_a28
932 , p10_a29
933 , p10_a30
934 , p10_a31
935 , p10_a32
936 , p10_a33
937 , p10_a34
938 , p10_a35
939 , p10_a36
940 , p10_a37
941 , p10_a38
942 , p10_a39
943 , p10_a40
944 , p10_a41
945 , p10_a42
946 , p10_a43
947 , p10_a44
948 , p10_a45
949 , p10_a46
950 , p10_a47
951 , p10_a48
952 , p10_a49
953 , p10_a50
954 , p10_a51
955 , p10_a52
956 , p10_a53
957 , p10_a54
958 , p10_a55
959 , p10_a56
960 , p10_a57
961 );
962 end;
963
964 procedure validate_acct_event(p_api_version NUMBER
965 , p_init_msg_list VARCHAR2
966 , x_return_status out nocopy VARCHAR2
967 , x_msg_count out nocopy NUMBER
968 , x_msg_data out nocopy VARCHAR2
969 , p6_a0 JTF_VARCHAR2_TABLE_100
970 , p6_a1 JTF_NUMBER_TABLE
971 , p6_a2 JTF_NUMBER_TABLE
972 , p6_a3 JTF_NUMBER_TABLE
973 , p6_a4 JTF_NUMBER_TABLE
974 , p6_a5 JTF_NUMBER_TABLE
975 , p6_a6 JTF_VARCHAR2_TABLE_100
976 , p6_a7 JTF_NUMBER_TABLE
977 , p6_a8 JTF_NUMBER_TABLE
978 , p6_a9 JTF_VARCHAR2_TABLE_100
979 , p6_a10 JTF_DATE_TABLE
980 , p6_a11 JTF_VARCHAR2_TABLE_800
981 , p6_a12 JTF_VARCHAR2_TABLE_100
982 , p6_a13 JTF_VARCHAR2_TABLE_100
983 , p6_a14 JTF_VARCHAR2_TABLE_100
984 , p6_a15 JTF_VARCHAR2_TABLE_100
985 , p6_a16 JTF_NUMBER_TABLE
986 , p6_a17 JTF_VARCHAR2_TABLE_100
987 , p6_a18 JTF_NUMBER_TABLE
988 , p6_a19 JTF_NUMBER_TABLE
989 , p6_a20 JTF_DATE_TABLE
990 , p6_a21 JTF_NUMBER_TABLE
991 , p6_a22 JTF_NUMBER_TABLE
992 , p6_a23 JTF_DATE_TABLE
993 , p6_a24 JTF_NUMBER_TABLE
994 , p6_a25 JTF_DATE_TABLE
995 , p6_a26 JTF_NUMBER_TABLE
996 , p7_a0 JTF_NUMBER_TABLE
997 , p7_a1 JTF_NUMBER_TABLE
998 , p7_a2 JTF_NUMBER_TABLE
999 , p7_a3 JTF_VARCHAR2_TABLE_100
1000 , p7_a4 JTF_NUMBER_TABLE
1001 , p7_a5 JTF_NUMBER_TABLE
1002 , p7_a6 JTF_NUMBER_TABLE
1003 , p7_a7 JTF_VARCHAR2_TABLE_100
1004 , p7_a8 JTF_DATE_TABLE
1005 , p7_a9 JTF_NUMBER_TABLE
1006 , p7_a10 JTF_NUMBER_TABLE
1007 , p7_a11 JTF_NUMBER_TABLE
1008 , p7_a12 JTF_NUMBER_TABLE
1009 , p7_a13 JTF_NUMBER_TABLE
1010 , p7_a14 JTF_VARCHAR2_TABLE_100
1011 , p7_a15 JTF_NUMBER_TABLE
1012 , p7_a16 JTF_VARCHAR2_TABLE_800
1013 , p7_a17 JTF_VARCHAR2_TABLE_800
1014 , p7_a18 JTF_VARCHAR2_TABLE_800
1015 , p7_a19 JTF_VARCHAR2_TABLE_800
1016 , p7_a20 JTF_VARCHAR2_TABLE_800
1017 , p7_a21 JTF_VARCHAR2_TABLE_800
1018 , p7_a22 JTF_VARCHAR2_TABLE_800
1019 , p7_a23 JTF_VARCHAR2_TABLE_800
1020 , p7_a24 JTF_VARCHAR2_TABLE_800
1021 , p7_a25 JTF_VARCHAR2_TABLE_800
1022 , p7_a26 JTF_VARCHAR2_TABLE_800
1023 , p7_a27 JTF_NUMBER_TABLE
1024 , p7_a28 JTF_NUMBER_TABLE
1025 , p7_a29 JTF_NUMBER_TABLE
1026 , p7_a30 JTF_VARCHAR2_TABLE_100
1027 , p7_a31 JTF_NUMBER_TABLE
1028 , p7_a32 JTF_VARCHAR2_TABLE_100
1029 , p7_a33 JTF_VARCHAR2_TABLE_100
1030 , p7_a34 JTF_NUMBER_TABLE
1031 , p7_a35 JTF_NUMBER_TABLE
1032 , p7_a36 JTF_NUMBER_TABLE
1033 , p7_a37 JTF_NUMBER_TABLE
1034 , p7_a38 JTF_NUMBER_TABLE
1035 , p7_a39 JTF_VARCHAR2_TABLE_100
1036 , p7_a40 JTF_NUMBER_TABLE
1037 , p7_a41 JTF_VARCHAR2_TABLE_100
1038 , p7_a42 JTF_NUMBER_TABLE
1039 , p7_a43 JTF_NUMBER_TABLE
1040 , p7_a44 JTF_VARCHAR2_TABLE_100
1041 , p7_a45 JTF_NUMBER_TABLE
1042 , p7_a46 JTF_NUMBER_TABLE
1043 , p7_a47 JTF_DATE_TABLE
1044 , p7_a48 JTF_NUMBER_TABLE
1045 , p7_a49 JTF_NUMBER_TABLE
1046 , p7_a50 JTF_NUMBER_TABLE
1047 , p7_a51 JTF_DATE_TABLE
1048 , p7_a52 JTF_NUMBER_TABLE
1049 , p7_a53 JTF_DATE_TABLE
1050 , p7_a54 JTF_NUMBER_TABLE
1051 , p7_a55 JTF_NUMBER_TABLE
1052 , p7_a56 JTF_NUMBER_TABLE
1053 , p7_a57 JTF_NUMBER_TABLE
1054 , p5_a0 NUMBER := 0-1962.0724
1055 , p5_a1 NUMBER := 0-1962.0724
1056 , p5_a2 NUMBER := 0-1962.0724
1057 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1058 , p5_a4 DATE := fnd_api.g_miss_date
1059 , p5_a5 NUMBER := 0-1962.0724
1060 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1061 , p5_a7 NUMBER := 0-1962.0724
1062 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1063 , p5_a9 NUMBER := 0-1962.0724
1064 , p5_a10 NUMBER := 0-1962.0724
1065 , p5_a11 DATE := fnd_api.g_miss_date
1066 , p5_a12 NUMBER := 0-1962.0724
1067 , p5_a13 NUMBER := 0-1962.0724
1068 , p5_a14 DATE := fnd_api.g_miss_date
1069 , p5_a15 NUMBER := 0-1962.0724
1070 , p5_a16 DATE := fnd_api.g_miss_date
1071 , p5_a17 NUMBER := 0-1962.0724
1072 )
1073
1074 as
1075 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1076 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
1077 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
1078 ddindx binary_integer; indx binary_integer;
1079 begin
1080
1081 -- copy data to the local IN or IN-OUT args, if any
1082
1083
1084
1085
1086
1087 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
1088 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1089 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
1090 ddp_aetv_rec.event_type_code := p5_a3;
1091 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
1092 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
1093 ddp_aetv_rec.event_status_code := p5_a6;
1094 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
1095 ddp_aetv_rec.source_table := p5_a8;
1096 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
1097 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
1098 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
1099 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
1100 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
1101 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
1102 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
1103 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
1104 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
1105
1106 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p6_a0
1107 , p6_a1
1108 , p6_a2
1109 , p6_a3
1110 , p6_a4
1111 , p6_a5
1112 , p6_a6
1113 , p6_a7
1114 , p6_a8
1115 , p6_a9
1116 , p6_a10
1117 , p6_a11
1118 , p6_a12
1119 , p6_a13
1120 , p6_a14
1121 , p6_a15
1122 , p6_a16
1123 , p6_a17
1124 , p6_a18
1125 , p6_a19
1126 , p6_a20
1127 , p6_a21
1128 , p6_a22
1129 , p6_a23
1130 , p6_a24
1131 , p6_a25
1132 , p6_a26
1133 );
1134
1135 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p7_a0
1136 , p7_a1
1137 , p7_a2
1138 , p7_a3
1139 , p7_a4
1140 , p7_a5
1141 , p7_a6
1142 , p7_a7
1143 , p7_a8
1144 , p7_a9
1145 , p7_a10
1146 , p7_a11
1147 , p7_a12
1148 , p7_a13
1149 , p7_a14
1150 , p7_a15
1151 , p7_a16
1152 , p7_a17
1153 , p7_a18
1154 , p7_a19
1155 , p7_a20
1156 , p7_a21
1157 , p7_a22
1158 , p7_a23
1159 , p7_a24
1160 , p7_a25
1161 , p7_a26
1162 , p7_a27
1163 , p7_a28
1164 , p7_a29
1165 , p7_a30
1166 , p7_a31
1167 , p7_a32
1168 , p7_a33
1169 , p7_a34
1170 , p7_a35
1171 , p7_a36
1172 , p7_a37
1173 , p7_a38
1174 , p7_a39
1175 , p7_a40
1176 , p7_a41
1177 , p7_a42
1178 , p7_a43
1179 , p7_a44
1180 , p7_a45
1181 , p7_a46
1182 , p7_a47
1183 , p7_a48
1184 , p7_a49
1185 , p7_a50
1186 , p7_a51
1187 , p7_a52
1188 , p7_a53
1189 , p7_a54
1190 , p7_a55
1191 , p7_a56
1192 , p7_a57
1193 );
1194
1195 -- here's the delegated call to the old PL/SQL routine
1196 okl_acct_event_pvt.validate_acct_event(p_api_version,
1197 p_init_msg_list,
1198 x_return_status,
1199 x_msg_count,
1200 x_msg_data,
1201 ddp_aetv_rec,
1202 ddp_aehv_tbl,
1203 ddp_aelv_tbl);
1204
1205 -- copy data back from the local variables to OUT or IN-OUT args, if any
1206
1207
1208
1209
1210
1211
1212
1213 end;
1214
1215 procedure create_acct_event(p_api_version NUMBER
1216 , p_init_msg_list VARCHAR2
1217 , x_return_status out nocopy VARCHAR2
1218 , x_msg_count out nocopy NUMBER
1219 , x_msg_data out nocopy VARCHAR2
1220 , p5_a0 JTF_NUMBER_TABLE
1221 , p5_a1 JTF_NUMBER_TABLE
1222 , p5_a2 JTF_NUMBER_TABLE
1223 , p5_a3 JTF_VARCHAR2_TABLE_100
1224 , p5_a4 JTF_DATE_TABLE
1225 , p5_a5 JTF_NUMBER_TABLE
1226 , p5_a6 JTF_VARCHAR2_TABLE_100
1227 , p5_a7 JTF_NUMBER_TABLE
1228 , p5_a8 JTF_VARCHAR2_TABLE_100
1229 , p5_a9 JTF_NUMBER_TABLE
1230 , p5_a10 JTF_NUMBER_TABLE
1231 , p5_a11 JTF_DATE_TABLE
1232 , p5_a12 JTF_NUMBER_TABLE
1233 , p5_a13 JTF_NUMBER_TABLE
1234 , p5_a14 JTF_DATE_TABLE
1235 , p5_a15 JTF_NUMBER_TABLE
1236 , p5_a16 JTF_DATE_TABLE
1237 , p5_a17 JTF_NUMBER_TABLE
1238 , p6_a0 out nocopy JTF_NUMBER_TABLE
1239 , p6_a1 out nocopy JTF_NUMBER_TABLE
1240 , p6_a2 out nocopy JTF_NUMBER_TABLE
1241 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1242 , p6_a4 out nocopy JTF_DATE_TABLE
1243 , p6_a5 out nocopy JTF_NUMBER_TABLE
1244 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1245 , p6_a7 out nocopy JTF_NUMBER_TABLE
1246 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
1247 , p6_a9 out nocopy JTF_NUMBER_TABLE
1248 , p6_a10 out nocopy JTF_NUMBER_TABLE
1249 , p6_a11 out nocopy JTF_DATE_TABLE
1250 , p6_a12 out nocopy JTF_NUMBER_TABLE
1251 , p6_a13 out nocopy JTF_NUMBER_TABLE
1252 , p6_a14 out nocopy JTF_DATE_TABLE
1253 , p6_a15 out nocopy JTF_NUMBER_TABLE
1254 , p6_a16 out nocopy JTF_DATE_TABLE
1255 , p6_a17 out nocopy JTF_NUMBER_TABLE
1256 )
1257
1258 as
1259 ddp_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1260 ddx_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1261 ddindx binary_integer; indx binary_integer;
1262 begin
1263
1264 -- copy data to the local IN or IN-OUT args, if any
1265
1266
1267
1268
1269
1270 okl_aet_pvt_w.rosetta_table_copy_in_p5(ddp_aetv_tbl, p5_a0
1271 , p5_a1
1272 , p5_a2
1273 , p5_a3
1274 , p5_a4
1275 , p5_a5
1276 , p5_a6
1277 , p5_a7
1278 , p5_a8
1279 , p5_a9
1280 , p5_a10
1281 , p5_a11
1282 , p5_a12
1283 , p5_a13
1284 , p5_a14
1285 , p5_a15
1286 , p5_a16
1287 , p5_a17
1288 );
1289
1290
1291 -- here's the delegated call to the old PL/SQL routine
1292 okl_acct_event_pvt.create_acct_event(p_api_version,
1293 p_init_msg_list,
1294 x_return_status,
1295 x_msg_count,
1296 x_msg_data,
1297 ddp_aetv_tbl,
1298 ddx_aetv_tbl);
1299
1300 -- copy data back from the local variables to OUT or IN-OUT args, if any
1301
1302
1303
1304
1305
1306
1307 okl_aet_pvt_w.rosetta_table_copy_out_p5(ddx_aetv_tbl, p6_a0
1308 , p6_a1
1309 , p6_a2
1310 , p6_a3
1311 , p6_a4
1312 , p6_a5
1313 , p6_a6
1314 , p6_a7
1315 , p6_a8
1316 , p6_a9
1317 , p6_a10
1318 , p6_a11
1319 , p6_a12
1320 , p6_a13
1321 , p6_a14
1322 , p6_a15
1323 , p6_a16
1324 , p6_a17
1325 );
1326 end;
1327
1328 procedure create_acct_event(p_api_version NUMBER
1329 , p_init_msg_list VARCHAR2
1330 , x_return_status out nocopy VARCHAR2
1331 , x_msg_count out nocopy NUMBER
1332 , x_msg_data out nocopy VARCHAR2
1333 , p6_a0 out nocopy NUMBER
1334 , p6_a1 out nocopy NUMBER
1335 , p6_a2 out nocopy NUMBER
1336 , p6_a3 out nocopy VARCHAR2
1337 , p6_a4 out nocopy DATE
1338 , p6_a5 out nocopy NUMBER
1339 , p6_a6 out nocopy VARCHAR2
1340 , p6_a7 out nocopy NUMBER
1341 , p6_a8 out nocopy VARCHAR2
1342 , p6_a9 out nocopy NUMBER
1343 , p6_a10 out nocopy NUMBER
1344 , p6_a11 out nocopy DATE
1345 , p6_a12 out nocopy NUMBER
1346 , p6_a13 out nocopy NUMBER
1347 , p6_a14 out nocopy DATE
1348 , p6_a15 out nocopy NUMBER
1349 , p6_a16 out nocopy DATE
1350 , p6_a17 out nocopy NUMBER
1351 , p5_a0 NUMBER := 0-1962.0724
1352 , p5_a1 NUMBER := 0-1962.0724
1353 , p5_a2 NUMBER := 0-1962.0724
1354 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1355 , p5_a4 DATE := fnd_api.g_miss_date
1356 , p5_a5 NUMBER := 0-1962.0724
1357 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1358 , p5_a7 NUMBER := 0-1962.0724
1359 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1360 , p5_a9 NUMBER := 0-1962.0724
1361 , p5_a10 NUMBER := 0-1962.0724
1362 , p5_a11 DATE := fnd_api.g_miss_date
1363 , p5_a12 NUMBER := 0-1962.0724
1364 , p5_a13 NUMBER := 0-1962.0724
1365 , p5_a14 DATE := fnd_api.g_miss_date
1366 , p5_a15 NUMBER := 0-1962.0724
1367 , p5_a16 DATE := fnd_api.g_miss_date
1368 , p5_a17 NUMBER := 0-1962.0724
1369 )
1370
1371 as
1372 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1373 ddx_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1374 ddindx binary_integer; indx binary_integer;
1375 begin
1376
1377 -- copy data to the local IN or IN-OUT args, if any
1378
1379
1380
1381
1382
1383 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
1384 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1385 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
1386 ddp_aetv_rec.event_type_code := p5_a3;
1387 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
1388 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
1389 ddp_aetv_rec.event_status_code := p5_a6;
1390 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
1391 ddp_aetv_rec.source_table := p5_a8;
1392 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
1393 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
1394 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
1395 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
1396 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
1397 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
1398 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
1399 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
1400 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
1401
1402
1403 -- here's the delegated call to the old PL/SQL routine
1404 okl_acct_event_pvt.create_acct_event(p_api_version,
1405 p_init_msg_list,
1406 x_return_status,
1407 x_msg_count,
1408 x_msg_data,
1409 ddp_aetv_rec,
1410 ddx_aetv_rec);
1411
1412 -- copy data back from the local variables to OUT or IN-OUT args, if any
1413
1414
1415
1416
1417
1418
1419 p6_a0 := rosetta_g_miss_num_map(ddx_aetv_rec.accounting_event_id);
1420 p6_a1 := rosetta_g_miss_num_map(ddx_aetv_rec.object_version_number);
1421 p6_a2 := rosetta_g_miss_num_map(ddx_aetv_rec.org_id);
1422 p6_a3 := ddx_aetv_rec.event_type_code;
1423 p6_a4 := ddx_aetv_rec.accounting_date;
1424 p6_a5 := rosetta_g_miss_num_map(ddx_aetv_rec.event_number);
1425 p6_a6 := ddx_aetv_rec.event_status_code;
1426 p6_a7 := rosetta_g_miss_num_map(ddx_aetv_rec.source_id);
1427 p6_a8 := ddx_aetv_rec.source_table;
1428 p6_a9 := rosetta_g_miss_num_map(ddx_aetv_rec.program_id);
1429 p6_a10 := rosetta_g_miss_num_map(ddx_aetv_rec.program_application_id);
1430 p6_a11 := ddx_aetv_rec.program_update_date;
1431 p6_a12 := rosetta_g_miss_num_map(ddx_aetv_rec.request_id);
1432 p6_a13 := rosetta_g_miss_num_map(ddx_aetv_rec.created_by);
1433 p6_a14 := ddx_aetv_rec.creation_date;
1434 p6_a15 := rosetta_g_miss_num_map(ddx_aetv_rec.last_updated_by);
1435 p6_a16 := ddx_aetv_rec.last_update_date;
1436 p6_a17 := rosetta_g_miss_num_map(ddx_aetv_rec.last_update_login);
1437 end;
1438
1439 procedure lock_acct_event(p_api_version NUMBER
1440 , p_init_msg_list VARCHAR2
1441 , x_return_status out nocopy VARCHAR2
1442 , x_msg_count out nocopy NUMBER
1443 , x_msg_data out nocopy VARCHAR2
1444 , p5_a0 JTF_NUMBER_TABLE
1445 , p5_a1 JTF_NUMBER_TABLE
1446 , p5_a2 JTF_NUMBER_TABLE
1447 , p5_a3 JTF_VARCHAR2_TABLE_100
1448 , p5_a4 JTF_DATE_TABLE
1449 , p5_a5 JTF_NUMBER_TABLE
1450 , p5_a6 JTF_VARCHAR2_TABLE_100
1451 , p5_a7 JTF_NUMBER_TABLE
1452 , p5_a8 JTF_VARCHAR2_TABLE_100
1453 , p5_a9 JTF_NUMBER_TABLE
1454 , p5_a10 JTF_NUMBER_TABLE
1455 , p5_a11 JTF_DATE_TABLE
1456 , p5_a12 JTF_NUMBER_TABLE
1457 , p5_a13 JTF_NUMBER_TABLE
1458 , p5_a14 JTF_DATE_TABLE
1459 , p5_a15 JTF_NUMBER_TABLE
1460 , p5_a16 JTF_DATE_TABLE
1461 , p5_a17 JTF_NUMBER_TABLE
1462 )
1463
1464 as
1465 ddp_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1466 ddindx binary_integer; indx binary_integer;
1467 begin
1468
1469 -- copy data to the local IN or IN-OUT args, if any
1470
1471
1472
1473
1474
1475 okl_aet_pvt_w.rosetta_table_copy_in_p5(ddp_aetv_tbl, p5_a0
1476 , p5_a1
1477 , p5_a2
1478 , p5_a3
1479 , p5_a4
1480 , p5_a5
1481 , p5_a6
1482 , p5_a7
1483 , p5_a8
1484 , p5_a9
1485 , p5_a10
1486 , p5_a11
1487 , p5_a12
1488 , p5_a13
1489 , p5_a14
1490 , p5_a15
1491 , p5_a16
1492 , p5_a17
1493 );
1494
1495 -- here's the delegated call to the old PL/SQL routine
1496 okl_acct_event_pvt.lock_acct_event(p_api_version,
1497 p_init_msg_list,
1498 x_return_status,
1499 x_msg_count,
1500 x_msg_data,
1501 ddp_aetv_tbl);
1502
1503 -- copy data back from the local variables to OUT or IN-OUT args, if any
1504
1505
1506
1507
1508
1509 end;
1510
1511 procedure lock_acct_event(p_api_version NUMBER
1512 , p_init_msg_list VARCHAR2
1513 , x_return_status out nocopy VARCHAR2
1514 , x_msg_count out nocopy NUMBER
1515 , x_msg_data out nocopy VARCHAR2
1516 , p5_a0 NUMBER := 0-1962.0724
1517 , p5_a1 NUMBER := 0-1962.0724
1518 , p5_a2 NUMBER := 0-1962.0724
1519 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1520 , p5_a4 DATE := fnd_api.g_miss_date
1521 , p5_a5 NUMBER := 0-1962.0724
1522 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1523 , p5_a7 NUMBER := 0-1962.0724
1524 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1525 , p5_a9 NUMBER := 0-1962.0724
1526 , p5_a10 NUMBER := 0-1962.0724
1527 , p5_a11 DATE := fnd_api.g_miss_date
1528 , p5_a12 NUMBER := 0-1962.0724
1529 , p5_a13 NUMBER := 0-1962.0724
1530 , p5_a14 DATE := fnd_api.g_miss_date
1531 , p5_a15 NUMBER := 0-1962.0724
1532 , p5_a16 DATE := fnd_api.g_miss_date
1533 , p5_a17 NUMBER := 0-1962.0724
1534 )
1535
1536 as
1537 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1538 ddindx binary_integer; indx binary_integer;
1539 begin
1540
1541 -- copy data to the local IN or IN-OUT args, if any
1542
1543
1544
1545
1546
1547 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
1548 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1549 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
1550 ddp_aetv_rec.event_type_code := p5_a3;
1551 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
1552 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
1553 ddp_aetv_rec.event_status_code := p5_a6;
1554 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
1555 ddp_aetv_rec.source_table := p5_a8;
1556 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
1557 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
1558 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
1559 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
1560 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
1561 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
1562 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
1563 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
1564 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
1565
1566 -- here's the delegated call to the old PL/SQL routine
1567 okl_acct_event_pvt.lock_acct_event(p_api_version,
1568 p_init_msg_list,
1569 x_return_status,
1570 x_msg_count,
1571 x_msg_data,
1572 ddp_aetv_rec);
1573
1574 -- copy data back from the local variables to OUT or IN-OUT args, if any
1575
1576
1577
1578
1579
1580 end;
1581
1582 procedure update_acct_event(p_api_version NUMBER
1583 , p_init_msg_list VARCHAR2
1584 , x_return_status out nocopy VARCHAR2
1585 , x_msg_count out nocopy NUMBER
1586 , x_msg_data out nocopy VARCHAR2
1587 , p5_a0 JTF_NUMBER_TABLE
1588 , p5_a1 JTF_NUMBER_TABLE
1589 , p5_a2 JTF_NUMBER_TABLE
1590 , p5_a3 JTF_VARCHAR2_TABLE_100
1591 , p5_a4 JTF_DATE_TABLE
1592 , p5_a5 JTF_NUMBER_TABLE
1593 , p5_a6 JTF_VARCHAR2_TABLE_100
1594 , p5_a7 JTF_NUMBER_TABLE
1595 , p5_a8 JTF_VARCHAR2_TABLE_100
1596 , p5_a9 JTF_NUMBER_TABLE
1597 , p5_a10 JTF_NUMBER_TABLE
1598 , p5_a11 JTF_DATE_TABLE
1599 , p5_a12 JTF_NUMBER_TABLE
1600 , p5_a13 JTF_NUMBER_TABLE
1601 , p5_a14 JTF_DATE_TABLE
1602 , p5_a15 JTF_NUMBER_TABLE
1603 , p5_a16 JTF_DATE_TABLE
1604 , p5_a17 JTF_NUMBER_TABLE
1605 , p6_a0 out nocopy JTF_NUMBER_TABLE
1606 , p6_a1 out nocopy JTF_NUMBER_TABLE
1607 , p6_a2 out nocopy JTF_NUMBER_TABLE
1608 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1609 , p6_a4 out nocopy JTF_DATE_TABLE
1610 , p6_a5 out nocopy JTF_NUMBER_TABLE
1611 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
1612 , p6_a7 out nocopy JTF_NUMBER_TABLE
1613 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
1614 , p6_a9 out nocopy JTF_NUMBER_TABLE
1615 , p6_a10 out nocopy JTF_NUMBER_TABLE
1616 , p6_a11 out nocopy JTF_DATE_TABLE
1617 , p6_a12 out nocopy JTF_NUMBER_TABLE
1618 , p6_a13 out nocopy JTF_NUMBER_TABLE
1619 , p6_a14 out nocopy JTF_DATE_TABLE
1620 , p6_a15 out nocopy JTF_NUMBER_TABLE
1621 , p6_a16 out nocopy JTF_DATE_TABLE
1622 , p6_a17 out nocopy JTF_NUMBER_TABLE
1623 )
1624
1625 as
1626 ddp_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1627 ddx_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1628 ddindx binary_integer; indx binary_integer;
1629 begin
1630
1631 -- copy data to the local IN or IN-OUT args, if any
1632
1633
1634
1635
1636
1637 okl_aet_pvt_w.rosetta_table_copy_in_p5(ddp_aetv_tbl, p5_a0
1638 , p5_a1
1639 , p5_a2
1640 , p5_a3
1641 , p5_a4
1642 , p5_a5
1643 , p5_a6
1644 , p5_a7
1645 , p5_a8
1646 , p5_a9
1647 , p5_a10
1648 , p5_a11
1649 , p5_a12
1650 , p5_a13
1651 , p5_a14
1652 , p5_a15
1653 , p5_a16
1654 , p5_a17
1655 );
1656
1657
1658 -- here's the delegated call to the old PL/SQL routine
1659 okl_acct_event_pvt.update_acct_event(p_api_version,
1660 p_init_msg_list,
1661 x_return_status,
1662 x_msg_count,
1663 x_msg_data,
1664 ddp_aetv_tbl,
1665 ddx_aetv_tbl);
1666
1667 -- copy data back from the local variables to OUT or IN-OUT args, if any
1668
1669
1670
1671
1672
1673
1674 okl_aet_pvt_w.rosetta_table_copy_out_p5(ddx_aetv_tbl, p6_a0
1675 , p6_a1
1676 , p6_a2
1677 , p6_a3
1678 , p6_a4
1679 , p6_a5
1680 , p6_a6
1681 , p6_a7
1682 , p6_a8
1683 , p6_a9
1684 , p6_a10
1685 , p6_a11
1686 , p6_a12
1687 , p6_a13
1688 , p6_a14
1689 , p6_a15
1690 , p6_a16
1691 , p6_a17
1692 );
1693 end;
1694
1695 procedure update_acct_event(p_api_version NUMBER
1696 , p_init_msg_list VARCHAR2
1697 , x_return_status out nocopy VARCHAR2
1698 , x_msg_count out nocopy NUMBER
1699 , x_msg_data out nocopy VARCHAR2
1700 , p6_a0 out nocopy NUMBER
1701 , p6_a1 out nocopy NUMBER
1702 , p6_a2 out nocopy NUMBER
1703 , p6_a3 out nocopy VARCHAR2
1704 , p6_a4 out nocopy DATE
1705 , p6_a5 out nocopy NUMBER
1706 , p6_a6 out nocopy VARCHAR2
1707 , p6_a7 out nocopy NUMBER
1708 , p6_a8 out nocopy VARCHAR2
1709 , p6_a9 out nocopy NUMBER
1710 , p6_a10 out nocopy NUMBER
1711 , p6_a11 out nocopy DATE
1712 , p6_a12 out nocopy NUMBER
1713 , p6_a13 out nocopy NUMBER
1714 , p6_a14 out nocopy DATE
1715 , p6_a15 out nocopy NUMBER
1716 , p6_a16 out nocopy DATE
1717 , p6_a17 out nocopy NUMBER
1718 , p5_a0 NUMBER := 0-1962.0724
1719 , p5_a1 NUMBER := 0-1962.0724
1720 , p5_a2 NUMBER := 0-1962.0724
1721 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1722 , p5_a4 DATE := fnd_api.g_miss_date
1723 , p5_a5 NUMBER := 0-1962.0724
1724 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1725 , p5_a7 NUMBER := 0-1962.0724
1726 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1727 , p5_a9 NUMBER := 0-1962.0724
1728 , p5_a10 NUMBER := 0-1962.0724
1729 , p5_a11 DATE := fnd_api.g_miss_date
1730 , p5_a12 NUMBER := 0-1962.0724
1731 , p5_a13 NUMBER := 0-1962.0724
1732 , p5_a14 DATE := fnd_api.g_miss_date
1733 , p5_a15 NUMBER := 0-1962.0724
1734 , p5_a16 DATE := fnd_api.g_miss_date
1735 , p5_a17 NUMBER := 0-1962.0724
1736 )
1737
1738 as
1739 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1740 ddx_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1741 ddindx binary_integer; indx binary_integer;
1742 begin
1743
1744 -- copy data to the local IN or IN-OUT args, if any
1745
1746
1747
1748
1749
1750 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
1751 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1752 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
1753 ddp_aetv_rec.event_type_code := p5_a3;
1754 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
1755 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
1756 ddp_aetv_rec.event_status_code := p5_a6;
1757 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
1758 ddp_aetv_rec.source_table := p5_a8;
1759 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
1760 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
1761 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
1762 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
1763 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
1764 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
1765 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
1766 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
1767 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
1768
1769
1770 -- here's the delegated call to the old PL/SQL routine
1771 okl_acct_event_pvt.update_acct_event(p_api_version,
1772 p_init_msg_list,
1773 x_return_status,
1774 x_msg_count,
1775 x_msg_data,
1776 ddp_aetv_rec,
1777 ddx_aetv_rec);
1778
1779 -- copy data back from the local variables to OUT or IN-OUT args, if any
1780
1781
1782
1783
1784
1785
1786 p6_a0 := rosetta_g_miss_num_map(ddx_aetv_rec.accounting_event_id);
1787 p6_a1 := rosetta_g_miss_num_map(ddx_aetv_rec.object_version_number);
1788 p6_a2 := rosetta_g_miss_num_map(ddx_aetv_rec.org_id);
1789 p6_a3 := ddx_aetv_rec.event_type_code;
1790 p6_a4 := ddx_aetv_rec.accounting_date;
1791 p6_a5 := rosetta_g_miss_num_map(ddx_aetv_rec.event_number);
1792 p6_a6 := ddx_aetv_rec.event_status_code;
1793 p6_a7 := rosetta_g_miss_num_map(ddx_aetv_rec.source_id);
1794 p6_a8 := ddx_aetv_rec.source_table;
1795 p6_a9 := rosetta_g_miss_num_map(ddx_aetv_rec.program_id);
1796 p6_a10 := rosetta_g_miss_num_map(ddx_aetv_rec.program_application_id);
1797 p6_a11 := ddx_aetv_rec.program_update_date;
1798 p6_a12 := rosetta_g_miss_num_map(ddx_aetv_rec.request_id);
1799 p6_a13 := rosetta_g_miss_num_map(ddx_aetv_rec.created_by);
1800 p6_a14 := ddx_aetv_rec.creation_date;
1801 p6_a15 := rosetta_g_miss_num_map(ddx_aetv_rec.last_updated_by);
1802 p6_a16 := ddx_aetv_rec.last_update_date;
1803 p6_a17 := rosetta_g_miss_num_map(ddx_aetv_rec.last_update_login);
1804 end;
1805
1806 procedure delete_acct_event(p_api_version NUMBER
1807 , p_init_msg_list VARCHAR2
1808 , x_return_status out nocopy VARCHAR2
1809 , x_msg_count out nocopy NUMBER
1810 , x_msg_data out nocopy VARCHAR2
1811 , p5_a0 JTF_NUMBER_TABLE
1812 , p5_a1 JTF_NUMBER_TABLE
1813 , p5_a2 JTF_NUMBER_TABLE
1814 , p5_a3 JTF_VARCHAR2_TABLE_100
1815 , p5_a4 JTF_DATE_TABLE
1816 , p5_a5 JTF_NUMBER_TABLE
1817 , p5_a6 JTF_VARCHAR2_TABLE_100
1818 , p5_a7 JTF_NUMBER_TABLE
1819 , p5_a8 JTF_VARCHAR2_TABLE_100
1820 , p5_a9 JTF_NUMBER_TABLE
1821 , p5_a10 JTF_NUMBER_TABLE
1822 , p5_a11 JTF_DATE_TABLE
1823 , p5_a12 JTF_NUMBER_TABLE
1824 , p5_a13 JTF_NUMBER_TABLE
1825 , p5_a14 JTF_DATE_TABLE
1826 , p5_a15 JTF_NUMBER_TABLE
1827 , p5_a16 JTF_DATE_TABLE
1828 , p5_a17 JTF_NUMBER_TABLE
1829 )
1830
1831 as
1832 ddp_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1833 ddindx binary_integer; indx binary_integer;
1834 begin
1835
1836 -- copy data to the local IN or IN-OUT args, if any
1837
1838
1839
1840
1841
1842 okl_aet_pvt_w.rosetta_table_copy_in_p5(ddp_aetv_tbl, p5_a0
1843 , p5_a1
1844 , p5_a2
1845 , p5_a3
1846 , p5_a4
1847 , p5_a5
1848 , p5_a6
1849 , p5_a7
1850 , p5_a8
1851 , p5_a9
1852 , p5_a10
1853 , p5_a11
1854 , p5_a12
1855 , p5_a13
1856 , p5_a14
1857 , p5_a15
1858 , p5_a16
1859 , p5_a17
1860 );
1861
1862 -- here's the delegated call to the old PL/SQL routine
1863 okl_acct_event_pvt.delete_acct_event(p_api_version,
1864 p_init_msg_list,
1865 x_return_status,
1866 x_msg_count,
1867 x_msg_data,
1868 ddp_aetv_tbl);
1869
1870 -- copy data back from the local variables to OUT or IN-OUT args, if any
1871
1872
1873
1874
1875
1876 end;
1877
1878 procedure delete_acct_event(p_api_version NUMBER
1879 , p_init_msg_list VARCHAR2
1880 , x_return_status out nocopy VARCHAR2
1881 , x_msg_count out nocopy NUMBER
1882 , x_msg_data out nocopy VARCHAR2
1883 , p5_a0 NUMBER := 0-1962.0724
1884 , p5_a1 NUMBER := 0-1962.0724
1885 , p5_a2 NUMBER := 0-1962.0724
1886 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
1887 , p5_a4 DATE := fnd_api.g_miss_date
1888 , p5_a5 NUMBER := 0-1962.0724
1889 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
1890 , p5_a7 NUMBER := 0-1962.0724
1891 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
1892 , p5_a9 NUMBER := 0-1962.0724
1893 , p5_a10 NUMBER := 0-1962.0724
1894 , p5_a11 DATE := fnd_api.g_miss_date
1895 , p5_a12 NUMBER := 0-1962.0724
1896 , p5_a13 NUMBER := 0-1962.0724
1897 , p5_a14 DATE := fnd_api.g_miss_date
1898 , p5_a15 NUMBER := 0-1962.0724
1899 , p5_a16 DATE := fnd_api.g_miss_date
1900 , p5_a17 NUMBER := 0-1962.0724
1901 )
1902
1903 as
1904 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
1905 ddindx binary_integer; indx binary_integer;
1906 begin
1907
1908 -- copy data to the local IN or IN-OUT args, if any
1909
1910
1911
1912
1913
1914 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
1915 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
1916 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
1917 ddp_aetv_rec.event_type_code := p5_a3;
1918 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
1919 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
1920 ddp_aetv_rec.event_status_code := p5_a6;
1921 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
1922 ddp_aetv_rec.source_table := p5_a8;
1923 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
1924 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
1925 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
1926 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
1927 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
1928 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
1929 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
1930 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
1931 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
1932
1933 -- here's the delegated call to the old PL/SQL routine
1934 okl_acct_event_pvt.delete_acct_event(p_api_version,
1935 p_init_msg_list,
1936 x_return_status,
1937 x_msg_count,
1938 x_msg_data,
1939 ddp_aetv_rec);
1940
1941 -- copy data back from the local variables to OUT or IN-OUT args, if any
1942
1943
1944
1945
1946
1947 end;
1948
1949 procedure validate_acct_event(p_api_version NUMBER
1950 , p_init_msg_list VARCHAR2
1951 , x_return_status out nocopy VARCHAR2
1952 , x_msg_count out nocopy NUMBER
1953 , x_msg_data out nocopy VARCHAR2
1954 , p5_a0 JTF_NUMBER_TABLE
1955 , p5_a1 JTF_NUMBER_TABLE
1956 , p5_a2 JTF_NUMBER_TABLE
1957 , p5_a3 JTF_VARCHAR2_TABLE_100
1958 , p5_a4 JTF_DATE_TABLE
1959 , p5_a5 JTF_NUMBER_TABLE
1960 , p5_a6 JTF_VARCHAR2_TABLE_100
1961 , p5_a7 JTF_NUMBER_TABLE
1962 , p5_a8 JTF_VARCHAR2_TABLE_100
1963 , p5_a9 JTF_NUMBER_TABLE
1964 , p5_a10 JTF_NUMBER_TABLE
1965 , p5_a11 JTF_DATE_TABLE
1966 , p5_a12 JTF_NUMBER_TABLE
1967 , p5_a13 JTF_NUMBER_TABLE
1968 , p5_a14 JTF_DATE_TABLE
1969 , p5_a15 JTF_NUMBER_TABLE
1970 , p5_a16 JTF_DATE_TABLE
1971 , p5_a17 JTF_NUMBER_TABLE
1972 )
1973
1974 as
1975 ddp_aetv_tbl okl_acct_event_pvt.aetv_tbl_type;
1976 ddindx binary_integer; indx binary_integer;
1977 begin
1978
1979 -- copy data to the local IN or IN-OUT args, if any
1980
1981
1982
1983
1984
1985 okl_aet_pvt_w.rosetta_table_copy_in_p5(ddp_aetv_tbl, p5_a0
1986 , p5_a1
1987 , p5_a2
1988 , p5_a3
1989 , p5_a4
1990 , p5_a5
1991 , p5_a6
1992 , p5_a7
1993 , p5_a8
1994 , p5_a9
1995 , p5_a10
1996 , p5_a11
1997 , p5_a12
1998 , p5_a13
1999 , p5_a14
2000 , p5_a15
2001 , p5_a16
2002 , p5_a17
2003 );
2004
2005 -- here's the delegated call to the old PL/SQL routine
2006 okl_acct_event_pvt.validate_acct_event(p_api_version,
2007 p_init_msg_list,
2008 x_return_status,
2009 x_msg_count,
2010 x_msg_data,
2011 ddp_aetv_tbl);
2012
2013 -- copy data back from the local variables to OUT or IN-OUT args, if any
2014
2015
2016
2017
2018
2019 end;
2020
2021 procedure validate_acct_event(p_api_version NUMBER
2022 , p_init_msg_list VARCHAR2
2023 , x_return_status out nocopy VARCHAR2
2024 , x_msg_count out nocopy NUMBER
2025 , x_msg_data out nocopy VARCHAR2
2026 , p5_a0 NUMBER := 0-1962.0724
2027 , p5_a1 NUMBER := 0-1962.0724
2028 , p5_a2 NUMBER := 0-1962.0724
2029 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
2030 , p5_a4 DATE := fnd_api.g_miss_date
2031 , p5_a5 NUMBER := 0-1962.0724
2032 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2033 , p5_a7 NUMBER := 0-1962.0724
2034 , p5_a8 VARCHAR2 := fnd_api.g_miss_char
2035 , p5_a9 NUMBER := 0-1962.0724
2036 , p5_a10 NUMBER := 0-1962.0724
2037 , p5_a11 DATE := fnd_api.g_miss_date
2038 , p5_a12 NUMBER := 0-1962.0724
2039 , p5_a13 NUMBER := 0-1962.0724
2040 , p5_a14 DATE := fnd_api.g_miss_date
2041 , p5_a15 NUMBER := 0-1962.0724
2042 , p5_a16 DATE := fnd_api.g_miss_date
2043 , p5_a17 NUMBER := 0-1962.0724
2044 )
2045
2046 as
2047 ddp_aetv_rec okl_acct_event_pvt.aetv_rec_type;
2048 ddindx binary_integer; indx binary_integer;
2049 begin
2050
2051 -- copy data to the local IN or IN-OUT args, if any
2052
2053
2054
2055
2056
2057 ddp_aetv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a0);
2058 ddp_aetv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
2059 ddp_aetv_rec.org_id := rosetta_g_miss_num_map(p5_a2);
2060 ddp_aetv_rec.event_type_code := p5_a3;
2061 ddp_aetv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a4);
2062 ddp_aetv_rec.event_number := rosetta_g_miss_num_map(p5_a5);
2063 ddp_aetv_rec.event_status_code := p5_a6;
2064 ddp_aetv_rec.source_id := rosetta_g_miss_num_map(p5_a7);
2065 ddp_aetv_rec.source_table := p5_a8;
2066 ddp_aetv_rec.program_id := rosetta_g_miss_num_map(p5_a9);
2067 ddp_aetv_rec.program_application_id := rosetta_g_miss_num_map(p5_a10);
2068 ddp_aetv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a11);
2069 ddp_aetv_rec.request_id := rosetta_g_miss_num_map(p5_a12);
2070 ddp_aetv_rec.created_by := rosetta_g_miss_num_map(p5_a13);
2071 ddp_aetv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a14);
2072 ddp_aetv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a15);
2073 ddp_aetv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a16);
2074 ddp_aetv_rec.last_update_login := rosetta_g_miss_num_map(p5_a17);
2075
2076 -- here's the delegated call to the old PL/SQL routine
2077 okl_acct_event_pvt.validate_acct_event(p_api_version,
2078 p_init_msg_list,
2079 x_return_status,
2080 x_msg_count,
2081 x_msg_data,
2082 ddp_aetv_rec);
2083
2084 -- copy data back from the local variables to OUT or IN-OUT args, if any
2085
2086
2087
2088
2089
2090 end;
2091
2092 procedure create_acct_header(p_api_version NUMBER
2093 , p_init_msg_list VARCHAR2
2094 , x_return_status out nocopy VARCHAR2
2095 , x_msg_count out nocopy NUMBER
2096 , x_msg_data out nocopy VARCHAR2
2097 , p5_a0 JTF_VARCHAR2_TABLE_100
2098 , p5_a1 JTF_NUMBER_TABLE
2099 , p5_a2 JTF_NUMBER_TABLE
2100 , p5_a3 JTF_NUMBER_TABLE
2101 , p5_a4 JTF_NUMBER_TABLE
2102 , p5_a5 JTF_NUMBER_TABLE
2103 , p5_a6 JTF_VARCHAR2_TABLE_100
2104 , p5_a7 JTF_NUMBER_TABLE
2105 , p5_a8 JTF_NUMBER_TABLE
2106 , p5_a9 JTF_VARCHAR2_TABLE_100
2107 , p5_a10 JTF_DATE_TABLE
2108 , p5_a11 JTF_VARCHAR2_TABLE_800
2109 , p5_a12 JTF_VARCHAR2_TABLE_100
2110 , p5_a13 JTF_VARCHAR2_TABLE_100
2111 , p5_a14 JTF_VARCHAR2_TABLE_100
2112 , p5_a15 JTF_VARCHAR2_TABLE_100
2113 , p5_a16 JTF_NUMBER_TABLE
2114 , p5_a17 JTF_VARCHAR2_TABLE_100
2115 , p5_a18 JTF_NUMBER_TABLE
2116 , p5_a19 JTF_NUMBER_TABLE
2117 , p5_a20 JTF_DATE_TABLE
2118 , p5_a21 JTF_NUMBER_TABLE
2119 , p5_a22 JTF_NUMBER_TABLE
2120 , p5_a23 JTF_DATE_TABLE
2121 , p5_a24 JTF_NUMBER_TABLE
2122 , p5_a25 JTF_DATE_TABLE
2123 , p5_a26 JTF_NUMBER_TABLE
2124 , p6_a0 out nocopy JTF_VARCHAR2_TABLE_100
2125 , p6_a1 out nocopy JTF_NUMBER_TABLE
2126 , p6_a2 out nocopy JTF_NUMBER_TABLE
2127 , p6_a3 out nocopy JTF_NUMBER_TABLE
2128 , p6_a4 out nocopy JTF_NUMBER_TABLE
2129 , p6_a5 out nocopy JTF_NUMBER_TABLE
2130 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
2131 , p6_a7 out nocopy JTF_NUMBER_TABLE
2132 , p6_a8 out nocopy JTF_NUMBER_TABLE
2133 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
2134 , p6_a10 out nocopy JTF_DATE_TABLE
2135 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_800
2136 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
2137 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
2138 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
2139 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
2140 , p6_a16 out nocopy JTF_NUMBER_TABLE
2141 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_100
2142 , p6_a18 out nocopy JTF_NUMBER_TABLE
2143 , p6_a19 out nocopy JTF_NUMBER_TABLE
2144 , p6_a20 out nocopy JTF_DATE_TABLE
2145 , p6_a21 out nocopy JTF_NUMBER_TABLE
2146 , p6_a22 out nocopy JTF_NUMBER_TABLE
2147 , p6_a23 out nocopy JTF_DATE_TABLE
2148 , p6_a24 out nocopy JTF_NUMBER_TABLE
2149 , p6_a25 out nocopy JTF_DATE_TABLE
2150 , p6_a26 out nocopy JTF_NUMBER_TABLE
2151 )
2152
2153 as
2154 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2155 ddx_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2156 ddindx binary_integer; indx binary_integer;
2157 begin
2158
2159 -- copy data to the local IN or IN-OUT args, if any
2160
2161
2162
2163
2164
2165 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p5_a0
2166 , p5_a1
2167 , p5_a2
2168 , p5_a3
2169 , p5_a4
2170 , p5_a5
2171 , p5_a6
2172 , p5_a7
2173 , p5_a8
2174 , p5_a9
2175 , p5_a10
2176 , p5_a11
2177 , p5_a12
2178 , p5_a13
2179 , p5_a14
2180 , p5_a15
2181 , p5_a16
2182 , p5_a17
2183 , p5_a18
2184 , p5_a19
2185 , p5_a20
2186 , p5_a21
2187 , p5_a22
2188 , p5_a23
2189 , p5_a24
2190 , p5_a25
2191 , p5_a26
2192 );
2193
2194
2195 -- here's the delegated call to the old PL/SQL routine
2196 okl_acct_event_pvt.create_acct_header(p_api_version,
2197 p_init_msg_list,
2198 x_return_status,
2199 x_msg_count,
2200 x_msg_data,
2201 ddp_aehv_tbl,
2202 ddx_aehv_tbl);
2203
2204 -- copy data back from the local variables to OUT or IN-OUT args, if any
2205
2206
2207
2208
2209
2210
2211 okl_aeh_pvt_w.rosetta_table_copy_out_p5(ddx_aehv_tbl, p6_a0
2212 , p6_a1
2213 , p6_a2
2214 , p6_a3
2215 , p6_a4
2216 , p6_a5
2217 , p6_a6
2218 , p6_a7
2219 , p6_a8
2220 , p6_a9
2221 , p6_a10
2222 , p6_a11
2223 , p6_a12
2224 , p6_a13
2225 , p6_a14
2226 , p6_a15
2227 , p6_a16
2228 , p6_a17
2229 , p6_a18
2230 , p6_a19
2231 , p6_a20
2232 , p6_a21
2233 , p6_a22
2234 , p6_a23
2235 , p6_a24
2236 , p6_a25
2237 , p6_a26
2238 );
2239 end;
2240
2241 procedure create_acct_header(p_api_version NUMBER
2242 , p_init_msg_list VARCHAR2
2243 , x_return_status out nocopy VARCHAR2
2244 , x_msg_count out nocopy NUMBER
2245 , x_msg_data out nocopy VARCHAR2
2246 , p6_a0 out nocopy VARCHAR2
2247 , p6_a1 out nocopy NUMBER
2248 , p6_a2 out nocopy NUMBER
2249 , p6_a3 out nocopy NUMBER
2250 , p6_a4 out nocopy NUMBER
2251 , p6_a5 out nocopy NUMBER
2252 , p6_a6 out nocopy VARCHAR2
2253 , p6_a7 out nocopy NUMBER
2254 , p6_a8 out nocopy NUMBER
2255 , p6_a9 out nocopy VARCHAR2
2256 , p6_a10 out nocopy DATE
2257 , p6_a11 out nocopy VARCHAR2
2258 , p6_a12 out nocopy VARCHAR2
2259 , p6_a13 out nocopy VARCHAR2
2260 , p6_a14 out nocopy VARCHAR2
2261 , p6_a15 out nocopy VARCHAR2
2262 , p6_a16 out nocopy NUMBER
2263 , p6_a17 out nocopy VARCHAR2
2264 , p6_a18 out nocopy NUMBER
2265 , p6_a19 out nocopy NUMBER
2266 , p6_a20 out nocopy DATE
2267 , p6_a21 out nocopy NUMBER
2268 , p6_a22 out nocopy NUMBER
2269 , p6_a23 out nocopy DATE
2270 , p6_a24 out nocopy NUMBER
2271 , p6_a25 out nocopy DATE
2272 , p6_a26 out nocopy NUMBER
2273 , p5_a0 VARCHAR2 := fnd_api.g_miss_char
2274 , p5_a1 NUMBER := 0-1962.0724
2275 , p5_a2 NUMBER := 0-1962.0724
2276 , p5_a3 NUMBER := 0-1962.0724
2277 , p5_a4 NUMBER := 0-1962.0724
2278 , p5_a5 NUMBER := 0-1962.0724
2279 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2280 , p5_a7 NUMBER := 0-1962.0724
2281 , p5_a8 NUMBER := 0-1962.0724
2282 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2283 , p5_a10 DATE := fnd_api.g_miss_date
2284 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2285 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2286 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2287 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2288 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2289 , p5_a16 NUMBER := 0-1962.0724
2290 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2291 , p5_a18 NUMBER := 0-1962.0724
2292 , p5_a19 NUMBER := 0-1962.0724
2293 , p5_a20 DATE := fnd_api.g_miss_date
2294 , p5_a21 NUMBER := 0-1962.0724
2295 , p5_a22 NUMBER := 0-1962.0724
2296 , p5_a23 DATE := fnd_api.g_miss_date
2297 , p5_a24 NUMBER := 0-1962.0724
2298 , p5_a25 DATE := fnd_api.g_miss_date
2299 , p5_a26 NUMBER := 0-1962.0724
2300 )
2301
2302 as
2303 ddp_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2304 ddx_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2305 ddindx binary_integer; indx binary_integer;
2306 begin
2307
2308 -- copy data to the local IN or IN-OUT args, if any
2309
2310
2311
2312
2313
2314 ddp_aehv_rec.post_to_gl_flag := p5_a0;
2315 ddp_aehv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a1);
2316 ddp_aehv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
2317 ddp_aehv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a3);
2318 ddp_aehv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a4);
2319 ddp_aehv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
2320 ddp_aehv_rec.ae_category := p5_a6;
2321 ddp_aehv_rec.sequence_id := rosetta_g_miss_num_map(p5_a7);
2322 ddp_aehv_rec.sequence_value := rosetta_g_miss_num_map(p5_a8);
2323 ddp_aehv_rec.period_name := p5_a9;
2324 ddp_aehv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a10);
2325 ddp_aehv_rec.description := p5_a11;
2326 ddp_aehv_rec.accounting_error_code := p5_a12;
2327 ddp_aehv_rec.cross_currency_flag := p5_a13;
2328 ddp_aehv_rec.gl_transfer_flag := p5_a14;
2329 ddp_aehv_rec.gl_transfer_error_code := p5_a15;
2330 ddp_aehv_rec.gl_transfer_run_id := rosetta_g_miss_num_map(p5_a16);
2331 ddp_aehv_rec.gl_reversal_flag := p5_a17;
2332 ddp_aehv_rec.program_id := rosetta_g_miss_num_map(p5_a18);
2333 ddp_aehv_rec.program_application_id := rosetta_g_miss_num_map(p5_a19);
2334 ddp_aehv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a20);
2335 ddp_aehv_rec.request_id := rosetta_g_miss_num_map(p5_a21);
2336 ddp_aehv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
2337 ddp_aehv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
2338 ddp_aehv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
2339 ddp_aehv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
2340 ddp_aehv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
2341
2342
2343 -- here's the delegated call to the old PL/SQL routine
2344 okl_acct_event_pvt.create_acct_header(p_api_version,
2345 p_init_msg_list,
2346 x_return_status,
2347 x_msg_count,
2348 x_msg_data,
2349 ddp_aehv_rec,
2350 ddx_aehv_rec);
2351
2352 -- copy data back from the local variables to OUT or IN-OUT args, if any
2353
2354
2355
2356
2357
2358
2359 p6_a0 := ddx_aehv_rec.post_to_gl_flag;
2360 p6_a1 := rosetta_g_miss_num_map(ddx_aehv_rec.ae_header_id);
2361 p6_a2 := rosetta_g_miss_num_map(ddx_aehv_rec.object_version_number);
2362 p6_a3 := rosetta_g_miss_num_map(ddx_aehv_rec.accounting_event_id);
2363 p6_a4 := rosetta_g_miss_num_map(ddx_aehv_rec.set_of_books_id);
2364 p6_a5 := rosetta_g_miss_num_map(ddx_aehv_rec.org_id);
2365 p6_a6 := ddx_aehv_rec.ae_category;
2366 p6_a7 := rosetta_g_miss_num_map(ddx_aehv_rec.sequence_id);
2367 p6_a8 := rosetta_g_miss_num_map(ddx_aehv_rec.sequence_value);
2368 p6_a9 := ddx_aehv_rec.period_name;
2369 p6_a10 := ddx_aehv_rec.accounting_date;
2370 p6_a11 := ddx_aehv_rec.description;
2371 p6_a12 := ddx_aehv_rec.accounting_error_code;
2372 p6_a13 := ddx_aehv_rec.cross_currency_flag;
2373 p6_a14 := ddx_aehv_rec.gl_transfer_flag;
2374 p6_a15 := ddx_aehv_rec.gl_transfer_error_code;
2375 p6_a16 := rosetta_g_miss_num_map(ddx_aehv_rec.gl_transfer_run_id);
2376 p6_a17 := ddx_aehv_rec.gl_reversal_flag;
2377 p6_a18 := rosetta_g_miss_num_map(ddx_aehv_rec.program_id);
2378 p6_a19 := rosetta_g_miss_num_map(ddx_aehv_rec.program_application_id);
2379 p6_a20 := ddx_aehv_rec.program_update_date;
2380 p6_a21 := rosetta_g_miss_num_map(ddx_aehv_rec.request_id);
2381 p6_a22 := rosetta_g_miss_num_map(ddx_aehv_rec.created_by);
2382 p6_a23 := ddx_aehv_rec.creation_date;
2383 p6_a24 := rosetta_g_miss_num_map(ddx_aehv_rec.last_updated_by);
2384 p6_a25 := ddx_aehv_rec.last_update_date;
2385 p6_a26 := rosetta_g_miss_num_map(ddx_aehv_rec.last_update_login);
2386 end;
2387
2388 procedure lock_acct_header(p_api_version NUMBER
2389 , p_init_msg_list VARCHAR2
2390 , x_return_status out nocopy VARCHAR2
2391 , x_msg_count out nocopy NUMBER
2392 , x_msg_data out nocopy VARCHAR2
2393 , p5_a0 JTF_VARCHAR2_TABLE_100
2394 , p5_a1 JTF_NUMBER_TABLE
2395 , p5_a2 JTF_NUMBER_TABLE
2396 , p5_a3 JTF_NUMBER_TABLE
2397 , p5_a4 JTF_NUMBER_TABLE
2398 , p5_a5 JTF_NUMBER_TABLE
2399 , p5_a6 JTF_VARCHAR2_TABLE_100
2400 , p5_a7 JTF_NUMBER_TABLE
2401 , p5_a8 JTF_NUMBER_TABLE
2402 , p5_a9 JTF_VARCHAR2_TABLE_100
2403 , p5_a10 JTF_DATE_TABLE
2404 , p5_a11 JTF_VARCHAR2_TABLE_800
2405 , p5_a12 JTF_VARCHAR2_TABLE_100
2406 , p5_a13 JTF_VARCHAR2_TABLE_100
2407 , p5_a14 JTF_VARCHAR2_TABLE_100
2408 , p5_a15 JTF_VARCHAR2_TABLE_100
2409 , p5_a16 JTF_NUMBER_TABLE
2410 , p5_a17 JTF_VARCHAR2_TABLE_100
2411 , p5_a18 JTF_NUMBER_TABLE
2412 , p5_a19 JTF_NUMBER_TABLE
2413 , p5_a20 JTF_DATE_TABLE
2414 , p5_a21 JTF_NUMBER_TABLE
2415 , p5_a22 JTF_NUMBER_TABLE
2416 , p5_a23 JTF_DATE_TABLE
2417 , p5_a24 JTF_NUMBER_TABLE
2418 , p5_a25 JTF_DATE_TABLE
2419 , p5_a26 JTF_NUMBER_TABLE
2420 )
2421
2422 as
2423 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2424 ddindx binary_integer; indx binary_integer;
2425 begin
2426
2427 -- copy data to the local IN or IN-OUT args, if any
2428
2429
2430
2431
2432
2433 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p5_a0
2434 , p5_a1
2435 , p5_a2
2436 , p5_a3
2437 , p5_a4
2438 , p5_a5
2439 , p5_a6
2440 , p5_a7
2441 , p5_a8
2442 , p5_a9
2443 , p5_a10
2444 , p5_a11
2445 , p5_a12
2446 , p5_a13
2447 , p5_a14
2448 , p5_a15
2449 , p5_a16
2450 , p5_a17
2451 , p5_a18
2452 , p5_a19
2453 , p5_a20
2454 , p5_a21
2455 , p5_a22
2456 , p5_a23
2457 , p5_a24
2458 , p5_a25
2459 , p5_a26
2460 );
2461
2462 -- here's the delegated call to the old PL/SQL routine
2463 okl_acct_event_pvt.lock_acct_header(p_api_version,
2464 p_init_msg_list,
2465 x_return_status,
2466 x_msg_count,
2467 x_msg_data,
2468 ddp_aehv_tbl);
2469
2470 -- copy data back from the local variables to OUT or IN-OUT args, if any
2471
2472
2473
2474
2475
2476 end;
2477
2478 procedure lock_acct_header(p_api_version NUMBER
2479 , p_init_msg_list VARCHAR2
2480 , x_return_status out nocopy VARCHAR2
2481 , x_msg_count out nocopy NUMBER
2482 , x_msg_data out nocopy VARCHAR2
2483 , p5_a0 VARCHAR2 := fnd_api.g_miss_char
2484 , p5_a1 NUMBER := 0-1962.0724
2485 , p5_a2 NUMBER := 0-1962.0724
2486 , p5_a3 NUMBER := 0-1962.0724
2487 , p5_a4 NUMBER := 0-1962.0724
2488 , p5_a5 NUMBER := 0-1962.0724
2489 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2490 , p5_a7 NUMBER := 0-1962.0724
2491 , p5_a8 NUMBER := 0-1962.0724
2492 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2493 , p5_a10 DATE := fnd_api.g_miss_date
2494 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2495 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2496 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2497 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2498 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2499 , p5_a16 NUMBER := 0-1962.0724
2500 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2501 , p5_a18 NUMBER := 0-1962.0724
2502 , p5_a19 NUMBER := 0-1962.0724
2503 , p5_a20 DATE := fnd_api.g_miss_date
2504 , p5_a21 NUMBER := 0-1962.0724
2505 , p5_a22 NUMBER := 0-1962.0724
2506 , p5_a23 DATE := fnd_api.g_miss_date
2507 , p5_a24 NUMBER := 0-1962.0724
2508 , p5_a25 DATE := fnd_api.g_miss_date
2509 , p5_a26 NUMBER := 0-1962.0724
2510 )
2511
2512 as
2513 ddp_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2514 ddindx binary_integer; indx binary_integer;
2515 begin
2516
2517 -- copy data to the local IN or IN-OUT args, if any
2518
2519
2520
2521
2522
2523 ddp_aehv_rec.post_to_gl_flag := p5_a0;
2524 ddp_aehv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a1);
2525 ddp_aehv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
2526 ddp_aehv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a3);
2527 ddp_aehv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a4);
2528 ddp_aehv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
2529 ddp_aehv_rec.ae_category := p5_a6;
2530 ddp_aehv_rec.sequence_id := rosetta_g_miss_num_map(p5_a7);
2531 ddp_aehv_rec.sequence_value := rosetta_g_miss_num_map(p5_a8);
2532 ddp_aehv_rec.period_name := p5_a9;
2533 ddp_aehv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a10);
2534 ddp_aehv_rec.description := p5_a11;
2535 ddp_aehv_rec.accounting_error_code := p5_a12;
2536 ddp_aehv_rec.cross_currency_flag := p5_a13;
2537 ddp_aehv_rec.gl_transfer_flag := p5_a14;
2538 ddp_aehv_rec.gl_transfer_error_code := p5_a15;
2539 ddp_aehv_rec.gl_transfer_run_id := rosetta_g_miss_num_map(p5_a16);
2540 ddp_aehv_rec.gl_reversal_flag := p5_a17;
2541 ddp_aehv_rec.program_id := rosetta_g_miss_num_map(p5_a18);
2542 ddp_aehv_rec.program_application_id := rosetta_g_miss_num_map(p5_a19);
2543 ddp_aehv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a20);
2544 ddp_aehv_rec.request_id := rosetta_g_miss_num_map(p5_a21);
2545 ddp_aehv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
2546 ddp_aehv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
2547 ddp_aehv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
2548 ddp_aehv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
2549 ddp_aehv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
2550
2551 -- here's the delegated call to the old PL/SQL routine
2552 okl_acct_event_pvt.lock_acct_header(p_api_version,
2553 p_init_msg_list,
2554 x_return_status,
2555 x_msg_count,
2556 x_msg_data,
2557 ddp_aehv_rec);
2558
2559 -- copy data back from the local variables to OUT or IN-OUT args, if any
2560
2561
2562
2563
2564
2565 end;
2566
2567 procedure update_acct_header(p_api_version NUMBER
2568 , p_init_msg_list VARCHAR2
2569 , x_return_status out nocopy VARCHAR2
2570 , x_msg_count out nocopy NUMBER
2571 , x_msg_data out nocopy VARCHAR2
2572 , p5_a0 JTF_VARCHAR2_TABLE_100
2573 , p5_a1 JTF_NUMBER_TABLE
2574 , p5_a2 JTF_NUMBER_TABLE
2575 , p5_a3 JTF_NUMBER_TABLE
2576 , p5_a4 JTF_NUMBER_TABLE
2577 , p5_a5 JTF_NUMBER_TABLE
2578 , p5_a6 JTF_VARCHAR2_TABLE_100
2579 , p5_a7 JTF_NUMBER_TABLE
2580 , p5_a8 JTF_NUMBER_TABLE
2581 , p5_a9 JTF_VARCHAR2_TABLE_100
2582 , p5_a10 JTF_DATE_TABLE
2583 , p5_a11 JTF_VARCHAR2_TABLE_800
2584 , p5_a12 JTF_VARCHAR2_TABLE_100
2585 , p5_a13 JTF_VARCHAR2_TABLE_100
2586 , p5_a14 JTF_VARCHAR2_TABLE_100
2587 , p5_a15 JTF_VARCHAR2_TABLE_100
2588 , p5_a16 JTF_NUMBER_TABLE
2589 , p5_a17 JTF_VARCHAR2_TABLE_100
2590 , p5_a18 JTF_NUMBER_TABLE
2591 , p5_a19 JTF_NUMBER_TABLE
2592 , p5_a20 JTF_DATE_TABLE
2593 , p5_a21 JTF_NUMBER_TABLE
2594 , p5_a22 JTF_NUMBER_TABLE
2595 , p5_a23 JTF_DATE_TABLE
2596 , p5_a24 JTF_NUMBER_TABLE
2597 , p5_a25 JTF_DATE_TABLE
2598 , p5_a26 JTF_NUMBER_TABLE
2599 , p6_a0 out nocopy JTF_VARCHAR2_TABLE_100
2600 , p6_a1 out nocopy JTF_NUMBER_TABLE
2601 , p6_a2 out nocopy JTF_NUMBER_TABLE
2602 , p6_a3 out nocopy JTF_NUMBER_TABLE
2603 , p6_a4 out nocopy JTF_NUMBER_TABLE
2604 , p6_a5 out nocopy JTF_NUMBER_TABLE
2605 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
2606 , p6_a7 out nocopy JTF_NUMBER_TABLE
2607 , p6_a8 out nocopy JTF_NUMBER_TABLE
2608 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_100
2609 , p6_a10 out nocopy JTF_DATE_TABLE
2610 , p6_a11 out nocopy JTF_VARCHAR2_TABLE_800
2611 , p6_a12 out nocopy JTF_VARCHAR2_TABLE_100
2612 , p6_a13 out nocopy JTF_VARCHAR2_TABLE_100
2613 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
2614 , p6_a15 out nocopy JTF_VARCHAR2_TABLE_100
2615 , p6_a16 out nocopy JTF_NUMBER_TABLE
2616 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_100
2617 , p6_a18 out nocopy JTF_NUMBER_TABLE
2618 , p6_a19 out nocopy JTF_NUMBER_TABLE
2619 , p6_a20 out nocopy JTF_DATE_TABLE
2620 , p6_a21 out nocopy JTF_NUMBER_TABLE
2621 , p6_a22 out nocopy JTF_NUMBER_TABLE
2622 , p6_a23 out nocopy JTF_DATE_TABLE
2623 , p6_a24 out nocopy JTF_NUMBER_TABLE
2624 , p6_a25 out nocopy JTF_DATE_TABLE
2625 , p6_a26 out nocopy JTF_NUMBER_TABLE
2626 )
2627
2628 as
2629 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2630 ddx_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2631 ddindx binary_integer; indx binary_integer;
2632 begin
2633
2634 -- copy data to the local IN or IN-OUT args, if any
2635
2636
2637
2638
2639
2640 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p5_a0
2641 , p5_a1
2642 , p5_a2
2643 , p5_a3
2644 , p5_a4
2645 , p5_a5
2646 , p5_a6
2647 , p5_a7
2648 , p5_a8
2649 , p5_a9
2650 , p5_a10
2651 , p5_a11
2652 , p5_a12
2653 , p5_a13
2654 , p5_a14
2655 , p5_a15
2656 , p5_a16
2657 , p5_a17
2658 , p5_a18
2659 , p5_a19
2660 , p5_a20
2661 , p5_a21
2662 , p5_a22
2663 , p5_a23
2664 , p5_a24
2665 , p5_a25
2666 , p5_a26
2667 );
2668
2669
2670 -- here's the delegated call to the old PL/SQL routine
2671 okl_acct_event_pvt.update_acct_header(p_api_version,
2672 p_init_msg_list,
2673 x_return_status,
2674 x_msg_count,
2675 x_msg_data,
2676 ddp_aehv_tbl,
2677 ddx_aehv_tbl);
2678
2679 -- copy data back from the local variables to OUT or IN-OUT args, if any
2680
2681
2682
2683
2684
2685
2686 okl_aeh_pvt_w.rosetta_table_copy_out_p5(ddx_aehv_tbl, p6_a0
2687 , p6_a1
2688 , p6_a2
2689 , p6_a3
2690 , p6_a4
2691 , p6_a5
2692 , p6_a6
2693 , p6_a7
2694 , p6_a8
2695 , p6_a9
2696 , p6_a10
2697 , p6_a11
2698 , p6_a12
2699 , p6_a13
2700 , p6_a14
2701 , p6_a15
2702 , p6_a16
2703 , p6_a17
2704 , p6_a18
2705 , p6_a19
2706 , p6_a20
2707 , p6_a21
2708 , p6_a22
2709 , p6_a23
2710 , p6_a24
2711 , p6_a25
2712 , p6_a26
2713 );
2714 end;
2715
2716 procedure update_acct_header(p_api_version NUMBER
2717 , p_init_msg_list VARCHAR2
2718 , x_return_status out nocopy VARCHAR2
2719 , x_msg_count out nocopy NUMBER
2720 , x_msg_data out nocopy VARCHAR2
2721 , p6_a0 out nocopy VARCHAR2
2722 , p6_a1 out nocopy NUMBER
2723 , p6_a2 out nocopy NUMBER
2724 , p6_a3 out nocopy NUMBER
2725 , p6_a4 out nocopy NUMBER
2726 , p6_a5 out nocopy NUMBER
2727 , p6_a6 out nocopy VARCHAR2
2728 , p6_a7 out nocopy NUMBER
2729 , p6_a8 out nocopy NUMBER
2730 , p6_a9 out nocopy VARCHAR2
2731 , p6_a10 out nocopy DATE
2732 , p6_a11 out nocopy VARCHAR2
2733 , p6_a12 out nocopy VARCHAR2
2734 , p6_a13 out nocopy VARCHAR2
2735 , p6_a14 out nocopy VARCHAR2
2736 , p6_a15 out nocopy VARCHAR2
2737 , p6_a16 out nocopy NUMBER
2738 , p6_a17 out nocopy VARCHAR2
2739 , p6_a18 out nocopy NUMBER
2740 , p6_a19 out nocopy NUMBER
2741 , p6_a20 out nocopy DATE
2742 , p6_a21 out nocopy NUMBER
2743 , p6_a22 out nocopy NUMBER
2744 , p6_a23 out nocopy DATE
2745 , p6_a24 out nocopy NUMBER
2746 , p6_a25 out nocopy DATE
2747 , p6_a26 out nocopy NUMBER
2748 , p5_a0 VARCHAR2 := fnd_api.g_miss_char
2749 , p5_a1 NUMBER := 0-1962.0724
2750 , p5_a2 NUMBER := 0-1962.0724
2751 , p5_a3 NUMBER := 0-1962.0724
2752 , p5_a4 NUMBER := 0-1962.0724
2753 , p5_a5 NUMBER := 0-1962.0724
2754 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2755 , p5_a7 NUMBER := 0-1962.0724
2756 , p5_a8 NUMBER := 0-1962.0724
2757 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2758 , p5_a10 DATE := fnd_api.g_miss_date
2759 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2760 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2761 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2762 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2763 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2764 , p5_a16 NUMBER := 0-1962.0724
2765 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2766 , p5_a18 NUMBER := 0-1962.0724
2767 , p5_a19 NUMBER := 0-1962.0724
2768 , p5_a20 DATE := fnd_api.g_miss_date
2769 , p5_a21 NUMBER := 0-1962.0724
2770 , p5_a22 NUMBER := 0-1962.0724
2771 , p5_a23 DATE := fnd_api.g_miss_date
2772 , p5_a24 NUMBER := 0-1962.0724
2773 , p5_a25 DATE := fnd_api.g_miss_date
2774 , p5_a26 NUMBER := 0-1962.0724
2775 )
2776
2777 as
2778 ddp_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2779 ddx_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2780 ddindx binary_integer; indx binary_integer;
2781 begin
2782
2783 -- copy data to the local IN or IN-OUT args, if any
2784
2785
2786
2787
2788
2789 ddp_aehv_rec.post_to_gl_flag := p5_a0;
2790 ddp_aehv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a1);
2791 ddp_aehv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
2792 ddp_aehv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a3);
2793 ddp_aehv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a4);
2794 ddp_aehv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
2795 ddp_aehv_rec.ae_category := p5_a6;
2796 ddp_aehv_rec.sequence_id := rosetta_g_miss_num_map(p5_a7);
2797 ddp_aehv_rec.sequence_value := rosetta_g_miss_num_map(p5_a8);
2798 ddp_aehv_rec.period_name := p5_a9;
2799 ddp_aehv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a10);
2800 ddp_aehv_rec.description := p5_a11;
2801 ddp_aehv_rec.accounting_error_code := p5_a12;
2802 ddp_aehv_rec.cross_currency_flag := p5_a13;
2803 ddp_aehv_rec.gl_transfer_flag := p5_a14;
2804 ddp_aehv_rec.gl_transfer_error_code := p5_a15;
2805 ddp_aehv_rec.gl_transfer_run_id := rosetta_g_miss_num_map(p5_a16);
2806 ddp_aehv_rec.gl_reversal_flag := p5_a17;
2807 ddp_aehv_rec.program_id := rosetta_g_miss_num_map(p5_a18);
2808 ddp_aehv_rec.program_application_id := rosetta_g_miss_num_map(p5_a19);
2809 ddp_aehv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a20);
2810 ddp_aehv_rec.request_id := rosetta_g_miss_num_map(p5_a21);
2811 ddp_aehv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
2812 ddp_aehv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
2813 ddp_aehv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
2814 ddp_aehv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
2815 ddp_aehv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
2816
2817
2818 -- here's the delegated call to the old PL/SQL routine
2819 okl_acct_event_pvt.update_acct_header(p_api_version,
2820 p_init_msg_list,
2821 x_return_status,
2822 x_msg_count,
2823 x_msg_data,
2824 ddp_aehv_rec,
2825 ddx_aehv_rec);
2826
2827 -- copy data back from the local variables to OUT or IN-OUT args, if any
2828
2829
2830
2831
2832
2833
2834 p6_a0 := ddx_aehv_rec.post_to_gl_flag;
2835 p6_a1 := rosetta_g_miss_num_map(ddx_aehv_rec.ae_header_id);
2836 p6_a2 := rosetta_g_miss_num_map(ddx_aehv_rec.object_version_number);
2837 p6_a3 := rosetta_g_miss_num_map(ddx_aehv_rec.accounting_event_id);
2838 p6_a4 := rosetta_g_miss_num_map(ddx_aehv_rec.set_of_books_id);
2839 p6_a5 := rosetta_g_miss_num_map(ddx_aehv_rec.org_id);
2840 p6_a6 := ddx_aehv_rec.ae_category;
2841 p6_a7 := rosetta_g_miss_num_map(ddx_aehv_rec.sequence_id);
2842 p6_a8 := rosetta_g_miss_num_map(ddx_aehv_rec.sequence_value);
2843 p6_a9 := ddx_aehv_rec.period_name;
2844 p6_a10 := ddx_aehv_rec.accounting_date;
2845 p6_a11 := ddx_aehv_rec.description;
2846 p6_a12 := ddx_aehv_rec.accounting_error_code;
2847 p6_a13 := ddx_aehv_rec.cross_currency_flag;
2848 p6_a14 := ddx_aehv_rec.gl_transfer_flag;
2849 p6_a15 := ddx_aehv_rec.gl_transfer_error_code;
2850 p6_a16 := rosetta_g_miss_num_map(ddx_aehv_rec.gl_transfer_run_id);
2851 p6_a17 := ddx_aehv_rec.gl_reversal_flag;
2852 p6_a18 := rosetta_g_miss_num_map(ddx_aehv_rec.program_id);
2853 p6_a19 := rosetta_g_miss_num_map(ddx_aehv_rec.program_application_id);
2854 p6_a20 := ddx_aehv_rec.program_update_date;
2855 p6_a21 := rosetta_g_miss_num_map(ddx_aehv_rec.request_id);
2856 p6_a22 := rosetta_g_miss_num_map(ddx_aehv_rec.created_by);
2857 p6_a23 := ddx_aehv_rec.creation_date;
2858 p6_a24 := rosetta_g_miss_num_map(ddx_aehv_rec.last_updated_by);
2859 p6_a25 := ddx_aehv_rec.last_update_date;
2860 p6_a26 := rosetta_g_miss_num_map(ddx_aehv_rec.last_update_login);
2861 end;
2862
2863 procedure delete_acct_header(p_api_version NUMBER
2864 , p_init_msg_list VARCHAR2
2865 , x_return_status out nocopy VARCHAR2
2866 , x_msg_count out nocopy NUMBER
2867 , x_msg_data out nocopy VARCHAR2
2868 , p5_a0 JTF_VARCHAR2_TABLE_100
2869 , p5_a1 JTF_NUMBER_TABLE
2870 , p5_a2 JTF_NUMBER_TABLE
2871 , p5_a3 JTF_NUMBER_TABLE
2872 , p5_a4 JTF_NUMBER_TABLE
2873 , p5_a5 JTF_NUMBER_TABLE
2874 , p5_a6 JTF_VARCHAR2_TABLE_100
2875 , p5_a7 JTF_NUMBER_TABLE
2876 , p5_a8 JTF_NUMBER_TABLE
2877 , p5_a9 JTF_VARCHAR2_TABLE_100
2878 , p5_a10 JTF_DATE_TABLE
2879 , p5_a11 JTF_VARCHAR2_TABLE_800
2880 , p5_a12 JTF_VARCHAR2_TABLE_100
2881 , p5_a13 JTF_VARCHAR2_TABLE_100
2882 , p5_a14 JTF_VARCHAR2_TABLE_100
2883 , p5_a15 JTF_VARCHAR2_TABLE_100
2884 , p5_a16 JTF_NUMBER_TABLE
2885 , p5_a17 JTF_VARCHAR2_TABLE_100
2886 , p5_a18 JTF_NUMBER_TABLE
2887 , p5_a19 JTF_NUMBER_TABLE
2888 , p5_a20 JTF_DATE_TABLE
2889 , p5_a21 JTF_NUMBER_TABLE
2890 , p5_a22 JTF_NUMBER_TABLE
2891 , p5_a23 JTF_DATE_TABLE
2892 , p5_a24 JTF_NUMBER_TABLE
2893 , p5_a25 JTF_DATE_TABLE
2894 , p5_a26 JTF_NUMBER_TABLE
2895 )
2896
2897 as
2898 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
2899 ddindx binary_integer; indx binary_integer;
2900 begin
2901
2902 -- copy data to the local IN or IN-OUT args, if any
2903
2904
2905
2906
2907
2908 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p5_a0
2909 , p5_a1
2910 , p5_a2
2911 , p5_a3
2912 , p5_a4
2913 , p5_a5
2914 , p5_a6
2915 , p5_a7
2916 , p5_a8
2917 , p5_a9
2918 , p5_a10
2919 , p5_a11
2920 , p5_a12
2921 , p5_a13
2922 , p5_a14
2923 , p5_a15
2924 , p5_a16
2925 , p5_a17
2926 , p5_a18
2927 , p5_a19
2928 , p5_a20
2929 , p5_a21
2930 , p5_a22
2931 , p5_a23
2932 , p5_a24
2933 , p5_a25
2934 , p5_a26
2935 );
2936
2937 -- here's the delegated call to the old PL/SQL routine
2938 okl_acct_event_pvt.delete_acct_header(p_api_version,
2939 p_init_msg_list,
2940 x_return_status,
2941 x_msg_count,
2942 x_msg_data,
2943 ddp_aehv_tbl);
2944
2945 -- copy data back from the local variables to OUT or IN-OUT args, if any
2946
2947
2948
2949
2950
2951 end;
2952
2953 procedure delete_acct_header(p_api_version NUMBER
2954 , p_init_msg_list VARCHAR2
2955 , x_return_status out nocopy VARCHAR2
2956 , x_msg_count out nocopy NUMBER
2957 , x_msg_data out nocopy VARCHAR2
2958 , p5_a0 VARCHAR2 := fnd_api.g_miss_char
2959 , p5_a1 NUMBER := 0-1962.0724
2960 , p5_a2 NUMBER := 0-1962.0724
2961 , p5_a3 NUMBER := 0-1962.0724
2962 , p5_a4 NUMBER := 0-1962.0724
2963 , p5_a5 NUMBER := 0-1962.0724
2964 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
2965 , p5_a7 NUMBER := 0-1962.0724
2966 , p5_a8 NUMBER := 0-1962.0724
2967 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
2968 , p5_a10 DATE := fnd_api.g_miss_date
2969 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
2970 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
2971 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
2972 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
2973 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
2974 , p5_a16 NUMBER := 0-1962.0724
2975 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
2976 , p5_a18 NUMBER := 0-1962.0724
2977 , p5_a19 NUMBER := 0-1962.0724
2978 , p5_a20 DATE := fnd_api.g_miss_date
2979 , p5_a21 NUMBER := 0-1962.0724
2980 , p5_a22 NUMBER := 0-1962.0724
2981 , p5_a23 DATE := fnd_api.g_miss_date
2982 , p5_a24 NUMBER := 0-1962.0724
2983 , p5_a25 DATE := fnd_api.g_miss_date
2984 , p5_a26 NUMBER := 0-1962.0724
2985 )
2986
2987 as
2988 ddp_aehv_rec okl_acct_event_pvt.aehv_rec_type;
2989 ddindx binary_integer; indx binary_integer;
2990 begin
2991
2992 -- copy data to the local IN or IN-OUT args, if any
2993
2994
2995
2996
2997
2998 ddp_aehv_rec.post_to_gl_flag := p5_a0;
2999 ddp_aehv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a1);
3000 ddp_aehv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
3001 ddp_aehv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a3);
3002 ddp_aehv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a4);
3003 ddp_aehv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
3004 ddp_aehv_rec.ae_category := p5_a6;
3005 ddp_aehv_rec.sequence_id := rosetta_g_miss_num_map(p5_a7);
3006 ddp_aehv_rec.sequence_value := rosetta_g_miss_num_map(p5_a8);
3007 ddp_aehv_rec.period_name := p5_a9;
3008 ddp_aehv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a10);
3009 ddp_aehv_rec.description := p5_a11;
3010 ddp_aehv_rec.accounting_error_code := p5_a12;
3011 ddp_aehv_rec.cross_currency_flag := p5_a13;
3012 ddp_aehv_rec.gl_transfer_flag := p5_a14;
3013 ddp_aehv_rec.gl_transfer_error_code := p5_a15;
3014 ddp_aehv_rec.gl_transfer_run_id := rosetta_g_miss_num_map(p5_a16);
3015 ddp_aehv_rec.gl_reversal_flag := p5_a17;
3016 ddp_aehv_rec.program_id := rosetta_g_miss_num_map(p5_a18);
3017 ddp_aehv_rec.program_application_id := rosetta_g_miss_num_map(p5_a19);
3018 ddp_aehv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a20);
3019 ddp_aehv_rec.request_id := rosetta_g_miss_num_map(p5_a21);
3020 ddp_aehv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
3021 ddp_aehv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
3022 ddp_aehv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
3023 ddp_aehv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
3024 ddp_aehv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
3025
3026 -- here's the delegated call to the old PL/SQL routine
3027 okl_acct_event_pvt.delete_acct_header(p_api_version,
3028 p_init_msg_list,
3029 x_return_status,
3030 x_msg_count,
3031 x_msg_data,
3032 ddp_aehv_rec);
3033
3034 -- copy data back from the local variables to OUT or IN-OUT args, if any
3035
3036
3037
3038
3039
3040 end;
3041
3042 procedure validate_acct_header(p_api_version NUMBER
3043 , p_init_msg_list VARCHAR2
3044 , x_return_status out nocopy VARCHAR2
3045 , x_msg_count out nocopy NUMBER
3046 , x_msg_data out nocopy VARCHAR2
3047 , p5_a0 JTF_VARCHAR2_TABLE_100
3048 , p5_a1 JTF_NUMBER_TABLE
3049 , p5_a2 JTF_NUMBER_TABLE
3050 , p5_a3 JTF_NUMBER_TABLE
3051 , p5_a4 JTF_NUMBER_TABLE
3052 , p5_a5 JTF_NUMBER_TABLE
3053 , p5_a6 JTF_VARCHAR2_TABLE_100
3054 , p5_a7 JTF_NUMBER_TABLE
3055 , p5_a8 JTF_NUMBER_TABLE
3056 , p5_a9 JTF_VARCHAR2_TABLE_100
3057 , p5_a10 JTF_DATE_TABLE
3058 , p5_a11 JTF_VARCHAR2_TABLE_800
3059 , p5_a12 JTF_VARCHAR2_TABLE_100
3060 , p5_a13 JTF_VARCHAR2_TABLE_100
3061 , p5_a14 JTF_VARCHAR2_TABLE_100
3062 , p5_a15 JTF_VARCHAR2_TABLE_100
3063 , p5_a16 JTF_NUMBER_TABLE
3064 , p5_a17 JTF_VARCHAR2_TABLE_100
3065 , p5_a18 JTF_NUMBER_TABLE
3066 , p5_a19 JTF_NUMBER_TABLE
3067 , p5_a20 JTF_DATE_TABLE
3068 , p5_a21 JTF_NUMBER_TABLE
3069 , p5_a22 JTF_NUMBER_TABLE
3070 , p5_a23 JTF_DATE_TABLE
3071 , p5_a24 JTF_NUMBER_TABLE
3072 , p5_a25 JTF_DATE_TABLE
3073 , p5_a26 JTF_NUMBER_TABLE
3074 )
3075
3076 as
3077 ddp_aehv_tbl okl_acct_event_pvt.aehv_tbl_type;
3078 ddindx binary_integer; indx binary_integer;
3079 begin
3080
3081 -- copy data to the local IN or IN-OUT args, if any
3082
3083
3084
3085
3086
3087 okl_aeh_pvt_w.rosetta_table_copy_in_p5(ddp_aehv_tbl, p5_a0
3088 , p5_a1
3089 , p5_a2
3090 , p5_a3
3091 , p5_a4
3092 , p5_a5
3093 , p5_a6
3094 , p5_a7
3095 , p5_a8
3096 , p5_a9
3097 , p5_a10
3098 , p5_a11
3099 , p5_a12
3100 , p5_a13
3101 , p5_a14
3102 , p5_a15
3103 , p5_a16
3104 , p5_a17
3105 , p5_a18
3106 , p5_a19
3107 , p5_a20
3108 , p5_a21
3109 , p5_a22
3110 , p5_a23
3111 , p5_a24
3112 , p5_a25
3113 , p5_a26
3114 );
3115
3116 -- here's the delegated call to the old PL/SQL routine
3117 okl_acct_event_pvt.validate_acct_header(p_api_version,
3118 p_init_msg_list,
3119 x_return_status,
3120 x_msg_count,
3121 x_msg_data,
3122 ddp_aehv_tbl);
3123
3124 -- copy data back from the local variables to OUT or IN-OUT args, if any
3125
3126
3127
3128
3129
3130 end;
3131
3132 procedure validate_acct_header(p_api_version NUMBER
3133 , p_init_msg_list VARCHAR2
3134 , x_return_status out nocopy VARCHAR2
3135 , x_msg_count out nocopy NUMBER
3136 , x_msg_data out nocopy VARCHAR2
3137 , p5_a0 VARCHAR2 := fnd_api.g_miss_char
3138 , p5_a1 NUMBER := 0-1962.0724
3139 , p5_a2 NUMBER := 0-1962.0724
3140 , p5_a3 NUMBER := 0-1962.0724
3141 , p5_a4 NUMBER := 0-1962.0724
3142 , p5_a5 NUMBER := 0-1962.0724
3143 , p5_a6 VARCHAR2 := fnd_api.g_miss_char
3144 , p5_a7 NUMBER := 0-1962.0724
3145 , p5_a8 NUMBER := 0-1962.0724
3146 , p5_a9 VARCHAR2 := fnd_api.g_miss_char
3147 , p5_a10 DATE := fnd_api.g_miss_date
3148 , p5_a11 VARCHAR2 := fnd_api.g_miss_char
3149 , p5_a12 VARCHAR2 := fnd_api.g_miss_char
3150 , p5_a13 VARCHAR2 := fnd_api.g_miss_char
3151 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
3152 , p5_a15 VARCHAR2 := fnd_api.g_miss_char
3153 , p5_a16 NUMBER := 0-1962.0724
3154 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
3155 , p5_a18 NUMBER := 0-1962.0724
3156 , p5_a19 NUMBER := 0-1962.0724
3157 , p5_a20 DATE := fnd_api.g_miss_date
3158 , p5_a21 NUMBER := 0-1962.0724
3159 , p5_a22 NUMBER := 0-1962.0724
3160 , p5_a23 DATE := fnd_api.g_miss_date
3161 , p5_a24 NUMBER := 0-1962.0724
3162 , p5_a25 DATE := fnd_api.g_miss_date
3163 , p5_a26 NUMBER := 0-1962.0724
3164 )
3165
3166 as
3167 ddp_aehv_rec okl_acct_event_pvt.aehv_rec_type;
3168 ddindx binary_integer; indx binary_integer;
3169 begin
3170
3171 -- copy data to the local IN or IN-OUT args, if any
3172
3173
3174
3175
3176
3177 ddp_aehv_rec.post_to_gl_flag := p5_a0;
3178 ddp_aehv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a1);
3179 ddp_aehv_rec.object_version_number := rosetta_g_miss_num_map(p5_a2);
3180 ddp_aehv_rec.accounting_event_id := rosetta_g_miss_num_map(p5_a3);
3181 ddp_aehv_rec.set_of_books_id := rosetta_g_miss_num_map(p5_a4);
3182 ddp_aehv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
3183 ddp_aehv_rec.ae_category := p5_a6;
3184 ddp_aehv_rec.sequence_id := rosetta_g_miss_num_map(p5_a7);
3185 ddp_aehv_rec.sequence_value := rosetta_g_miss_num_map(p5_a8);
3186 ddp_aehv_rec.period_name := p5_a9;
3187 ddp_aehv_rec.accounting_date := rosetta_g_miss_date_in_map(p5_a10);
3188 ddp_aehv_rec.description := p5_a11;
3189 ddp_aehv_rec.accounting_error_code := p5_a12;
3190 ddp_aehv_rec.cross_currency_flag := p5_a13;
3191 ddp_aehv_rec.gl_transfer_flag := p5_a14;
3192 ddp_aehv_rec.gl_transfer_error_code := p5_a15;
3193 ddp_aehv_rec.gl_transfer_run_id := rosetta_g_miss_num_map(p5_a16);
3194 ddp_aehv_rec.gl_reversal_flag := p5_a17;
3195 ddp_aehv_rec.program_id := rosetta_g_miss_num_map(p5_a18);
3196 ddp_aehv_rec.program_application_id := rosetta_g_miss_num_map(p5_a19);
3197 ddp_aehv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a20);
3198 ddp_aehv_rec.request_id := rosetta_g_miss_num_map(p5_a21);
3199 ddp_aehv_rec.created_by := rosetta_g_miss_num_map(p5_a22);
3200 ddp_aehv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a23);
3201 ddp_aehv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a24);
3202 ddp_aehv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
3203 ddp_aehv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
3204
3205 -- here's the delegated call to the old PL/SQL routine
3206 okl_acct_event_pvt.validate_acct_header(p_api_version,
3207 p_init_msg_list,
3208 x_return_status,
3209 x_msg_count,
3210 x_msg_data,
3211 ddp_aehv_rec);
3212
3213 -- copy data back from the local variables to OUT or IN-OUT args, if any
3214
3215
3216
3217
3218
3219 end;
3220
3221 procedure create_acct_lines(p_api_version NUMBER
3222 , p_init_msg_list VARCHAR2
3223 , x_return_status out nocopy VARCHAR2
3224 , x_msg_count out nocopy NUMBER
3225 , x_msg_data out nocopy VARCHAR2
3226 , p5_a0 JTF_NUMBER_TABLE
3227 , p5_a1 JTF_NUMBER_TABLE
3228 , p5_a2 JTF_NUMBER_TABLE
3229 , p5_a3 JTF_VARCHAR2_TABLE_100
3230 , p5_a4 JTF_NUMBER_TABLE
3231 , p5_a5 JTF_NUMBER_TABLE
3232 , p5_a6 JTF_NUMBER_TABLE
3233 , p5_a7 JTF_VARCHAR2_TABLE_100
3234 , p5_a8 JTF_DATE_TABLE
3235 , p5_a9 JTF_NUMBER_TABLE
3236 , p5_a10 JTF_NUMBER_TABLE
3237 , p5_a11 JTF_NUMBER_TABLE
3238 , p5_a12 JTF_NUMBER_TABLE
3239 , p5_a13 JTF_NUMBER_TABLE
3240 , p5_a14 JTF_VARCHAR2_TABLE_100
3241 , p5_a15 JTF_NUMBER_TABLE
3242 , p5_a16 JTF_VARCHAR2_TABLE_800
3243 , p5_a17 JTF_VARCHAR2_TABLE_800
3244 , p5_a18 JTF_VARCHAR2_TABLE_800
3245 , p5_a19 JTF_VARCHAR2_TABLE_800
3246 , p5_a20 JTF_VARCHAR2_TABLE_800
3247 , p5_a21 JTF_VARCHAR2_TABLE_800
3248 , p5_a22 JTF_VARCHAR2_TABLE_800
3249 , p5_a23 JTF_VARCHAR2_TABLE_800
3250 , p5_a24 JTF_VARCHAR2_TABLE_800
3251 , p5_a25 JTF_VARCHAR2_TABLE_800
3252 , p5_a26 JTF_VARCHAR2_TABLE_800
3253 , p5_a27 JTF_NUMBER_TABLE
3254 , p5_a28 JTF_NUMBER_TABLE
3255 , p5_a29 JTF_NUMBER_TABLE
3256 , p5_a30 JTF_VARCHAR2_TABLE_100
3257 , p5_a31 JTF_NUMBER_TABLE
3258 , p5_a32 JTF_VARCHAR2_TABLE_100
3259 , p5_a33 JTF_VARCHAR2_TABLE_100
3260 , p5_a34 JTF_NUMBER_TABLE
3261 , p5_a35 JTF_NUMBER_TABLE
3262 , p5_a36 JTF_NUMBER_TABLE
3263 , p5_a37 JTF_NUMBER_TABLE
3264 , p5_a38 JTF_NUMBER_TABLE
3265 , p5_a39 JTF_VARCHAR2_TABLE_100
3266 , p5_a40 JTF_NUMBER_TABLE
3267 , p5_a41 JTF_VARCHAR2_TABLE_100
3268 , p5_a42 JTF_NUMBER_TABLE
3269 , p5_a43 JTF_NUMBER_TABLE
3270 , p5_a44 JTF_VARCHAR2_TABLE_100
3271 , p5_a45 JTF_NUMBER_TABLE
3272 , p5_a46 JTF_NUMBER_TABLE
3273 , p5_a47 JTF_DATE_TABLE
3274 , p5_a48 JTF_NUMBER_TABLE
3275 , p5_a49 JTF_NUMBER_TABLE
3276 , p5_a50 JTF_NUMBER_TABLE
3277 , p5_a51 JTF_DATE_TABLE
3278 , p5_a52 JTF_NUMBER_TABLE
3279 , p5_a53 JTF_DATE_TABLE
3280 , p5_a54 JTF_NUMBER_TABLE
3281 , p5_a55 JTF_NUMBER_TABLE
3282 , p5_a56 JTF_NUMBER_TABLE
3283 , p5_a57 JTF_NUMBER_TABLE
3284 , p6_a0 out nocopy JTF_NUMBER_TABLE
3285 , p6_a1 out nocopy JTF_NUMBER_TABLE
3286 , p6_a2 out nocopy JTF_NUMBER_TABLE
3287 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
3288 , p6_a4 out nocopy JTF_NUMBER_TABLE
3289 , p6_a5 out nocopy JTF_NUMBER_TABLE
3290 , p6_a6 out nocopy JTF_NUMBER_TABLE
3291 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
3292 , p6_a8 out nocopy JTF_DATE_TABLE
3293 , p6_a9 out nocopy JTF_NUMBER_TABLE
3294 , p6_a10 out nocopy JTF_NUMBER_TABLE
3295 , p6_a11 out nocopy JTF_NUMBER_TABLE
3296 , p6_a12 out nocopy JTF_NUMBER_TABLE
3297 , p6_a13 out nocopy JTF_NUMBER_TABLE
3298 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
3299 , p6_a15 out nocopy JTF_NUMBER_TABLE
3300 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_800
3301 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_800
3302 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_800
3303 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_800
3304 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_800
3305 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_800
3306 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_800
3307 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_800
3308 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_800
3309 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_800
3310 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_800
3311 , p6_a27 out nocopy JTF_NUMBER_TABLE
3312 , p6_a28 out nocopy JTF_NUMBER_TABLE
3313 , p6_a29 out nocopy JTF_NUMBER_TABLE
3314 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
3315 , p6_a31 out nocopy JTF_NUMBER_TABLE
3316 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_100
3317 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_100
3318 , p6_a34 out nocopy JTF_NUMBER_TABLE
3319 , p6_a35 out nocopy JTF_NUMBER_TABLE
3320 , p6_a36 out nocopy JTF_NUMBER_TABLE
3321 , p6_a37 out nocopy JTF_NUMBER_TABLE
3322 , p6_a38 out nocopy JTF_NUMBER_TABLE
3323 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
3324 , p6_a40 out nocopy JTF_NUMBER_TABLE
3325 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
3326 , p6_a42 out nocopy JTF_NUMBER_TABLE
3327 , p6_a43 out nocopy JTF_NUMBER_TABLE
3328 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_100
3329 , p6_a45 out nocopy JTF_NUMBER_TABLE
3330 , p6_a46 out nocopy JTF_NUMBER_TABLE
3331 , p6_a47 out nocopy JTF_DATE_TABLE
3332 , p6_a48 out nocopy JTF_NUMBER_TABLE
3333 , p6_a49 out nocopy JTF_NUMBER_TABLE
3334 , p6_a50 out nocopy JTF_NUMBER_TABLE
3335 , p6_a51 out nocopy JTF_DATE_TABLE
3336 , p6_a52 out nocopy JTF_NUMBER_TABLE
3337 , p6_a53 out nocopy JTF_DATE_TABLE
3338 , p6_a54 out nocopy JTF_NUMBER_TABLE
3339 , p6_a55 out nocopy JTF_NUMBER_TABLE
3340 , p6_a56 out nocopy JTF_NUMBER_TABLE
3341 , p6_a57 out nocopy JTF_NUMBER_TABLE
3342 )
3343
3344 as
3345 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
3346 ddx_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
3347 ddindx binary_integer; indx binary_integer;
3348 begin
3349
3350 -- copy data to the local IN or IN-OUT args, if any
3351
3352
3353
3354
3355
3356 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p5_a0
3357 , p5_a1
3358 , p5_a2
3359 , p5_a3
3360 , p5_a4
3361 , p5_a5
3362 , p5_a6
3363 , p5_a7
3364 , p5_a8
3365 , p5_a9
3366 , p5_a10
3367 , p5_a11
3368 , p5_a12
3369 , p5_a13
3370 , p5_a14
3371 , p5_a15
3372 , p5_a16
3373 , p5_a17
3374 , p5_a18
3375 , p5_a19
3376 , p5_a20
3377 , p5_a21
3378 , p5_a22
3379 , p5_a23
3380 , p5_a24
3381 , p5_a25
3382 , p5_a26
3383 , p5_a27
3384 , p5_a28
3385 , p5_a29
3386 , p5_a30
3387 , p5_a31
3388 , p5_a32
3389 , p5_a33
3390 , p5_a34
3391 , p5_a35
3392 , p5_a36
3393 , p5_a37
3394 , p5_a38
3395 , p5_a39
3396 , p5_a40
3397 , p5_a41
3398 , p5_a42
3399 , p5_a43
3400 , p5_a44
3401 , p5_a45
3402 , p5_a46
3403 , p5_a47
3404 , p5_a48
3405 , p5_a49
3406 , p5_a50
3407 , p5_a51
3408 , p5_a52
3409 , p5_a53
3410 , p5_a54
3411 , p5_a55
3412 , p5_a56
3413 , p5_a57
3414 );
3415
3416
3417 -- here's the delegated call to the old PL/SQL routine
3418 okl_acct_event_pvt.create_acct_lines(p_api_version,
3419 p_init_msg_list,
3420 x_return_status,
3421 x_msg_count,
3422 x_msg_data,
3423 ddp_aelv_tbl,
3424 ddx_aelv_tbl);
3425
3426 -- copy data back from the local variables to OUT or IN-OUT args, if any
3427
3428
3429
3430
3431
3432
3433 okl_ael_pvt_w.rosetta_table_copy_out_p5(ddx_aelv_tbl, p6_a0
3434 , p6_a1
3435 , p6_a2
3436 , p6_a3
3437 , p6_a4
3438 , p6_a5
3439 , p6_a6
3440 , p6_a7
3441 , p6_a8
3442 , p6_a9
3443 , p6_a10
3444 , p6_a11
3445 , p6_a12
3446 , p6_a13
3447 , p6_a14
3448 , p6_a15
3449 , p6_a16
3450 , p6_a17
3451 , p6_a18
3452 , p6_a19
3453 , p6_a20
3454 , p6_a21
3455 , p6_a22
3456 , p6_a23
3457 , p6_a24
3458 , p6_a25
3459 , p6_a26
3460 , p6_a27
3461 , p6_a28
3462 , p6_a29
3463 , p6_a30
3464 , p6_a31
3465 , p6_a32
3466 , p6_a33
3467 , p6_a34
3468 , p6_a35
3469 , p6_a36
3470 , p6_a37
3471 , p6_a38
3472 , p6_a39
3473 , p6_a40
3474 , p6_a41
3475 , p6_a42
3476 , p6_a43
3477 , p6_a44
3478 , p6_a45
3479 , p6_a46
3480 , p6_a47
3481 , p6_a48
3482 , p6_a49
3483 , p6_a50
3484 , p6_a51
3485 , p6_a52
3486 , p6_a53
3487 , p6_a54
3488 , p6_a55
3489 , p6_a56
3490 , p6_a57
3491 );
3492 end;
3493
3494 procedure create_acct_lines(p_api_version NUMBER
3495 , p_init_msg_list VARCHAR2
3496 , x_return_status out nocopy VARCHAR2
3497 , x_msg_count out nocopy NUMBER
3498 , x_msg_data out nocopy VARCHAR2
3499 , p6_a0 out nocopy NUMBER
3500 , p6_a1 out nocopy NUMBER
3501 , p6_a2 out nocopy NUMBER
3502 , p6_a3 out nocopy VARCHAR2
3503 , p6_a4 out nocopy NUMBER
3504 , p6_a5 out nocopy NUMBER
3505 , p6_a6 out nocopy NUMBER
3506 , p6_a7 out nocopy VARCHAR2
3507 , p6_a8 out nocopy DATE
3508 , p6_a9 out nocopy NUMBER
3509 , p6_a10 out nocopy NUMBER
3510 , p6_a11 out nocopy NUMBER
3511 , p6_a12 out nocopy NUMBER
3512 , p6_a13 out nocopy NUMBER
3513 , p6_a14 out nocopy VARCHAR2
3514 , p6_a15 out nocopy NUMBER
3515 , p6_a16 out nocopy VARCHAR2
3516 , p6_a17 out nocopy VARCHAR2
3517 , p6_a18 out nocopy VARCHAR2
3518 , p6_a19 out nocopy VARCHAR2
3519 , p6_a20 out nocopy VARCHAR2
3520 , p6_a21 out nocopy VARCHAR2
3521 , p6_a22 out nocopy VARCHAR2
3522 , p6_a23 out nocopy VARCHAR2
3523 , p6_a24 out nocopy VARCHAR2
3524 , p6_a25 out nocopy VARCHAR2
3525 , p6_a26 out nocopy VARCHAR2
3526 , p6_a27 out nocopy NUMBER
3527 , p6_a28 out nocopy NUMBER
3528 , p6_a29 out nocopy NUMBER
3529 , p6_a30 out nocopy VARCHAR2
3530 , p6_a31 out nocopy NUMBER
3531 , p6_a32 out nocopy VARCHAR2
3532 , p6_a33 out nocopy VARCHAR2
3533 , p6_a34 out nocopy NUMBER
3534 , p6_a35 out nocopy NUMBER
3535 , p6_a36 out nocopy NUMBER
3536 , p6_a37 out nocopy NUMBER
3537 , p6_a38 out nocopy NUMBER
3538 , p6_a39 out nocopy VARCHAR2
3539 , p6_a40 out nocopy NUMBER
3540 , p6_a41 out nocopy VARCHAR2
3541 , p6_a42 out nocopy NUMBER
3542 , p6_a43 out nocopy NUMBER
3543 , p6_a44 out nocopy VARCHAR2
3544 , p6_a45 out nocopy NUMBER
3545 , p6_a46 out nocopy NUMBER
3546 , p6_a47 out nocopy DATE
3547 , p6_a48 out nocopy NUMBER
3548 , p6_a49 out nocopy NUMBER
3549 , p6_a50 out nocopy NUMBER
3550 , p6_a51 out nocopy DATE
3551 , p6_a52 out nocopy NUMBER
3552 , p6_a53 out nocopy DATE
3553 , p6_a54 out nocopy NUMBER
3554 , p6_a55 out nocopy NUMBER
3555 , p6_a56 out nocopy NUMBER
3556 , p6_a57 out nocopy NUMBER
3557 , p5_a0 NUMBER := 0-1962.0724
3558 , p5_a1 NUMBER := 0-1962.0724
3559 , p5_a2 NUMBER := 0-1962.0724
3560 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
3561 , p5_a4 NUMBER := 0-1962.0724
3562 , p5_a5 NUMBER := 0-1962.0724
3563 , p5_a6 NUMBER := 0-1962.0724
3564 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
3565 , p5_a8 DATE := fnd_api.g_miss_date
3566 , p5_a9 NUMBER := 0-1962.0724
3567 , p5_a10 NUMBER := 0-1962.0724
3568 , p5_a11 NUMBER := 0-1962.0724
3569 , p5_a12 NUMBER := 0-1962.0724
3570 , p5_a13 NUMBER := 0-1962.0724
3571 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
3572 , p5_a15 NUMBER := 0-1962.0724
3573 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
3574 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
3575 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
3576 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
3577 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
3578 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
3579 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
3580 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
3581 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
3582 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
3583 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
3584 , p5_a27 NUMBER := 0-1962.0724
3585 , p5_a28 NUMBER := 0-1962.0724
3586 , p5_a29 NUMBER := 0-1962.0724
3587 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
3588 , p5_a31 NUMBER := 0-1962.0724
3589 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
3590 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
3591 , p5_a34 NUMBER := 0-1962.0724
3592 , p5_a35 NUMBER := 0-1962.0724
3593 , p5_a36 NUMBER := 0-1962.0724
3594 , p5_a37 NUMBER := 0-1962.0724
3595 , p5_a38 NUMBER := 0-1962.0724
3596 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
3597 , p5_a40 NUMBER := 0-1962.0724
3598 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
3599 , p5_a42 NUMBER := 0-1962.0724
3600 , p5_a43 NUMBER := 0-1962.0724
3601 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
3602 , p5_a45 NUMBER := 0-1962.0724
3603 , p5_a46 NUMBER := 0-1962.0724
3604 , p5_a47 DATE := fnd_api.g_miss_date
3605 , p5_a48 NUMBER := 0-1962.0724
3606 , p5_a49 NUMBER := 0-1962.0724
3607 , p5_a50 NUMBER := 0-1962.0724
3608 , p5_a51 DATE := fnd_api.g_miss_date
3609 , p5_a52 NUMBER := 0-1962.0724
3610 , p5_a53 DATE := fnd_api.g_miss_date
3611 , p5_a54 NUMBER := 0-1962.0724
3612 , p5_a55 NUMBER := 0-1962.0724
3613 , p5_a56 NUMBER := 0-1962.0724
3614 , p5_a57 NUMBER := 0-1962.0724
3615 )
3616
3617 as
3618 ddp_aelv_rec okl_acct_event_pvt.aelv_rec_type;
3619 ddx_aelv_rec okl_acct_event_pvt.aelv_rec_type;
3620 ddindx binary_integer; indx binary_integer;
3621 begin
3622
3623 -- copy data to the local IN or IN-OUT args, if any
3624
3625
3626
3627
3628
3629 ddp_aelv_rec.ae_line_id := rosetta_g_miss_num_map(p5_a0);
3630 ddp_aelv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
3631 ddp_aelv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a2);
3632 ddp_aelv_rec.currency_conversion_type := p5_a3;
3633 ddp_aelv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a4);
3634 ddp_aelv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
3635 ddp_aelv_rec.ae_line_number := rosetta_g_miss_num_map(p5_a6);
3636 ddp_aelv_rec.ae_line_type_code := p5_a7;
3637 ddp_aelv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a8);
3638 ddp_aelv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a9);
3639 ddp_aelv_rec.entered_dr := rosetta_g_miss_num_map(p5_a10);
3640 ddp_aelv_rec.entered_cr := rosetta_g_miss_num_map(p5_a11);
3641 ddp_aelv_rec.accounted_dr := rosetta_g_miss_num_map(p5_a12);
3642 ddp_aelv_rec.accounted_cr := rosetta_g_miss_num_map(p5_a13);
3643 ddp_aelv_rec.source_table := p5_a14;
3644 ddp_aelv_rec.source_id := rosetta_g_miss_num_map(p5_a15);
3645 ddp_aelv_rec.reference1 := p5_a16;
3646 ddp_aelv_rec.reference2 := p5_a17;
3647 ddp_aelv_rec.reference3 := p5_a18;
3648 ddp_aelv_rec.reference4 := p5_a19;
3649 ddp_aelv_rec.reference5 := p5_a20;
3650 ddp_aelv_rec.reference6 := p5_a21;
3651 ddp_aelv_rec.reference7 := p5_a22;
3652 ddp_aelv_rec.reference8 := p5_a23;
3653 ddp_aelv_rec.reference9 := p5_a24;
3654 ddp_aelv_rec.reference10 := p5_a25;
3655 ddp_aelv_rec.description := p5_a26;
3656 ddp_aelv_rec.third_party_id := rosetta_g_miss_num_map(p5_a27);
3657 ddp_aelv_rec.third_party_sub_id := rosetta_g_miss_num_map(p5_a28);
3658 ddp_aelv_rec.stat_amount := rosetta_g_miss_num_map(p5_a29);
3659 ddp_aelv_rec.ussgl_transaction_code := p5_a30;
3660 ddp_aelv_rec.subledger_doc_sequence_id := rosetta_g_miss_num_map(p5_a31);
3661 ddp_aelv_rec.accounting_error_code := p5_a32;
3662 ddp_aelv_rec.gl_transfer_error_code := p5_a33;
3663 ddp_aelv_rec.gl_sl_link_id := rosetta_g_miss_num_map(p5_a34);
3664 ddp_aelv_rec.taxable_entered_dr := rosetta_g_miss_num_map(p5_a35);
3665 ddp_aelv_rec.taxable_entered_cr := rosetta_g_miss_num_map(p5_a36);
3666 ddp_aelv_rec.taxable_accounted_dr := rosetta_g_miss_num_map(p5_a37);
3667 ddp_aelv_rec.taxable_accounted_cr := rosetta_g_miss_num_map(p5_a38);
3668 ddp_aelv_rec.applied_from_trx_hdr_table := p5_a39;
3669 ddp_aelv_rec.applied_from_trx_hdr_id := rosetta_g_miss_num_map(p5_a40);
3670 ddp_aelv_rec.applied_to_trx_hdr_table := p5_a41;
3671 ddp_aelv_rec.applied_to_trx_hdr_id := rosetta_g_miss_num_map(p5_a42);
3672 ddp_aelv_rec.tax_link_id := rosetta_g_miss_num_map(p5_a43);
3673 ddp_aelv_rec.currency_code := p5_a44;
3674 ddp_aelv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
3675 ddp_aelv_rec.program_application_id := rosetta_g_miss_num_map(p5_a46);
3676 ddp_aelv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a47);
3677 ddp_aelv_rec.request_id := rosetta_g_miss_num_map(p5_a48);
3678 ddp_aelv_rec.aeh_tbl_index := rosetta_g_miss_num_map(p5_a49);
3679 ddp_aelv_rec.created_by := rosetta_g_miss_num_map(p5_a50);
3680 ddp_aelv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
3681 ddp_aelv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a52);
3682 ddp_aelv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a53);
3683 ddp_aelv_rec.last_update_login := rosetta_g_miss_num_map(p5_a54);
3684 ddp_aelv_rec.account_overlay_source_id := rosetta_g_miss_num_map(p5_a55);
3685 ddp_aelv_rec.subledger_doc_sequence_value := rosetta_g_miss_num_map(p5_a56);
3686 ddp_aelv_rec.tax_code_id := rosetta_g_miss_num_map(p5_a57);
3687
3688
3689 -- here's the delegated call to the old PL/SQL routine
3690 okl_acct_event_pvt.create_acct_lines(p_api_version,
3691 p_init_msg_list,
3692 x_return_status,
3693 x_msg_count,
3694 x_msg_data,
3695 ddp_aelv_rec,
3696 ddx_aelv_rec);
3697
3698 -- copy data back from the local variables to OUT or IN-OUT args, if any
3699
3700
3701
3702
3703
3704
3705 p6_a0 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_line_id);
3706 p6_a1 := rosetta_g_miss_num_map(ddx_aelv_rec.object_version_number);
3707 p6_a2 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_header_id);
3708 p6_a3 := ddx_aelv_rec.currency_conversion_type;
3709 p6_a4 := rosetta_g_miss_num_map(ddx_aelv_rec.code_combination_id);
3710 p6_a5 := rosetta_g_miss_num_map(ddx_aelv_rec.org_id);
3711 p6_a6 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_line_number);
3712 p6_a7 := ddx_aelv_rec.ae_line_type_code;
3713 p6_a8 := ddx_aelv_rec.currency_conversion_date;
3714 p6_a9 := rosetta_g_miss_num_map(ddx_aelv_rec.currency_conversion_rate);
3715 p6_a10 := rosetta_g_miss_num_map(ddx_aelv_rec.entered_dr);
3716 p6_a11 := rosetta_g_miss_num_map(ddx_aelv_rec.entered_cr);
3717 p6_a12 := rosetta_g_miss_num_map(ddx_aelv_rec.accounted_dr);
3718 p6_a13 := rosetta_g_miss_num_map(ddx_aelv_rec.accounted_cr);
3719 p6_a14 := ddx_aelv_rec.source_table;
3720 p6_a15 := rosetta_g_miss_num_map(ddx_aelv_rec.source_id);
3721 p6_a16 := ddx_aelv_rec.reference1;
3722 p6_a17 := ddx_aelv_rec.reference2;
3723 p6_a18 := ddx_aelv_rec.reference3;
3724 p6_a19 := ddx_aelv_rec.reference4;
3725 p6_a20 := ddx_aelv_rec.reference5;
3726 p6_a21 := ddx_aelv_rec.reference6;
3727 p6_a22 := ddx_aelv_rec.reference7;
3728 p6_a23 := ddx_aelv_rec.reference8;
3729 p6_a24 := ddx_aelv_rec.reference9;
3730 p6_a25 := ddx_aelv_rec.reference10;
3731 p6_a26 := ddx_aelv_rec.description;
3732 p6_a27 := rosetta_g_miss_num_map(ddx_aelv_rec.third_party_id);
3733 p6_a28 := rosetta_g_miss_num_map(ddx_aelv_rec.third_party_sub_id);
3734 p6_a29 := rosetta_g_miss_num_map(ddx_aelv_rec.stat_amount);
3735 p6_a30 := ddx_aelv_rec.ussgl_transaction_code;
3736 p6_a31 := rosetta_g_miss_num_map(ddx_aelv_rec.subledger_doc_sequence_id);
3737 p6_a32 := ddx_aelv_rec.accounting_error_code;
3738 p6_a33 := ddx_aelv_rec.gl_transfer_error_code;
3739 p6_a34 := rosetta_g_miss_num_map(ddx_aelv_rec.gl_sl_link_id);
3740 p6_a35 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_entered_dr);
3741 p6_a36 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_entered_cr);
3742 p6_a37 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_accounted_dr);
3743 p6_a38 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_accounted_cr);
3744 p6_a39 := ddx_aelv_rec.applied_from_trx_hdr_table;
3745 p6_a40 := rosetta_g_miss_num_map(ddx_aelv_rec.applied_from_trx_hdr_id);
3746 p6_a41 := ddx_aelv_rec.applied_to_trx_hdr_table;
3747 p6_a42 := rosetta_g_miss_num_map(ddx_aelv_rec.applied_to_trx_hdr_id);
3748 p6_a43 := rosetta_g_miss_num_map(ddx_aelv_rec.tax_link_id);
3749 p6_a44 := ddx_aelv_rec.currency_code;
3750 p6_a45 := rosetta_g_miss_num_map(ddx_aelv_rec.program_id);
3751 p6_a46 := rosetta_g_miss_num_map(ddx_aelv_rec.program_application_id);
3752 p6_a47 := ddx_aelv_rec.program_update_date;
3753 p6_a48 := rosetta_g_miss_num_map(ddx_aelv_rec.request_id);
3754 p6_a49 := rosetta_g_miss_num_map(ddx_aelv_rec.aeh_tbl_index);
3755 p6_a50 := rosetta_g_miss_num_map(ddx_aelv_rec.created_by);
3756 p6_a51 := ddx_aelv_rec.creation_date;
3757 p6_a52 := rosetta_g_miss_num_map(ddx_aelv_rec.last_updated_by);
3758 p6_a53 := ddx_aelv_rec.last_update_date;
3759 p6_a54 := rosetta_g_miss_num_map(ddx_aelv_rec.last_update_login);
3760 p6_a55 := rosetta_g_miss_num_map(ddx_aelv_rec.account_overlay_source_id);
3761 p6_a56 := rosetta_g_miss_num_map(ddx_aelv_rec.subledger_doc_sequence_value);
3762 p6_a57 := rosetta_g_miss_num_map(ddx_aelv_rec.tax_code_id);
3763 end;
3764
3765 procedure lock_acct_lines(p_api_version NUMBER
3766 , p_init_msg_list VARCHAR2
3767 , x_return_status out nocopy VARCHAR2
3768 , x_msg_count out nocopy NUMBER
3769 , x_msg_data out nocopy VARCHAR2
3770 , p5_a0 JTF_NUMBER_TABLE
3771 , p5_a1 JTF_NUMBER_TABLE
3772 , p5_a2 JTF_NUMBER_TABLE
3773 , p5_a3 JTF_VARCHAR2_TABLE_100
3774 , p5_a4 JTF_NUMBER_TABLE
3775 , p5_a5 JTF_NUMBER_TABLE
3776 , p5_a6 JTF_NUMBER_TABLE
3777 , p5_a7 JTF_VARCHAR2_TABLE_100
3778 , p5_a8 JTF_DATE_TABLE
3779 , p5_a9 JTF_NUMBER_TABLE
3780 , p5_a10 JTF_NUMBER_TABLE
3781 , p5_a11 JTF_NUMBER_TABLE
3782 , p5_a12 JTF_NUMBER_TABLE
3783 , p5_a13 JTF_NUMBER_TABLE
3784 , p5_a14 JTF_VARCHAR2_TABLE_100
3785 , p5_a15 JTF_NUMBER_TABLE
3786 , p5_a16 JTF_VARCHAR2_TABLE_800
3787 , p5_a17 JTF_VARCHAR2_TABLE_800
3788 , p5_a18 JTF_VARCHAR2_TABLE_800
3789 , p5_a19 JTF_VARCHAR2_TABLE_800
3790 , p5_a20 JTF_VARCHAR2_TABLE_800
3791 , p5_a21 JTF_VARCHAR2_TABLE_800
3792 , p5_a22 JTF_VARCHAR2_TABLE_800
3793 , p5_a23 JTF_VARCHAR2_TABLE_800
3794 , p5_a24 JTF_VARCHAR2_TABLE_800
3795 , p5_a25 JTF_VARCHAR2_TABLE_800
3796 , p5_a26 JTF_VARCHAR2_TABLE_800
3797 , p5_a27 JTF_NUMBER_TABLE
3798 , p5_a28 JTF_NUMBER_TABLE
3799 , p5_a29 JTF_NUMBER_TABLE
3800 , p5_a30 JTF_VARCHAR2_TABLE_100
3801 , p5_a31 JTF_NUMBER_TABLE
3802 , p5_a32 JTF_VARCHAR2_TABLE_100
3803 , p5_a33 JTF_VARCHAR2_TABLE_100
3804 , p5_a34 JTF_NUMBER_TABLE
3805 , p5_a35 JTF_NUMBER_TABLE
3806 , p5_a36 JTF_NUMBER_TABLE
3807 , p5_a37 JTF_NUMBER_TABLE
3808 , p5_a38 JTF_NUMBER_TABLE
3809 , p5_a39 JTF_VARCHAR2_TABLE_100
3810 , p5_a40 JTF_NUMBER_TABLE
3811 , p5_a41 JTF_VARCHAR2_TABLE_100
3812 , p5_a42 JTF_NUMBER_TABLE
3813 , p5_a43 JTF_NUMBER_TABLE
3814 , p5_a44 JTF_VARCHAR2_TABLE_100
3815 , p5_a45 JTF_NUMBER_TABLE
3816 , p5_a46 JTF_NUMBER_TABLE
3817 , p5_a47 JTF_DATE_TABLE
3818 , p5_a48 JTF_NUMBER_TABLE
3819 , p5_a49 JTF_NUMBER_TABLE
3820 , p5_a50 JTF_NUMBER_TABLE
3821 , p5_a51 JTF_DATE_TABLE
3822 , p5_a52 JTF_NUMBER_TABLE
3823 , p5_a53 JTF_DATE_TABLE
3824 , p5_a54 JTF_NUMBER_TABLE
3825 , p5_a55 JTF_NUMBER_TABLE
3826 , p5_a56 JTF_NUMBER_TABLE
3827 , p5_a57 JTF_NUMBER_TABLE
3828 )
3829
3830 as
3831 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
3832 ddindx binary_integer; indx binary_integer;
3833 begin
3834
3835 -- copy data to the local IN or IN-OUT args, if any
3836
3837
3838
3839
3840
3841 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p5_a0
3842 , p5_a1
3843 , p5_a2
3844 , p5_a3
3845 , p5_a4
3846 , p5_a5
3847 , p5_a6
3848 , p5_a7
3849 , p5_a8
3850 , p5_a9
3851 , p5_a10
3852 , p5_a11
3853 , p5_a12
3854 , p5_a13
3855 , p5_a14
3856 , p5_a15
3857 , p5_a16
3858 , p5_a17
3859 , p5_a18
3860 , p5_a19
3861 , p5_a20
3862 , p5_a21
3863 , p5_a22
3864 , p5_a23
3865 , p5_a24
3866 , p5_a25
3867 , p5_a26
3868 , p5_a27
3869 , p5_a28
3870 , p5_a29
3871 , p5_a30
3872 , p5_a31
3873 , p5_a32
3874 , p5_a33
3875 , p5_a34
3876 , p5_a35
3877 , p5_a36
3878 , p5_a37
3879 , p5_a38
3880 , p5_a39
3881 , p5_a40
3882 , p5_a41
3883 , p5_a42
3884 , p5_a43
3885 , p5_a44
3886 , p5_a45
3887 , p5_a46
3888 , p5_a47
3889 , p5_a48
3890 , p5_a49
3891 , p5_a50
3892 , p5_a51
3893 , p5_a52
3894 , p5_a53
3895 , p5_a54
3896 , p5_a55
3897 , p5_a56
3898 , p5_a57
3899 );
3900
3901 -- here's the delegated call to the old PL/SQL routine
3902 okl_acct_event_pvt.lock_acct_lines(p_api_version,
3903 p_init_msg_list,
3904 x_return_status,
3905 x_msg_count,
3906 x_msg_data,
3907 ddp_aelv_tbl);
3908
3909 -- copy data back from the local variables to OUT or IN-OUT args, if any
3910
3911
3912
3913
3914
3915 end;
3916
3917 procedure lock_acct_lines(p_api_version NUMBER
3918 , p_init_msg_list VARCHAR2
3919 , x_return_status out nocopy VARCHAR2
3920 , x_msg_count out nocopy NUMBER
3921 , x_msg_data out nocopy VARCHAR2
3922 , p5_a0 NUMBER := 0-1962.0724
3923 , p5_a1 NUMBER := 0-1962.0724
3924 , p5_a2 NUMBER := 0-1962.0724
3925 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
3926 , p5_a4 NUMBER := 0-1962.0724
3927 , p5_a5 NUMBER := 0-1962.0724
3928 , p5_a6 NUMBER := 0-1962.0724
3929 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
3930 , p5_a8 DATE := fnd_api.g_miss_date
3931 , p5_a9 NUMBER := 0-1962.0724
3932 , p5_a10 NUMBER := 0-1962.0724
3933 , p5_a11 NUMBER := 0-1962.0724
3934 , p5_a12 NUMBER := 0-1962.0724
3935 , p5_a13 NUMBER := 0-1962.0724
3936 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
3937 , p5_a15 NUMBER := 0-1962.0724
3938 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
3939 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
3940 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
3941 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
3942 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
3943 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
3944 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
3945 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
3946 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
3947 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
3948 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
3949 , p5_a27 NUMBER := 0-1962.0724
3950 , p5_a28 NUMBER := 0-1962.0724
3951 , p5_a29 NUMBER := 0-1962.0724
3952 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
3953 , p5_a31 NUMBER := 0-1962.0724
3954 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
3955 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
3956 , p5_a34 NUMBER := 0-1962.0724
3957 , p5_a35 NUMBER := 0-1962.0724
3958 , p5_a36 NUMBER := 0-1962.0724
3959 , p5_a37 NUMBER := 0-1962.0724
3960 , p5_a38 NUMBER := 0-1962.0724
3961 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
3962 , p5_a40 NUMBER := 0-1962.0724
3963 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
3964 , p5_a42 NUMBER := 0-1962.0724
3965 , p5_a43 NUMBER := 0-1962.0724
3966 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
3967 , p5_a45 NUMBER := 0-1962.0724
3968 , p5_a46 NUMBER := 0-1962.0724
3969 , p5_a47 DATE := fnd_api.g_miss_date
3970 , p5_a48 NUMBER := 0-1962.0724
3971 , p5_a49 NUMBER := 0-1962.0724
3972 , p5_a50 NUMBER := 0-1962.0724
3973 , p5_a51 DATE := fnd_api.g_miss_date
3974 , p5_a52 NUMBER := 0-1962.0724
3975 , p5_a53 DATE := fnd_api.g_miss_date
3976 , p5_a54 NUMBER := 0-1962.0724
3977 , p5_a55 NUMBER := 0-1962.0724
3978 , p5_a56 NUMBER := 0-1962.0724
3979 , p5_a57 NUMBER := 0-1962.0724
3980 )
3981
3982 as
3983 ddp_aelv_rec okl_acct_event_pvt.aelv_rec_type;
3984 ddindx binary_integer; indx binary_integer;
3985 begin
3986
3987 -- copy data to the local IN or IN-OUT args, if any
3988
3989
3990
3991
3992
3993 ddp_aelv_rec.ae_line_id := rosetta_g_miss_num_map(p5_a0);
3994 ddp_aelv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
3995 ddp_aelv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a2);
3996 ddp_aelv_rec.currency_conversion_type := p5_a3;
3997 ddp_aelv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a4);
3998 ddp_aelv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
3999 ddp_aelv_rec.ae_line_number := rosetta_g_miss_num_map(p5_a6);
4000 ddp_aelv_rec.ae_line_type_code := p5_a7;
4001 ddp_aelv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a8);
4002 ddp_aelv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a9);
4003 ddp_aelv_rec.entered_dr := rosetta_g_miss_num_map(p5_a10);
4004 ddp_aelv_rec.entered_cr := rosetta_g_miss_num_map(p5_a11);
4005 ddp_aelv_rec.accounted_dr := rosetta_g_miss_num_map(p5_a12);
4006 ddp_aelv_rec.accounted_cr := rosetta_g_miss_num_map(p5_a13);
4007 ddp_aelv_rec.source_table := p5_a14;
4008 ddp_aelv_rec.source_id := rosetta_g_miss_num_map(p5_a15);
4009 ddp_aelv_rec.reference1 := p5_a16;
4010 ddp_aelv_rec.reference2 := p5_a17;
4011 ddp_aelv_rec.reference3 := p5_a18;
4012 ddp_aelv_rec.reference4 := p5_a19;
4013 ddp_aelv_rec.reference5 := p5_a20;
4014 ddp_aelv_rec.reference6 := p5_a21;
4015 ddp_aelv_rec.reference7 := p5_a22;
4016 ddp_aelv_rec.reference8 := p5_a23;
4017 ddp_aelv_rec.reference9 := p5_a24;
4018 ddp_aelv_rec.reference10 := p5_a25;
4019 ddp_aelv_rec.description := p5_a26;
4020 ddp_aelv_rec.third_party_id := rosetta_g_miss_num_map(p5_a27);
4021 ddp_aelv_rec.third_party_sub_id := rosetta_g_miss_num_map(p5_a28);
4022 ddp_aelv_rec.stat_amount := rosetta_g_miss_num_map(p5_a29);
4023 ddp_aelv_rec.ussgl_transaction_code := p5_a30;
4024 ddp_aelv_rec.subledger_doc_sequence_id := rosetta_g_miss_num_map(p5_a31);
4025 ddp_aelv_rec.accounting_error_code := p5_a32;
4026 ddp_aelv_rec.gl_transfer_error_code := p5_a33;
4027 ddp_aelv_rec.gl_sl_link_id := rosetta_g_miss_num_map(p5_a34);
4028 ddp_aelv_rec.taxable_entered_dr := rosetta_g_miss_num_map(p5_a35);
4029 ddp_aelv_rec.taxable_entered_cr := rosetta_g_miss_num_map(p5_a36);
4030 ddp_aelv_rec.taxable_accounted_dr := rosetta_g_miss_num_map(p5_a37);
4031 ddp_aelv_rec.taxable_accounted_cr := rosetta_g_miss_num_map(p5_a38);
4032 ddp_aelv_rec.applied_from_trx_hdr_table := p5_a39;
4033 ddp_aelv_rec.applied_from_trx_hdr_id := rosetta_g_miss_num_map(p5_a40);
4034 ddp_aelv_rec.applied_to_trx_hdr_table := p5_a41;
4035 ddp_aelv_rec.applied_to_trx_hdr_id := rosetta_g_miss_num_map(p5_a42);
4036 ddp_aelv_rec.tax_link_id := rosetta_g_miss_num_map(p5_a43);
4037 ddp_aelv_rec.currency_code := p5_a44;
4038 ddp_aelv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
4039 ddp_aelv_rec.program_application_id := rosetta_g_miss_num_map(p5_a46);
4040 ddp_aelv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a47);
4041 ddp_aelv_rec.request_id := rosetta_g_miss_num_map(p5_a48);
4042 ddp_aelv_rec.aeh_tbl_index := rosetta_g_miss_num_map(p5_a49);
4043 ddp_aelv_rec.created_by := rosetta_g_miss_num_map(p5_a50);
4044 ddp_aelv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
4045 ddp_aelv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a52);
4046 ddp_aelv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a53);
4047 ddp_aelv_rec.last_update_login := rosetta_g_miss_num_map(p5_a54);
4048 ddp_aelv_rec.account_overlay_source_id := rosetta_g_miss_num_map(p5_a55);
4049 ddp_aelv_rec.subledger_doc_sequence_value := rosetta_g_miss_num_map(p5_a56);
4050 ddp_aelv_rec.tax_code_id := rosetta_g_miss_num_map(p5_a57);
4051
4052 -- here's the delegated call to the old PL/SQL routine
4053 okl_acct_event_pvt.lock_acct_lines(p_api_version,
4054 p_init_msg_list,
4055 x_return_status,
4056 x_msg_count,
4057 x_msg_data,
4058 ddp_aelv_rec);
4059
4060 -- copy data back from the local variables to OUT or IN-OUT args, if any
4061
4062
4063
4064
4065
4066 end;
4067
4068 procedure update_acct_lines(p_api_version NUMBER
4069 , p_init_msg_list VARCHAR2
4070 , x_return_status out nocopy VARCHAR2
4071 , x_msg_count out nocopy NUMBER
4072 , x_msg_data out nocopy VARCHAR2
4073 , p5_a0 JTF_NUMBER_TABLE
4074 , p5_a1 JTF_NUMBER_TABLE
4075 , p5_a2 JTF_NUMBER_TABLE
4076 , p5_a3 JTF_VARCHAR2_TABLE_100
4077 , p5_a4 JTF_NUMBER_TABLE
4078 , p5_a5 JTF_NUMBER_TABLE
4079 , p5_a6 JTF_NUMBER_TABLE
4080 , p5_a7 JTF_VARCHAR2_TABLE_100
4081 , p5_a8 JTF_DATE_TABLE
4082 , p5_a9 JTF_NUMBER_TABLE
4083 , p5_a10 JTF_NUMBER_TABLE
4084 , p5_a11 JTF_NUMBER_TABLE
4085 , p5_a12 JTF_NUMBER_TABLE
4086 , p5_a13 JTF_NUMBER_TABLE
4087 , p5_a14 JTF_VARCHAR2_TABLE_100
4088 , p5_a15 JTF_NUMBER_TABLE
4089 , p5_a16 JTF_VARCHAR2_TABLE_800
4090 , p5_a17 JTF_VARCHAR2_TABLE_800
4091 , p5_a18 JTF_VARCHAR2_TABLE_800
4092 , p5_a19 JTF_VARCHAR2_TABLE_800
4093 , p5_a20 JTF_VARCHAR2_TABLE_800
4094 , p5_a21 JTF_VARCHAR2_TABLE_800
4095 , p5_a22 JTF_VARCHAR2_TABLE_800
4096 , p5_a23 JTF_VARCHAR2_TABLE_800
4097 , p5_a24 JTF_VARCHAR2_TABLE_800
4098 , p5_a25 JTF_VARCHAR2_TABLE_800
4099 , p5_a26 JTF_VARCHAR2_TABLE_800
4100 , p5_a27 JTF_NUMBER_TABLE
4101 , p5_a28 JTF_NUMBER_TABLE
4102 , p5_a29 JTF_NUMBER_TABLE
4103 , p5_a30 JTF_VARCHAR2_TABLE_100
4104 , p5_a31 JTF_NUMBER_TABLE
4105 , p5_a32 JTF_VARCHAR2_TABLE_100
4106 , p5_a33 JTF_VARCHAR2_TABLE_100
4107 , p5_a34 JTF_NUMBER_TABLE
4108 , p5_a35 JTF_NUMBER_TABLE
4109 , p5_a36 JTF_NUMBER_TABLE
4110 , p5_a37 JTF_NUMBER_TABLE
4111 , p5_a38 JTF_NUMBER_TABLE
4112 , p5_a39 JTF_VARCHAR2_TABLE_100
4113 , p5_a40 JTF_NUMBER_TABLE
4114 , p5_a41 JTF_VARCHAR2_TABLE_100
4115 , p5_a42 JTF_NUMBER_TABLE
4116 , p5_a43 JTF_NUMBER_TABLE
4117 , p5_a44 JTF_VARCHAR2_TABLE_100
4118 , p5_a45 JTF_NUMBER_TABLE
4119 , p5_a46 JTF_NUMBER_TABLE
4120 , p5_a47 JTF_DATE_TABLE
4121 , p5_a48 JTF_NUMBER_TABLE
4122 , p5_a49 JTF_NUMBER_TABLE
4123 , p5_a50 JTF_NUMBER_TABLE
4124 , p5_a51 JTF_DATE_TABLE
4125 , p5_a52 JTF_NUMBER_TABLE
4126 , p5_a53 JTF_DATE_TABLE
4127 , p5_a54 JTF_NUMBER_TABLE
4128 , p5_a55 JTF_NUMBER_TABLE
4129 , p5_a56 JTF_NUMBER_TABLE
4130 , p5_a57 JTF_NUMBER_TABLE
4131 , p6_a0 out nocopy JTF_NUMBER_TABLE
4132 , p6_a1 out nocopy JTF_NUMBER_TABLE
4133 , p6_a2 out nocopy JTF_NUMBER_TABLE
4134 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
4135 , p6_a4 out nocopy JTF_NUMBER_TABLE
4136 , p6_a5 out nocopy JTF_NUMBER_TABLE
4137 , p6_a6 out nocopy JTF_NUMBER_TABLE
4138 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
4139 , p6_a8 out nocopy JTF_DATE_TABLE
4140 , p6_a9 out nocopy JTF_NUMBER_TABLE
4141 , p6_a10 out nocopy JTF_NUMBER_TABLE
4142 , p6_a11 out nocopy JTF_NUMBER_TABLE
4143 , p6_a12 out nocopy JTF_NUMBER_TABLE
4144 , p6_a13 out nocopy JTF_NUMBER_TABLE
4145 , p6_a14 out nocopy JTF_VARCHAR2_TABLE_100
4146 , p6_a15 out nocopy JTF_NUMBER_TABLE
4147 , p6_a16 out nocopy JTF_VARCHAR2_TABLE_800
4148 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_800
4149 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_800
4150 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_800
4151 , p6_a20 out nocopy JTF_VARCHAR2_TABLE_800
4152 , p6_a21 out nocopy JTF_VARCHAR2_TABLE_800
4153 , p6_a22 out nocopy JTF_VARCHAR2_TABLE_800
4154 , p6_a23 out nocopy JTF_VARCHAR2_TABLE_800
4155 , p6_a24 out nocopy JTF_VARCHAR2_TABLE_800
4156 , p6_a25 out nocopy JTF_VARCHAR2_TABLE_800
4157 , p6_a26 out nocopy JTF_VARCHAR2_TABLE_800
4158 , p6_a27 out nocopy JTF_NUMBER_TABLE
4159 , p6_a28 out nocopy JTF_NUMBER_TABLE
4160 , p6_a29 out nocopy JTF_NUMBER_TABLE
4161 , p6_a30 out nocopy JTF_VARCHAR2_TABLE_100
4162 , p6_a31 out nocopy JTF_NUMBER_TABLE
4163 , p6_a32 out nocopy JTF_VARCHAR2_TABLE_100
4164 , p6_a33 out nocopy JTF_VARCHAR2_TABLE_100
4165 , p6_a34 out nocopy JTF_NUMBER_TABLE
4166 , p6_a35 out nocopy JTF_NUMBER_TABLE
4167 , p6_a36 out nocopy JTF_NUMBER_TABLE
4168 , p6_a37 out nocopy JTF_NUMBER_TABLE
4169 , p6_a38 out nocopy JTF_NUMBER_TABLE
4170 , p6_a39 out nocopy JTF_VARCHAR2_TABLE_100
4171 , p6_a40 out nocopy JTF_NUMBER_TABLE
4172 , p6_a41 out nocopy JTF_VARCHAR2_TABLE_100
4173 , p6_a42 out nocopy JTF_NUMBER_TABLE
4174 , p6_a43 out nocopy JTF_NUMBER_TABLE
4175 , p6_a44 out nocopy JTF_VARCHAR2_TABLE_100
4176 , p6_a45 out nocopy JTF_NUMBER_TABLE
4177 , p6_a46 out nocopy JTF_NUMBER_TABLE
4178 , p6_a47 out nocopy JTF_DATE_TABLE
4179 , p6_a48 out nocopy JTF_NUMBER_TABLE
4180 , p6_a49 out nocopy JTF_NUMBER_TABLE
4181 , p6_a50 out nocopy JTF_NUMBER_TABLE
4182 , p6_a51 out nocopy JTF_DATE_TABLE
4183 , p6_a52 out nocopy JTF_NUMBER_TABLE
4184 , p6_a53 out nocopy JTF_DATE_TABLE
4185 , p6_a54 out nocopy JTF_NUMBER_TABLE
4186 , p6_a55 out nocopy JTF_NUMBER_TABLE
4187 , p6_a56 out nocopy JTF_NUMBER_TABLE
4188 , p6_a57 out nocopy JTF_NUMBER_TABLE
4189 )
4190
4191 as
4192 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
4193 ddx_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
4194 ddindx binary_integer; indx binary_integer;
4195 begin
4196
4197 -- copy data to the local IN or IN-OUT args, if any
4198
4199
4200
4201
4202
4203 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p5_a0
4204 , p5_a1
4205 , p5_a2
4206 , p5_a3
4207 , p5_a4
4208 , p5_a5
4209 , p5_a6
4210 , p5_a7
4211 , p5_a8
4212 , p5_a9
4213 , p5_a10
4214 , p5_a11
4215 , p5_a12
4216 , p5_a13
4217 , p5_a14
4218 , p5_a15
4219 , p5_a16
4220 , p5_a17
4221 , p5_a18
4222 , p5_a19
4223 , p5_a20
4224 , p5_a21
4225 , p5_a22
4226 , p5_a23
4227 , p5_a24
4228 , p5_a25
4229 , p5_a26
4230 , p5_a27
4231 , p5_a28
4232 , p5_a29
4233 , p5_a30
4234 , p5_a31
4235 , p5_a32
4236 , p5_a33
4237 , p5_a34
4238 , p5_a35
4239 , p5_a36
4240 , p5_a37
4241 , p5_a38
4242 , p5_a39
4243 , p5_a40
4244 , p5_a41
4245 , p5_a42
4246 , p5_a43
4247 , p5_a44
4248 , p5_a45
4249 , p5_a46
4250 , p5_a47
4251 , p5_a48
4252 , p5_a49
4253 , p5_a50
4254 , p5_a51
4255 , p5_a52
4256 , p5_a53
4257 , p5_a54
4258 , p5_a55
4259 , p5_a56
4260 , p5_a57
4261 );
4262
4263
4264 -- here's the delegated call to the old PL/SQL routine
4265 okl_acct_event_pvt.update_acct_lines(p_api_version,
4266 p_init_msg_list,
4267 x_return_status,
4268 x_msg_count,
4269 x_msg_data,
4270 ddp_aelv_tbl,
4271 ddx_aelv_tbl);
4272
4273 -- copy data back from the local variables to OUT or IN-OUT args, if any
4274
4275
4276
4277
4278
4279
4280 okl_ael_pvt_w.rosetta_table_copy_out_p5(ddx_aelv_tbl, p6_a0
4281 , p6_a1
4282 , p6_a2
4283 , p6_a3
4284 , p6_a4
4285 , p6_a5
4286 , p6_a6
4287 , p6_a7
4288 , p6_a8
4289 , p6_a9
4290 , p6_a10
4291 , p6_a11
4292 , p6_a12
4293 , p6_a13
4294 , p6_a14
4295 , p6_a15
4296 , p6_a16
4297 , p6_a17
4298 , p6_a18
4299 , p6_a19
4300 , p6_a20
4301 , p6_a21
4302 , p6_a22
4303 , p6_a23
4304 , p6_a24
4305 , p6_a25
4306 , p6_a26
4307 , p6_a27
4308 , p6_a28
4309 , p6_a29
4310 , p6_a30
4311 , p6_a31
4312 , p6_a32
4313 , p6_a33
4314 , p6_a34
4315 , p6_a35
4316 , p6_a36
4317 , p6_a37
4318 , p6_a38
4319 , p6_a39
4320 , p6_a40
4321 , p6_a41
4322 , p6_a42
4323 , p6_a43
4324 , p6_a44
4325 , p6_a45
4326 , p6_a46
4327 , p6_a47
4328 , p6_a48
4329 , p6_a49
4330 , p6_a50
4331 , p6_a51
4332 , p6_a52
4333 , p6_a53
4334 , p6_a54
4335 , p6_a55
4336 , p6_a56
4337 , p6_a57
4338 );
4339 end;
4340
4341 procedure update_acct_lines(p_api_version NUMBER
4342 , p_init_msg_list VARCHAR2
4343 , x_return_status out nocopy VARCHAR2
4344 , x_msg_count out nocopy NUMBER
4345 , x_msg_data out nocopy VARCHAR2
4346 , p6_a0 out nocopy NUMBER
4347 , p6_a1 out nocopy NUMBER
4348 , p6_a2 out nocopy NUMBER
4349 , p6_a3 out nocopy VARCHAR2
4350 , p6_a4 out nocopy NUMBER
4351 , p6_a5 out nocopy NUMBER
4352 , p6_a6 out nocopy NUMBER
4353 , p6_a7 out nocopy VARCHAR2
4354 , p6_a8 out nocopy DATE
4355 , p6_a9 out nocopy NUMBER
4356 , p6_a10 out nocopy NUMBER
4357 , p6_a11 out nocopy NUMBER
4358 , p6_a12 out nocopy NUMBER
4359 , p6_a13 out nocopy NUMBER
4360 , p6_a14 out nocopy VARCHAR2
4361 , p6_a15 out nocopy NUMBER
4362 , p6_a16 out nocopy VARCHAR2
4363 , p6_a17 out nocopy VARCHAR2
4364 , p6_a18 out nocopy VARCHAR2
4365 , p6_a19 out nocopy VARCHAR2
4366 , p6_a20 out nocopy VARCHAR2
4367 , p6_a21 out nocopy VARCHAR2
4368 , p6_a22 out nocopy VARCHAR2
4369 , p6_a23 out nocopy VARCHAR2
4370 , p6_a24 out nocopy VARCHAR2
4371 , p6_a25 out nocopy VARCHAR2
4372 , p6_a26 out nocopy VARCHAR2
4373 , p6_a27 out nocopy NUMBER
4374 , p6_a28 out nocopy NUMBER
4375 , p6_a29 out nocopy NUMBER
4376 , p6_a30 out nocopy VARCHAR2
4377 , p6_a31 out nocopy NUMBER
4378 , p6_a32 out nocopy VARCHAR2
4379 , p6_a33 out nocopy VARCHAR2
4380 , p6_a34 out nocopy NUMBER
4381 , p6_a35 out nocopy NUMBER
4382 , p6_a36 out nocopy NUMBER
4383 , p6_a37 out nocopy NUMBER
4384 , p6_a38 out nocopy NUMBER
4385 , p6_a39 out nocopy VARCHAR2
4386 , p6_a40 out nocopy NUMBER
4387 , p6_a41 out nocopy VARCHAR2
4388 , p6_a42 out nocopy NUMBER
4389 , p6_a43 out nocopy NUMBER
4390 , p6_a44 out nocopy VARCHAR2
4391 , p6_a45 out nocopy NUMBER
4392 , p6_a46 out nocopy NUMBER
4393 , p6_a47 out nocopy DATE
4394 , p6_a48 out nocopy NUMBER
4395 , p6_a49 out nocopy NUMBER
4396 , p6_a50 out nocopy NUMBER
4397 , p6_a51 out nocopy DATE
4398 , p6_a52 out nocopy NUMBER
4399 , p6_a53 out nocopy DATE
4400 , p6_a54 out nocopy NUMBER
4401 , p6_a55 out nocopy NUMBER
4402 , p6_a56 out nocopy NUMBER
4403 , p6_a57 out nocopy NUMBER
4404 , p5_a0 NUMBER := 0-1962.0724
4405 , p5_a1 NUMBER := 0-1962.0724
4406 , p5_a2 NUMBER := 0-1962.0724
4407 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
4408 , p5_a4 NUMBER := 0-1962.0724
4409 , p5_a5 NUMBER := 0-1962.0724
4410 , p5_a6 NUMBER := 0-1962.0724
4411 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
4412 , p5_a8 DATE := fnd_api.g_miss_date
4413 , p5_a9 NUMBER := 0-1962.0724
4414 , p5_a10 NUMBER := 0-1962.0724
4415 , p5_a11 NUMBER := 0-1962.0724
4416 , p5_a12 NUMBER := 0-1962.0724
4417 , p5_a13 NUMBER := 0-1962.0724
4418 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
4419 , p5_a15 NUMBER := 0-1962.0724
4420 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
4421 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
4422 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
4423 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
4424 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
4425 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
4426 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
4427 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
4428 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
4429 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
4430 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
4431 , p5_a27 NUMBER := 0-1962.0724
4432 , p5_a28 NUMBER := 0-1962.0724
4433 , p5_a29 NUMBER := 0-1962.0724
4434 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
4435 , p5_a31 NUMBER := 0-1962.0724
4436 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
4437 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
4438 , p5_a34 NUMBER := 0-1962.0724
4439 , p5_a35 NUMBER := 0-1962.0724
4440 , p5_a36 NUMBER := 0-1962.0724
4441 , p5_a37 NUMBER := 0-1962.0724
4442 , p5_a38 NUMBER := 0-1962.0724
4443 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
4444 , p5_a40 NUMBER := 0-1962.0724
4445 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
4446 , p5_a42 NUMBER := 0-1962.0724
4447 , p5_a43 NUMBER := 0-1962.0724
4448 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
4449 , p5_a45 NUMBER := 0-1962.0724
4450 , p5_a46 NUMBER := 0-1962.0724
4451 , p5_a47 DATE := fnd_api.g_miss_date
4452 , p5_a48 NUMBER := 0-1962.0724
4453 , p5_a49 NUMBER := 0-1962.0724
4454 , p5_a50 NUMBER := 0-1962.0724
4455 , p5_a51 DATE := fnd_api.g_miss_date
4456 , p5_a52 NUMBER := 0-1962.0724
4457 , p5_a53 DATE := fnd_api.g_miss_date
4458 , p5_a54 NUMBER := 0-1962.0724
4459 , p5_a55 NUMBER := 0-1962.0724
4460 , p5_a56 NUMBER := 0-1962.0724
4461 , p5_a57 NUMBER := 0-1962.0724
4462 )
4463
4464 as
4465 ddp_aelv_rec okl_acct_event_pvt.aelv_rec_type;
4466 ddx_aelv_rec okl_acct_event_pvt.aelv_rec_type;
4467 ddindx binary_integer; indx binary_integer;
4468 begin
4469
4470 -- copy data to the local IN or IN-OUT args, if any
4471
4472
4473
4474
4475
4476 ddp_aelv_rec.ae_line_id := rosetta_g_miss_num_map(p5_a0);
4477 ddp_aelv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
4478 ddp_aelv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a2);
4479 ddp_aelv_rec.currency_conversion_type := p5_a3;
4480 ddp_aelv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a4);
4481 ddp_aelv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
4482 ddp_aelv_rec.ae_line_number := rosetta_g_miss_num_map(p5_a6);
4483 ddp_aelv_rec.ae_line_type_code := p5_a7;
4484 ddp_aelv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a8);
4485 ddp_aelv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a9);
4486 ddp_aelv_rec.entered_dr := rosetta_g_miss_num_map(p5_a10);
4487 ddp_aelv_rec.entered_cr := rosetta_g_miss_num_map(p5_a11);
4488 ddp_aelv_rec.accounted_dr := rosetta_g_miss_num_map(p5_a12);
4489 ddp_aelv_rec.accounted_cr := rosetta_g_miss_num_map(p5_a13);
4490 ddp_aelv_rec.source_table := p5_a14;
4491 ddp_aelv_rec.source_id := rosetta_g_miss_num_map(p5_a15);
4492 ddp_aelv_rec.reference1 := p5_a16;
4493 ddp_aelv_rec.reference2 := p5_a17;
4494 ddp_aelv_rec.reference3 := p5_a18;
4495 ddp_aelv_rec.reference4 := p5_a19;
4496 ddp_aelv_rec.reference5 := p5_a20;
4497 ddp_aelv_rec.reference6 := p5_a21;
4498 ddp_aelv_rec.reference7 := p5_a22;
4499 ddp_aelv_rec.reference8 := p5_a23;
4500 ddp_aelv_rec.reference9 := p5_a24;
4501 ddp_aelv_rec.reference10 := p5_a25;
4502 ddp_aelv_rec.description := p5_a26;
4503 ddp_aelv_rec.third_party_id := rosetta_g_miss_num_map(p5_a27);
4504 ddp_aelv_rec.third_party_sub_id := rosetta_g_miss_num_map(p5_a28);
4505 ddp_aelv_rec.stat_amount := rosetta_g_miss_num_map(p5_a29);
4506 ddp_aelv_rec.ussgl_transaction_code := p5_a30;
4507 ddp_aelv_rec.subledger_doc_sequence_id := rosetta_g_miss_num_map(p5_a31);
4508 ddp_aelv_rec.accounting_error_code := p5_a32;
4509 ddp_aelv_rec.gl_transfer_error_code := p5_a33;
4510 ddp_aelv_rec.gl_sl_link_id := rosetta_g_miss_num_map(p5_a34);
4511 ddp_aelv_rec.taxable_entered_dr := rosetta_g_miss_num_map(p5_a35);
4512 ddp_aelv_rec.taxable_entered_cr := rosetta_g_miss_num_map(p5_a36);
4513 ddp_aelv_rec.taxable_accounted_dr := rosetta_g_miss_num_map(p5_a37);
4514 ddp_aelv_rec.taxable_accounted_cr := rosetta_g_miss_num_map(p5_a38);
4515 ddp_aelv_rec.applied_from_trx_hdr_table := p5_a39;
4516 ddp_aelv_rec.applied_from_trx_hdr_id := rosetta_g_miss_num_map(p5_a40);
4517 ddp_aelv_rec.applied_to_trx_hdr_table := p5_a41;
4518 ddp_aelv_rec.applied_to_trx_hdr_id := rosetta_g_miss_num_map(p5_a42);
4519 ddp_aelv_rec.tax_link_id := rosetta_g_miss_num_map(p5_a43);
4520 ddp_aelv_rec.currency_code := p5_a44;
4521 ddp_aelv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
4522 ddp_aelv_rec.program_application_id := rosetta_g_miss_num_map(p5_a46);
4523 ddp_aelv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a47);
4524 ddp_aelv_rec.request_id := rosetta_g_miss_num_map(p5_a48);
4525 ddp_aelv_rec.aeh_tbl_index := rosetta_g_miss_num_map(p5_a49);
4526 ddp_aelv_rec.created_by := rosetta_g_miss_num_map(p5_a50);
4527 ddp_aelv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
4528 ddp_aelv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a52);
4529 ddp_aelv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a53);
4530 ddp_aelv_rec.last_update_login := rosetta_g_miss_num_map(p5_a54);
4531 ddp_aelv_rec.account_overlay_source_id := rosetta_g_miss_num_map(p5_a55);
4532 ddp_aelv_rec.subledger_doc_sequence_value := rosetta_g_miss_num_map(p5_a56);
4533 ddp_aelv_rec.tax_code_id := rosetta_g_miss_num_map(p5_a57);
4534
4535
4536 -- here's the delegated call to the old PL/SQL routine
4537 okl_acct_event_pvt.update_acct_lines(p_api_version,
4538 p_init_msg_list,
4539 x_return_status,
4540 x_msg_count,
4541 x_msg_data,
4542 ddp_aelv_rec,
4543 ddx_aelv_rec);
4544
4545 -- copy data back from the local variables to OUT or IN-OUT args, if any
4546
4547
4548
4549
4550
4551
4552 p6_a0 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_line_id);
4553 p6_a1 := rosetta_g_miss_num_map(ddx_aelv_rec.object_version_number);
4554 p6_a2 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_header_id);
4555 p6_a3 := ddx_aelv_rec.currency_conversion_type;
4556 p6_a4 := rosetta_g_miss_num_map(ddx_aelv_rec.code_combination_id);
4557 p6_a5 := rosetta_g_miss_num_map(ddx_aelv_rec.org_id);
4558 p6_a6 := rosetta_g_miss_num_map(ddx_aelv_rec.ae_line_number);
4559 p6_a7 := ddx_aelv_rec.ae_line_type_code;
4560 p6_a8 := ddx_aelv_rec.currency_conversion_date;
4561 p6_a9 := rosetta_g_miss_num_map(ddx_aelv_rec.currency_conversion_rate);
4562 p6_a10 := rosetta_g_miss_num_map(ddx_aelv_rec.entered_dr);
4563 p6_a11 := rosetta_g_miss_num_map(ddx_aelv_rec.entered_cr);
4564 p6_a12 := rosetta_g_miss_num_map(ddx_aelv_rec.accounted_dr);
4565 p6_a13 := rosetta_g_miss_num_map(ddx_aelv_rec.accounted_cr);
4566 p6_a14 := ddx_aelv_rec.source_table;
4567 p6_a15 := rosetta_g_miss_num_map(ddx_aelv_rec.source_id);
4568 p6_a16 := ddx_aelv_rec.reference1;
4569 p6_a17 := ddx_aelv_rec.reference2;
4570 p6_a18 := ddx_aelv_rec.reference3;
4571 p6_a19 := ddx_aelv_rec.reference4;
4572 p6_a20 := ddx_aelv_rec.reference5;
4573 p6_a21 := ddx_aelv_rec.reference6;
4574 p6_a22 := ddx_aelv_rec.reference7;
4575 p6_a23 := ddx_aelv_rec.reference8;
4576 p6_a24 := ddx_aelv_rec.reference9;
4577 p6_a25 := ddx_aelv_rec.reference10;
4578 p6_a26 := ddx_aelv_rec.description;
4579 p6_a27 := rosetta_g_miss_num_map(ddx_aelv_rec.third_party_id);
4580 p6_a28 := rosetta_g_miss_num_map(ddx_aelv_rec.third_party_sub_id);
4581 p6_a29 := rosetta_g_miss_num_map(ddx_aelv_rec.stat_amount);
4582 p6_a30 := ddx_aelv_rec.ussgl_transaction_code;
4583 p6_a31 := rosetta_g_miss_num_map(ddx_aelv_rec.subledger_doc_sequence_id);
4584 p6_a32 := ddx_aelv_rec.accounting_error_code;
4585 p6_a33 := ddx_aelv_rec.gl_transfer_error_code;
4586 p6_a34 := rosetta_g_miss_num_map(ddx_aelv_rec.gl_sl_link_id);
4587 p6_a35 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_entered_dr);
4588 p6_a36 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_entered_cr);
4589 p6_a37 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_accounted_dr);
4590 p6_a38 := rosetta_g_miss_num_map(ddx_aelv_rec.taxable_accounted_cr);
4591 p6_a39 := ddx_aelv_rec.applied_from_trx_hdr_table;
4592 p6_a40 := rosetta_g_miss_num_map(ddx_aelv_rec.applied_from_trx_hdr_id);
4593 p6_a41 := ddx_aelv_rec.applied_to_trx_hdr_table;
4594 p6_a42 := rosetta_g_miss_num_map(ddx_aelv_rec.applied_to_trx_hdr_id);
4595 p6_a43 := rosetta_g_miss_num_map(ddx_aelv_rec.tax_link_id);
4596 p6_a44 := ddx_aelv_rec.currency_code;
4597 p6_a45 := rosetta_g_miss_num_map(ddx_aelv_rec.program_id);
4598 p6_a46 := rosetta_g_miss_num_map(ddx_aelv_rec.program_application_id);
4599 p6_a47 := ddx_aelv_rec.program_update_date;
4600 p6_a48 := rosetta_g_miss_num_map(ddx_aelv_rec.request_id);
4601 p6_a49 := rosetta_g_miss_num_map(ddx_aelv_rec.aeh_tbl_index);
4602 p6_a50 := rosetta_g_miss_num_map(ddx_aelv_rec.created_by);
4603 p6_a51 := ddx_aelv_rec.creation_date;
4604 p6_a52 := rosetta_g_miss_num_map(ddx_aelv_rec.last_updated_by);
4605 p6_a53 := ddx_aelv_rec.last_update_date;
4606 p6_a54 := rosetta_g_miss_num_map(ddx_aelv_rec.last_update_login);
4607 p6_a55 := rosetta_g_miss_num_map(ddx_aelv_rec.account_overlay_source_id);
4608 p6_a56 := rosetta_g_miss_num_map(ddx_aelv_rec.subledger_doc_sequence_value);
4609 p6_a57 := rosetta_g_miss_num_map(ddx_aelv_rec.tax_code_id);
4610 end;
4611
4612 procedure delete_acct_lines(p_api_version NUMBER
4613 , p_init_msg_list VARCHAR2
4614 , x_return_status out nocopy VARCHAR2
4615 , x_msg_count out nocopy NUMBER
4616 , x_msg_data out nocopy VARCHAR2
4617 , p5_a0 JTF_NUMBER_TABLE
4618 , p5_a1 JTF_NUMBER_TABLE
4619 , p5_a2 JTF_NUMBER_TABLE
4620 , p5_a3 JTF_VARCHAR2_TABLE_100
4621 , p5_a4 JTF_NUMBER_TABLE
4622 , p5_a5 JTF_NUMBER_TABLE
4623 , p5_a6 JTF_NUMBER_TABLE
4624 , p5_a7 JTF_VARCHAR2_TABLE_100
4625 , p5_a8 JTF_DATE_TABLE
4626 , p5_a9 JTF_NUMBER_TABLE
4627 , p5_a10 JTF_NUMBER_TABLE
4628 , p5_a11 JTF_NUMBER_TABLE
4629 , p5_a12 JTF_NUMBER_TABLE
4630 , p5_a13 JTF_NUMBER_TABLE
4631 , p5_a14 JTF_VARCHAR2_TABLE_100
4632 , p5_a15 JTF_NUMBER_TABLE
4633 , p5_a16 JTF_VARCHAR2_TABLE_800
4634 , p5_a17 JTF_VARCHAR2_TABLE_800
4635 , p5_a18 JTF_VARCHAR2_TABLE_800
4636 , p5_a19 JTF_VARCHAR2_TABLE_800
4637 , p5_a20 JTF_VARCHAR2_TABLE_800
4638 , p5_a21 JTF_VARCHAR2_TABLE_800
4639 , p5_a22 JTF_VARCHAR2_TABLE_800
4640 , p5_a23 JTF_VARCHAR2_TABLE_800
4641 , p5_a24 JTF_VARCHAR2_TABLE_800
4642 , p5_a25 JTF_VARCHAR2_TABLE_800
4643 , p5_a26 JTF_VARCHAR2_TABLE_800
4644 , p5_a27 JTF_NUMBER_TABLE
4645 , p5_a28 JTF_NUMBER_TABLE
4646 , p5_a29 JTF_NUMBER_TABLE
4647 , p5_a30 JTF_VARCHAR2_TABLE_100
4648 , p5_a31 JTF_NUMBER_TABLE
4649 , p5_a32 JTF_VARCHAR2_TABLE_100
4650 , p5_a33 JTF_VARCHAR2_TABLE_100
4651 , p5_a34 JTF_NUMBER_TABLE
4652 , p5_a35 JTF_NUMBER_TABLE
4653 , p5_a36 JTF_NUMBER_TABLE
4654 , p5_a37 JTF_NUMBER_TABLE
4655 , p5_a38 JTF_NUMBER_TABLE
4656 , p5_a39 JTF_VARCHAR2_TABLE_100
4657 , p5_a40 JTF_NUMBER_TABLE
4658 , p5_a41 JTF_VARCHAR2_TABLE_100
4659 , p5_a42 JTF_NUMBER_TABLE
4660 , p5_a43 JTF_NUMBER_TABLE
4661 , p5_a44 JTF_VARCHAR2_TABLE_100
4662 , p5_a45 JTF_NUMBER_TABLE
4663 , p5_a46 JTF_NUMBER_TABLE
4664 , p5_a47 JTF_DATE_TABLE
4665 , p5_a48 JTF_NUMBER_TABLE
4666 , p5_a49 JTF_NUMBER_TABLE
4667 , p5_a50 JTF_NUMBER_TABLE
4668 , p5_a51 JTF_DATE_TABLE
4669 , p5_a52 JTF_NUMBER_TABLE
4670 , p5_a53 JTF_DATE_TABLE
4671 , p5_a54 JTF_NUMBER_TABLE
4672 , p5_a55 JTF_NUMBER_TABLE
4673 , p5_a56 JTF_NUMBER_TABLE
4674 , p5_a57 JTF_NUMBER_TABLE
4675 )
4676
4677 as
4678 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
4679 ddindx binary_integer; indx binary_integer;
4680 begin
4681
4682 -- copy data to the local IN or IN-OUT args, if any
4683
4684
4685
4686
4687
4688 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p5_a0
4689 , p5_a1
4690 , p5_a2
4691 , p5_a3
4692 , p5_a4
4693 , p5_a5
4694 , p5_a6
4695 , p5_a7
4696 , p5_a8
4697 , p5_a9
4698 , p5_a10
4699 , p5_a11
4700 , p5_a12
4701 , p5_a13
4702 , p5_a14
4703 , p5_a15
4704 , p5_a16
4705 , p5_a17
4706 , p5_a18
4707 , p5_a19
4708 , p5_a20
4709 , p5_a21
4710 , p5_a22
4711 , p5_a23
4712 , p5_a24
4713 , p5_a25
4714 , p5_a26
4715 , p5_a27
4716 , p5_a28
4717 , p5_a29
4718 , p5_a30
4719 , p5_a31
4720 , p5_a32
4721 , p5_a33
4722 , p5_a34
4723 , p5_a35
4724 , p5_a36
4725 , p5_a37
4726 , p5_a38
4727 , p5_a39
4728 , p5_a40
4729 , p5_a41
4730 , p5_a42
4731 , p5_a43
4732 , p5_a44
4733 , p5_a45
4734 , p5_a46
4735 , p5_a47
4736 , p5_a48
4737 , p5_a49
4738 , p5_a50
4739 , p5_a51
4740 , p5_a52
4741 , p5_a53
4742 , p5_a54
4743 , p5_a55
4744 , p5_a56
4745 , p5_a57
4746 );
4747
4748 -- here's the delegated call to the old PL/SQL routine
4749 okl_acct_event_pvt.delete_acct_lines(p_api_version,
4750 p_init_msg_list,
4751 x_return_status,
4752 x_msg_count,
4753 x_msg_data,
4754 ddp_aelv_tbl);
4755
4756 -- copy data back from the local variables to OUT or IN-OUT args, if any
4757
4758
4759
4760
4761
4762 end;
4763
4764 procedure delete_acct_lines(p_api_version NUMBER
4765 , p_init_msg_list VARCHAR2
4766 , x_return_status out nocopy VARCHAR2
4767 , x_msg_count out nocopy NUMBER
4768 , x_msg_data out nocopy VARCHAR2
4769 , p5_a0 NUMBER := 0-1962.0724
4770 , p5_a1 NUMBER := 0-1962.0724
4771 , p5_a2 NUMBER := 0-1962.0724
4772 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
4773 , p5_a4 NUMBER := 0-1962.0724
4774 , p5_a5 NUMBER := 0-1962.0724
4775 , p5_a6 NUMBER := 0-1962.0724
4776 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
4777 , p5_a8 DATE := fnd_api.g_miss_date
4778 , p5_a9 NUMBER := 0-1962.0724
4779 , p5_a10 NUMBER := 0-1962.0724
4780 , p5_a11 NUMBER := 0-1962.0724
4781 , p5_a12 NUMBER := 0-1962.0724
4782 , p5_a13 NUMBER := 0-1962.0724
4783 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
4784 , p5_a15 NUMBER := 0-1962.0724
4785 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
4786 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
4787 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
4788 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
4789 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
4790 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
4791 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
4792 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
4793 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
4794 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
4795 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
4796 , p5_a27 NUMBER := 0-1962.0724
4797 , p5_a28 NUMBER := 0-1962.0724
4798 , p5_a29 NUMBER := 0-1962.0724
4799 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
4800 , p5_a31 NUMBER := 0-1962.0724
4801 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
4802 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
4803 , p5_a34 NUMBER := 0-1962.0724
4804 , p5_a35 NUMBER := 0-1962.0724
4805 , p5_a36 NUMBER := 0-1962.0724
4806 , p5_a37 NUMBER := 0-1962.0724
4807 , p5_a38 NUMBER := 0-1962.0724
4808 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
4809 , p5_a40 NUMBER := 0-1962.0724
4810 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
4811 , p5_a42 NUMBER := 0-1962.0724
4812 , p5_a43 NUMBER := 0-1962.0724
4813 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
4814 , p5_a45 NUMBER := 0-1962.0724
4815 , p5_a46 NUMBER := 0-1962.0724
4816 , p5_a47 DATE := fnd_api.g_miss_date
4817 , p5_a48 NUMBER := 0-1962.0724
4818 , p5_a49 NUMBER := 0-1962.0724
4819 , p5_a50 NUMBER := 0-1962.0724
4820 , p5_a51 DATE := fnd_api.g_miss_date
4821 , p5_a52 NUMBER := 0-1962.0724
4822 , p5_a53 DATE := fnd_api.g_miss_date
4823 , p5_a54 NUMBER := 0-1962.0724
4824 , p5_a55 NUMBER := 0-1962.0724
4825 , p5_a56 NUMBER := 0-1962.0724
4826 , p5_a57 NUMBER := 0-1962.0724
4827 )
4828
4829 as
4830 ddp_aelv_rec okl_acct_event_pvt.aelv_rec_type;
4831 ddindx binary_integer; indx binary_integer;
4832 begin
4833
4834 -- copy data to the local IN or IN-OUT args, if any
4835
4836
4837
4838
4839
4840 ddp_aelv_rec.ae_line_id := rosetta_g_miss_num_map(p5_a0);
4841 ddp_aelv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
4842 ddp_aelv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a2);
4843 ddp_aelv_rec.currency_conversion_type := p5_a3;
4844 ddp_aelv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a4);
4845 ddp_aelv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
4846 ddp_aelv_rec.ae_line_number := rosetta_g_miss_num_map(p5_a6);
4847 ddp_aelv_rec.ae_line_type_code := p5_a7;
4848 ddp_aelv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a8);
4849 ddp_aelv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a9);
4850 ddp_aelv_rec.entered_dr := rosetta_g_miss_num_map(p5_a10);
4851 ddp_aelv_rec.entered_cr := rosetta_g_miss_num_map(p5_a11);
4852 ddp_aelv_rec.accounted_dr := rosetta_g_miss_num_map(p5_a12);
4853 ddp_aelv_rec.accounted_cr := rosetta_g_miss_num_map(p5_a13);
4854 ddp_aelv_rec.source_table := p5_a14;
4855 ddp_aelv_rec.source_id := rosetta_g_miss_num_map(p5_a15);
4856 ddp_aelv_rec.reference1 := p5_a16;
4857 ddp_aelv_rec.reference2 := p5_a17;
4858 ddp_aelv_rec.reference3 := p5_a18;
4859 ddp_aelv_rec.reference4 := p5_a19;
4860 ddp_aelv_rec.reference5 := p5_a20;
4861 ddp_aelv_rec.reference6 := p5_a21;
4862 ddp_aelv_rec.reference7 := p5_a22;
4863 ddp_aelv_rec.reference8 := p5_a23;
4864 ddp_aelv_rec.reference9 := p5_a24;
4865 ddp_aelv_rec.reference10 := p5_a25;
4866 ddp_aelv_rec.description := p5_a26;
4867 ddp_aelv_rec.third_party_id := rosetta_g_miss_num_map(p5_a27);
4868 ddp_aelv_rec.third_party_sub_id := rosetta_g_miss_num_map(p5_a28);
4869 ddp_aelv_rec.stat_amount := rosetta_g_miss_num_map(p5_a29);
4870 ddp_aelv_rec.ussgl_transaction_code := p5_a30;
4871 ddp_aelv_rec.subledger_doc_sequence_id := rosetta_g_miss_num_map(p5_a31);
4872 ddp_aelv_rec.accounting_error_code := p5_a32;
4873 ddp_aelv_rec.gl_transfer_error_code := p5_a33;
4874 ddp_aelv_rec.gl_sl_link_id := rosetta_g_miss_num_map(p5_a34);
4875 ddp_aelv_rec.taxable_entered_dr := rosetta_g_miss_num_map(p5_a35);
4876 ddp_aelv_rec.taxable_entered_cr := rosetta_g_miss_num_map(p5_a36);
4877 ddp_aelv_rec.taxable_accounted_dr := rosetta_g_miss_num_map(p5_a37);
4878 ddp_aelv_rec.taxable_accounted_cr := rosetta_g_miss_num_map(p5_a38);
4879 ddp_aelv_rec.applied_from_trx_hdr_table := p5_a39;
4880 ddp_aelv_rec.applied_from_trx_hdr_id := rosetta_g_miss_num_map(p5_a40);
4881 ddp_aelv_rec.applied_to_trx_hdr_table := p5_a41;
4882 ddp_aelv_rec.applied_to_trx_hdr_id := rosetta_g_miss_num_map(p5_a42);
4883 ddp_aelv_rec.tax_link_id := rosetta_g_miss_num_map(p5_a43);
4884 ddp_aelv_rec.currency_code := p5_a44;
4885 ddp_aelv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
4886 ddp_aelv_rec.program_application_id := rosetta_g_miss_num_map(p5_a46);
4887 ddp_aelv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a47);
4888 ddp_aelv_rec.request_id := rosetta_g_miss_num_map(p5_a48);
4889 ddp_aelv_rec.aeh_tbl_index := rosetta_g_miss_num_map(p5_a49);
4890 ddp_aelv_rec.created_by := rosetta_g_miss_num_map(p5_a50);
4891 ddp_aelv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
4892 ddp_aelv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a52);
4893 ddp_aelv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a53);
4894 ddp_aelv_rec.last_update_login := rosetta_g_miss_num_map(p5_a54);
4895 ddp_aelv_rec.account_overlay_source_id := rosetta_g_miss_num_map(p5_a55);
4896 ddp_aelv_rec.subledger_doc_sequence_value := rosetta_g_miss_num_map(p5_a56);
4897 ddp_aelv_rec.tax_code_id := rosetta_g_miss_num_map(p5_a57);
4898
4899 -- here's the delegated call to the old PL/SQL routine
4900 okl_acct_event_pvt.delete_acct_lines(p_api_version,
4901 p_init_msg_list,
4902 x_return_status,
4903 x_msg_count,
4904 x_msg_data,
4905 ddp_aelv_rec);
4906
4907 -- copy data back from the local variables to OUT or IN-OUT args, if any
4908
4909
4910
4911
4912
4913 end;
4914
4915 procedure validate_acct_lines(p_api_version NUMBER
4916 , p_init_msg_list VARCHAR2
4917 , x_return_status out nocopy VARCHAR2
4918 , x_msg_count out nocopy NUMBER
4919 , x_msg_data out nocopy VARCHAR2
4920 , p5_a0 JTF_NUMBER_TABLE
4921 , p5_a1 JTF_NUMBER_TABLE
4922 , p5_a2 JTF_NUMBER_TABLE
4923 , p5_a3 JTF_VARCHAR2_TABLE_100
4924 , p5_a4 JTF_NUMBER_TABLE
4925 , p5_a5 JTF_NUMBER_TABLE
4926 , p5_a6 JTF_NUMBER_TABLE
4927 , p5_a7 JTF_VARCHAR2_TABLE_100
4928 , p5_a8 JTF_DATE_TABLE
4929 , p5_a9 JTF_NUMBER_TABLE
4930 , p5_a10 JTF_NUMBER_TABLE
4931 , p5_a11 JTF_NUMBER_TABLE
4932 , p5_a12 JTF_NUMBER_TABLE
4933 , p5_a13 JTF_NUMBER_TABLE
4934 , p5_a14 JTF_VARCHAR2_TABLE_100
4935 , p5_a15 JTF_NUMBER_TABLE
4936 , p5_a16 JTF_VARCHAR2_TABLE_800
4937 , p5_a17 JTF_VARCHAR2_TABLE_800
4938 , p5_a18 JTF_VARCHAR2_TABLE_800
4939 , p5_a19 JTF_VARCHAR2_TABLE_800
4940 , p5_a20 JTF_VARCHAR2_TABLE_800
4941 , p5_a21 JTF_VARCHAR2_TABLE_800
4942 , p5_a22 JTF_VARCHAR2_TABLE_800
4943 , p5_a23 JTF_VARCHAR2_TABLE_800
4944 , p5_a24 JTF_VARCHAR2_TABLE_800
4945 , p5_a25 JTF_VARCHAR2_TABLE_800
4946 , p5_a26 JTF_VARCHAR2_TABLE_800
4947 , p5_a27 JTF_NUMBER_TABLE
4948 , p5_a28 JTF_NUMBER_TABLE
4949 , p5_a29 JTF_NUMBER_TABLE
4950 , p5_a30 JTF_VARCHAR2_TABLE_100
4951 , p5_a31 JTF_NUMBER_TABLE
4952 , p5_a32 JTF_VARCHAR2_TABLE_100
4953 , p5_a33 JTF_VARCHAR2_TABLE_100
4954 , p5_a34 JTF_NUMBER_TABLE
4955 , p5_a35 JTF_NUMBER_TABLE
4956 , p5_a36 JTF_NUMBER_TABLE
4957 , p5_a37 JTF_NUMBER_TABLE
4958 , p5_a38 JTF_NUMBER_TABLE
4959 , p5_a39 JTF_VARCHAR2_TABLE_100
4960 , p5_a40 JTF_NUMBER_TABLE
4961 , p5_a41 JTF_VARCHAR2_TABLE_100
4962 , p5_a42 JTF_NUMBER_TABLE
4963 , p5_a43 JTF_NUMBER_TABLE
4964 , p5_a44 JTF_VARCHAR2_TABLE_100
4965 , p5_a45 JTF_NUMBER_TABLE
4966 , p5_a46 JTF_NUMBER_TABLE
4967 , p5_a47 JTF_DATE_TABLE
4968 , p5_a48 JTF_NUMBER_TABLE
4969 , p5_a49 JTF_NUMBER_TABLE
4970 , p5_a50 JTF_NUMBER_TABLE
4971 , p5_a51 JTF_DATE_TABLE
4972 , p5_a52 JTF_NUMBER_TABLE
4973 , p5_a53 JTF_DATE_TABLE
4974 , p5_a54 JTF_NUMBER_TABLE
4975 , p5_a55 JTF_NUMBER_TABLE
4976 , p5_a56 JTF_NUMBER_TABLE
4977 , p5_a57 JTF_NUMBER_TABLE
4978 )
4979
4980 as
4981 ddp_aelv_tbl okl_acct_event_pvt.aelv_tbl_type;
4982 ddindx binary_integer; indx binary_integer;
4983 begin
4984
4985 -- copy data to the local IN or IN-OUT args, if any
4986
4987
4988
4989
4990
4991 okl_ael_pvt_w.rosetta_table_copy_in_p5(ddp_aelv_tbl, p5_a0
4992 , p5_a1
4993 , p5_a2
4994 , p5_a3
4995 , p5_a4
4996 , p5_a5
4997 , p5_a6
4998 , p5_a7
4999 , p5_a8
5000 , p5_a9
5001 , p5_a10
5002 , p5_a11
5003 , p5_a12
5004 , p5_a13
5005 , p5_a14
5006 , p5_a15
5007 , p5_a16
5008 , p5_a17
5009 , p5_a18
5010 , p5_a19
5011 , p5_a20
5012 , p5_a21
5013 , p5_a22
5014 , p5_a23
5015 , p5_a24
5016 , p5_a25
5017 , p5_a26
5018 , p5_a27
5019 , p5_a28
5020 , p5_a29
5021 , p5_a30
5022 , p5_a31
5023 , p5_a32
5024 , p5_a33
5025 , p5_a34
5026 , p5_a35
5027 , p5_a36
5028 , p5_a37
5029 , p5_a38
5030 , p5_a39
5031 , p5_a40
5032 , p5_a41
5033 , p5_a42
5034 , p5_a43
5035 , p5_a44
5036 , p5_a45
5037 , p5_a46
5038 , p5_a47
5039 , p5_a48
5040 , p5_a49
5041 , p5_a50
5042 , p5_a51
5043 , p5_a52
5044 , p5_a53
5045 , p5_a54
5046 , p5_a55
5047 , p5_a56
5048 , p5_a57
5049 );
5050
5051 -- here's the delegated call to the old PL/SQL routine
5052 okl_acct_event_pvt.validate_acct_lines(p_api_version,
5053 p_init_msg_list,
5054 x_return_status,
5055 x_msg_count,
5056 x_msg_data,
5057 ddp_aelv_tbl);
5058
5059 -- copy data back from the local variables to OUT or IN-OUT args, if any
5060
5061
5062
5063
5064
5065 end;
5066
5067 procedure validate_acct_lines(p_api_version NUMBER
5068 , p_init_msg_list VARCHAR2
5069 , x_return_status out nocopy VARCHAR2
5070 , x_msg_count out nocopy NUMBER
5071 , x_msg_data out nocopy VARCHAR2
5072 , p5_a0 NUMBER := 0-1962.0724
5073 , p5_a1 NUMBER := 0-1962.0724
5074 , p5_a2 NUMBER := 0-1962.0724
5075 , p5_a3 VARCHAR2 := fnd_api.g_miss_char
5076 , p5_a4 NUMBER := 0-1962.0724
5077 , p5_a5 NUMBER := 0-1962.0724
5078 , p5_a6 NUMBER := 0-1962.0724
5079 , p5_a7 VARCHAR2 := fnd_api.g_miss_char
5080 , p5_a8 DATE := fnd_api.g_miss_date
5081 , p5_a9 NUMBER := 0-1962.0724
5082 , p5_a10 NUMBER := 0-1962.0724
5083 , p5_a11 NUMBER := 0-1962.0724
5084 , p5_a12 NUMBER := 0-1962.0724
5085 , p5_a13 NUMBER := 0-1962.0724
5086 , p5_a14 VARCHAR2 := fnd_api.g_miss_char
5087 , p5_a15 NUMBER := 0-1962.0724
5088 , p5_a16 VARCHAR2 := fnd_api.g_miss_char
5089 , p5_a17 VARCHAR2 := fnd_api.g_miss_char
5090 , p5_a18 VARCHAR2 := fnd_api.g_miss_char
5091 , p5_a19 VARCHAR2 := fnd_api.g_miss_char
5092 , p5_a20 VARCHAR2 := fnd_api.g_miss_char
5093 , p5_a21 VARCHAR2 := fnd_api.g_miss_char
5094 , p5_a22 VARCHAR2 := fnd_api.g_miss_char
5095 , p5_a23 VARCHAR2 := fnd_api.g_miss_char
5096 , p5_a24 VARCHAR2 := fnd_api.g_miss_char
5097 , p5_a25 VARCHAR2 := fnd_api.g_miss_char
5098 , p5_a26 VARCHAR2 := fnd_api.g_miss_char
5099 , p5_a27 NUMBER := 0-1962.0724
5100 , p5_a28 NUMBER := 0-1962.0724
5101 , p5_a29 NUMBER := 0-1962.0724
5102 , p5_a30 VARCHAR2 := fnd_api.g_miss_char
5103 , p5_a31 NUMBER := 0-1962.0724
5104 , p5_a32 VARCHAR2 := fnd_api.g_miss_char
5105 , p5_a33 VARCHAR2 := fnd_api.g_miss_char
5106 , p5_a34 NUMBER := 0-1962.0724
5107 , p5_a35 NUMBER := 0-1962.0724
5108 , p5_a36 NUMBER := 0-1962.0724
5109 , p5_a37 NUMBER := 0-1962.0724
5110 , p5_a38 NUMBER := 0-1962.0724
5111 , p5_a39 VARCHAR2 := fnd_api.g_miss_char
5112 , p5_a40 NUMBER := 0-1962.0724
5113 , p5_a41 VARCHAR2 := fnd_api.g_miss_char
5114 , p5_a42 NUMBER := 0-1962.0724
5115 , p5_a43 NUMBER := 0-1962.0724
5116 , p5_a44 VARCHAR2 := fnd_api.g_miss_char
5117 , p5_a45 NUMBER := 0-1962.0724
5118 , p5_a46 NUMBER := 0-1962.0724
5119 , p5_a47 DATE := fnd_api.g_miss_date
5120 , p5_a48 NUMBER := 0-1962.0724
5121 , p5_a49 NUMBER := 0-1962.0724
5122 , p5_a50 NUMBER := 0-1962.0724
5123 , p5_a51 DATE := fnd_api.g_miss_date
5124 , p5_a52 NUMBER := 0-1962.0724
5125 , p5_a53 DATE := fnd_api.g_miss_date
5126 , p5_a54 NUMBER := 0-1962.0724
5127 , p5_a55 NUMBER := 0-1962.0724
5128 , p5_a56 NUMBER := 0-1962.0724
5129 , p5_a57 NUMBER := 0-1962.0724
5130 )
5131
5132 as
5133 ddp_aelv_rec okl_acct_event_pvt.aelv_rec_type;
5134 ddindx binary_integer; indx binary_integer;
5135 begin
5136
5137 -- copy data to the local IN or IN-OUT args, if any
5138
5139
5140
5141
5142
5143 ddp_aelv_rec.ae_line_id := rosetta_g_miss_num_map(p5_a0);
5144 ddp_aelv_rec.object_version_number := rosetta_g_miss_num_map(p5_a1);
5145 ddp_aelv_rec.ae_header_id := rosetta_g_miss_num_map(p5_a2);
5146 ddp_aelv_rec.currency_conversion_type := p5_a3;
5147 ddp_aelv_rec.code_combination_id := rosetta_g_miss_num_map(p5_a4);
5148 ddp_aelv_rec.org_id := rosetta_g_miss_num_map(p5_a5);
5149 ddp_aelv_rec.ae_line_number := rosetta_g_miss_num_map(p5_a6);
5150 ddp_aelv_rec.ae_line_type_code := p5_a7;
5151 ddp_aelv_rec.currency_conversion_date := rosetta_g_miss_date_in_map(p5_a8);
5152 ddp_aelv_rec.currency_conversion_rate := rosetta_g_miss_num_map(p5_a9);
5153 ddp_aelv_rec.entered_dr := rosetta_g_miss_num_map(p5_a10);
5154 ddp_aelv_rec.entered_cr := rosetta_g_miss_num_map(p5_a11);
5155 ddp_aelv_rec.accounted_dr := rosetta_g_miss_num_map(p5_a12);
5156 ddp_aelv_rec.accounted_cr := rosetta_g_miss_num_map(p5_a13);
5157 ddp_aelv_rec.source_table := p5_a14;
5158 ddp_aelv_rec.source_id := rosetta_g_miss_num_map(p5_a15);
5159 ddp_aelv_rec.reference1 := p5_a16;
5160 ddp_aelv_rec.reference2 := p5_a17;
5161 ddp_aelv_rec.reference3 := p5_a18;
5162 ddp_aelv_rec.reference4 := p5_a19;
5163 ddp_aelv_rec.reference5 := p5_a20;
5164 ddp_aelv_rec.reference6 := p5_a21;
5165 ddp_aelv_rec.reference7 := p5_a22;
5166 ddp_aelv_rec.reference8 := p5_a23;
5167 ddp_aelv_rec.reference9 := p5_a24;
5168 ddp_aelv_rec.reference10 := p5_a25;
5169 ddp_aelv_rec.description := p5_a26;
5170 ddp_aelv_rec.third_party_id := rosetta_g_miss_num_map(p5_a27);
5171 ddp_aelv_rec.third_party_sub_id := rosetta_g_miss_num_map(p5_a28);
5172 ddp_aelv_rec.stat_amount := rosetta_g_miss_num_map(p5_a29);
5173 ddp_aelv_rec.ussgl_transaction_code := p5_a30;
5174 ddp_aelv_rec.subledger_doc_sequence_id := rosetta_g_miss_num_map(p5_a31);
5175 ddp_aelv_rec.accounting_error_code := p5_a32;
5176 ddp_aelv_rec.gl_transfer_error_code := p5_a33;
5177 ddp_aelv_rec.gl_sl_link_id := rosetta_g_miss_num_map(p5_a34);
5178 ddp_aelv_rec.taxable_entered_dr := rosetta_g_miss_num_map(p5_a35);
5179 ddp_aelv_rec.taxable_entered_cr := rosetta_g_miss_num_map(p5_a36);
5180 ddp_aelv_rec.taxable_accounted_dr := rosetta_g_miss_num_map(p5_a37);
5181 ddp_aelv_rec.taxable_accounted_cr := rosetta_g_miss_num_map(p5_a38);
5182 ddp_aelv_rec.applied_from_trx_hdr_table := p5_a39;
5183 ddp_aelv_rec.applied_from_trx_hdr_id := rosetta_g_miss_num_map(p5_a40);
5184 ddp_aelv_rec.applied_to_trx_hdr_table := p5_a41;
5185 ddp_aelv_rec.applied_to_trx_hdr_id := rosetta_g_miss_num_map(p5_a42);
5186 ddp_aelv_rec.tax_link_id := rosetta_g_miss_num_map(p5_a43);
5187 ddp_aelv_rec.currency_code := p5_a44;
5188 ddp_aelv_rec.program_id := rosetta_g_miss_num_map(p5_a45);
5189 ddp_aelv_rec.program_application_id := rosetta_g_miss_num_map(p5_a46);
5190 ddp_aelv_rec.program_update_date := rosetta_g_miss_date_in_map(p5_a47);
5191 ddp_aelv_rec.request_id := rosetta_g_miss_num_map(p5_a48);
5192 ddp_aelv_rec.aeh_tbl_index := rosetta_g_miss_num_map(p5_a49);
5193 ddp_aelv_rec.created_by := rosetta_g_miss_num_map(p5_a50);
5194 ddp_aelv_rec.creation_date := rosetta_g_miss_date_in_map(p5_a51);
5195 ddp_aelv_rec.last_updated_by := rosetta_g_miss_num_map(p5_a52);
5196 ddp_aelv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a53);
5197 ddp_aelv_rec.last_update_login := rosetta_g_miss_num_map(p5_a54);
5198 ddp_aelv_rec.account_overlay_source_id := rosetta_g_miss_num_map(p5_a55);
5199 ddp_aelv_rec.subledger_doc_sequence_value := rosetta_g_miss_num_map(p5_a56);
5200 ddp_aelv_rec.tax_code_id := rosetta_g_miss_num_map(p5_a57);
5201
5202 -- here's the delegated call to the old PL/SQL routine
5203 okl_acct_event_pvt.validate_acct_lines(p_api_version,
5204 p_init_msg_list,
5205 x_return_status,
5206 x_msg_count,
5207 x_msg_data,
5208 ddp_aelv_rec);
5209
5210 -- copy data back from the local variables to OUT or IN-OUT args, if any
5211
5212
5213
5214
5215
5216 end;
5217
5218 end okl_acct_event_pvt_w;