1: package body okl_process_provisions_pvt_w as
2: /* $Header: OKLEPRVB.pls 120.1 2005/07/11 14:19:11 asawanka noship $ */
3: rosetta_g_mistake_date date := to_date('01/01/+4713', 'MM/DD/SYYYY');
4: rosetta_g_miss_date date := to_date('01/01/-4712', 'MM/DD/SYYYY');
5:
92: , p5_a32 NUMBER := 0-1962.0724
93: )
94:
95: as
96: ddp_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
97: ddx_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
98: ddindx binary_integer; indx binary_integer;
99: begin
100:
93: )
94:
95: as
96: ddp_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
97: ddx_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
98: ddindx binary_integer; indx binary_integer;
99: begin
100:
101: -- copy data to the local IN or IN-OUT args, if any
139: ddp_pvnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a32);
140:
141:
142: -- here's the delegated call to the old PL/SQL routine
143: okl_process_provisions_pvt.create_provisions(p_api_version,
144: p_init_msg_list,
145: x_return_status,
146: x_msg_count,
147: x_msg_data,
263: , p6_a32 out nocopy JTF_NUMBER_TABLE
264: )
265:
266: as
267: ddp_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
268: ddx_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
269: ddindx binary_integer; indx binary_integer;
270: begin
271:
264: )
265:
266: as
267: ddp_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
268: ddx_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
269: ddindx binary_integer; indx binary_integer;
270: begin
271:
272: -- copy data to the local IN or IN-OUT args, if any
311: );
312:
313:
314: -- here's the delegated call to the old PL/SQL routine
315: okl_process_provisions_pvt.create_provisions(p_api_version,
316: p_init_msg_list,
317: x_return_status,
318: x_msg_count,
319: x_msg_data,
436: , p5_a32 NUMBER := 0-1962.0724
437: )
438:
439: as
440: ddp_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
441: ddx_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
442: ddindx binary_integer; indx binary_integer;
443: begin
444:
437: )
438:
439: as
440: ddp_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
441: ddx_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
442: ddindx binary_integer; indx binary_integer;
443: begin
444:
445: -- copy data to the local IN or IN-OUT args, if any
483: ddp_pvnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a32);
484:
485:
486: -- here's the delegated call to the old PL/SQL routine
487: okl_process_provisions_pvt.update_provisions(p_api_version,
488: p_init_msg_list,
489: x_return_status,
490: x_msg_count,
491: x_msg_data,
607: , p6_a32 out nocopy JTF_NUMBER_TABLE
608: )
609:
610: as
611: ddp_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
612: ddx_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
613: ddindx binary_integer; indx binary_integer;
614: begin
615:
608: )
609:
610: as
611: ddp_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
612: ddx_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
613: ddindx binary_integer; indx binary_integer;
614: begin
615:
616: -- copy data to the local IN or IN-OUT args, if any
655: );
656:
657:
658: -- here's the delegated call to the old PL/SQL routine
659: okl_process_provisions_pvt.update_provisions(p_api_version,
660: p_init_msg_list,
661: x_return_status,
662: x_msg_count,
663: x_msg_data,
747: , p5_a32 NUMBER := 0-1962.0724
748: )
749:
750: as
751: ddp_pvnv_rec okl_process_provisions_pvt.pvnv_rec_type;
752: ddindx binary_integer; indx binary_integer;
753: begin
754:
755: -- copy data to the local IN or IN-OUT args, if any
792: ddp_pvnv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a31);
793: ddp_pvnv_rec.last_update_login := rosetta_g_miss_num_map(p5_a32);
794:
795: -- here's the delegated call to the old PL/SQL routine
796: okl_process_provisions_pvt.delete_provisions(p_api_version,
797: p_init_msg_list,
798: x_return_status,
799: x_msg_count,
800: x_msg_data,
848: , p5_a32 JTF_NUMBER_TABLE
849: )
850:
851: as
852: ddp_pvnv_tbl okl_process_provisions_pvt.pvnv_tbl_type;
853: ddindx binary_integer; indx binary_integer;
854: begin
855:
856: -- copy data to the local IN or IN-OUT args, if any
894: , p5_a32
895: );
896:
897: -- here's the delegated call to the old PL/SQL routine
898: okl_process_provisions_pvt.delete_provisions(p_api_version,
899: p_init_msg_list,
900: x_return_status,
901: x_msg_count,
902: x_msg_data,
909:
910:
911: end;
912:
913: end okl_process_provisions_pvt_w;