[Home] [Help]
PACKAGE BODY: APPS.OKL_REPORT_PVT_W
Source
1 package body okl_report_pvt_w as
2 /* $Header: OKLEREPB.pls 120.0 2007/12/10 18:27:42 dcshanmu noship $ */
3 procedure create_report(p_api_version NUMBER
4 , p_init_msg_list VARCHAR2
5 , x_return_status out nocopy VARCHAR2
6 , x_msg_count out nocopy NUMBER
7 , x_msg_data out nocopy VARCHAR2
8 , p5_a0 NUMBER
9 , p5_a1 VARCHAR2
10 , p5_a2 NUMBER
11 , p5_a3 VARCHAR2
12 , p5_a4 NUMBER
13 , p5_a5 VARCHAR2
14 , p5_a6 VARCHAR2
15 , p5_a7 VARCHAR2
16 , p5_a8 VARCHAR2
17 , p5_a9 VARCHAR2
18 , p5_a10 DATE
19 , p5_a11 DATE
20 , p5_a12 NUMBER
21 , p5_a13 DATE
22 , p5_a14 NUMBER
23 , p5_a15 DATE
24 , p5_a16 NUMBER
25 , p5_a17 VARCHAR2
26 , p5_a18 VARCHAR2
27 , p5_a19 VARCHAR2
28 , p6_a0 out nocopy NUMBER
29 , p6_a1 out nocopy VARCHAR2
30 , p6_a2 out nocopy NUMBER
31 , p6_a3 out nocopy VARCHAR2
32 , p6_a4 out nocopy NUMBER
33 , p6_a5 out nocopy VARCHAR2
34 , p6_a6 out nocopy VARCHAR2
35 , p6_a7 out nocopy VARCHAR2
36 , p6_a8 out nocopy VARCHAR2
37 , p6_a9 out nocopy VARCHAR2
38 , p6_a10 out nocopy DATE
39 , p6_a11 out nocopy DATE
40 , p6_a12 out nocopy NUMBER
41 , p6_a13 out nocopy DATE
42 , p6_a14 out nocopy NUMBER
43 , p6_a15 out nocopy DATE
44 , p6_a16 out nocopy NUMBER
45 , p6_a17 out nocopy VARCHAR2
46 , p6_a18 out nocopy VARCHAR2
47 , p6_a19 out nocopy VARCHAR2
48 )
49
50 as
51 ddp_repv_rec okl_report_pvt.repv_rec_type;
52 ddx_repv_rec okl_report_pvt.repv_rec_type;
53 ddindx binary_integer; indx binary_integer;
54 begin
55
56 -- copy data to the local IN or IN-OUT args, if any
57
58
59
60
61
62 ddp_repv_rec.report_id := p5_a0;
63 ddp_repv_rec.name := p5_a1;
64 ddp_repv_rec.chart_of_accounts_id := p5_a2;
65 ddp_repv_rec.book_classification_code := p5_a3;
66 ddp_repv_rec.ledger_id := p5_a4;
67 ddp_repv_rec.report_category_code := p5_a5;
68 ddp_repv_rec.report_type_code := p5_a6;
69 ddp_repv_rec.activity_code := p5_a7;
70 ddp_repv_rec.status_code := p5_a8;
71 ddp_repv_rec.description := p5_a9;
72 ddp_repv_rec.effective_from_date := p5_a10;
73 ddp_repv_rec.effective_to_date := p5_a11;
74 ddp_repv_rec.created_by := p5_a12;
75 ddp_repv_rec.creation_date := p5_a13;
76 ddp_repv_rec.last_updated_by := p5_a14;
77 ddp_repv_rec.last_update_date := p5_a15;
78 ddp_repv_rec.last_update_login := p5_a16;
79 ddp_repv_rec.language := p5_a17;
80 ddp_repv_rec.source_lang := p5_a18;
81 ddp_repv_rec.sfwt_flag := p5_a19;
82
83
84 -- here's the delegated call to the old PL/SQL routine
85 okl_report_pvt.create_report(p_api_version,
86 p_init_msg_list,
87 x_return_status,
88 x_msg_count,
89 x_msg_data,
90 ddp_repv_rec,
91 ddx_repv_rec);
92
93 -- copy data back from the local variables to OUT or IN-OUT args, if any
94
95
96
97
98
99
100 p6_a0 := ddx_repv_rec.report_id;
101 p6_a1 := ddx_repv_rec.name;
102 p6_a2 := ddx_repv_rec.chart_of_accounts_id;
103 p6_a3 := ddx_repv_rec.book_classification_code;
104 p6_a4 := ddx_repv_rec.ledger_id;
105 p6_a5 := ddx_repv_rec.report_category_code;
106 p6_a6 := ddx_repv_rec.report_type_code;
107 p6_a7 := ddx_repv_rec.activity_code;
108 p6_a8 := ddx_repv_rec.status_code;
109 p6_a9 := ddx_repv_rec.description;
110 p6_a10 := ddx_repv_rec.effective_from_date;
111 p6_a11 := ddx_repv_rec.effective_to_date;
112 p6_a12 := ddx_repv_rec.created_by;
113 p6_a13 := ddx_repv_rec.creation_date;
114 p6_a14 := ddx_repv_rec.last_updated_by;
115 p6_a15 := ddx_repv_rec.last_update_date;
116 p6_a16 := ddx_repv_rec.last_update_login;
117 p6_a17 := ddx_repv_rec.language;
118 p6_a18 := ddx_repv_rec.source_lang;
119 p6_a19 := ddx_repv_rec.sfwt_flag;
120 end;
121
122 procedure update_report(p_api_version NUMBER
123 , p_init_msg_list VARCHAR2
124 , x_return_status out nocopy VARCHAR2
125 , x_msg_count out nocopy NUMBER
126 , x_msg_data out nocopy VARCHAR2
127 , p5_a0 NUMBER
128 , p5_a1 VARCHAR2
129 , p5_a2 NUMBER
130 , p5_a3 VARCHAR2
131 , p5_a4 NUMBER
132 , p5_a5 VARCHAR2
133 , p5_a6 VARCHAR2
134 , p5_a7 VARCHAR2
135 , p5_a8 VARCHAR2
136 , p5_a9 VARCHAR2
137 , p5_a10 DATE
138 , p5_a11 DATE
139 , p5_a12 NUMBER
140 , p5_a13 DATE
141 , p5_a14 NUMBER
142 , p5_a15 DATE
143 , p5_a16 NUMBER
144 , p5_a17 VARCHAR2
145 , p5_a18 VARCHAR2
146 , p5_a19 VARCHAR2
147 , p6_a0 out nocopy NUMBER
148 , p6_a1 out nocopy VARCHAR2
149 , p6_a2 out nocopy NUMBER
150 , p6_a3 out nocopy VARCHAR2
151 , p6_a4 out nocopy NUMBER
152 , p6_a5 out nocopy VARCHAR2
153 , p6_a6 out nocopy VARCHAR2
154 , p6_a7 out nocopy VARCHAR2
155 , p6_a8 out nocopy VARCHAR2
156 , p6_a9 out nocopy VARCHAR2
157 , p6_a10 out nocopy DATE
158 , p6_a11 out nocopy DATE
159 , p6_a12 out nocopy NUMBER
160 , p6_a13 out nocopy DATE
161 , p6_a14 out nocopy NUMBER
162 , p6_a15 out nocopy DATE
163 , p6_a16 out nocopy NUMBER
164 , p6_a17 out nocopy VARCHAR2
165 , p6_a18 out nocopy VARCHAR2
166 , p6_a19 out nocopy VARCHAR2
167 )
168
169 as
170 ddp_repv_rec okl_report_pvt.repv_rec_type;
171 ddx_repv_rec okl_report_pvt.repv_rec_type;
172 ddindx binary_integer; indx binary_integer;
173 begin
174
175 -- copy data to the local IN or IN-OUT args, if any
176
177
178
179
180
181 ddp_repv_rec.report_id := p5_a0;
182 ddp_repv_rec.name := p5_a1;
183 ddp_repv_rec.chart_of_accounts_id := p5_a2;
184 ddp_repv_rec.book_classification_code := p5_a3;
185 ddp_repv_rec.ledger_id := p5_a4;
186 ddp_repv_rec.report_category_code := p5_a5;
187 ddp_repv_rec.report_type_code := p5_a6;
188 ddp_repv_rec.activity_code := p5_a7;
189 ddp_repv_rec.status_code := p5_a8;
190 ddp_repv_rec.description := p5_a9;
191 ddp_repv_rec.effective_from_date := p5_a10;
192 ddp_repv_rec.effective_to_date := p5_a11;
193 ddp_repv_rec.created_by := p5_a12;
194 ddp_repv_rec.creation_date := p5_a13;
195 ddp_repv_rec.last_updated_by := p5_a14;
196 ddp_repv_rec.last_update_date := p5_a15;
197 ddp_repv_rec.last_update_login := p5_a16;
198 ddp_repv_rec.language := p5_a17;
199 ddp_repv_rec.source_lang := p5_a18;
200 ddp_repv_rec.sfwt_flag := p5_a19;
201
202
203 -- here's the delegated call to the old PL/SQL routine
204 okl_report_pvt.update_report(p_api_version,
205 p_init_msg_list,
206 x_return_status,
207 x_msg_count,
208 x_msg_data,
209 ddp_repv_rec,
210 ddx_repv_rec);
211
212 -- copy data back from the local variables to OUT or IN-OUT args, if any
213
214
215
216
217
218
219 p6_a0 := ddx_repv_rec.report_id;
220 p6_a1 := ddx_repv_rec.name;
221 p6_a2 := ddx_repv_rec.chart_of_accounts_id;
222 p6_a3 := ddx_repv_rec.book_classification_code;
223 p6_a4 := ddx_repv_rec.ledger_id;
224 p6_a5 := ddx_repv_rec.report_category_code;
225 p6_a6 := ddx_repv_rec.report_type_code;
226 p6_a7 := ddx_repv_rec.activity_code;
227 p6_a8 := ddx_repv_rec.status_code;
228 p6_a9 := ddx_repv_rec.description;
229 p6_a10 := ddx_repv_rec.effective_from_date;
230 p6_a11 := ddx_repv_rec.effective_to_date;
231 p6_a12 := ddx_repv_rec.created_by;
232 p6_a13 := ddx_repv_rec.creation_date;
233 p6_a14 := ddx_repv_rec.last_updated_by;
234 p6_a15 := ddx_repv_rec.last_update_date;
235 p6_a16 := ddx_repv_rec.last_update_login;
236 p6_a17 := ddx_repv_rec.language;
237 p6_a18 := ddx_repv_rec.source_lang;
238 p6_a19 := ddx_repv_rec.sfwt_flag;
239 end;
240
241 procedure delete_report(p_api_version NUMBER
242 , p_init_msg_list VARCHAR2
243 , x_return_status out nocopy VARCHAR2
244 , x_msg_count out nocopy NUMBER
245 , x_msg_data out nocopy VARCHAR2
246 , p5_a0 NUMBER
247 , p5_a1 VARCHAR2
248 , p5_a2 NUMBER
249 , p5_a3 VARCHAR2
250 , p5_a4 NUMBER
251 , p5_a5 VARCHAR2
252 , p5_a6 VARCHAR2
253 , p5_a7 VARCHAR2
254 , p5_a8 VARCHAR2
255 , p5_a9 VARCHAR2
256 , p5_a10 DATE
257 , p5_a11 DATE
258 , p5_a12 NUMBER
259 , p5_a13 DATE
260 , p5_a14 NUMBER
261 , p5_a15 DATE
262 , p5_a16 NUMBER
263 , p5_a17 VARCHAR2
264 , p5_a18 VARCHAR2
265 , p5_a19 VARCHAR2
266 )
267
268 as
269 ddp_repv_rec okl_report_pvt.repv_rec_type;
270 ddindx binary_integer; indx binary_integer;
271 begin
272
273 -- copy data to the local IN or IN-OUT args, if any
274
275
276
277
278
279 ddp_repv_rec.report_id := p5_a0;
280 ddp_repv_rec.name := p5_a1;
281 ddp_repv_rec.chart_of_accounts_id := p5_a2;
282 ddp_repv_rec.book_classification_code := p5_a3;
283 ddp_repv_rec.ledger_id := p5_a4;
284 ddp_repv_rec.report_category_code := p5_a5;
285 ddp_repv_rec.report_type_code := p5_a6;
286 ddp_repv_rec.activity_code := p5_a7;
287 ddp_repv_rec.status_code := p5_a8;
288 ddp_repv_rec.description := p5_a9;
289 ddp_repv_rec.effective_from_date := p5_a10;
290 ddp_repv_rec.effective_to_date := p5_a11;
291 ddp_repv_rec.created_by := p5_a12;
292 ddp_repv_rec.creation_date := p5_a13;
293 ddp_repv_rec.last_updated_by := p5_a14;
294 ddp_repv_rec.last_update_date := p5_a15;
295 ddp_repv_rec.last_update_login := p5_a16;
296 ddp_repv_rec.language := p5_a17;
297 ddp_repv_rec.source_lang := p5_a18;
298 ddp_repv_rec.sfwt_flag := p5_a19;
299
300 -- here's the delegated call to the old PL/SQL routine
301 okl_report_pvt.delete_report(p_api_version,
302 p_init_msg_list,
303 x_return_status,
304 x_msg_count,
305 x_msg_data,
306 ddp_repv_rec);
307
308 -- copy data back from the local variables to OUT or IN-OUT args, if any
309
310
311
312
313
314 end;
315
316 procedure lock_report(p_api_version NUMBER
317 , p_init_msg_list VARCHAR2
318 , x_return_status out nocopy VARCHAR2
319 , x_msg_count out nocopy NUMBER
320 , x_msg_data out nocopy VARCHAR2
321 , p5_a0 NUMBER
322 , p5_a1 VARCHAR2
323 , p5_a2 NUMBER
324 , p5_a3 VARCHAR2
325 , p5_a4 NUMBER
326 , p5_a5 VARCHAR2
327 , p5_a6 VARCHAR2
328 , p5_a7 VARCHAR2
329 , p5_a8 VARCHAR2
330 , p5_a9 VARCHAR2
331 , p5_a10 DATE
332 , p5_a11 DATE
333 , p5_a12 NUMBER
334 , p5_a13 DATE
335 , p5_a14 NUMBER
336 , p5_a15 DATE
337 , p5_a16 NUMBER
338 , p5_a17 VARCHAR2
339 , p5_a18 VARCHAR2
340 , p5_a19 VARCHAR2
341 )
342
343 as
344 ddp_repv_rec okl_report_pvt.repv_rec_type;
345 ddindx binary_integer; indx binary_integer;
346 begin
347
348 -- copy data to the local IN or IN-OUT args, if any
349
350
351
352
353
354 ddp_repv_rec.report_id := p5_a0;
355 ddp_repv_rec.name := p5_a1;
356 ddp_repv_rec.chart_of_accounts_id := p5_a2;
357 ddp_repv_rec.book_classification_code := p5_a3;
358 ddp_repv_rec.ledger_id := p5_a4;
359 ddp_repv_rec.report_category_code := p5_a5;
360 ddp_repv_rec.report_type_code := p5_a6;
361 ddp_repv_rec.activity_code := p5_a7;
362 ddp_repv_rec.status_code := p5_a8;
363 ddp_repv_rec.description := p5_a9;
364 ddp_repv_rec.effective_from_date := p5_a10;
365 ddp_repv_rec.effective_to_date := p5_a11;
366 ddp_repv_rec.created_by := p5_a12;
367 ddp_repv_rec.creation_date := p5_a13;
368 ddp_repv_rec.last_updated_by := p5_a14;
369 ddp_repv_rec.last_update_date := p5_a15;
370 ddp_repv_rec.last_update_login := p5_a16;
371 ddp_repv_rec.language := p5_a17;
372 ddp_repv_rec.source_lang := p5_a18;
373 ddp_repv_rec.sfwt_flag := p5_a19;
374
375 -- here's the delegated call to the old PL/SQL routine
376 okl_report_pvt.lock_report(p_api_version,
377 p_init_msg_list,
378 x_return_status,
379 x_msg_count,
380 x_msg_data,
381 ddp_repv_rec);
382
383 -- copy data back from the local variables to OUT or IN-OUT args, if any
384
385
386
387
388
389 end;
390
391 procedure create_report(p_api_version NUMBER
392 , p_init_msg_list VARCHAR2
393 , x_return_status out nocopy VARCHAR2
394 , x_msg_count out nocopy NUMBER
395 , x_msg_data out nocopy VARCHAR2
396 , p5_a0 JTF_NUMBER_TABLE
397 , p5_a1 JTF_VARCHAR2_TABLE_300
398 , p5_a2 JTF_NUMBER_TABLE
399 , p5_a3 JTF_VARCHAR2_TABLE_100
400 , p5_a4 JTF_NUMBER_TABLE
401 , p5_a5 JTF_VARCHAR2_TABLE_100
402 , p5_a6 JTF_VARCHAR2_TABLE_100
403 , p5_a7 JTF_VARCHAR2_TABLE_100
404 , p5_a8 JTF_VARCHAR2_TABLE_100
405 , p5_a9 JTF_VARCHAR2_TABLE_2000
406 , p5_a10 JTF_DATE_TABLE
407 , p5_a11 JTF_DATE_TABLE
408 , p5_a12 JTF_NUMBER_TABLE
409 , p5_a13 JTF_DATE_TABLE
410 , p5_a14 JTF_NUMBER_TABLE
411 , p5_a15 JTF_DATE_TABLE
412 , p5_a16 JTF_NUMBER_TABLE
413 , p5_a17 JTF_VARCHAR2_TABLE_100
414 , p5_a18 JTF_VARCHAR2_TABLE_100
415 , p5_a19 JTF_VARCHAR2_TABLE_100
416 , p6_a0 out nocopy JTF_NUMBER_TABLE
417 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_300
418 , p6_a2 out nocopy JTF_NUMBER_TABLE
419 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
420 , p6_a4 out nocopy JTF_NUMBER_TABLE
421 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
422 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
423 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
424 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
425 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_2000
426 , p6_a10 out nocopy JTF_DATE_TABLE
427 , p6_a11 out nocopy JTF_DATE_TABLE
428 , p6_a12 out nocopy JTF_NUMBER_TABLE
429 , p6_a13 out nocopy JTF_DATE_TABLE
430 , p6_a14 out nocopy JTF_NUMBER_TABLE
431 , p6_a15 out nocopy JTF_DATE_TABLE
432 , p6_a16 out nocopy JTF_NUMBER_TABLE
433 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_100
434 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_100
435 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
436 )
437
438 as
439 ddp_repv_tbl okl_report_pvt.repv_tbl_type;
440 ddx_repv_tbl okl_report_pvt.repv_tbl_type;
441 ddindx binary_integer; indx binary_integer;
442 begin
443
444 -- copy data to the local IN or IN-OUT args, if any
445
446
447
448
449
450 okl_rep_pvt_w.rosetta_table_copy_in_p2(ddp_repv_tbl, p5_a0
451 , p5_a1
452 , p5_a2
453 , p5_a3
454 , p5_a4
455 , p5_a5
456 , p5_a6
457 , p5_a7
458 , p5_a8
459 , p5_a9
460 , p5_a10
461 , p5_a11
462 , p5_a12
463 , p5_a13
464 , p5_a14
465 , p5_a15
466 , p5_a16
467 , p5_a17
468 , p5_a18
469 , p5_a19
470 );
471
472
473 -- here's the delegated call to the old PL/SQL routine
474 okl_report_pvt.create_report(p_api_version,
475 p_init_msg_list,
476 x_return_status,
477 x_msg_count,
478 x_msg_data,
479 ddp_repv_tbl,
480 ddx_repv_tbl);
481
482 -- copy data back from the local variables to OUT or IN-OUT args, if any
483
484
485
486
487
488
489 okl_rep_pvt_w.rosetta_table_copy_out_p2(ddx_repv_tbl, p6_a0
490 , p6_a1
491 , p6_a2
492 , p6_a3
493 , p6_a4
494 , p6_a5
495 , p6_a6
496 , p6_a7
497 , p6_a8
498 , p6_a9
499 , p6_a10
500 , p6_a11
501 , p6_a12
502 , p6_a13
503 , p6_a14
504 , p6_a15
505 , p6_a16
506 , p6_a17
507 , p6_a18
508 , p6_a19
509 );
510 end;
511
512 procedure update_report(p_api_version NUMBER
513 , p_init_msg_list VARCHAR2
514 , x_return_status out nocopy VARCHAR2
515 , x_msg_count out nocopy NUMBER
516 , x_msg_data out nocopy VARCHAR2
517 , p5_a0 JTF_NUMBER_TABLE
518 , p5_a1 JTF_VARCHAR2_TABLE_300
519 , p5_a2 JTF_NUMBER_TABLE
520 , p5_a3 JTF_VARCHAR2_TABLE_100
521 , p5_a4 JTF_NUMBER_TABLE
522 , p5_a5 JTF_VARCHAR2_TABLE_100
523 , p5_a6 JTF_VARCHAR2_TABLE_100
524 , p5_a7 JTF_VARCHAR2_TABLE_100
525 , p5_a8 JTF_VARCHAR2_TABLE_100
526 , p5_a9 JTF_VARCHAR2_TABLE_2000
527 , p5_a10 JTF_DATE_TABLE
528 , p5_a11 JTF_DATE_TABLE
529 , p5_a12 JTF_NUMBER_TABLE
530 , p5_a13 JTF_DATE_TABLE
531 , p5_a14 JTF_NUMBER_TABLE
532 , p5_a15 JTF_DATE_TABLE
533 , p5_a16 JTF_NUMBER_TABLE
534 , p5_a17 JTF_VARCHAR2_TABLE_100
535 , p5_a18 JTF_VARCHAR2_TABLE_100
536 , p5_a19 JTF_VARCHAR2_TABLE_100
537 , p6_a0 out nocopy JTF_NUMBER_TABLE
538 , p6_a1 out nocopy JTF_VARCHAR2_TABLE_300
539 , p6_a2 out nocopy JTF_NUMBER_TABLE
540 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
541 , p6_a4 out nocopy JTF_NUMBER_TABLE
542 , p6_a5 out nocopy JTF_VARCHAR2_TABLE_100
543 , p6_a6 out nocopy JTF_VARCHAR2_TABLE_100
544 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
545 , p6_a8 out nocopy JTF_VARCHAR2_TABLE_100
546 , p6_a9 out nocopy JTF_VARCHAR2_TABLE_2000
547 , p6_a10 out nocopy JTF_DATE_TABLE
548 , p6_a11 out nocopy JTF_DATE_TABLE
549 , p6_a12 out nocopy JTF_NUMBER_TABLE
550 , p6_a13 out nocopy JTF_DATE_TABLE
551 , p6_a14 out nocopy JTF_NUMBER_TABLE
552 , p6_a15 out nocopy JTF_DATE_TABLE
553 , p6_a16 out nocopy JTF_NUMBER_TABLE
554 , p6_a17 out nocopy JTF_VARCHAR2_TABLE_100
555 , p6_a18 out nocopy JTF_VARCHAR2_TABLE_100
556 , p6_a19 out nocopy JTF_VARCHAR2_TABLE_100
557 )
558
559 as
560 ddp_repv_tbl okl_report_pvt.repv_tbl_type;
561 ddx_repv_tbl okl_report_pvt.repv_tbl_type;
562 ddindx binary_integer; indx binary_integer;
563 begin
564
565 -- copy data to the local IN or IN-OUT args, if any
566
567
568
569
570
571 okl_rep_pvt_w.rosetta_table_copy_in_p2(ddp_repv_tbl, p5_a0
572 , p5_a1
573 , p5_a2
574 , p5_a3
575 , p5_a4
576 , p5_a5
577 , p5_a6
578 , p5_a7
579 , p5_a8
580 , p5_a9
581 , p5_a10
582 , p5_a11
583 , p5_a12
584 , p5_a13
585 , p5_a14
586 , p5_a15
587 , p5_a16
588 , p5_a17
589 , p5_a18
590 , p5_a19
591 );
592
593
594 -- here's the delegated call to the old PL/SQL routine
595 okl_report_pvt.update_report(p_api_version,
596 p_init_msg_list,
597 x_return_status,
598 x_msg_count,
599 x_msg_data,
600 ddp_repv_tbl,
601 ddx_repv_tbl);
602
603 -- copy data back from the local variables to OUT or IN-OUT args, if any
604
605
606
607
608
609
610 okl_rep_pvt_w.rosetta_table_copy_out_p2(ddx_repv_tbl, p6_a0
611 , p6_a1
612 , p6_a2
613 , p6_a3
614 , p6_a4
615 , p6_a5
616 , p6_a6
617 , p6_a7
618 , p6_a8
619 , p6_a9
620 , p6_a10
621 , p6_a11
622 , p6_a12
623 , p6_a13
624 , p6_a14
625 , p6_a15
626 , p6_a16
627 , p6_a17
628 , p6_a18
629 , p6_a19
630 );
631 end;
632
633 procedure delete_report(p_api_version NUMBER
634 , p_init_msg_list VARCHAR2
635 , x_return_status out nocopy VARCHAR2
636 , x_msg_count out nocopy NUMBER
637 , x_msg_data out nocopy VARCHAR2
638 , p5_a0 JTF_NUMBER_TABLE
639 , p5_a1 JTF_VARCHAR2_TABLE_300
640 , p5_a2 JTF_NUMBER_TABLE
641 , p5_a3 JTF_VARCHAR2_TABLE_100
642 , p5_a4 JTF_NUMBER_TABLE
643 , p5_a5 JTF_VARCHAR2_TABLE_100
644 , p5_a6 JTF_VARCHAR2_TABLE_100
645 , p5_a7 JTF_VARCHAR2_TABLE_100
646 , p5_a8 JTF_VARCHAR2_TABLE_100
647 , p5_a9 JTF_VARCHAR2_TABLE_2000
648 , p5_a10 JTF_DATE_TABLE
649 , p5_a11 JTF_DATE_TABLE
650 , p5_a12 JTF_NUMBER_TABLE
651 , p5_a13 JTF_DATE_TABLE
652 , p5_a14 JTF_NUMBER_TABLE
653 , p5_a15 JTF_DATE_TABLE
654 , p5_a16 JTF_NUMBER_TABLE
655 , p5_a17 JTF_VARCHAR2_TABLE_100
656 , p5_a18 JTF_VARCHAR2_TABLE_100
657 , p5_a19 JTF_VARCHAR2_TABLE_100
658 )
659
660 as
661 ddp_repv_tbl okl_report_pvt.repv_tbl_type;
662 ddindx binary_integer; indx binary_integer;
663 begin
664
665 -- copy data to the local IN or IN-OUT args, if any
666
667
668
669
670
671 okl_rep_pvt_w.rosetta_table_copy_in_p2(ddp_repv_tbl, p5_a0
672 , p5_a1
673 , p5_a2
674 , p5_a3
675 , p5_a4
676 , p5_a5
677 , p5_a6
678 , p5_a7
679 , p5_a8
680 , p5_a9
681 , p5_a10
682 , p5_a11
683 , p5_a12
684 , p5_a13
685 , p5_a14
686 , p5_a15
687 , p5_a16
688 , p5_a17
689 , p5_a18
690 , p5_a19
691 );
692
693 -- here's the delegated call to the old PL/SQL routine
694 okl_report_pvt.delete_report(p_api_version,
695 p_init_msg_list,
696 x_return_status,
697 x_msg_count,
698 x_msg_data,
699 ddp_repv_tbl);
700
701 -- copy data back from the local variables to OUT or IN-OUT args, if any
702
703
704
705
706
707 end;
708
709 procedure lock_report(p_api_version NUMBER
710 , p_init_msg_list VARCHAR2
711 , x_return_status out nocopy VARCHAR2
712 , x_msg_count out nocopy NUMBER
713 , x_msg_data out nocopy VARCHAR2
714 , p5_a0 JTF_NUMBER_TABLE
715 , p5_a1 JTF_VARCHAR2_TABLE_300
716 , p5_a2 JTF_NUMBER_TABLE
717 , p5_a3 JTF_VARCHAR2_TABLE_100
718 , p5_a4 JTF_NUMBER_TABLE
719 , p5_a5 JTF_VARCHAR2_TABLE_100
720 , p5_a6 JTF_VARCHAR2_TABLE_100
721 , p5_a7 JTF_VARCHAR2_TABLE_100
722 , p5_a8 JTF_VARCHAR2_TABLE_100
723 , p5_a9 JTF_VARCHAR2_TABLE_2000
724 , p5_a10 JTF_DATE_TABLE
725 , p5_a11 JTF_DATE_TABLE
726 , p5_a12 JTF_NUMBER_TABLE
727 , p5_a13 JTF_DATE_TABLE
728 , p5_a14 JTF_NUMBER_TABLE
729 , p5_a15 JTF_DATE_TABLE
730 , p5_a16 JTF_NUMBER_TABLE
731 , p5_a17 JTF_VARCHAR2_TABLE_100
732 , p5_a18 JTF_VARCHAR2_TABLE_100
733 , p5_a19 JTF_VARCHAR2_TABLE_100
734 )
735
736 as
737 ddp_repv_tbl okl_report_pvt.repv_tbl_type;
738 ddindx binary_integer; indx binary_integer;
739 begin
740
741 -- copy data to the local IN or IN-OUT args, if any
742
743
744
745
746
747 okl_rep_pvt_w.rosetta_table_copy_in_p2(ddp_repv_tbl, p5_a0
748 , p5_a1
749 , p5_a2
750 , p5_a3
751 , p5_a4
752 , p5_a5
753 , p5_a6
754 , p5_a7
755 , p5_a8
756 , p5_a9
757 , p5_a10
758 , p5_a11
759 , p5_a12
760 , p5_a13
761 , p5_a14
762 , p5_a15
763 , p5_a16
764 , p5_a17
765 , p5_a18
766 , p5_a19
767 );
768
769 -- here's the delegated call to the old PL/SQL routine
770 okl_report_pvt.lock_report(p_api_version,
771 p_init_msg_list,
772 x_return_status,
773 x_msg_count,
774 x_msg_data,
775 ddp_repv_tbl);
776
777 -- copy data back from the local variables to OUT or IN-OUT args, if any
778
779
780
781
782
783 end;
784
785 procedure create_report_parameters(p_api_version NUMBER
786 , p_init_msg_list VARCHAR2
787 , x_return_status out nocopy VARCHAR2
788 , x_msg_count out nocopy NUMBER
789 , x_msg_data out nocopy VARCHAR2
790 , p5_a0 NUMBER
791 , p5_a1 NUMBER
792 , p5_a2 VARCHAR2
793 , p5_a3 NUMBER
794 , p5_a4 VARCHAR2
795 , p5_a5 DATE
796 , p5_a6 NUMBER
797 , p5_a7 VARCHAR2
798 , p5_a8 DATE
799 , p5_a9 NUMBER
800 , p5_a10 DATE
801 , p5_a11 NUMBER
802 , p6_a0 out nocopy NUMBER
803 , p6_a1 out nocopy NUMBER
804 , p6_a2 out nocopy VARCHAR2
805 , p6_a3 out nocopy NUMBER
806 , p6_a4 out nocopy VARCHAR2
807 , p6_a5 out nocopy DATE
808 , p6_a6 out nocopy NUMBER
809 , p6_a7 out nocopy VARCHAR2
810 , p6_a8 out nocopy DATE
811 , p6_a9 out nocopy NUMBER
812 , p6_a10 out nocopy DATE
813 , p6_a11 out nocopy NUMBER
814 )
815
816 as
817 ddp_rpp_rec okl_report_pvt.rpp_rec_type;
818 ddx_rpp_rec okl_report_pvt.rpp_rec_type;
819 ddindx binary_integer; indx binary_integer;
820 begin
821
822 -- copy data to the local IN or IN-OUT args, if any
823
824
825
826
827
828 ddp_rpp_rec.parameter_id := p5_a0;
829 ddp_rpp_rec.report_id := p5_a1;
830 ddp_rpp_rec.parameter_type := p5_a2;
831 ddp_rpp_rec.param_num_value1 := p5_a3;
832 ddp_rpp_rec.param_char_value1 := p5_a4;
833 ddp_rpp_rec.param_date_value1 := p5_a5;
834 ddp_rpp_rec.created_by := p5_a6;
835 ddp_rpp_rec.source_table := p5_a7;
836 ddp_rpp_rec.creation_date := p5_a8;
837 ddp_rpp_rec.last_updated_by := p5_a9;
838 ddp_rpp_rec.last_update_date := p5_a10;
839 ddp_rpp_rec.last_update_login := p5_a11;
840
841
842 -- here's the delegated call to the old PL/SQL routine
843 okl_report_pvt.create_report_parameters(p_api_version,
844 p_init_msg_list,
845 x_return_status,
846 x_msg_count,
847 x_msg_data,
848 ddp_rpp_rec,
849 ddx_rpp_rec);
850
851 -- copy data back from the local variables to OUT or IN-OUT args, if any
852
853
854
855
856
857
858 p6_a0 := ddx_rpp_rec.parameter_id;
859 p6_a1 := ddx_rpp_rec.report_id;
860 p6_a2 := ddx_rpp_rec.parameter_type;
861 p6_a3 := ddx_rpp_rec.param_num_value1;
862 p6_a4 := ddx_rpp_rec.param_char_value1;
863 p6_a5 := ddx_rpp_rec.param_date_value1;
864 p6_a6 := ddx_rpp_rec.created_by;
865 p6_a7 := ddx_rpp_rec.source_table;
866 p6_a8 := ddx_rpp_rec.creation_date;
867 p6_a9 := ddx_rpp_rec.last_updated_by;
868 p6_a10 := ddx_rpp_rec.last_update_date;
869 p6_a11 := ddx_rpp_rec.last_update_login;
870 end;
871
872 procedure update_report_parameters(p_api_version NUMBER
873 , p_init_msg_list VARCHAR2
874 , x_return_status out nocopy VARCHAR2
875 , x_msg_count out nocopy NUMBER
876 , x_msg_data out nocopy VARCHAR2
877 , p5_a0 NUMBER
878 , p5_a1 NUMBER
879 , p5_a2 VARCHAR2
880 , p5_a3 NUMBER
881 , p5_a4 VARCHAR2
882 , p5_a5 DATE
883 , p5_a6 NUMBER
884 , p5_a7 VARCHAR2
885 , p5_a8 DATE
886 , p5_a9 NUMBER
887 , p5_a10 DATE
888 , p5_a11 NUMBER
889 , p6_a0 out nocopy NUMBER
890 , p6_a1 out nocopy NUMBER
891 , p6_a2 out nocopy VARCHAR2
892 , p6_a3 out nocopy NUMBER
893 , p6_a4 out nocopy VARCHAR2
894 , p6_a5 out nocopy DATE
895 , p6_a6 out nocopy NUMBER
896 , p6_a7 out nocopy VARCHAR2
897 , p6_a8 out nocopy DATE
898 , p6_a9 out nocopy NUMBER
899 , p6_a10 out nocopy DATE
900 , p6_a11 out nocopy NUMBER
901 )
902
903 as
904 ddp_rpp_rec okl_report_pvt.rpp_rec_type;
905 ddx_rpp_rec okl_report_pvt.rpp_rec_type;
906 ddindx binary_integer; indx binary_integer;
907 begin
908
909 -- copy data to the local IN or IN-OUT args, if any
910
911
912
913
914
915 ddp_rpp_rec.parameter_id := p5_a0;
916 ddp_rpp_rec.report_id := p5_a1;
917 ddp_rpp_rec.parameter_type := p5_a2;
918 ddp_rpp_rec.param_num_value1 := p5_a3;
919 ddp_rpp_rec.param_char_value1 := p5_a4;
920 ddp_rpp_rec.param_date_value1 := p5_a5;
921 ddp_rpp_rec.created_by := p5_a6;
922 ddp_rpp_rec.source_table := p5_a7;
923 ddp_rpp_rec.creation_date := p5_a8;
924 ddp_rpp_rec.last_updated_by := p5_a9;
925 ddp_rpp_rec.last_update_date := p5_a10;
926 ddp_rpp_rec.last_update_login := p5_a11;
927
928
929 -- here's the delegated call to the old PL/SQL routine
930 okl_report_pvt.update_report_parameters(p_api_version,
931 p_init_msg_list,
932 x_return_status,
933 x_msg_count,
934 x_msg_data,
935 ddp_rpp_rec,
936 ddx_rpp_rec);
937
938 -- copy data back from the local variables to OUT or IN-OUT args, if any
939
940
941
942
943
944
945 p6_a0 := ddx_rpp_rec.parameter_id;
946 p6_a1 := ddx_rpp_rec.report_id;
947 p6_a2 := ddx_rpp_rec.parameter_type;
948 p6_a3 := ddx_rpp_rec.param_num_value1;
949 p6_a4 := ddx_rpp_rec.param_char_value1;
950 p6_a5 := ddx_rpp_rec.param_date_value1;
951 p6_a6 := ddx_rpp_rec.created_by;
952 p6_a7 := ddx_rpp_rec.source_table;
953 p6_a8 := ddx_rpp_rec.creation_date;
954 p6_a9 := ddx_rpp_rec.last_updated_by;
955 p6_a10 := ddx_rpp_rec.last_update_date;
956 p6_a11 := ddx_rpp_rec.last_update_login;
957 end;
958
959 procedure delete_report_parameters(p_api_version NUMBER
960 , p_init_msg_list VARCHAR2
961 , x_return_status out nocopy VARCHAR2
962 , x_msg_count out nocopy NUMBER
963 , x_msg_data out nocopy VARCHAR2
964 , p5_a0 NUMBER
965 , p5_a1 NUMBER
966 , p5_a2 VARCHAR2
967 , p5_a3 NUMBER
968 , p5_a4 VARCHAR2
969 , p5_a5 DATE
970 , p5_a6 NUMBER
971 , p5_a7 VARCHAR2
972 , p5_a8 DATE
973 , p5_a9 NUMBER
974 , p5_a10 DATE
975 , p5_a11 NUMBER
976 )
977
978 as
979 ddp_rpp_rec okl_report_pvt.rpp_rec_type;
980 ddindx binary_integer; indx binary_integer;
981 begin
982
983 -- copy data to the local IN or IN-OUT args, if any
984
985
986
987
988
989 ddp_rpp_rec.parameter_id := p5_a0;
990 ddp_rpp_rec.report_id := p5_a1;
991 ddp_rpp_rec.parameter_type := p5_a2;
992 ddp_rpp_rec.param_num_value1 := p5_a3;
993 ddp_rpp_rec.param_char_value1 := p5_a4;
994 ddp_rpp_rec.param_date_value1 := p5_a5;
995 ddp_rpp_rec.created_by := p5_a6;
996 ddp_rpp_rec.source_table := p5_a7;
997 ddp_rpp_rec.creation_date := p5_a8;
998 ddp_rpp_rec.last_updated_by := p5_a9;
999 ddp_rpp_rec.last_update_date := p5_a10;
1000 ddp_rpp_rec.last_update_login := p5_a11;
1001
1002 -- here's the delegated call to the old PL/SQL routine
1003 okl_report_pvt.delete_report_parameters(p_api_version,
1004 p_init_msg_list,
1005 x_return_status,
1006 x_msg_count,
1007 x_msg_data,
1008 ddp_rpp_rec);
1009
1010 -- copy data back from the local variables to OUT or IN-OUT args, if any
1011
1012
1013
1014
1015
1016 end;
1017
1018 procedure lock_report_parameters(p_api_version NUMBER
1019 , p_init_msg_list VARCHAR2
1020 , x_return_status out nocopy VARCHAR2
1021 , x_msg_count out nocopy NUMBER
1022 , x_msg_data out nocopy VARCHAR2
1023 , p5_a0 NUMBER
1024 , p5_a1 NUMBER
1025 , p5_a2 VARCHAR2
1026 , p5_a3 NUMBER
1027 , p5_a4 VARCHAR2
1028 , p5_a5 DATE
1029 , p5_a6 NUMBER
1030 , p5_a7 VARCHAR2
1031 , p5_a8 DATE
1032 , p5_a9 NUMBER
1033 , p5_a10 DATE
1034 , p5_a11 NUMBER
1035 )
1036
1037 as
1038 ddp_rpp_rec okl_report_pvt.rpp_rec_type;
1039 ddindx binary_integer; indx binary_integer;
1040 begin
1041
1042 -- copy data to the local IN or IN-OUT args, if any
1043
1044
1045
1046
1047
1048 ddp_rpp_rec.parameter_id := p5_a0;
1049 ddp_rpp_rec.report_id := p5_a1;
1050 ddp_rpp_rec.parameter_type := p5_a2;
1051 ddp_rpp_rec.param_num_value1 := p5_a3;
1052 ddp_rpp_rec.param_char_value1 := p5_a4;
1053 ddp_rpp_rec.param_date_value1 := p5_a5;
1054 ddp_rpp_rec.created_by := p5_a6;
1055 ddp_rpp_rec.source_table := p5_a7;
1056 ddp_rpp_rec.creation_date := p5_a8;
1057 ddp_rpp_rec.last_updated_by := p5_a9;
1058 ddp_rpp_rec.last_update_date := p5_a10;
1059 ddp_rpp_rec.last_update_login := p5_a11;
1060
1061 -- here's the delegated call to the old PL/SQL routine
1062 okl_report_pvt.lock_report_parameters(p_api_version,
1063 p_init_msg_list,
1064 x_return_status,
1065 x_msg_count,
1066 x_msg_data,
1067 ddp_rpp_rec);
1068
1069 -- copy data back from the local variables to OUT or IN-OUT args, if any
1070
1071
1072
1073
1074
1075 end;
1076
1077 procedure create_report_parameters(p_api_version NUMBER
1078 , p_init_msg_list VARCHAR2
1079 , x_return_status out nocopy VARCHAR2
1080 , x_msg_count out nocopy NUMBER
1081 , x_msg_data out nocopy VARCHAR2
1082 , p5_a0 JTF_NUMBER_TABLE
1083 , p5_a1 JTF_NUMBER_TABLE
1084 , p5_a2 JTF_VARCHAR2_TABLE_100
1085 , p5_a3 JTF_NUMBER_TABLE
1086 , p5_a4 JTF_VARCHAR2_TABLE_300
1087 , p5_a5 JTF_DATE_TABLE
1088 , p5_a6 JTF_NUMBER_TABLE
1089 , p5_a7 JTF_VARCHAR2_TABLE_100
1090 , p5_a8 JTF_DATE_TABLE
1091 , p5_a9 JTF_NUMBER_TABLE
1092 , p5_a10 JTF_DATE_TABLE
1093 , p5_a11 JTF_NUMBER_TABLE
1094 , p6_a0 out nocopy JTF_NUMBER_TABLE
1095 , p6_a1 out nocopy JTF_NUMBER_TABLE
1096 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1097 , p6_a3 out nocopy JTF_NUMBER_TABLE
1098 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_300
1099 , p6_a5 out nocopy JTF_DATE_TABLE
1100 , p6_a6 out nocopy JTF_NUMBER_TABLE
1101 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
1102 , p6_a8 out nocopy JTF_DATE_TABLE
1103 , p6_a9 out nocopy JTF_NUMBER_TABLE
1104 , p6_a10 out nocopy JTF_DATE_TABLE
1105 , p6_a11 out nocopy JTF_NUMBER_TABLE
1106 )
1107
1108 as
1109 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
1110 ddx_rpp_tbl okl_report_pvt.rpp_tbl_type;
1111 ddindx binary_integer; indx binary_integer;
1112 begin
1113
1114 -- copy data to the local IN or IN-OUT args, if any
1115
1116
1117
1118
1119
1120 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p5_a0
1121 , p5_a1
1122 , p5_a2
1123 , p5_a3
1124 , p5_a4
1125 , p5_a5
1126 , p5_a6
1127 , p5_a7
1128 , p5_a8
1129 , p5_a9
1130 , p5_a10
1131 , p5_a11
1132 );
1133
1134
1135 -- here's the delegated call to the old PL/SQL routine
1136 okl_report_pvt.create_report_parameters(p_api_version,
1137 p_init_msg_list,
1138 x_return_status,
1139 x_msg_count,
1140 x_msg_data,
1141 ddp_rpp_tbl,
1142 ddx_rpp_tbl);
1143
1144 -- copy data back from the local variables to OUT or IN-OUT args, if any
1145
1146
1147
1148
1149
1150
1151 okl_rpp_pvt_w.rosetta_table_copy_out_p2(ddx_rpp_tbl, p6_a0
1152 , p6_a1
1153 , p6_a2
1154 , p6_a3
1155 , p6_a4
1156 , p6_a5
1157 , p6_a6
1158 , p6_a7
1159 , p6_a8
1160 , p6_a9
1161 , p6_a10
1162 , p6_a11
1163 );
1164 end;
1165
1166 procedure update_report_parameters(p_api_version NUMBER
1167 , p_init_msg_list VARCHAR2
1168 , x_return_status out nocopy VARCHAR2
1169 , x_msg_count out nocopy NUMBER
1170 , x_msg_data out nocopy VARCHAR2
1171 , p5_a0 JTF_NUMBER_TABLE
1172 , p5_a1 JTF_NUMBER_TABLE
1173 , p5_a2 JTF_VARCHAR2_TABLE_100
1174 , p5_a3 JTF_NUMBER_TABLE
1175 , p5_a4 JTF_VARCHAR2_TABLE_300
1176 , p5_a5 JTF_DATE_TABLE
1177 , p5_a6 JTF_NUMBER_TABLE
1178 , p5_a7 JTF_VARCHAR2_TABLE_100
1179 , p5_a8 JTF_DATE_TABLE
1180 , p5_a9 JTF_NUMBER_TABLE
1181 , p5_a10 JTF_DATE_TABLE
1182 , p5_a11 JTF_NUMBER_TABLE
1183 , p6_a0 out nocopy JTF_NUMBER_TABLE
1184 , p6_a1 out nocopy JTF_NUMBER_TABLE
1185 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1186 , p6_a3 out nocopy JTF_NUMBER_TABLE
1187 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_300
1188 , p6_a5 out nocopy JTF_DATE_TABLE
1189 , p6_a6 out nocopy JTF_NUMBER_TABLE
1190 , p6_a7 out nocopy JTF_VARCHAR2_TABLE_100
1191 , p6_a8 out nocopy JTF_DATE_TABLE
1192 , p6_a9 out nocopy JTF_NUMBER_TABLE
1193 , p6_a10 out nocopy JTF_DATE_TABLE
1194 , p6_a11 out nocopy JTF_NUMBER_TABLE
1195 )
1196
1197 as
1198 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
1199 ddx_rpp_tbl okl_report_pvt.rpp_tbl_type;
1200 ddindx binary_integer; indx binary_integer;
1201 begin
1202
1203 -- copy data to the local IN or IN-OUT args, if any
1204
1205
1206
1207
1208
1209 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p5_a0
1210 , p5_a1
1211 , p5_a2
1212 , p5_a3
1213 , p5_a4
1214 , p5_a5
1215 , p5_a6
1216 , p5_a7
1217 , p5_a8
1218 , p5_a9
1219 , p5_a10
1220 , p5_a11
1221 );
1222
1223
1224 -- here's the delegated call to the old PL/SQL routine
1225 okl_report_pvt.update_report_parameters(p_api_version,
1226 p_init_msg_list,
1227 x_return_status,
1228 x_msg_count,
1229 x_msg_data,
1230 ddp_rpp_tbl,
1231 ddx_rpp_tbl);
1232
1233 -- copy data back from the local variables to OUT or IN-OUT args, if any
1234
1235
1236
1237
1238
1239
1240 okl_rpp_pvt_w.rosetta_table_copy_out_p2(ddx_rpp_tbl, p6_a0
1241 , p6_a1
1242 , p6_a2
1243 , p6_a3
1244 , p6_a4
1245 , p6_a5
1246 , p6_a6
1247 , p6_a7
1248 , p6_a8
1249 , p6_a9
1250 , p6_a10
1251 , p6_a11
1252 );
1253 end;
1254
1255 procedure delete_report_parameters(p_api_version NUMBER
1256 , p_init_msg_list VARCHAR2
1257 , x_return_status out nocopy VARCHAR2
1258 , x_msg_count out nocopy NUMBER
1259 , x_msg_data out nocopy VARCHAR2
1260 , p5_a0 JTF_NUMBER_TABLE
1261 , p5_a1 JTF_NUMBER_TABLE
1262 , p5_a2 JTF_VARCHAR2_TABLE_100
1263 , p5_a3 JTF_NUMBER_TABLE
1264 , p5_a4 JTF_VARCHAR2_TABLE_300
1265 , p5_a5 JTF_DATE_TABLE
1266 , p5_a6 JTF_NUMBER_TABLE
1267 , p5_a7 JTF_VARCHAR2_TABLE_100
1268 , p5_a8 JTF_DATE_TABLE
1269 , p5_a9 JTF_NUMBER_TABLE
1270 , p5_a10 JTF_DATE_TABLE
1271 , p5_a11 JTF_NUMBER_TABLE
1272 )
1273
1274 as
1275 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
1276 ddindx binary_integer; indx binary_integer;
1277 begin
1278
1279 -- copy data to the local IN or IN-OUT args, if any
1280
1281
1282
1283
1284
1285 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p5_a0
1286 , p5_a1
1287 , p5_a2
1288 , p5_a3
1289 , p5_a4
1290 , p5_a5
1291 , p5_a6
1292 , p5_a7
1293 , p5_a8
1294 , p5_a9
1295 , p5_a10
1296 , p5_a11
1297 );
1298
1299 -- here's the delegated call to the old PL/SQL routine
1300 okl_report_pvt.delete_report_parameters(p_api_version,
1301 p_init_msg_list,
1302 x_return_status,
1303 x_msg_count,
1304 x_msg_data,
1305 ddp_rpp_tbl);
1306
1307 -- copy data back from the local variables to OUT or IN-OUT args, if any
1308
1309
1310
1311
1312
1313 end;
1314
1315 procedure lock_report_parameters(p_api_version NUMBER
1316 , p_init_msg_list VARCHAR2
1317 , x_return_status out nocopy VARCHAR2
1318 , x_msg_count out nocopy NUMBER
1319 , x_msg_data out nocopy VARCHAR2
1320 , p5_a0 JTF_NUMBER_TABLE
1321 , p5_a1 JTF_NUMBER_TABLE
1322 , p5_a2 JTF_VARCHAR2_TABLE_100
1323 , p5_a3 JTF_NUMBER_TABLE
1324 , p5_a4 JTF_VARCHAR2_TABLE_300
1325 , p5_a5 JTF_DATE_TABLE
1326 , p5_a6 JTF_NUMBER_TABLE
1327 , p5_a7 JTF_VARCHAR2_TABLE_100
1328 , p5_a8 JTF_DATE_TABLE
1329 , p5_a9 JTF_NUMBER_TABLE
1330 , p5_a10 JTF_DATE_TABLE
1331 , p5_a11 JTF_NUMBER_TABLE
1332 )
1333
1334 as
1335 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
1336 ddindx binary_integer; indx binary_integer;
1337 begin
1338
1339 -- copy data to the local IN or IN-OUT args, if any
1340
1341
1342
1343
1344
1345 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p5_a0
1346 , p5_a1
1347 , p5_a2
1348 , p5_a3
1349 , p5_a4
1350 , p5_a5
1351 , p5_a6
1352 , p5_a7
1353 , p5_a8
1354 , p5_a9
1355 , p5_a10
1356 , p5_a11
1357 );
1358
1359 -- here's the delegated call to the old PL/SQL routine
1360 okl_report_pvt.lock_report_parameters(p_api_version,
1361 p_init_msg_list,
1362 x_return_status,
1363 x_msg_count,
1364 x_msg_data,
1365 ddp_rpp_tbl);
1366
1367 -- copy data back from the local variables to OUT or IN-OUT args, if any
1368
1369
1370
1371
1372
1373 end;
1374
1375 procedure create_report_acc_parameters(p_api_version NUMBER
1376 , p_init_msg_list VARCHAR2
1377 , x_return_status out nocopy VARCHAR2
1378 , x_msg_count out nocopy NUMBER
1379 , x_msg_data out nocopy VARCHAR2
1380 , p5_a0 NUMBER
1381 , p5_a1 NUMBER
1382 , p5_a2 VARCHAR2
1383 , p5_a3 NUMBER
1384 , p5_a4 NUMBER
1385 , p5_a5 NUMBER
1386 , p5_a6 DATE
1387 , p5_a7 NUMBER
1388 , p5_a8 DATE
1389 , p5_a9 NUMBER
1390 , p6_a0 out nocopy NUMBER
1391 , p6_a1 out nocopy NUMBER
1392 , p6_a2 out nocopy VARCHAR2
1393 , p6_a3 out nocopy NUMBER
1394 , p6_a4 out nocopy NUMBER
1395 , p6_a5 out nocopy NUMBER
1396 , p6_a6 out nocopy DATE
1397 , p6_a7 out nocopy NUMBER
1398 , p6_a8 out nocopy DATE
1399 , p6_a9 out nocopy NUMBER
1400 )
1401
1402 as
1403 ddp_rap_rec okl_report_pvt.rap_rec_type;
1404 ddx_rap_rec okl_report_pvt.rap_rec_type;
1405 ddindx binary_integer; indx binary_integer;
1406 begin
1407
1408 -- copy data to the local IN or IN-OUT args, if any
1409
1410
1411
1412
1413
1414 ddp_rap_rec.acc_parameter_id := p5_a0;
1415 ddp_rap_rec.report_id := p5_a1;
1416 ddp_rap_rec.acct_param_type_code := p5_a2;
1417 ddp_rap_rec.segment_range_from := p5_a3;
1418 ddp_rap_rec.segment_range_to := p5_a4;
1419 ddp_rap_rec.created_by := p5_a5;
1420 ddp_rap_rec.creation_date := p5_a6;
1421 ddp_rap_rec.last_updated_by := p5_a7;
1422 ddp_rap_rec.last_update_date := p5_a8;
1423 ddp_rap_rec.last_update_login := p5_a9;
1424
1425
1426 -- here's the delegated call to the old PL/SQL routine
1427 okl_report_pvt.create_report_acc_parameters(p_api_version,
1428 p_init_msg_list,
1429 x_return_status,
1430 x_msg_count,
1431 x_msg_data,
1432 ddp_rap_rec,
1433 ddx_rap_rec);
1434
1435 -- copy data back from the local variables to OUT or IN-OUT args, if any
1436
1437
1438
1439
1440
1441
1442 p6_a0 := ddx_rap_rec.acc_parameter_id;
1443 p6_a1 := ddx_rap_rec.report_id;
1444 p6_a2 := ddx_rap_rec.acct_param_type_code;
1445 p6_a3 := ddx_rap_rec.segment_range_from;
1446 p6_a4 := ddx_rap_rec.segment_range_to;
1447 p6_a5 := ddx_rap_rec.created_by;
1448 p6_a6 := ddx_rap_rec.creation_date;
1449 p6_a7 := ddx_rap_rec.last_updated_by;
1450 p6_a8 := ddx_rap_rec.last_update_date;
1451 p6_a9 := ddx_rap_rec.last_update_login;
1452 end;
1453
1454 procedure update_report_acc_parameters(p_api_version NUMBER
1455 , p_init_msg_list VARCHAR2
1456 , x_return_status out nocopy VARCHAR2
1457 , x_msg_count out nocopy NUMBER
1458 , x_msg_data out nocopy VARCHAR2
1459 , p5_a0 NUMBER
1460 , p5_a1 NUMBER
1461 , p5_a2 VARCHAR2
1462 , p5_a3 NUMBER
1463 , p5_a4 NUMBER
1464 , p5_a5 NUMBER
1465 , p5_a6 DATE
1466 , p5_a7 NUMBER
1467 , p5_a8 DATE
1468 , p5_a9 NUMBER
1469 , p6_a0 out nocopy NUMBER
1470 , p6_a1 out nocopy NUMBER
1471 , p6_a2 out nocopy VARCHAR2
1472 , p6_a3 out nocopy NUMBER
1473 , p6_a4 out nocopy NUMBER
1474 , p6_a5 out nocopy NUMBER
1475 , p6_a6 out nocopy DATE
1476 , p6_a7 out nocopy NUMBER
1477 , p6_a8 out nocopy DATE
1478 , p6_a9 out nocopy NUMBER
1479 )
1480
1481 as
1482 ddp_rap_rec okl_report_pvt.rap_rec_type;
1483 ddx_rap_rec okl_report_pvt.rap_rec_type;
1484 ddindx binary_integer; indx binary_integer;
1485 begin
1486
1487 -- copy data to the local IN or IN-OUT args, if any
1488
1489
1490
1491
1492
1493 ddp_rap_rec.acc_parameter_id := p5_a0;
1494 ddp_rap_rec.report_id := p5_a1;
1495 ddp_rap_rec.acct_param_type_code := p5_a2;
1496 ddp_rap_rec.segment_range_from := p5_a3;
1497 ddp_rap_rec.segment_range_to := p5_a4;
1498 ddp_rap_rec.created_by := p5_a5;
1499 ddp_rap_rec.creation_date := p5_a6;
1500 ddp_rap_rec.last_updated_by := p5_a7;
1501 ddp_rap_rec.last_update_date := p5_a8;
1502 ddp_rap_rec.last_update_login := p5_a9;
1503
1504
1505 -- here's the delegated call to the old PL/SQL routine
1506 okl_report_pvt.update_report_acc_parameters(p_api_version,
1507 p_init_msg_list,
1508 x_return_status,
1509 x_msg_count,
1510 x_msg_data,
1511 ddp_rap_rec,
1512 ddx_rap_rec);
1513
1514 -- copy data back from the local variables to OUT or IN-OUT args, if any
1515
1516
1517
1518
1519
1520
1521 p6_a0 := ddx_rap_rec.acc_parameter_id;
1522 p6_a1 := ddx_rap_rec.report_id;
1523 p6_a2 := ddx_rap_rec.acct_param_type_code;
1524 p6_a3 := ddx_rap_rec.segment_range_from;
1525 p6_a4 := ddx_rap_rec.segment_range_to;
1526 p6_a5 := ddx_rap_rec.created_by;
1527 p6_a6 := ddx_rap_rec.creation_date;
1528 p6_a7 := ddx_rap_rec.last_updated_by;
1529 p6_a8 := ddx_rap_rec.last_update_date;
1530 p6_a9 := ddx_rap_rec.last_update_login;
1531 end;
1532
1533 procedure delete_report_acc_parameters(p_api_version NUMBER
1534 , p_init_msg_list VARCHAR2
1535 , x_return_status out nocopy VARCHAR2
1536 , x_msg_count out nocopy NUMBER
1537 , x_msg_data out nocopy VARCHAR2
1538 , p5_a0 NUMBER
1539 , p5_a1 NUMBER
1540 , p5_a2 VARCHAR2
1541 , p5_a3 NUMBER
1542 , p5_a4 NUMBER
1543 , p5_a5 NUMBER
1544 , p5_a6 DATE
1545 , p5_a7 NUMBER
1546 , p5_a8 DATE
1547 , p5_a9 NUMBER
1548 )
1549
1550 as
1551 ddp_rap_rec okl_report_pvt.rap_rec_type;
1552 ddindx binary_integer; indx binary_integer;
1553 begin
1554
1555 -- copy data to the local IN or IN-OUT args, if any
1556
1557
1558
1559
1560
1561 ddp_rap_rec.acc_parameter_id := p5_a0;
1562 ddp_rap_rec.report_id := p5_a1;
1563 ddp_rap_rec.acct_param_type_code := p5_a2;
1564 ddp_rap_rec.segment_range_from := p5_a3;
1565 ddp_rap_rec.segment_range_to := p5_a4;
1566 ddp_rap_rec.created_by := p5_a5;
1567 ddp_rap_rec.creation_date := p5_a6;
1568 ddp_rap_rec.last_updated_by := p5_a7;
1569 ddp_rap_rec.last_update_date := p5_a8;
1570 ddp_rap_rec.last_update_login := p5_a9;
1571
1572 -- here's the delegated call to the old PL/SQL routine
1573 okl_report_pvt.delete_report_acc_parameters(p_api_version,
1574 p_init_msg_list,
1575 x_return_status,
1576 x_msg_count,
1577 x_msg_data,
1578 ddp_rap_rec);
1579
1580 -- copy data back from the local variables to OUT or IN-OUT args, if any
1581
1582
1583
1584
1585
1586 end;
1587
1588 procedure lock_report_acc_parameters(p_api_version NUMBER
1589 , p_init_msg_list VARCHAR2
1590 , x_return_status out nocopy VARCHAR2
1591 , x_msg_count out nocopy NUMBER
1592 , x_msg_data out nocopy VARCHAR2
1593 , p5_a0 NUMBER
1594 , p5_a1 NUMBER
1595 , p5_a2 VARCHAR2
1596 , p5_a3 NUMBER
1597 , p5_a4 NUMBER
1598 , p5_a5 NUMBER
1599 , p5_a6 DATE
1600 , p5_a7 NUMBER
1601 , p5_a8 DATE
1602 , p5_a9 NUMBER
1603 )
1604
1605 as
1606 ddp_rap_rec okl_report_pvt.rap_rec_type;
1607 ddindx binary_integer; indx binary_integer;
1608 begin
1609
1610 -- copy data to the local IN or IN-OUT args, if any
1611
1612
1613
1614
1615
1616 ddp_rap_rec.acc_parameter_id := p5_a0;
1617 ddp_rap_rec.report_id := p5_a1;
1618 ddp_rap_rec.acct_param_type_code := p5_a2;
1619 ddp_rap_rec.segment_range_from := p5_a3;
1620 ddp_rap_rec.segment_range_to := p5_a4;
1621 ddp_rap_rec.created_by := p5_a5;
1622 ddp_rap_rec.creation_date := p5_a6;
1623 ddp_rap_rec.last_updated_by := p5_a7;
1624 ddp_rap_rec.last_update_date := p5_a8;
1625 ddp_rap_rec.last_update_login := p5_a9;
1626
1627 -- here's the delegated call to the old PL/SQL routine
1628 okl_report_pvt.lock_report_acc_parameters(p_api_version,
1629 p_init_msg_list,
1630 x_return_status,
1631 x_msg_count,
1632 x_msg_data,
1633 ddp_rap_rec);
1634
1635 -- copy data back from the local variables to OUT or IN-OUT args, if any
1636
1637
1638
1639
1640
1641 end;
1642
1643 procedure create_report_acc_parameters(p_api_version NUMBER
1644 , p_init_msg_list VARCHAR2
1645 , x_return_status out nocopy VARCHAR2
1646 , x_msg_count out nocopy NUMBER
1647 , x_msg_data out nocopy VARCHAR2
1648 , p5_a0 JTF_NUMBER_TABLE
1649 , p5_a1 JTF_NUMBER_TABLE
1650 , p5_a2 JTF_VARCHAR2_TABLE_100
1651 , p5_a3 JTF_NUMBER_TABLE
1652 , p5_a4 JTF_NUMBER_TABLE
1653 , p5_a5 JTF_NUMBER_TABLE
1654 , p5_a6 JTF_DATE_TABLE
1655 , p5_a7 JTF_NUMBER_TABLE
1656 , p5_a8 JTF_DATE_TABLE
1657 , p5_a9 JTF_NUMBER_TABLE
1658 , p6_a0 out nocopy JTF_NUMBER_TABLE
1659 , p6_a1 out nocopy JTF_NUMBER_TABLE
1660 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1661 , p6_a3 out nocopy JTF_NUMBER_TABLE
1662 , p6_a4 out nocopy JTF_NUMBER_TABLE
1663 , p6_a5 out nocopy JTF_NUMBER_TABLE
1664 , p6_a6 out nocopy JTF_DATE_TABLE
1665 , p6_a7 out nocopy JTF_NUMBER_TABLE
1666 , p6_a8 out nocopy JTF_DATE_TABLE
1667 , p6_a9 out nocopy JTF_NUMBER_TABLE
1668 )
1669
1670 as
1671 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
1672 ddx_rap_tbl okl_report_pvt.rap_tbl_type;
1673 ddindx binary_integer; indx binary_integer;
1674 begin
1675
1676 -- copy data to the local IN or IN-OUT args, if any
1677
1678
1679
1680
1681
1682 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p5_a0
1683 , p5_a1
1684 , p5_a2
1685 , p5_a3
1686 , p5_a4
1687 , p5_a5
1688 , p5_a6
1689 , p5_a7
1690 , p5_a8
1691 , p5_a9
1692 );
1693
1694
1695 -- here's the delegated call to the old PL/SQL routine
1696 okl_report_pvt.create_report_acc_parameters(p_api_version,
1697 p_init_msg_list,
1698 x_return_status,
1699 x_msg_count,
1700 x_msg_data,
1701 ddp_rap_tbl,
1702 ddx_rap_tbl);
1703
1704 -- copy data back from the local variables to OUT or IN-OUT args, if any
1705
1706
1707
1708
1709
1710
1711 okl_rap_pvt_w.rosetta_table_copy_out_p2(ddx_rap_tbl, p6_a0
1712 , p6_a1
1713 , p6_a2
1714 , p6_a3
1715 , p6_a4
1716 , p6_a5
1717 , p6_a6
1718 , p6_a7
1719 , p6_a8
1720 , p6_a9
1721 );
1722 end;
1723
1724 procedure update_report_acc_parameters(p_api_version NUMBER
1725 , p_init_msg_list VARCHAR2
1726 , x_return_status out nocopy VARCHAR2
1727 , x_msg_count out nocopy NUMBER
1728 , x_msg_data out nocopy VARCHAR2
1729 , p5_a0 JTF_NUMBER_TABLE
1730 , p5_a1 JTF_NUMBER_TABLE
1731 , p5_a2 JTF_VARCHAR2_TABLE_100
1732 , p5_a3 JTF_NUMBER_TABLE
1733 , p5_a4 JTF_NUMBER_TABLE
1734 , p5_a5 JTF_NUMBER_TABLE
1735 , p5_a6 JTF_DATE_TABLE
1736 , p5_a7 JTF_NUMBER_TABLE
1737 , p5_a8 JTF_DATE_TABLE
1738 , p5_a9 JTF_NUMBER_TABLE
1739 , p6_a0 out nocopy JTF_NUMBER_TABLE
1740 , p6_a1 out nocopy JTF_NUMBER_TABLE
1741 , p6_a2 out nocopy JTF_VARCHAR2_TABLE_100
1742 , p6_a3 out nocopy JTF_NUMBER_TABLE
1743 , p6_a4 out nocopy JTF_NUMBER_TABLE
1744 , p6_a5 out nocopy JTF_NUMBER_TABLE
1745 , p6_a6 out nocopy JTF_DATE_TABLE
1746 , p6_a7 out nocopy JTF_NUMBER_TABLE
1747 , p6_a8 out nocopy JTF_DATE_TABLE
1748 , p6_a9 out nocopy JTF_NUMBER_TABLE
1749 )
1750
1751 as
1752 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
1753 ddx_rap_tbl okl_report_pvt.rap_tbl_type;
1754 ddindx binary_integer; indx binary_integer;
1755 begin
1756
1757 -- copy data to the local IN or IN-OUT args, if any
1758
1759
1760
1761
1762
1763 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p5_a0
1764 , p5_a1
1765 , p5_a2
1766 , p5_a3
1767 , p5_a4
1768 , p5_a5
1769 , p5_a6
1770 , p5_a7
1771 , p5_a8
1772 , p5_a9
1773 );
1774
1775
1776 -- here's the delegated call to the old PL/SQL routine
1777 okl_report_pvt.update_report_acc_parameters(p_api_version,
1778 p_init_msg_list,
1779 x_return_status,
1780 x_msg_count,
1781 x_msg_data,
1782 ddp_rap_tbl,
1783 ddx_rap_tbl);
1784
1785 -- copy data back from the local variables to OUT or IN-OUT args, if any
1786
1787
1788
1789
1790
1791
1792 okl_rap_pvt_w.rosetta_table_copy_out_p2(ddx_rap_tbl, p6_a0
1793 , p6_a1
1794 , p6_a2
1795 , p6_a3
1796 , p6_a4
1797 , p6_a5
1798 , p6_a6
1799 , p6_a7
1800 , p6_a8
1801 , p6_a9
1802 );
1803 end;
1804
1805 procedure delete_report_acc_parameters(p_api_version NUMBER
1806 , p_init_msg_list VARCHAR2
1807 , x_return_status out nocopy VARCHAR2
1808 , x_msg_count out nocopy NUMBER
1809 , x_msg_data out nocopy VARCHAR2
1810 , p5_a0 JTF_NUMBER_TABLE
1811 , p5_a1 JTF_NUMBER_TABLE
1812 , p5_a2 JTF_VARCHAR2_TABLE_100
1813 , p5_a3 JTF_NUMBER_TABLE
1814 , p5_a4 JTF_NUMBER_TABLE
1815 , p5_a5 JTF_NUMBER_TABLE
1816 , p5_a6 JTF_DATE_TABLE
1817 , p5_a7 JTF_NUMBER_TABLE
1818 , p5_a8 JTF_DATE_TABLE
1819 , p5_a9 JTF_NUMBER_TABLE
1820 )
1821
1822 as
1823 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
1824 ddindx binary_integer; indx binary_integer;
1825 begin
1826
1827 -- copy data to the local IN or IN-OUT args, if any
1828
1829
1830
1831
1832
1833 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p5_a0
1834 , p5_a1
1835 , p5_a2
1836 , p5_a3
1837 , p5_a4
1838 , p5_a5
1839 , p5_a6
1840 , p5_a7
1841 , p5_a8
1842 , p5_a9
1843 );
1844
1845 -- here's the delegated call to the old PL/SQL routine
1846 okl_report_pvt.delete_report_acc_parameters(p_api_version,
1847 p_init_msg_list,
1848 x_return_status,
1849 x_msg_count,
1850 x_msg_data,
1851 ddp_rap_tbl);
1852
1853 -- copy data back from the local variables to OUT or IN-OUT args, if any
1854
1855
1856
1857
1858
1859 end;
1860
1861 procedure lock_report_acc_parameters(p_api_version NUMBER
1862 , p_init_msg_list VARCHAR2
1863 , x_return_status out nocopy VARCHAR2
1864 , x_msg_count out nocopy NUMBER
1865 , x_msg_data out nocopy VARCHAR2
1866 , p5_a0 JTF_NUMBER_TABLE
1867 , p5_a1 JTF_NUMBER_TABLE
1868 , p5_a2 JTF_VARCHAR2_TABLE_100
1869 , p5_a3 JTF_NUMBER_TABLE
1870 , p5_a4 JTF_NUMBER_TABLE
1871 , p5_a5 JTF_NUMBER_TABLE
1872 , p5_a6 JTF_DATE_TABLE
1873 , p5_a7 JTF_NUMBER_TABLE
1874 , p5_a8 JTF_DATE_TABLE
1875 , p5_a9 JTF_NUMBER_TABLE
1876 )
1877
1878 as
1879 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
1880 ddindx binary_integer; indx binary_integer;
1881 begin
1882
1883 -- copy data to the local IN or IN-OUT args, if any
1884
1885
1886
1887
1888
1889 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p5_a0
1890 , p5_a1
1891 , p5_a2
1892 , p5_a3
1893 , p5_a4
1894 , p5_a5
1895 , p5_a6
1896 , p5_a7
1897 , p5_a8
1898 , p5_a9
1899 );
1900
1901 -- here's the delegated call to the old PL/SQL routine
1902 okl_report_pvt.lock_report_acc_parameters(p_api_version,
1903 p_init_msg_list,
1904 x_return_status,
1905 x_msg_count,
1906 x_msg_data,
1907 ddp_rap_tbl);
1908
1909 -- copy data back from the local variables to OUT or IN-OUT args, if any
1910
1911
1912
1913
1914
1915 end;
1916
1917 procedure create_report_strm_parameters(p_api_version NUMBER
1918 , p_init_msg_list VARCHAR2
1919 , x_return_status out nocopy VARCHAR2
1920 , x_msg_count out nocopy NUMBER
1921 , x_msg_data out nocopy VARCHAR2
1922 , p5_a0 NUMBER
1923 , p5_a1 NUMBER
1924 , p5_a2 NUMBER
1925 , p5_a3 VARCHAR2
1926 , p5_a4 NUMBER
1927 , p5_a5 DATE
1928 , p5_a6 NUMBER
1929 , p5_a7 DATE
1930 , p5_a8 NUMBER
1931 , p6_a0 out nocopy NUMBER
1932 , p6_a1 out nocopy NUMBER
1933 , p6_a2 out nocopy NUMBER
1934 , p6_a3 out nocopy VARCHAR2
1935 , p6_a4 out nocopy NUMBER
1936 , p6_a5 out nocopy DATE
1937 , p6_a6 out nocopy NUMBER
1938 , p6_a7 out nocopy DATE
1939 , p6_a8 out nocopy NUMBER
1940 )
1941
1942 as
1943 ddp_rps_rec okl_report_pvt.rps_rec_type;
1944 ddx_rps_rec okl_report_pvt.rps_rec_type;
1945 ddindx binary_integer; indx binary_integer;
1946 begin
1947
1948 -- copy data to the local IN or IN-OUT args, if any
1949
1950
1951
1952
1953
1954 ddp_rps_rec.stream_parameter_id := p5_a0;
1955 ddp_rps_rec.report_id := p5_a1;
1956 ddp_rps_rec.sty_id := p5_a2;
1957 ddp_rps_rec.activity_code := p5_a3;
1958 ddp_rps_rec.created_by := p5_a4;
1959 ddp_rps_rec.creation_date := p5_a5;
1960 ddp_rps_rec.last_updated_by := p5_a6;
1961 ddp_rps_rec.last_update_date := p5_a7;
1962 ddp_rps_rec.last_update_login := p5_a8;
1963
1964
1965 -- here's the delegated call to the old PL/SQL routine
1966 okl_report_pvt.create_report_strm_parameters(p_api_version,
1967 p_init_msg_list,
1968 x_return_status,
1969 x_msg_count,
1970 x_msg_data,
1971 ddp_rps_rec,
1972 ddx_rps_rec);
1973
1974 -- copy data back from the local variables to OUT or IN-OUT args, if any
1975
1976
1977
1978
1979
1980
1981 p6_a0 := ddx_rps_rec.stream_parameter_id;
1982 p6_a1 := ddx_rps_rec.report_id;
1983 p6_a2 := ddx_rps_rec.sty_id;
1984 p6_a3 := ddx_rps_rec.activity_code;
1985 p6_a4 := ddx_rps_rec.created_by;
1986 p6_a5 := ddx_rps_rec.creation_date;
1987 p6_a6 := ddx_rps_rec.last_updated_by;
1988 p6_a7 := ddx_rps_rec.last_update_date;
1989 p6_a8 := ddx_rps_rec.last_update_login;
1990 end;
1991
1992 procedure update_report_strm_parameters(p_api_version NUMBER
1993 , p_init_msg_list VARCHAR2
1994 , x_return_status out nocopy VARCHAR2
1995 , x_msg_count out nocopy NUMBER
1996 , x_msg_data out nocopy VARCHAR2
1997 , p5_a0 NUMBER
1998 , p5_a1 NUMBER
1999 , p5_a2 NUMBER
2000 , p5_a3 VARCHAR2
2001 , p5_a4 NUMBER
2002 , p5_a5 DATE
2003 , p5_a6 NUMBER
2004 , p5_a7 DATE
2005 , p5_a8 NUMBER
2006 , p6_a0 out nocopy NUMBER
2007 , p6_a1 out nocopy NUMBER
2008 , p6_a2 out nocopy NUMBER
2009 , p6_a3 out nocopy VARCHAR2
2010 , p6_a4 out nocopy NUMBER
2011 , p6_a5 out nocopy DATE
2012 , p6_a6 out nocopy NUMBER
2013 , p6_a7 out nocopy DATE
2014 , p6_a8 out nocopy NUMBER
2015 )
2016
2017 as
2018 ddp_rps_rec okl_report_pvt.rps_rec_type;
2019 ddx_rps_rec okl_report_pvt.rps_rec_type;
2020 ddindx binary_integer; indx binary_integer;
2021 begin
2022
2023 -- copy data to the local IN or IN-OUT args, if any
2024
2025
2026
2027
2028
2029 ddp_rps_rec.stream_parameter_id := p5_a0;
2030 ddp_rps_rec.report_id := p5_a1;
2031 ddp_rps_rec.sty_id := p5_a2;
2032 ddp_rps_rec.activity_code := p5_a3;
2033 ddp_rps_rec.created_by := p5_a4;
2034 ddp_rps_rec.creation_date := p5_a5;
2035 ddp_rps_rec.last_updated_by := p5_a6;
2036 ddp_rps_rec.last_update_date := p5_a7;
2037 ddp_rps_rec.last_update_login := p5_a8;
2038
2039
2040 -- here's the delegated call to the old PL/SQL routine
2041 okl_report_pvt.update_report_strm_parameters(p_api_version,
2042 p_init_msg_list,
2043 x_return_status,
2044 x_msg_count,
2045 x_msg_data,
2046 ddp_rps_rec,
2047 ddx_rps_rec);
2048
2049 -- copy data back from the local variables to OUT or IN-OUT args, if any
2050
2051
2052
2053
2054
2055
2056 p6_a0 := ddx_rps_rec.stream_parameter_id;
2057 p6_a1 := ddx_rps_rec.report_id;
2058 p6_a2 := ddx_rps_rec.sty_id;
2059 p6_a3 := ddx_rps_rec.activity_code;
2060 p6_a4 := ddx_rps_rec.created_by;
2061 p6_a5 := ddx_rps_rec.creation_date;
2062 p6_a6 := ddx_rps_rec.last_updated_by;
2063 p6_a7 := ddx_rps_rec.last_update_date;
2064 p6_a8 := ddx_rps_rec.last_update_login;
2065 end;
2066
2067 procedure delete_report_strm_parameters(p_api_version NUMBER
2068 , p_init_msg_list VARCHAR2
2069 , x_return_status out nocopy VARCHAR2
2070 , x_msg_count out nocopy NUMBER
2071 , x_msg_data out nocopy VARCHAR2
2072 , p5_a0 NUMBER
2073 , p5_a1 NUMBER
2074 , p5_a2 NUMBER
2075 , p5_a3 VARCHAR2
2076 , p5_a4 NUMBER
2077 , p5_a5 DATE
2078 , p5_a6 NUMBER
2079 , p5_a7 DATE
2080 , p5_a8 NUMBER
2081 )
2082
2083 as
2084 ddp_rps_rec okl_report_pvt.rps_rec_type;
2085 ddindx binary_integer; indx binary_integer;
2086 begin
2087
2088 -- copy data to the local IN or IN-OUT args, if any
2089
2090
2091
2092
2093
2094 ddp_rps_rec.stream_parameter_id := p5_a0;
2095 ddp_rps_rec.report_id := p5_a1;
2096 ddp_rps_rec.sty_id := p5_a2;
2097 ddp_rps_rec.activity_code := p5_a3;
2098 ddp_rps_rec.created_by := p5_a4;
2099 ddp_rps_rec.creation_date := p5_a5;
2100 ddp_rps_rec.last_updated_by := p5_a6;
2101 ddp_rps_rec.last_update_date := p5_a7;
2102 ddp_rps_rec.last_update_login := p5_a8;
2103
2104 -- here's the delegated call to the old PL/SQL routine
2105 okl_report_pvt.delete_report_strm_parameters(p_api_version,
2106 p_init_msg_list,
2107 x_return_status,
2108 x_msg_count,
2109 x_msg_data,
2110 ddp_rps_rec);
2111
2112 -- copy data back from the local variables to OUT or IN-OUT args, if any
2113
2114
2115
2116
2117
2118 end;
2119
2120 procedure lock_report_strm_parameters(p_api_version NUMBER
2121 , p_init_msg_list VARCHAR2
2122 , x_return_status out nocopy VARCHAR2
2123 , x_msg_count out nocopy NUMBER
2124 , x_msg_data out nocopy VARCHAR2
2125 , p5_a0 NUMBER
2126 , p5_a1 NUMBER
2127 , p5_a2 NUMBER
2128 , p5_a3 VARCHAR2
2129 , p5_a4 NUMBER
2130 , p5_a5 DATE
2131 , p5_a6 NUMBER
2132 , p5_a7 DATE
2133 , p5_a8 NUMBER
2134 )
2135
2136 as
2137 ddp_rps_rec okl_report_pvt.rps_rec_type;
2138 ddindx binary_integer; indx binary_integer;
2139 begin
2140
2141 -- copy data to the local IN or IN-OUT args, if any
2142
2143
2144
2145
2146
2147 ddp_rps_rec.stream_parameter_id := p5_a0;
2148 ddp_rps_rec.report_id := p5_a1;
2149 ddp_rps_rec.sty_id := p5_a2;
2150 ddp_rps_rec.activity_code := p5_a3;
2151 ddp_rps_rec.created_by := p5_a4;
2152 ddp_rps_rec.creation_date := p5_a5;
2153 ddp_rps_rec.last_updated_by := p5_a6;
2154 ddp_rps_rec.last_update_date := p5_a7;
2155 ddp_rps_rec.last_update_login := p5_a8;
2156
2157 -- here's the delegated call to the old PL/SQL routine
2158 okl_report_pvt.lock_report_strm_parameters(p_api_version,
2159 p_init_msg_list,
2160 x_return_status,
2161 x_msg_count,
2162 x_msg_data,
2163 ddp_rps_rec);
2164
2165 -- copy data back from the local variables to OUT or IN-OUT args, if any
2166
2167
2168
2169
2170
2171 end;
2172
2173 procedure create_report_strm_parameters(p_api_version NUMBER
2174 , p_init_msg_list VARCHAR2
2175 , x_return_status out nocopy VARCHAR2
2176 , x_msg_count out nocopy NUMBER
2177 , x_msg_data out nocopy VARCHAR2
2178 , p5_a0 JTF_NUMBER_TABLE
2179 , p5_a1 JTF_NUMBER_TABLE
2180 , p5_a2 JTF_NUMBER_TABLE
2181 , p5_a3 JTF_VARCHAR2_TABLE_100
2182 , p5_a4 JTF_NUMBER_TABLE
2183 , p5_a5 JTF_DATE_TABLE
2184 , p5_a6 JTF_NUMBER_TABLE
2185 , p5_a7 JTF_DATE_TABLE
2186 , p5_a8 JTF_NUMBER_TABLE
2187 , p6_a0 out nocopy JTF_NUMBER_TABLE
2188 , p6_a1 out nocopy JTF_NUMBER_TABLE
2189 , p6_a2 out nocopy JTF_NUMBER_TABLE
2190 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
2191 , p6_a4 out nocopy JTF_NUMBER_TABLE
2192 , p6_a5 out nocopy JTF_DATE_TABLE
2193 , p6_a6 out nocopy JTF_NUMBER_TABLE
2194 , p6_a7 out nocopy JTF_DATE_TABLE
2195 , p6_a8 out nocopy JTF_NUMBER_TABLE
2196 )
2197
2198 as
2199 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
2200 ddx_rps_tbl okl_report_pvt.rps_tbl_type;
2201 ddindx binary_integer; indx binary_integer;
2202 begin
2203
2204 -- copy data to the local IN or IN-OUT args, if any
2205
2206
2207
2208
2209
2210 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p5_a0
2211 , p5_a1
2212 , p5_a2
2213 , p5_a3
2214 , p5_a4
2215 , p5_a5
2216 , p5_a6
2217 , p5_a7
2218 , p5_a8
2219 );
2220
2221
2222 -- here's the delegated call to the old PL/SQL routine
2223 okl_report_pvt.create_report_strm_parameters(p_api_version,
2224 p_init_msg_list,
2225 x_return_status,
2226 x_msg_count,
2227 x_msg_data,
2228 ddp_rps_tbl,
2229 ddx_rps_tbl);
2230
2231 -- copy data back from the local variables to OUT or IN-OUT args, if any
2232
2233
2234
2235
2236
2237
2238 okl_rsp_pvt_w.rosetta_table_copy_out_p2(ddx_rps_tbl, p6_a0
2239 , p6_a1
2240 , p6_a2
2241 , p6_a3
2242 , p6_a4
2243 , p6_a5
2244 , p6_a6
2245 , p6_a7
2246 , p6_a8
2247 );
2248 end;
2249
2250 procedure update_report_strm_parameters(p_api_version NUMBER
2251 , p_init_msg_list VARCHAR2
2252 , x_return_status out nocopy VARCHAR2
2253 , x_msg_count out nocopy NUMBER
2254 , x_msg_data out nocopy VARCHAR2
2255 , p5_a0 JTF_NUMBER_TABLE
2256 , p5_a1 JTF_NUMBER_TABLE
2257 , p5_a2 JTF_NUMBER_TABLE
2258 , p5_a3 JTF_VARCHAR2_TABLE_100
2259 , p5_a4 JTF_NUMBER_TABLE
2260 , p5_a5 JTF_DATE_TABLE
2261 , p5_a6 JTF_NUMBER_TABLE
2262 , p5_a7 JTF_DATE_TABLE
2263 , p5_a8 JTF_NUMBER_TABLE
2264 , p6_a0 out nocopy JTF_NUMBER_TABLE
2265 , p6_a1 out nocopy JTF_NUMBER_TABLE
2266 , p6_a2 out nocopy JTF_NUMBER_TABLE
2267 , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
2268 , p6_a4 out nocopy JTF_NUMBER_TABLE
2269 , p6_a5 out nocopy JTF_DATE_TABLE
2270 , p6_a6 out nocopy JTF_NUMBER_TABLE
2271 , p6_a7 out nocopy JTF_DATE_TABLE
2272 , p6_a8 out nocopy JTF_NUMBER_TABLE
2273 )
2274
2275 as
2276 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
2277 ddx_rps_tbl okl_report_pvt.rps_tbl_type;
2278 ddindx binary_integer; indx binary_integer;
2279 begin
2280
2281 -- copy data to the local IN or IN-OUT args, if any
2282
2283
2284
2285
2286
2287 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p5_a0
2288 , p5_a1
2289 , p5_a2
2290 , p5_a3
2291 , p5_a4
2292 , p5_a5
2293 , p5_a6
2294 , p5_a7
2295 , p5_a8
2296 );
2297
2298
2299 -- here's the delegated call to the old PL/SQL routine
2300 okl_report_pvt.update_report_strm_parameters(p_api_version,
2301 p_init_msg_list,
2302 x_return_status,
2303 x_msg_count,
2304 x_msg_data,
2305 ddp_rps_tbl,
2306 ddx_rps_tbl);
2307
2308 -- copy data back from the local variables to OUT or IN-OUT args, if any
2309
2310
2311
2312
2313
2314
2315 okl_rsp_pvt_w.rosetta_table_copy_out_p2(ddx_rps_tbl, p6_a0
2316 , p6_a1
2317 , p6_a2
2318 , p6_a3
2319 , p6_a4
2320 , p6_a5
2321 , p6_a6
2322 , p6_a7
2323 , p6_a8
2324 );
2325 end;
2326
2327 procedure delete_report_strm_parameters(p_api_version NUMBER
2328 , p_init_msg_list VARCHAR2
2329 , x_return_status out nocopy VARCHAR2
2330 , x_msg_count out nocopy NUMBER
2331 , x_msg_data out nocopy VARCHAR2
2332 , p5_a0 JTF_NUMBER_TABLE
2333 , p5_a1 JTF_NUMBER_TABLE
2334 , p5_a2 JTF_NUMBER_TABLE
2335 , p5_a3 JTF_VARCHAR2_TABLE_100
2336 , p5_a4 JTF_NUMBER_TABLE
2337 , p5_a5 JTF_DATE_TABLE
2338 , p5_a6 JTF_NUMBER_TABLE
2339 , p5_a7 JTF_DATE_TABLE
2340 , p5_a8 JTF_NUMBER_TABLE
2341 )
2342
2343 as
2344 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
2345 ddindx binary_integer; indx binary_integer;
2346 begin
2347
2348 -- copy data to the local IN or IN-OUT args, if any
2349
2350
2351
2352
2353
2354 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p5_a0
2355 , p5_a1
2356 , p5_a2
2357 , p5_a3
2358 , p5_a4
2359 , p5_a5
2360 , p5_a6
2361 , p5_a7
2362 , p5_a8
2363 );
2364
2365 -- here's the delegated call to the old PL/SQL routine
2366 okl_report_pvt.delete_report_strm_parameters(p_api_version,
2367 p_init_msg_list,
2368 x_return_status,
2369 x_msg_count,
2370 x_msg_data,
2371 ddp_rps_tbl);
2372
2373 -- copy data back from the local variables to OUT or IN-OUT args, if any
2374
2375
2376
2377
2378
2379 end;
2380
2381 procedure lock_report_strm_parameters(p_api_version NUMBER
2382 , p_init_msg_list VARCHAR2
2383 , x_return_status out nocopy VARCHAR2
2384 , x_msg_count out nocopy NUMBER
2385 , x_msg_data out nocopy VARCHAR2
2386 , p5_a0 JTF_NUMBER_TABLE
2387 , p5_a1 JTF_NUMBER_TABLE
2388 , p5_a2 JTF_NUMBER_TABLE
2389 , p5_a3 JTF_VARCHAR2_TABLE_100
2390 , p5_a4 JTF_NUMBER_TABLE
2391 , p5_a5 JTF_DATE_TABLE
2392 , p5_a6 JTF_NUMBER_TABLE
2393 , p5_a7 JTF_DATE_TABLE
2394 , p5_a8 JTF_NUMBER_TABLE
2395 )
2396
2397 as
2398 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
2399 ddindx binary_integer; indx binary_integer;
2400 begin
2401
2402 -- copy data to the local IN or IN-OUT args, if any
2403
2404
2405
2406
2407
2408 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p5_a0
2409 , p5_a1
2410 , p5_a2
2411 , p5_a3
2412 , p5_a4
2413 , p5_a5
2414 , p5_a6
2415 , p5_a7
2416 , p5_a8
2417 );
2418
2419 -- here's the delegated call to the old PL/SQL routine
2420 okl_report_pvt.lock_report_strm_parameters(p_api_version,
2421 p_init_msg_list,
2422 x_return_status,
2423 x_msg_count,
2424 x_msg_data,
2425 ddp_rps_tbl);
2426
2427 -- copy data back from the local variables to OUT or IN-OUT args, if any
2428
2429
2430
2431
2432
2433 end;
2434
2435 procedure create_report_trx_parameters(p_api_version NUMBER
2436 , p_init_msg_list VARCHAR2
2437 , x_return_status out nocopy VARCHAR2
2438 , x_msg_count out nocopy NUMBER
2439 , x_msg_data out nocopy VARCHAR2
2440 , p5_a0 NUMBER
2441 , p5_a1 NUMBER
2442 , p5_a2 NUMBER
2443 , p5_a3 NUMBER
2444 , p5_a4 VARCHAR2
2445 , p5_a5 NUMBER
2446 , p5_a6 DATE
2447 , p5_a7 NUMBER
2448 , p5_a8 DATE
2449 , p5_a9 NUMBER
2450 , p6_a0 out nocopy NUMBER
2451 , p6_a1 out nocopy NUMBER
2452 , p6_a2 out nocopy NUMBER
2453 , p6_a3 out nocopy NUMBER
2454 , p6_a4 out nocopy VARCHAR2
2455 , p6_a5 out nocopy NUMBER
2456 , p6_a6 out nocopy DATE
2457 , p6_a7 out nocopy NUMBER
2458 , p6_a8 out nocopy DATE
2459 , p6_a9 out nocopy NUMBER
2460 )
2461
2462 as
2463 ddp_rtp_rec okl_report_pvt.rtp_rec_type;
2464 ddx_rtp_rec okl_report_pvt.rtp_rec_type;
2465 ddindx binary_integer; indx binary_integer;
2466 begin
2467
2468 -- copy data to the local IN or IN-OUT args, if any
2469
2470
2471
2472
2473
2474 ddp_rtp_rec.trx_parameter_id := p5_a0;
2475 ddp_rtp_rec.report_id := p5_a1;
2476 ddp_rtp_rec.try_id := p5_a2;
2477 ddp_rtp_rec.sty_id := p5_a3;
2478 ddp_rtp_rec.add_substract_code := p5_a4;
2479 ddp_rtp_rec.created_by := p5_a5;
2480 ddp_rtp_rec.creation_date := p5_a6;
2481 ddp_rtp_rec.last_updated_by := p5_a7;
2482 ddp_rtp_rec.last_update_date := p5_a8;
2483 ddp_rtp_rec.last_update_login := p5_a9;
2484
2485
2486 -- here's the delegated call to the old PL/SQL routine
2487 okl_report_pvt.create_report_trx_parameters(p_api_version,
2488 p_init_msg_list,
2489 x_return_status,
2490 x_msg_count,
2491 x_msg_data,
2492 ddp_rtp_rec,
2493 ddx_rtp_rec);
2494
2495 -- copy data back from the local variables to OUT or IN-OUT args, if any
2496
2497
2498
2499
2500
2501
2502 p6_a0 := ddx_rtp_rec.trx_parameter_id;
2503 p6_a1 := ddx_rtp_rec.report_id;
2504 p6_a2 := ddx_rtp_rec.try_id;
2505 p6_a3 := ddx_rtp_rec.sty_id;
2506 p6_a4 := ddx_rtp_rec.add_substract_code;
2507 p6_a5 := ddx_rtp_rec.created_by;
2508 p6_a6 := ddx_rtp_rec.creation_date;
2509 p6_a7 := ddx_rtp_rec.last_updated_by;
2510 p6_a8 := ddx_rtp_rec.last_update_date;
2511 p6_a9 := ddx_rtp_rec.last_update_login;
2512 end;
2513
2514 procedure update_report_trx_parameters(p_api_version NUMBER
2515 , p_init_msg_list VARCHAR2
2516 , x_return_status out nocopy VARCHAR2
2517 , x_msg_count out nocopy NUMBER
2518 , x_msg_data out nocopy VARCHAR2
2519 , p5_a0 NUMBER
2520 , p5_a1 NUMBER
2521 , p5_a2 NUMBER
2522 , p5_a3 NUMBER
2523 , p5_a4 VARCHAR2
2524 , p5_a5 NUMBER
2525 , p5_a6 DATE
2526 , p5_a7 NUMBER
2527 , p5_a8 DATE
2528 , p5_a9 NUMBER
2529 , p6_a0 out nocopy NUMBER
2530 , p6_a1 out nocopy NUMBER
2531 , p6_a2 out nocopy NUMBER
2532 , p6_a3 out nocopy NUMBER
2533 , p6_a4 out nocopy VARCHAR2
2534 , p6_a5 out nocopy NUMBER
2535 , p6_a6 out nocopy DATE
2536 , p6_a7 out nocopy NUMBER
2537 , p6_a8 out nocopy DATE
2538 , p6_a9 out nocopy NUMBER
2539 )
2540
2541 as
2542 ddp_rtp_rec okl_report_pvt.rtp_rec_type;
2543 ddx_rtp_rec okl_report_pvt.rtp_rec_type;
2544 ddindx binary_integer; indx binary_integer;
2545 begin
2546
2547 -- copy data to the local IN or IN-OUT args, if any
2548
2549
2550
2551
2552
2553 ddp_rtp_rec.trx_parameter_id := p5_a0;
2554 ddp_rtp_rec.report_id := p5_a1;
2555 ddp_rtp_rec.try_id := p5_a2;
2556 ddp_rtp_rec.sty_id := p5_a3;
2557 ddp_rtp_rec.add_substract_code := p5_a4;
2558 ddp_rtp_rec.created_by := p5_a5;
2559 ddp_rtp_rec.creation_date := p5_a6;
2560 ddp_rtp_rec.last_updated_by := p5_a7;
2561 ddp_rtp_rec.last_update_date := p5_a8;
2562 ddp_rtp_rec.last_update_login := p5_a9;
2563
2564
2565 -- here's the delegated call to the old PL/SQL routine
2566 okl_report_pvt.update_report_trx_parameters(p_api_version,
2567 p_init_msg_list,
2568 x_return_status,
2569 x_msg_count,
2570 x_msg_data,
2571 ddp_rtp_rec,
2572 ddx_rtp_rec);
2573
2574 -- copy data back from the local variables to OUT or IN-OUT args, if any
2575
2576
2577
2578
2579
2580
2581 p6_a0 := ddx_rtp_rec.trx_parameter_id;
2582 p6_a1 := ddx_rtp_rec.report_id;
2583 p6_a2 := ddx_rtp_rec.try_id;
2584 p6_a3 := ddx_rtp_rec.sty_id;
2585 p6_a4 := ddx_rtp_rec.add_substract_code;
2586 p6_a5 := ddx_rtp_rec.created_by;
2587 p6_a6 := ddx_rtp_rec.creation_date;
2588 p6_a7 := ddx_rtp_rec.last_updated_by;
2589 p6_a8 := ddx_rtp_rec.last_update_date;
2590 p6_a9 := ddx_rtp_rec.last_update_login;
2591 end;
2592
2593 procedure delete_report_trx_parameters(p_api_version NUMBER
2594 , p_init_msg_list VARCHAR2
2595 , x_return_status out nocopy VARCHAR2
2596 , x_msg_count out nocopy NUMBER
2597 , x_msg_data out nocopy VARCHAR2
2598 , p5_a0 NUMBER
2599 , p5_a1 NUMBER
2600 , p5_a2 NUMBER
2601 , p5_a3 NUMBER
2602 , p5_a4 VARCHAR2
2603 , p5_a5 NUMBER
2604 , p5_a6 DATE
2605 , p5_a7 NUMBER
2606 , p5_a8 DATE
2607 , p5_a9 NUMBER
2608 )
2609
2610 as
2611 ddp_rtp_rec okl_report_pvt.rtp_rec_type;
2612 ddindx binary_integer; indx binary_integer;
2613 begin
2614
2615 -- copy data to the local IN or IN-OUT args, if any
2616
2617
2618
2619
2620
2621 ddp_rtp_rec.trx_parameter_id := p5_a0;
2622 ddp_rtp_rec.report_id := p5_a1;
2623 ddp_rtp_rec.try_id := p5_a2;
2624 ddp_rtp_rec.sty_id := p5_a3;
2625 ddp_rtp_rec.add_substract_code := p5_a4;
2626 ddp_rtp_rec.created_by := p5_a5;
2627 ddp_rtp_rec.creation_date := p5_a6;
2628 ddp_rtp_rec.last_updated_by := p5_a7;
2629 ddp_rtp_rec.last_update_date := p5_a8;
2630 ddp_rtp_rec.last_update_login := p5_a9;
2631
2632 -- here's the delegated call to the old PL/SQL routine
2633 okl_report_pvt.delete_report_trx_parameters(p_api_version,
2634 p_init_msg_list,
2635 x_return_status,
2636 x_msg_count,
2637 x_msg_data,
2638 ddp_rtp_rec);
2639
2640 -- copy data back from the local variables to OUT or IN-OUT args, if any
2641
2642
2643
2644
2645
2646 end;
2647
2648 procedure lock_report_trx_parameters(p_api_version NUMBER
2649 , p_init_msg_list VARCHAR2
2650 , x_return_status out nocopy VARCHAR2
2651 , x_msg_count out nocopy NUMBER
2652 , x_msg_data out nocopy VARCHAR2
2653 , p5_a0 NUMBER
2654 , p5_a1 NUMBER
2655 , p5_a2 NUMBER
2656 , p5_a3 NUMBER
2657 , p5_a4 VARCHAR2
2658 , p5_a5 NUMBER
2659 , p5_a6 DATE
2660 , p5_a7 NUMBER
2661 , p5_a8 DATE
2662 , p5_a9 NUMBER
2663 )
2664
2665 as
2666 ddp_rtp_rec okl_report_pvt.rtp_rec_type;
2667 ddindx binary_integer; indx binary_integer;
2668 begin
2669
2670 -- copy data to the local IN or IN-OUT args, if any
2671
2672
2673
2674
2675
2676 ddp_rtp_rec.trx_parameter_id := p5_a0;
2677 ddp_rtp_rec.report_id := p5_a1;
2678 ddp_rtp_rec.try_id := p5_a2;
2679 ddp_rtp_rec.sty_id := p5_a3;
2680 ddp_rtp_rec.add_substract_code := p5_a4;
2681 ddp_rtp_rec.created_by := p5_a5;
2682 ddp_rtp_rec.creation_date := p5_a6;
2683 ddp_rtp_rec.last_updated_by := p5_a7;
2684 ddp_rtp_rec.last_update_date := p5_a8;
2685 ddp_rtp_rec.last_update_login := p5_a9;
2686
2687 -- here's the delegated call to the old PL/SQL routine
2688 okl_report_pvt.lock_report_trx_parameters(p_api_version,
2689 p_init_msg_list,
2690 x_return_status,
2691 x_msg_count,
2692 x_msg_data,
2693 ddp_rtp_rec);
2694
2695 -- copy data back from the local variables to OUT or IN-OUT args, if any
2696
2697
2698
2699
2700
2701 end;
2702
2703 procedure create_report_trx_parameters(p_api_version NUMBER
2704 , p_init_msg_list VARCHAR2
2705 , x_return_status out nocopy VARCHAR2
2706 , x_msg_count out nocopy NUMBER
2707 , x_msg_data out nocopy VARCHAR2
2708 , p5_a0 JTF_NUMBER_TABLE
2709 , p5_a1 JTF_NUMBER_TABLE
2710 , p5_a2 JTF_NUMBER_TABLE
2711 , p5_a3 JTF_NUMBER_TABLE
2712 , p5_a4 JTF_VARCHAR2_TABLE_100
2713 , p5_a5 JTF_NUMBER_TABLE
2714 , p5_a6 JTF_DATE_TABLE
2715 , p5_a7 JTF_NUMBER_TABLE
2716 , p5_a8 JTF_DATE_TABLE
2717 , p5_a9 JTF_NUMBER_TABLE
2718 , p6_a0 out nocopy JTF_NUMBER_TABLE
2719 , p6_a1 out nocopy JTF_NUMBER_TABLE
2720 , p6_a2 out nocopy JTF_NUMBER_TABLE
2721 , p6_a3 out nocopy JTF_NUMBER_TABLE
2722 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
2723 , p6_a5 out nocopy JTF_NUMBER_TABLE
2724 , p6_a6 out nocopy JTF_DATE_TABLE
2725 , p6_a7 out nocopy JTF_NUMBER_TABLE
2726 , p6_a8 out nocopy JTF_DATE_TABLE
2727 , p6_a9 out nocopy JTF_NUMBER_TABLE
2728 )
2729
2730 as
2731 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
2732 ddx_rtp_tbl okl_report_pvt.rtp_tbl_type;
2733 ddindx binary_integer; indx binary_integer;
2734 begin
2735
2736 -- copy data to the local IN or IN-OUT args, if any
2737
2738
2739
2740
2741
2742 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p5_a0
2743 , p5_a1
2744 , p5_a2
2745 , p5_a3
2746 , p5_a4
2747 , p5_a5
2748 , p5_a6
2749 , p5_a7
2750 , p5_a8
2751 , p5_a9
2752 );
2753
2754
2755 -- here's the delegated call to the old PL/SQL routine
2756 okl_report_pvt.create_report_trx_parameters(p_api_version,
2757 p_init_msg_list,
2758 x_return_status,
2759 x_msg_count,
2760 x_msg_data,
2761 ddp_rtp_tbl,
2762 ddx_rtp_tbl);
2763
2764 -- copy data back from the local variables to OUT or IN-OUT args, if any
2765
2766
2767
2768
2769
2770
2771 okl_rtp_pvt_w.rosetta_table_copy_out_p2(ddx_rtp_tbl, p6_a0
2772 , p6_a1
2773 , p6_a2
2774 , p6_a3
2775 , p6_a4
2776 , p6_a5
2777 , p6_a6
2778 , p6_a7
2779 , p6_a8
2780 , p6_a9
2781 );
2782 end;
2783
2784 procedure update_report_trx_parameters(p_api_version NUMBER
2785 , p_init_msg_list VARCHAR2
2786 , x_return_status out nocopy VARCHAR2
2787 , x_msg_count out nocopy NUMBER
2788 , x_msg_data out nocopy VARCHAR2
2789 , p5_a0 JTF_NUMBER_TABLE
2790 , p5_a1 JTF_NUMBER_TABLE
2791 , p5_a2 JTF_NUMBER_TABLE
2792 , p5_a3 JTF_NUMBER_TABLE
2793 , p5_a4 JTF_VARCHAR2_TABLE_100
2794 , p5_a5 JTF_NUMBER_TABLE
2795 , p5_a6 JTF_DATE_TABLE
2796 , p5_a7 JTF_NUMBER_TABLE
2797 , p5_a8 JTF_DATE_TABLE
2798 , p5_a9 JTF_NUMBER_TABLE
2799 , p6_a0 out nocopy JTF_NUMBER_TABLE
2800 , p6_a1 out nocopy JTF_NUMBER_TABLE
2801 , p6_a2 out nocopy JTF_NUMBER_TABLE
2802 , p6_a3 out nocopy JTF_NUMBER_TABLE
2803 , p6_a4 out nocopy JTF_VARCHAR2_TABLE_100
2804 , p6_a5 out nocopy JTF_NUMBER_TABLE
2805 , p6_a6 out nocopy JTF_DATE_TABLE
2806 , p6_a7 out nocopy JTF_NUMBER_TABLE
2807 , p6_a8 out nocopy JTF_DATE_TABLE
2808 , p6_a9 out nocopy JTF_NUMBER_TABLE
2809 )
2810
2811 as
2812 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
2813 ddx_rtp_tbl okl_report_pvt.rtp_tbl_type;
2814 ddindx binary_integer; indx binary_integer;
2815 begin
2816
2817 -- copy data to the local IN or IN-OUT args, if any
2818
2819
2820
2821
2822
2823 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p5_a0
2824 , p5_a1
2825 , p5_a2
2826 , p5_a3
2827 , p5_a4
2828 , p5_a5
2829 , p5_a6
2830 , p5_a7
2831 , p5_a8
2832 , p5_a9
2833 );
2834
2835
2836 -- here's the delegated call to the old PL/SQL routine
2837 okl_report_pvt.update_report_trx_parameters(p_api_version,
2838 p_init_msg_list,
2839 x_return_status,
2840 x_msg_count,
2841 x_msg_data,
2842 ddp_rtp_tbl,
2843 ddx_rtp_tbl);
2844
2845 -- copy data back from the local variables to OUT or IN-OUT args, if any
2846
2847
2848
2849
2850
2851
2852 okl_rtp_pvt_w.rosetta_table_copy_out_p2(ddx_rtp_tbl, p6_a0
2853 , p6_a1
2854 , p6_a2
2855 , p6_a3
2856 , p6_a4
2857 , p6_a5
2858 , p6_a6
2859 , p6_a7
2860 , p6_a8
2861 , p6_a9
2862 );
2863 end;
2864
2865 procedure delete_report_trx_parameters(p_api_version NUMBER
2866 , p_init_msg_list VARCHAR2
2867 , x_return_status out nocopy VARCHAR2
2868 , x_msg_count out nocopy NUMBER
2869 , x_msg_data out nocopy VARCHAR2
2870 , p5_a0 JTF_NUMBER_TABLE
2871 , p5_a1 JTF_NUMBER_TABLE
2872 , p5_a2 JTF_NUMBER_TABLE
2873 , p5_a3 JTF_NUMBER_TABLE
2874 , p5_a4 JTF_VARCHAR2_TABLE_100
2875 , p5_a5 JTF_NUMBER_TABLE
2876 , p5_a6 JTF_DATE_TABLE
2877 , p5_a7 JTF_NUMBER_TABLE
2878 , p5_a8 JTF_DATE_TABLE
2879 , p5_a9 JTF_NUMBER_TABLE
2880 )
2881
2882 as
2883 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
2884 ddindx binary_integer; indx binary_integer;
2885 begin
2886
2887 -- copy data to the local IN or IN-OUT args, if any
2888
2889
2890
2891
2892
2893 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p5_a0
2894 , p5_a1
2895 , p5_a2
2896 , p5_a3
2897 , p5_a4
2898 , p5_a5
2899 , p5_a6
2900 , p5_a7
2901 , p5_a8
2902 , p5_a9
2903 );
2904
2905 -- here's the delegated call to the old PL/SQL routine
2906 okl_report_pvt.delete_report_trx_parameters(p_api_version,
2907 p_init_msg_list,
2908 x_return_status,
2909 x_msg_count,
2910 x_msg_data,
2911 ddp_rtp_tbl);
2912
2913 -- copy data back from the local variables to OUT or IN-OUT args, if any
2914
2915
2916
2917
2918
2919 end;
2920
2921 procedure lock_report_trx_parameters(p_api_version NUMBER
2922 , p_init_msg_list VARCHAR2
2923 , x_return_status out nocopy VARCHAR2
2924 , x_msg_count out nocopy NUMBER
2925 , x_msg_data out nocopy VARCHAR2
2926 , p5_a0 JTF_NUMBER_TABLE
2927 , p5_a1 JTF_NUMBER_TABLE
2928 , p5_a2 JTF_NUMBER_TABLE
2929 , p5_a3 JTF_NUMBER_TABLE
2930 , p5_a4 JTF_VARCHAR2_TABLE_100
2931 , p5_a5 JTF_NUMBER_TABLE
2932 , p5_a6 JTF_DATE_TABLE
2933 , p5_a7 JTF_NUMBER_TABLE
2934 , p5_a8 JTF_DATE_TABLE
2935 , p5_a9 JTF_NUMBER_TABLE
2936 )
2937
2938 as
2939 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
2940 ddindx binary_integer; indx binary_integer;
2941 begin
2942
2943 -- copy data to the local IN or IN-OUT args, if any
2944
2945
2946
2947
2948
2949 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p5_a0
2950 , p5_a1
2951 , p5_a2
2952 , p5_a3
2953 , p5_a4
2954 , p5_a5
2955 , p5_a6
2956 , p5_a7
2957 , p5_a8
2958 , p5_a9
2959 );
2960
2961 -- here's the delegated call to the old PL/SQL routine
2962 okl_report_pvt.lock_report_trx_parameters(p_api_version,
2963 p_init_msg_list,
2964 x_return_status,
2965 x_msg_count,
2966 x_msg_data,
2967 ddp_rtp_tbl);
2968
2969 -- copy data back from the local variables to OUT or IN-OUT args, if any
2970
2971
2972
2973
2974
2975 end;
2976
2977 procedure create_report(p_api_version NUMBER
2978 , p_init_msg_list VARCHAR2
2979 , x_return_status out nocopy VARCHAR2
2980 , x_msg_count out nocopy NUMBER
2981 , x_msg_data out nocopy VARCHAR2
2982 , p5_a0 NUMBER
2983 , p5_a1 VARCHAR2
2984 , p5_a2 NUMBER
2985 , p5_a3 VARCHAR2
2986 , p5_a4 NUMBER
2987 , p5_a5 VARCHAR2
2988 , p5_a6 VARCHAR2
2989 , p5_a7 VARCHAR2
2990 , p5_a8 VARCHAR2
2991 , p5_a9 VARCHAR2
2992 , p5_a10 DATE
2993 , p5_a11 DATE
2994 , p5_a12 NUMBER
2995 , p5_a13 DATE
2996 , p5_a14 NUMBER
2997 , p5_a15 DATE
2998 , p5_a16 NUMBER
2999 , p5_a17 VARCHAR2
3000 , p5_a18 VARCHAR2
3001 , p5_a19 VARCHAR2
3002 , p6_a0 out nocopy NUMBER
3003 , p6_a1 out nocopy VARCHAR2
3004 , p6_a2 out nocopy NUMBER
3005 , p6_a3 out nocopy VARCHAR2
3006 , p6_a4 out nocopy NUMBER
3007 , p6_a5 out nocopy VARCHAR2
3008 , p6_a6 out nocopy VARCHAR2
3009 , p6_a7 out nocopy VARCHAR2
3010 , p6_a8 out nocopy VARCHAR2
3011 , p6_a9 out nocopy VARCHAR2
3012 , p6_a10 out nocopy DATE
3013 , p6_a11 out nocopy DATE
3014 , p6_a12 out nocopy NUMBER
3015 , p6_a13 out nocopy DATE
3016 , p6_a14 out nocopy NUMBER
3017 , p6_a15 out nocopy DATE
3018 , p6_a16 out nocopy NUMBER
3019 , p6_a17 out nocopy VARCHAR2
3020 , p6_a18 out nocopy VARCHAR2
3021 , p6_a19 out nocopy VARCHAR2
3022 , p7_a0 JTF_NUMBER_TABLE
3023 , p7_a1 JTF_NUMBER_TABLE
3024 , p7_a2 JTF_VARCHAR2_TABLE_100
3025 , p7_a3 JTF_NUMBER_TABLE
3026 , p7_a4 JTF_VARCHAR2_TABLE_300
3027 , p7_a5 JTF_DATE_TABLE
3028 , p7_a6 JTF_NUMBER_TABLE
3029 , p7_a7 JTF_VARCHAR2_TABLE_100
3030 , p7_a8 JTF_DATE_TABLE
3031 , p7_a9 JTF_NUMBER_TABLE
3032 , p7_a10 JTF_DATE_TABLE
3033 , p7_a11 JTF_NUMBER_TABLE
3034 , p8_a0 out nocopy JTF_NUMBER_TABLE
3035 , p8_a1 out nocopy JTF_NUMBER_TABLE
3036 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
3037 , p8_a3 out nocopy JTF_NUMBER_TABLE
3038 , p8_a4 out nocopy JTF_VARCHAR2_TABLE_300
3039 , p8_a5 out nocopy JTF_DATE_TABLE
3040 , p8_a6 out nocopy JTF_NUMBER_TABLE
3041 , p8_a7 out nocopy JTF_VARCHAR2_TABLE_100
3042 , p8_a8 out nocopy JTF_DATE_TABLE
3043 , p8_a9 out nocopy JTF_NUMBER_TABLE
3044 , p8_a10 out nocopy JTF_DATE_TABLE
3045 , p8_a11 out nocopy JTF_NUMBER_TABLE
3046 , p9_a0 JTF_NUMBER_TABLE
3047 , p9_a1 JTF_NUMBER_TABLE
3048 , p9_a2 JTF_VARCHAR2_TABLE_100
3049 , p9_a3 JTF_NUMBER_TABLE
3050 , p9_a4 JTF_NUMBER_TABLE
3051 , p9_a5 JTF_NUMBER_TABLE
3052 , p9_a6 JTF_DATE_TABLE
3053 , p9_a7 JTF_NUMBER_TABLE
3054 , p9_a8 JTF_DATE_TABLE
3055 , p9_a9 JTF_NUMBER_TABLE
3056 , p10_a0 out nocopy JTF_NUMBER_TABLE
3057 , p10_a1 out nocopy JTF_NUMBER_TABLE
3058 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
3059 , p10_a3 out nocopy JTF_NUMBER_TABLE
3060 , p10_a4 out nocopy JTF_NUMBER_TABLE
3061 , p10_a5 out nocopy JTF_NUMBER_TABLE
3062 , p10_a6 out nocopy JTF_DATE_TABLE
3063 , p10_a7 out nocopy JTF_NUMBER_TABLE
3064 , p10_a8 out nocopy JTF_DATE_TABLE
3065 , p10_a9 out nocopy JTF_NUMBER_TABLE
3066 , p11_a0 JTF_NUMBER_TABLE
3067 , p11_a1 JTF_NUMBER_TABLE
3068 , p11_a2 JTF_NUMBER_TABLE
3069 , p11_a3 JTF_VARCHAR2_TABLE_100
3070 , p11_a4 JTF_NUMBER_TABLE
3071 , p11_a5 JTF_DATE_TABLE
3072 , p11_a6 JTF_NUMBER_TABLE
3073 , p11_a7 JTF_DATE_TABLE
3074 , p11_a8 JTF_NUMBER_TABLE
3075 , p12_a0 out nocopy JTF_NUMBER_TABLE
3076 , p12_a1 out nocopy JTF_NUMBER_TABLE
3077 , p12_a2 out nocopy JTF_NUMBER_TABLE
3078 , p12_a3 out nocopy JTF_VARCHAR2_TABLE_100
3079 , p12_a4 out nocopy JTF_NUMBER_TABLE
3080 , p12_a5 out nocopy JTF_DATE_TABLE
3081 , p12_a6 out nocopy JTF_NUMBER_TABLE
3082 , p12_a7 out nocopy JTF_DATE_TABLE
3083 , p12_a8 out nocopy JTF_NUMBER_TABLE
3084 , p13_a0 JTF_NUMBER_TABLE
3085 , p13_a1 JTF_NUMBER_TABLE
3086 , p13_a2 JTF_NUMBER_TABLE
3087 , p13_a3 JTF_NUMBER_TABLE
3088 , p13_a4 JTF_VARCHAR2_TABLE_100
3089 , p13_a5 JTF_NUMBER_TABLE
3090 , p13_a6 JTF_DATE_TABLE
3091 , p13_a7 JTF_NUMBER_TABLE
3092 , p13_a8 JTF_DATE_TABLE
3093 , p13_a9 JTF_NUMBER_TABLE
3094 , p14_a0 out nocopy JTF_NUMBER_TABLE
3095 , p14_a1 out nocopy JTF_NUMBER_TABLE
3096 , p14_a2 out nocopy JTF_NUMBER_TABLE
3097 , p14_a3 out nocopy JTF_NUMBER_TABLE
3098 , p14_a4 out nocopy JTF_VARCHAR2_TABLE_100
3099 , p14_a5 out nocopy JTF_NUMBER_TABLE
3100 , p14_a6 out nocopy JTF_DATE_TABLE
3101 , p14_a7 out nocopy JTF_NUMBER_TABLE
3102 , p14_a8 out nocopy JTF_DATE_TABLE
3103 , p14_a9 out nocopy JTF_NUMBER_TABLE
3104 )
3105
3106 as
3107 ddp_repv_rec okl_report_pvt.repv_rec_type;
3108 ddx_repv_rec okl_report_pvt.repv_rec_type;
3109 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
3110 ddx_rpp_tbl okl_report_pvt.rpp_tbl_type;
3111 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
3112 ddx_rap_tbl okl_report_pvt.rap_tbl_type;
3113 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
3114 ddx_rps_tbl okl_report_pvt.rps_tbl_type;
3115 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
3116 ddx_rtp_tbl okl_report_pvt.rtp_tbl_type;
3117 ddindx binary_integer; indx binary_integer;
3118 begin
3119
3120 -- copy data to the local IN or IN-OUT args, if any
3121
3122
3123
3124
3125
3126 ddp_repv_rec.report_id := p5_a0;
3127 ddp_repv_rec.name := p5_a1;
3128 ddp_repv_rec.chart_of_accounts_id := p5_a2;
3129 ddp_repv_rec.book_classification_code := p5_a3;
3130 ddp_repv_rec.ledger_id := p5_a4;
3131 ddp_repv_rec.report_category_code := p5_a5;
3132 ddp_repv_rec.report_type_code := p5_a6;
3133 ddp_repv_rec.activity_code := p5_a7;
3134 ddp_repv_rec.status_code := p5_a8;
3135 ddp_repv_rec.description := p5_a9;
3136 ddp_repv_rec.effective_from_date := p5_a10;
3137 ddp_repv_rec.effective_to_date := p5_a11;
3138 ddp_repv_rec.created_by := p5_a12;
3139 ddp_repv_rec.creation_date := p5_a13;
3140 ddp_repv_rec.last_updated_by := p5_a14;
3141 ddp_repv_rec.last_update_date := p5_a15;
3142 ddp_repv_rec.last_update_login := p5_a16;
3143 ddp_repv_rec.language := p5_a17;
3144 ddp_repv_rec.source_lang := p5_a18;
3145 ddp_repv_rec.sfwt_flag := p5_a19;
3146
3147
3148 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p7_a0
3149 , p7_a1
3150 , p7_a2
3151 , p7_a3
3152 , p7_a4
3153 , p7_a5
3154 , p7_a6
3155 , p7_a7
3156 , p7_a8
3157 , p7_a9
3158 , p7_a10
3159 , p7_a11
3160 );
3161
3162
3163 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p9_a0
3164 , p9_a1
3165 , p9_a2
3166 , p9_a3
3167 , p9_a4
3168 , p9_a5
3169 , p9_a6
3170 , p9_a7
3171 , p9_a8
3172 , p9_a9
3173 );
3174
3175
3176 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p11_a0
3177 , p11_a1
3178 , p11_a2
3179 , p11_a3
3180 , p11_a4
3181 , p11_a5
3182 , p11_a6
3183 , p11_a7
3184 , p11_a8
3185 );
3186
3187
3188 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p13_a0
3189 , p13_a1
3190 , p13_a2
3191 , p13_a3
3192 , p13_a4
3193 , p13_a5
3194 , p13_a6
3195 , p13_a7
3196 , p13_a8
3197 , p13_a9
3198 );
3199
3200
3201 -- here's the delegated call to the old PL/SQL routine
3202 okl_report_pvt.create_report(p_api_version,
3203 p_init_msg_list,
3204 x_return_status,
3205 x_msg_count,
3206 x_msg_data,
3207 ddp_repv_rec,
3208 ddx_repv_rec,
3209 ddp_rpp_tbl,
3210 ddx_rpp_tbl,
3211 ddp_rap_tbl,
3212 ddx_rap_tbl,
3213 ddp_rps_tbl,
3214 ddx_rps_tbl,
3215 ddp_rtp_tbl,
3216 ddx_rtp_tbl);
3217
3218 -- copy data back from the local variables to OUT or IN-OUT args, if any
3219
3220
3221
3222
3223
3224
3225 p6_a0 := ddx_repv_rec.report_id;
3226 p6_a1 := ddx_repv_rec.name;
3227 p6_a2 := ddx_repv_rec.chart_of_accounts_id;
3228 p6_a3 := ddx_repv_rec.book_classification_code;
3229 p6_a4 := ddx_repv_rec.ledger_id;
3230 p6_a5 := ddx_repv_rec.report_category_code;
3231 p6_a6 := ddx_repv_rec.report_type_code;
3232 p6_a7 := ddx_repv_rec.activity_code;
3233 p6_a8 := ddx_repv_rec.status_code;
3234 p6_a9 := ddx_repv_rec.description;
3235 p6_a10 := ddx_repv_rec.effective_from_date;
3236 p6_a11 := ddx_repv_rec.effective_to_date;
3237 p6_a12 := ddx_repv_rec.created_by;
3238 p6_a13 := ddx_repv_rec.creation_date;
3239 p6_a14 := ddx_repv_rec.last_updated_by;
3240 p6_a15 := ddx_repv_rec.last_update_date;
3241 p6_a16 := ddx_repv_rec.last_update_login;
3242 p6_a17 := ddx_repv_rec.language;
3243 p6_a18 := ddx_repv_rec.source_lang;
3244 p6_a19 := ddx_repv_rec.sfwt_flag;
3245
3246
3247 okl_rpp_pvt_w.rosetta_table_copy_out_p2(ddx_rpp_tbl, p8_a0
3248 , p8_a1
3249 , p8_a2
3250 , p8_a3
3251 , p8_a4
3252 , p8_a5
3253 , p8_a6
3254 , p8_a7
3255 , p8_a8
3256 , p8_a9
3257 , p8_a10
3258 , p8_a11
3259 );
3260
3261
3262 okl_rap_pvt_w.rosetta_table_copy_out_p2(ddx_rap_tbl, p10_a0
3263 , p10_a1
3264 , p10_a2
3265 , p10_a3
3266 , p10_a4
3267 , p10_a5
3268 , p10_a6
3269 , p10_a7
3270 , p10_a8
3271 , p10_a9
3272 );
3273
3274
3275 okl_rsp_pvt_w.rosetta_table_copy_out_p2(ddx_rps_tbl, p12_a0
3276 , p12_a1
3277 , p12_a2
3278 , p12_a3
3279 , p12_a4
3280 , p12_a5
3281 , p12_a6
3282 , p12_a7
3283 , p12_a8
3284 );
3285
3286
3287 okl_rtp_pvt_w.rosetta_table_copy_out_p2(ddx_rtp_tbl, p14_a0
3288 , p14_a1
3289 , p14_a2
3290 , p14_a3
3291 , p14_a4
3292 , p14_a5
3293 , p14_a6
3294 , p14_a7
3295 , p14_a8
3296 , p14_a9
3297 );
3298 end;
3299
3300 procedure update_report(p_api_version NUMBER
3301 , p_init_msg_list VARCHAR2
3302 , x_return_status out nocopy VARCHAR2
3303 , x_msg_count out nocopy NUMBER
3304 , x_msg_data out nocopy VARCHAR2
3305 , p5_a0 NUMBER
3306 , p5_a1 VARCHAR2
3307 , p5_a2 NUMBER
3308 , p5_a3 VARCHAR2
3309 , p5_a4 NUMBER
3310 , p5_a5 VARCHAR2
3311 , p5_a6 VARCHAR2
3312 , p5_a7 VARCHAR2
3313 , p5_a8 VARCHAR2
3314 , p5_a9 VARCHAR2
3315 , p5_a10 DATE
3316 , p5_a11 DATE
3317 , p5_a12 NUMBER
3318 , p5_a13 DATE
3319 , p5_a14 NUMBER
3320 , p5_a15 DATE
3321 , p5_a16 NUMBER
3322 , p5_a17 VARCHAR2
3323 , p5_a18 VARCHAR2
3324 , p5_a19 VARCHAR2
3325 , p6_a0 out nocopy NUMBER
3326 , p6_a1 out nocopy VARCHAR2
3327 , p6_a2 out nocopy NUMBER
3328 , p6_a3 out nocopy VARCHAR2
3329 , p6_a4 out nocopy NUMBER
3330 , p6_a5 out nocopy VARCHAR2
3331 , p6_a6 out nocopy VARCHAR2
3332 , p6_a7 out nocopy VARCHAR2
3333 , p6_a8 out nocopy VARCHAR2
3334 , p6_a9 out nocopy VARCHAR2
3335 , p6_a10 out nocopy DATE
3336 , p6_a11 out nocopy DATE
3337 , p6_a12 out nocopy NUMBER
3338 , p6_a13 out nocopy DATE
3339 , p6_a14 out nocopy NUMBER
3340 , p6_a15 out nocopy DATE
3341 , p6_a16 out nocopy NUMBER
3342 , p6_a17 out nocopy VARCHAR2
3343 , p6_a18 out nocopy VARCHAR2
3344 , p6_a19 out nocopy VARCHAR2
3345 , p7_a0 JTF_NUMBER_TABLE
3346 , p7_a1 JTF_NUMBER_TABLE
3347 , p7_a2 JTF_VARCHAR2_TABLE_100
3348 , p7_a3 JTF_NUMBER_TABLE
3349 , p7_a4 JTF_VARCHAR2_TABLE_300
3350 , p7_a5 JTF_DATE_TABLE
3351 , p7_a6 JTF_NUMBER_TABLE
3352 , p7_a7 JTF_VARCHAR2_TABLE_100
3353 , p7_a8 JTF_DATE_TABLE
3354 , p7_a9 JTF_NUMBER_TABLE
3355 , p7_a10 JTF_DATE_TABLE
3356 , p7_a11 JTF_NUMBER_TABLE
3357 , p8_a0 out nocopy JTF_NUMBER_TABLE
3358 , p8_a1 out nocopy JTF_NUMBER_TABLE
3359 , p8_a2 out nocopy JTF_VARCHAR2_TABLE_100
3360 , p8_a3 out nocopy JTF_NUMBER_TABLE
3361 , p8_a4 out nocopy JTF_VARCHAR2_TABLE_300
3362 , p8_a5 out nocopy JTF_DATE_TABLE
3363 , p8_a6 out nocopy JTF_NUMBER_TABLE
3364 , p8_a7 out nocopy JTF_VARCHAR2_TABLE_100
3365 , p8_a8 out nocopy JTF_DATE_TABLE
3366 , p8_a9 out nocopy JTF_NUMBER_TABLE
3367 , p8_a10 out nocopy JTF_DATE_TABLE
3368 , p8_a11 out nocopy JTF_NUMBER_TABLE
3369 , p9_a0 JTF_NUMBER_TABLE
3370 , p9_a1 JTF_NUMBER_TABLE
3371 , p9_a2 JTF_VARCHAR2_TABLE_100
3372 , p9_a3 JTF_NUMBER_TABLE
3373 , p9_a4 JTF_NUMBER_TABLE
3374 , p9_a5 JTF_NUMBER_TABLE
3375 , p9_a6 JTF_DATE_TABLE
3376 , p9_a7 JTF_NUMBER_TABLE
3377 , p9_a8 JTF_DATE_TABLE
3378 , p9_a9 JTF_NUMBER_TABLE
3379 , p10_a0 out nocopy JTF_NUMBER_TABLE
3380 , p10_a1 out nocopy JTF_NUMBER_TABLE
3381 , p10_a2 out nocopy JTF_VARCHAR2_TABLE_100
3382 , p10_a3 out nocopy JTF_NUMBER_TABLE
3383 , p10_a4 out nocopy JTF_NUMBER_TABLE
3384 , p10_a5 out nocopy JTF_NUMBER_TABLE
3385 , p10_a6 out nocopy JTF_DATE_TABLE
3386 , p10_a7 out nocopy JTF_NUMBER_TABLE
3387 , p10_a8 out nocopy JTF_DATE_TABLE
3388 , p10_a9 out nocopy JTF_NUMBER_TABLE
3389 , p11_a0 JTF_NUMBER_TABLE
3390 , p11_a1 JTF_NUMBER_TABLE
3391 , p11_a2 JTF_NUMBER_TABLE
3392 , p11_a3 JTF_VARCHAR2_TABLE_100
3393 , p11_a4 JTF_NUMBER_TABLE
3394 , p11_a5 JTF_DATE_TABLE
3395 , p11_a6 JTF_NUMBER_TABLE
3396 , p11_a7 JTF_DATE_TABLE
3397 , p11_a8 JTF_NUMBER_TABLE
3398 , p12_a0 out nocopy JTF_NUMBER_TABLE
3399 , p12_a1 out nocopy JTF_NUMBER_TABLE
3400 , p12_a2 out nocopy JTF_NUMBER_TABLE
3401 , p12_a3 out nocopy JTF_VARCHAR2_TABLE_100
3402 , p12_a4 out nocopy JTF_NUMBER_TABLE
3403 , p12_a5 out nocopy JTF_DATE_TABLE
3404 , p12_a6 out nocopy JTF_NUMBER_TABLE
3405 , p12_a7 out nocopy JTF_DATE_TABLE
3406 , p12_a8 out nocopy JTF_NUMBER_TABLE
3407 , p13_a0 JTF_NUMBER_TABLE
3408 , p13_a1 JTF_NUMBER_TABLE
3409 , p13_a2 JTF_NUMBER_TABLE
3410 , p13_a3 JTF_NUMBER_TABLE
3411 , p13_a4 JTF_VARCHAR2_TABLE_100
3412 , p13_a5 JTF_NUMBER_TABLE
3413 , p13_a6 JTF_DATE_TABLE
3414 , p13_a7 JTF_NUMBER_TABLE
3415 , p13_a8 JTF_DATE_TABLE
3416 , p13_a9 JTF_NUMBER_TABLE
3417 , p14_a0 out nocopy JTF_NUMBER_TABLE
3418 , p14_a1 out nocopy JTF_NUMBER_TABLE
3419 , p14_a2 out nocopy JTF_NUMBER_TABLE
3420 , p14_a3 out nocopy JTF_NUMBER_TABLE
3421 , p14_a4 out nocopy JTF_VARCHAR2_TABLE_100
3422 , p14_a5 out nocopy JTF_NUMBER_TABLE
3423 , p14_a6 out nocopy JTF_DATE_TABLE
3424 , p14_a7 out nocopy JTF_NUMBER_TABLE
3425 , p14_a8 out nocopy JTF_DATE_TABLE
3426 , p14_a9 out nocopy JTF_NUMBER_TABLE
3427 )
3428
3429 as
3430 ddp_repv_rec okl_report_pvt.repv_rec_type;
3431 ddx_repv_rec okl_report_pvt.repv_rec_type;
3432 ddp_rpp_tbl okl_report_pvt.rpp_tbl_type;
3433 ddx_rpp_tbl okl_report_pvt.rpp_tbl_type;
3434 ddp_rap_tbl okl_report_pvt.rap_tbl_type;
3435 ddx_rap_tbl okl_report_pvt.rap_tbl_type;
3436 ddp_rps_tbl okl_report_pvt.rps_tbl_type;
3437 ddx_rps_tbl okl_report_pvt.rps_tbl_type;
3438 ddp_rtp_tbl okl_report_pvt.rtp_tbl_type;
3439 ddx_rtp_tbl okl_report_pvt.rtp_tbl_type;
3440 ddindx binary_integer; indx binary_integer;
3441 begin
3442
3443 -- copy data to the local IN or IN-OUT args, if any
3444
3445
3446
3447
3448
3449 ddp_repv_rec.report_id := p5_a0;
3450 ddp_repv_rec.name := p5_a1;
3451 ddp_repv_rec.chart_of_accounts_id := p5_a2;
3452 ddp_repv_rec.book_classification_code := p5_a3;
3453 ddp_repv_rec.ledger_id := p5_a4;
3454 ddp_repv_rec.report_category_code := p5_a5;
3455 ddp_repv_rec.report_type_code := p5_a6;
3456 ddp_repv_rec.activity_code := p5_a7;
3457 ddp_repv_rec.status_code := p5_a8;
3458 ddp_repv_rec.description := p5_a9;
3459 ddp_repv_rec.effective_from_date := p5_a10;
3460 ddp_repv_rec.effective_to_date := p5_a11;
3461 ddp_repv_rec.created_by := p5_a12;
3462 ddp_repv_rec.creation_date := p5_a13;
3463 ddp_repv_rec.last_updated_by := p5_a14;
3464 ddp_repv_rec.last_update_date := p5_a15;
3465 ddp_repv_rec.last_update_login := p5_a16;
3466 ddp_repv_rec.language := p5_a17;
3467 ddp_repv_rec.source_lang := p5_a18;
3468 ddp_repv_rec.sfwt_flag := p5_a19;
3469
3470
3471 okl_rpp_pvt_w.rosetta_table_copy_in_p2(ddp_rpp_tbl, p7_a0
3472 , p7_a1
3473 , p7_a2
3474 , p7_a3
3475 , p7_a4
3476 , p7_a5
3477 , p7_a6
3478 , p7_a7
3479 , p7_a8
3480 , p7_a9
3481 , p7_a10
3482 , p7_a11
3483 );
3484
3485
3486 okl_rap_pvt_w.rosetta_table_copy_in_p2(ddp_rap_tbl, p9_a0
3487 , p9_a1
3488 , p9_a2
3489 , p9_a3
3490 , p9_a4
3491 , p9_a5
3492 , p9_a6
3493 , p9_a7
3494 , p9_a8
3495 , p9_a9
3496 );
3497
3498
3499 okl_rsp_pvt_w.rosetta_table_copy_in_p2(ddp_rps_tbl, p11_a0
3500 , p11_a1
3501 , p11_a2
3502 , p11_a3
3503 , p11_a4
3504 , p11_a5
3505 , p11_a6
3506 , p11_a7
3507 , p11_a8
3508 );
3509
3510
3511 okl_rtp_pvt_w.rosetta_table_copy_in_p2(ddp_rtp_tbl, p13_a0
3512 , p13_a1
3513 , p13_a2
3514 , p13_a3
3515 , p13_a4
3516 , p13_a5
3517 , p13_a6
3518 , p13_a7
3519 , p13_a8
3520 , p13_a9
3521 );
3522
3523
3524 -- here's the delegated call to the old PL/SQL routine
3525 okl_report_pvt.update_report(p_api_version,
3526 p_init_msg_list,
3527 x_return_status,
3528 x_msg_count,
3529 x_msg_data,
3530 ddp_repv_rec,
3531 ddx_repv_rec,
3532 ddp_rpp_tbl,
3533 ddx_rpp_tbl,
3534 ddp_rap_tbl,
3535 ddx_rap_tbl,
3536 ddp_rps_tbl,
3537 ddx_rps_tbl,
3538 ddp_rtp_tbl,
3539 ddx_rtp_tbl);
3540
3541 -- copy data back from the local variables to OUT or IN-OUT args, if any
3542
3543
3544
3545
3546
3547
3548 p6_a0 := ddx_repv_rec.report_id;
3549 p6_a1 := ddx_repv_rec.name;
3550 p6_a2 := ddx_repv_rec.chart_of_accounts_id;
3551 p6_a3 := ddx_repv_rec.book_classification_code;
3552 p6_a4 := ddx_repv_rec.ledger_id;
3553 p6_a5 := ddx_repv_rec.report_category_code;
3554 p6_a6 := ddx_repv_rec.report_type_code;
3555 p6_a7 := ddx_repv_rec.activity_code;
3556 p6_a8 := ddx_repv_rec.status_code;
3557 p6_a9 := ddx_repv_rec.description;
3558 p6_a10 := ddx_repv_rec.effective_from_date;
3559 p6_a11 := ddx_repv_rec.effective_to_date;
3560 p6_a12 := ddx_repv_rec.created_by;
3561 p6_a13 := ddx_repv_rec.creation_date;
3562 p6_a14 := ddx_repv_rec.last_updated_by;
3563 p6_a15 := ddx_repv_rec.last_update_date;
3564 p6_a16 := ddx_repv_rec.last_update_login;
3565 p6_a17 := ddx_repv_rec.language;
3566 p6_a18 := ddx_repv_rec.source_lang;
3567 p6_a19 := ddx_repv_rec.sfwt_flag;
3568
3569
3570 okl_rpp_pvt_w.rosetta_table_copy_out_p2(ddx_rpp_tbl, p8_a0
3571 , p8_a1
3572 , p8_a2
3573 , p8_a3
3574 , p8_a4
3575 , p8_a5
3576 , p8_a6
3577 , p8_a7
3578 , p8_a8
3579 , p8_a9
3580 , p8_a10
3581 , p8_a11
3582 );
3583
3584
3585 okl_rap_pvt_w.rosetta_table_copy_out_p2(ddx_rap_tbl, p10_a0
3586 , p10_a1
3587 , p10_a2
3588 , p10_a3
3589 , p10_a4
3590 , p10_a5
3591 , p10_a6
3592 , p10_a7
3593 , p10_a8
3594 , p10_a9
3595 );
3596
3597
3598 okl_rsp_pvt_w.rosetta_table_copy_out_p2(ddx_rps_tbl, p12_a0
3599 , p12_a1
3600 , p12_a2
3601 , p12_a3
3602 , p12_a4
3603 , p12_a5
3604 , p12_a6
3605 , p12_a7
3606 , p12_a8
3607 );
3608
3609
3610 okl_rtp_pvt_w.rosetta_table_copy_out_p2(ddx_rtp_tbl, p14_a0
3611 , p14_a1
3612 , p14_a2
3613 , p14_a3
3614 , p14_a4
3615 , p14_a5
3616 , p14_a6
3617 , p14_a7
3618 , p14_a8
3619 , p14_a9
3620 );
3621 end;
3622
3623 end okl_report_pvt_w;