[Home] [Help]
1: package body iby_disburse_ui_api_pub_pkg_w as
2: /* $Header: ibydapiwb.pls 120.6.12020000.2 2012/07/12 14:49:59 sgogula ship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy iby_disburse_ui_api_pub_pkg.docpayidtab, a0 JTF_NUMBER_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin
1: package body iby_disburse_ui_api_pub_pkg_w as
2: /* $Header: ibydapiwb.pls 120.6.12020000.2 2012/07/12 14:49:59 sgogula ship $ */
3: procedure rosetta_table_copy_in_p0(t out nocopy iby_disburse_ui_api_pub_pkg.docpayidtab, a0 JTF_NUMBER_TABLE) as
4: ddindx binary_integer; indx binary_integer;
5: begin
6: if a0 is not null and a0.count > 0 then
7: if a0.count > 0 then
17: end loop;
18: end if;
19: end if;
20: end rosetta_table_copy_in_p0;
21: procedure rosetta_table_copy_out_p0(t iby_disburse_ui_api_pub_pkg.docpayidtab, a0 out nocopy JTF_NUMBER_TABLE) as
22: ddindx binary_integer; indx binary_integer;
23: begin
24: if t is null or t.count = 0 then
25: a0 := JTF_NUMBER_TABLE();
40: end if;
41: end if;
42: end rosetta_table_copy_out_p0;
43:
44: procedure rosetta_table_copy_in_p1(t out nocopy iby_disburse_ui_api_pub_pkg.docpaystatustab, a0 JTF_VARCHAR2_TABLE_100) as
45: ddindx binary_integer; indx binary_integer;
46: begin
47: if a0 is not null and a0.count > 0 then
48: if a0.count > 0 then
58: end loop;
59: end if;
60: end if;
61: end rosetta_table_copy_in_p1;
62: procedure rosetta_table_copy_out_p1(t iby_disburse_ui_api_pub_pkg.docpaystatustab, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
63: ddindx binary_integer; indx binary_integer;
64: begin
65: if t is null or t.count = 0 then
66: a0 := JTF_VARCHAR2_TABLE_100();
81: end if;
82: end if;
83: end rosetta_table_copy_out_p1;
84:
85: procedure rosetta_table_copy_in_p2(t out nocopy iby_disburse_ui_api_pub_pkg.pmtidtab, a0 JTF_NUMBER_TABLE) as
86: ddindx binary_integer; indx binary_integer;
87: begin
88: if a0 is not null and a0.count > 0 then
89: if a0.count > 0 then
99: end loop;
100: end if;
101: end if;
102: end rosetta_table_copy_in_p2;
103: procedure rosetta_table_copy_out_p2(t iby_disburse_ui_api_pub_pkg.pmtidtab, a0 out nocopy JTF_NUMBER_TABLE) as
104: ddindx binary_integer; indx binary_integer;
105: begin
106: if t is null or t.count = 0 then
107: a0 := JTF_NUMBER_TABLE();
122: end if;
123: end if;
124: end rosetta_table_copy_out_p2;
125:
126: procedure rosetta_table_copy_in_p3(t out nocopy iby_disburse_ui_api_pub_pkg.pmtstatustab, a0 JTF_VARCHAR2_TABLE_100) as
127: ddindx binary_integer; indx binary_integer;
128: begin
129: if a0 is not null and a0.count > 0 then
130: if a0.count > 0 then
140: end loop;
141: end if;
142: end if;
143: end rosetta_table_copy_in_p3;
144: procedure rosetta_table_copy_out_p3(t iby_disburse_ui_api_pub_pkg.pmtstatustab, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
145: ddindx binary_integer; indx binary_integer;
146: begin
147: if t is null or t.count = 0 then
148: a0 := JTF_VARCHAR2_TABLE_100();
163: end if;
164: end if;
165: end rosetta_table_copy_out_p3;
166:
167: procedure rosetta_table_copy_in_p4(t out nocopy iby_disburse_ui_api_pub_pkg.pmtdocstab, a0 JTF_NUMBER_TABLE) as
168: ddindx binary_integer; indx binary_integer;
169: begin
170: if a0 is not null and a0.count > 0 then
171: if a0.count > 0 then
181: end loop;
182: end if;
183: end if;
184: end rosetta_table_copy_in_p4;
185: procedure rosetta_table_copy_out_p4(t iby_disburse_ui_api_pub_pkg.pmtdocstab, a0 out nocopy JTF_NUMBER_TABLE) as
186: ddindx binary_integer; indx binary_integer;
187: begin
188: if t is null or t.count = 0 then
189: a0 := JTF_NUMBER_TABLE();
204: end if;
205: end if;
206: end rosetta_table_copy_out_p4;
207:
208: procedure rosetta_table_copy_in_p5(t out nocopy iby_disburse_ui_api_pub_pkg.paperdocnumtab, a0 JTF_NUMBER_TABLE) as
209: ddindx binary_integer; indx binary_integer;
210: begin
211: if a0 is not null and a0.count > 0 then
212: if a0.count > 0 then
222: end loop;
223: end if;
224: end if;
225: end rosetta_table_copy_in_p5;
226: procedure rosetta_table_copy_out_p5(t iby_disburse_ui_api_pub_pkg.paperdocnumtab, a0 out nocopy JTF_NUMBER_TABLE) as
227: ddindx binary_integer; indx binary_integer;
228: begin
229: if t is null or t.count = 0 then
230: a0 := JTF_NUMBER_TABLE();
245: end if;
246: end if;
247: end rosetta_table_copy_out_p5;
248:
249: procedure rosetta_table_copy_in_p6(t out nocopy iby_disburse_ui_api_pub_pkg.paperdocusereasontab, a0 JTF_VARCHAR2_TABLE_100) as
250: ddindx binary_integer; indx binary_integer;
251: begin
252: if a0 is not null and a0.count > 0 then
253: if a0.count > 0 then
263: end loop;
264: end if;
265: end if;
266: end rosetta_table_copy_in_p6;
267: procedure rosetta_table_copy_out_p6(t iby_disburse_ui_api_pub_pkg.paperdocusereasontab, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
268: ddindx binary_integer; indx binary_integer;
269: begin
270: if t is null or t.count = 0 then
271: a0 := JTF_VARCHAR2_TABLE_100();
286: end if;
287: end if;
288: end rosetta_table_copy_out_p6;
289:
290: procedure rosetta_table_copy_in_p7(t out nocopy iby_disburse_ui_api_pub_pkg.appnamestab, a0 JTF_VARCHAR2_TABLE_100) as
291: ddindx binary_integer; indx binary_integer;
292: begin
293: if a0 is not null and a0.count > 0 then
294: if a0.count > 0 then
304: end loop;
305: end if;
306: end if;
307: end rosetta_table_copy_in_p7;
308: procedure rosetta_table_copy_out_p7(t iby_disburse_ui_api_pub_pkg.appnamestab, a0 out nocopy JTF_VARCHAR2_TABLE_100) as
309: ddindx binary_integer; indx binary_integer;
310: begin
311: if t is null or t.count = 0 then
312: a0 := JTF_VARCHAR2_TABLE_100();
327: end if;
328: end if;
329: end rosetta_table_copy_out_p7;
330:
331: procedure rosetta_table_copy_in_p8(t out nocopy iby_disburse_ui_api_pub_pkg.appidstab, a0 JTF_NUMBER_TABLE) as
332: ddindx binary_integer; indx binary_integer;
333: begin
334: if a0 is not null and a0.count > 0 then
335: if a0.count > 0 then
345: end loop;
346: end if;
347: end if;
348: end rosetta_table_copy_in_p8;
349: procedure rosetta_table_copy_out_p8(t iby_disburse_ui_api_pub_pkg.appidstab, a0 out nocopy JTF_NUMBER_TABLE) as
350: ddindx binary_integer; indx binary_integer;
351: begin
352: if t is null or t.count = 0 then
353: a0 := JTF_NUMBER_TABLE();
374: , x_return_status out nocopy VARCHAR2
375: )
376:
377: as
378: ddp_doc_list iby_disburse_ui_api_pub_pkg.docpayidtab;
379: ddp_doc_status_list iby_disburse_ui_api_pub_pkg.docpaystatustab;
380: ddindx binary_integer; indx binary_integer;
381: begin
382:
375: )
376:
377: as
378: ddp_doc_list iby_disburse_ui_api_pub_pkg.docpayidtab;
379: ddp_doc_status_list iby_disburse_ui_api_pub_pkg.docpaystatustab;
380: ddindx binary_integer; indx binary_integer;
381: begin
382:
383: -- copy data to the local IN or IN-OUT args, if any
380: ddindx binary_integer; indx binary_integer;
381: begin
382:
383: -- copy data to the local IN or IN-OUT args, if any
384: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p0(ddp_doc_list, p_doc_list);
385:
386: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p1(ddp_doc_status_list, p_doc_status_list);
387:
388:
382:
383: -- copy data to the local IN or IN-OUT args, if any
384: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p0(ddp_doc_list, p_doc_list);
385:
386: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p1(ddp_doc_status_list, p_doc_status_list);
387:
388:
389: -- here's the delegated call to the old PL/SQL routine
390: iby_disburse_ui_api_pub_pkg.remove_documents_payable(ddp_doc_list,
386: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p1(ddp_doc_status_list, p_doc_status_list);
387:
388:
389: -- here's the delegated call to the old PL/SQL routine
390: iby_disburse_ui_api_pub_pkg.remove_documents_payable(ddp_doc_list,
391: ddp_doc_status_list,
392: x_return_status);
393:
394: -- copy data back from the local variables to OUT or IN-OUT args, if any
401: , x_return_status out nocopy VARCHAR2
402: )
403:
404: as
405: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
406: ddp_pmt_status_list iby_disburse_ui_api_pub_pkg.pmtstatustab;
407: ddindx binary_integer; indx binary_integer;
408: begin
409:
402: )
403:
404: as
405: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
406: ddp_pmt_status_list iby_disburse_ui_api_pub_pkg.pmtstatustab;
407: ddindx binary_integer; indx binary_integer;
408: begin
409:
410: -- copy data to the local IN or IN-OUT args, if any
407: ddindx binary_integer; indx binary_integer;
408: begin
409:
410: -- copy data to the local IN or IN-OUT args, if any
411: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
412:
413: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
414:
415:
409:
410: -- copy data to the local IN or IN-OUT args, if any
411: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
412:
413: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
414:
415:
416: -- here's the delegated call to the old PL/SQL routine
417: iby_disburse_ui_api_pub_pkg.remove_payments(ddp_pmt_list,
413: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
414:
415:
416: -- here's the delegated call to the old PL/SQL routine
417: iby_disburse_ui_api_pub_pkg.remove_payments(ddp_pmt_list,
418: ddp_pmt_status_list,
419: x_return_status);
420:
421: -- copy data back from the local variables to OUT or IN-OUT args, if any
428: , x_return_status out nocopy VARCHAR2
429: )
430:
431: as
432: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
433: ddp_pmt_status_list iby_disburse_ui_api_pub_pkg.pmtstatustab;
434: ddindx binary_integer; indx binary_integer;
435: begin
436:
429: )
430:
431: as
432: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
433: ddp_pmt_status_list iby_disburse_ui_api_pub_pkg.pmtstatustab;
434: ddindx binary_integer; indx binary_integer;
435: begin
436:
437: -- copy data to the local IN or IN-OUT args, if any
434: ddindx binary_integer; indx binary_integer;
435: begin
436:
437: -- copy data to the local IN or IN-OUT args, if any
438: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
439:
440: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
441:
442:
436:
437: -- copy data to the local IN or IN-OUT args, if any
438: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
439:
440: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
441:
442:
443: -- here's the delegated call to the old PL/SQL routine
444: iby_disburse_ui_api_pub_pkg.stop_payments(ddp_pmt_list,
440: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p3(ddp_pmt_status_list, p_pmt_status_list);
441:
442:
443: -- here's the delegated call to the old PL/SQL routine
444: iby_disburse_ui_api_pub_pkg.stop_payments(ddp_pmt_list,
445: ddp_pmt_status_list,
446: x_return_status);
447:
448: -- copy data back from the local variables to OUT or IN-OUT args, if any
459: , x_return_status out nocopy VARCHAR2
460: )
461:
462: as
463: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
464: ddp_new_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
465: ddp_old_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
466: ddindx binary_integer; indx binary_integer;
467: begin
460: )
461:
462: as
463: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
464: ddp_new_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
465: ddp_old_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
466: ddindx binary_integer; indx binary_integer;
467: begin
468:
461:
462: as
463: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
464: ddp_new_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
465: ddp_old_ppr_docs_list iby_disburse_ui_api_pub_pkg.pmtdocstab;
466: ddindx binary_integer; indx binary_integer;
467: begin
468:
469: -- copy data to the local IN or IN-OUT args, if any
468:
469: -- copy data to the local IN or IN-OUT args, if any
470:
471:
472: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
473:
474: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_new_ppr_docs_list, p_new_ppr_docs_list);
475:
476: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_old_ppr_docs_list, p_old_ppr_docs_list);
470:
471:
472: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
473:
474: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_new_ppr_docs_list, p_new_ppr_docs_list);
475:
476: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_old_ppr_docs_list, p_old_ppr_docs_list);
477:
478:
472: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
473:
474: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_new_ppr_docs_list, p_new_ppr_docs_list);
475:
476: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p4(ddp_old_ppr_docs_list, p_old_ppr_docs_list);
477:
478:
479:
480: -- here's the delegated call to the old PL/SQL routine
477:
478:
479:
480: -- here's the delegated call to the old PL/SQL routine
481: iby_disburse_ui_api_pub_pkg.reprint_prenum_pmt_documents(p_instr_id,
482: p_pmt_doc_id,
483: ddp_pmt_list,
484: ddp_new_ppr_docs_list,
485: ddp_old_ppr_docs_list,
501: , x_return_status out nocopy VARCHAR2
502: )
503:
504: as
505: ddp_pmt_list iby_disburse_ui_api_pub_pkg.pmtidtab;
506: ddindx binary_integer; indx binary_integer;
507: begin
508:
509: -- copy data to the local IN or IN-OUT args, if any
507: begin
508:
509: -- copy data to the local IN or IN-OUT args, if any
510:
511: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p2(ddp_pmt_list, p_pmt_list);
512:
513:
514:
515: -- here's the delegated call to the old PL/SQL routine
512:
513:
514:
515: -- here's the delegated call to the old PL/SQL routine
516: iby_disburse_ui_api_pub_pkg.reprint_blank_pmt_documents(p_instr_id,
517: ddp_pmt_list,
518: p_printer_name,
519: x_return_status);
520:
530: , x_return_status out nocopy VARCHAR2
531: )
532:
533: as
534: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
535: ddindx binary_integer; indx binary_integer;
536: begin
537:
538: -- copy data to the local IN or IN-OUT args, if any
537:
538: -- copy data to the local IN or IN-OUT args, if any
539:
540:
541: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
542:
543:
544: -- here's the delegated call to the old PL/SQL routine
545: iby_disburse_ui_api_pub_pkg.finalize_print_status(p_instr_id,
541: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
542:
543:
544: -- here's the delegated call to the old PL/SQL routine
545: iby_disburse_ui_api_pub_pkg.finalize_print_status(p_instr_id,
546: p_pmt_doc_id,
547: ddp_used_docs_list,
548: x_return_status);
549:
561: , x_return_status out nocopy VARCHAR2
562: )
563:
564: as
565: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
566: ddp_used_pmts_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
567: ddp_submit_postive_pay boolean;
568: ddindx binary_integer; indx binary_integer;
569: begin
562: )
563:
564: as
565: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
566: ddp_used_pmts_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
567: ddp_submit_postive_pay boolean;
568: ddindx binary_integer; indx binary_integer;
569: begin
570:
570:
571: -- copy data to the local IN or IN-OUT args, if any
572:
573:
574: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
575: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_pmts_list, p_used_pmts_list);
576:
577: if p_submit_postive_pay is null
578: then ddp_submit_postive_pay := null;
571: -- copy data to the local IN or IN-OUT args, if any
572:
573:
574: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
575: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_pmts_list, p_used_pmts_list);
576:
577: if p_submit_postive_pay is null
578: then ddp_submit_postive_pay := null;
579: elsif p_submit_postive_pay = 0
582: end if;
583:
584:
585: -- here's the delegated call to the old PL/SQL routine
586: iby_disburse_ui_api_pub_pkg.finalize_print_status(p_instr_id,
587: p_pmt_doc_id,
588: ddp_used_docs_list,
589: ddp_used_pmts_list,
590: ddp_submit_postive_pay,
602: , p_submit_postive_pay number
603: , x_return_status out nocopy VARCHAR2
604: )
605: as
606: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
607: ddp_used_pmts_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
608: ddp_skipped_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
609: ddp_submit_postive_pay boolean;
610: ddindx binary_integer; indx binary_integer;
603: , x_return_status out nocopy VARCHAR2
604: )
605: as
606: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
607: ddp_used_pmts_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
608: ddp_skipped_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
609: ddp_submit_postive_pay boolean;
610: ddindx binary_integer; indx binary_integer;
611: begin
604: )
605: as
606: ddp_used_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
607: ddp_used_pmts_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
608: ddp_skipped_docs_list iby_disburse_ui_api_pub_pkg.paperdocnumtab;
609: ddp_submit_postive_pay boolean;
610: ddindx binary_integer; indx binary_integer;
611: begin
612:
612:
613: -- copy data to the local IN or IN-OUT args, if any
614:
615:
616: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
617: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_pmts_list, p_used_pmts_list);
618: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_skipped_docs_list, p_skipped_docs_list);
619:
620: if p_submit_postive_pay is null
613: -- copy data to the local IN or IN-OUT args, if any
614:
615:
616: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
617: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_pmts_list, p_used_pmts_list);
618: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_skipped_docs_list, p_skipped_docs_list);
619:
620: if p_submit_postive_pay is null
621: then ddp_submit_postive_pay := null;
614:
615:
616: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_docs_list, p_used_docs_list);
617: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_used_pmts_list, p_used_pmts_list);
618: iby_disburse_ui_api_pub_pkg_w.rosetta_table_copy_in_p5(ddp_skipped_docs_list, p_skipped_docs_list);
619:
620: if p_submit_postive_pay is null
621: then ddp_submit_postive_pay := null;
622: elsif p_submit_postive_pay = 0
625: end if;
626:
627:
628: -- here's the delegated call to the old PL/SQL routine
629: iby_disburse_ui_api_pub_pkg.finalize_print_status(p_instr_id,
630: p_pmt_doc_id,
631: ddp_used_docs_list,
632: ddp_used_pmts_list,
633: ddp_skipped_docs_list,
659: end if;
660:
661:
662: -- here's the delegated call to the old PL/SQL routine
663: iby_disburse_ui_api_pub_pkg.finalize_instr_print_status(p_instr_id,
664: ddp_submit_postive_pay,
665: x_return_status);
666:
667: -- copy data back from the local variables to OUT or IN-OUT args, if any
689: end if;
690:
691:
692: -- here's the delegated call to the old PL/SQL routine
693: iby_disburse_ui_api_pub_pkg.mark_all_pmts_complete(p_instr_id,
694: ddp_submit_postive_pay,
695: x_return_status);
696:
697: -- copy data back from the local variables to OUT or IN-OUT args, if any
712: -- copy data to the local IN or IN-OUT args, if any
713:
714:
715: -- here's the delegated call to the old PL/SQL routine
716: ddrosetta_retval := iby_disburse_ui_api_pub_pkg.checkifdocused(p_paper_doc_num,
717: p_pmt_document_id);
718:
719: -- copy data back from the local variables to OUT or IN-OUT args, if any
720: if ddrosetta_retval is null
737:
738: -- copy data to the local IN or IN-OUT args, if any
739:
740: -- here's the delegated call to the old PL/SQL routine
741: ddrosetta_retval := iby_disburse_ui_api_pub_pkg.checkifallpmtsterminated(p_instr_id);
742:
743: -- copy data back from the local variables to OUT or IN-OUT args, if any
744: if ddrosetta_retval is null
745: then ddrosetta_retval_bool := null;
760:
761: -- copy data to the local IN or IN-OUT args, if any
762:
763: -- here's the delegated call to the old PL/SQL routine
764: ddrosetta_retval := iby_disburse_ui_api_pub_pkg.checkifpmtininstexists(p_payreq_id);
765:
766: -- copy data back from the local variables to OUT or IN-OUT args, if any
767: if ddrosetta_retval is null
768: then ddrosetta_retval_bool := null;
783:
784: -- copy data to the local IN or IN-OUT args, if any
785:
786: -- here's the delegated call to the old PL/SQL routine
787: ddrosetta_retval := iby_disburse_ui_api_pub_pkg.checkifinstrxmitoutsidesystem(p_instr_id);
788:
789: -- copy data back from the local variables to OUT or IN-OUT args, if any
790: if ddrosetta_retval is null
791: then ddrosetta_retval_bool := null;
808: -- copy data to the local IN or IN-OUT args, if any
809:
810:
811: -- here's the delegated call to the old PL/SQL routine
812: ddrosetta_retval := iby_disburse_ui_api_pub_pkg.checkifpmtentitylocked(p_object_id,
813: p_object_type);
814:
815: -- copy data back from the local variables to OUT or IN-OUT args, if any
816: if ddrosetta_retval is null
821: end if;
822:
823: end;
824:
825: end iby_disburse_ui_api_pub_pkg_w;