1: package body okl_contract_prod_optns_pub_w as
2: /* $Header: OKLUCSPB.pls 120.1 2005/07/08 10:20:39 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:
76: , p5_a24 NUMBER := 0-1962.0724
77: )
78:
79: as
80: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
81: ddx_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
82: ddindx binary_integer; indx binary_integer;
83: begin
84:
77: )
78:
79: as
80: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
81: ddx_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
82: ddindx binary_integer; indx binary_integer;
83: begin
84:
85: -- copy data to the local IN or IN-OUT args, if any
115: ddp_cspv_rec.last_update_login := rosetta_g_miss_num_map(p5_a24);
116:
117:
118: -- here's the delegated call to the old PL/SQL routine
119: okl_contract_prod_optns_pub.create_contract_option(p_api_version,
120: p_init_msg_list,
121: x_return_status,
122: x_msg_count,
123: x_msg_data,
215: , p6_a24 out nocopy JTF_NUMBER_TABLE
216: )
217:
218: as
219: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
220: ddx_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
221: ddindx binary_integer; indx binary_integer;
222: begin
223:
216: )
217:
218: as
219: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
220: ddx_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
221: ddindx binary_integer; indx binary_integer;
222: begin
223:
224: -- copy data to the local IN or IN-OUT args, if any
255: );
256:
257:
258: -- here's the delegated call to the old PL/SQL routine
259: okl_contract_prod_optns_pub.create_contract_option(p_api_version,
260: p_init_msg_list,
261: x_return_status,
262: x_msg_count,
263: x_msg_data,
356: , p5_a24 NUMBER := 0-1962.0724
357: )
358:
359: as
360: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
361: ddx_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
362: ddindx binary_integer; indx binary_integer;
363: begin
364:
357: )
358:
359: as
360: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
361: ddx_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
362: ddindx binary_integer; indx binary_integer;
363: begin
364:
365: -- copy data to the local IN or IN-OUT args, if any
395: ddp_cspv_rec.last_update_login := rosetta_g_miss_num_map(p5_a24);
396:
397:
398: -- here's the delegated call to the old PL/SQL routine
399: okl_contract_prod_optns_pub.update_contract_option(p_api_version,
400: p_init_msg_list,
401: x_return_status,
402: x_msg_count,
403: x_msg_data,
495: , p6_a24 out nocopy JTF_NUMBER_TABLE
496: )
497:
498: as
499: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
500: ddx_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
501: ddindx binary_integer; indx binary_integer;
502: begin
503:
496: )
497:
498: as
499: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
500: ddx_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
501: ddindx binary_integer; indx binary_integer;
502: begin
503:
504: -- copy data to the local IN or IN-OUT args, if any
535: );
536:
537:
538: -- here's the delegated call to the old PL/SQL routine
539: okl_contract_prod_optns_pub.update_contract_option(p_api_version,
540: p_init_msg_list,
541: x_return_status,
542: x_msg_count,
543: x_msg_data,
611: , p5_a24 NUMBER := 0-1962.0724
612: )
613:
614: as
615: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
616: ddindx binary_integer; indx binary_integer;
617: begin
618:
619: -- copy data to the local IN or IN-OUT args, if any
648: ddp_cspv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a23);
649: ddp_cspv_rec.last_update_login := rosetta_g_miss_num_map(p5_a24);
650:
651: -- here's the delegated call to the old PL/SQL routine
652: okl_contract_prod_optns_pub.delete_contract_option(p_api_version,
653: p_init_msg_list,
654: x_return_status,
655: x_msg_count,
656: x_msg_data,
696: , p5_a24 JTF_NUMBER_TABLE
697: )
698:
699: as
700: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
701: ddindx binary_integer; indx binary_integer;
702: begin
703:
704: -- copy data to the local IN or IN-OUT args, if any
734: , p5_a24
735: );
736:
737: -- here's the delegated call to the old PL/SQL routine
738: okl_contract_prod_optns_pub.delete_contract_option(p_api_version,
739: p_init_msg_list,
740: x_return_status,
741: x_msg_count,
742: x_msg_data,
782: , p5_a24 NUMBER := 0-1962.0724
783: )
784:
785: as
786: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
787: ddindx binary_integer; indx binary_integer;
788: begin
789:
790: -- copy data to the local IN or IN-OUT args, if any
819: ddp_cspv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a23);
820: ddp_cspv_rec.last_update_login := rosetta_g_miss_num_map(p5_a24);
821:
822: -- here's the delegated call to the old PL/SQL routine
823: okl_contract_prod_optns_pub.lock_contract_option(p_api_version,
824: p_init_msg_list,
825: x_return_status,
826: x_msg_count,
827: x_msg_data,
867: , p5_a24 JTF_NUMBER_TABLE
868: )
869:
870: as
871: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
872: ddindx binary_integer; indx binary_integer;
873: begin
874:
875: -- copy data to the local IN or IN-OUT args, if any
905: , p5_a24
906: );
907:
908: -- here's the delegated call to the old PL/SQL routine
909: okl_contract_prod_optns_pub.lock_contract_option(p_api_version,
910: p_init_msg_list,
911: x_return_status,
912: x_msg_count,
913: x_msg_data,
953: , p5_a24 NUMBER := 0-1962.0724
954: )
955:
956: as
957: ddp_cspv_rec okl_contract_prod_optns_pub.cspv_rec_type;
958: ddindx binary_integer; indx binary_integer;
959: begin
960:
961: -- copy data to the local IN or IN-OUT args, if any
990: ddp_cspv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a23);
991: ddp_cspv_rec.last_update_login := rosetta_g_miss_num_map(p5_a24);
992:
993: -- here's the delegated call to the old PL/SQL routine
994: okl_contract_prod_optns_pub.validate_contract_option(p_api_version,
995: p_init_msg_list,
996: x_return_status,
997: x_msg_count,
998: x_msg_data,
1038: , p5_a24 JTF_NUMBER_TABLE
1039: )
1040:
1041: as
1042: ddp_cspv_tbl okl_contract_prod_optns_pub.cspv_tbl_type;
1043: ddindx binary_integer; indx binary_integer;
1044: begin
1045:
1046: -- copy data to the local IN or IN-OUT args, if any
1076: , p5_a24
1077: );
1078:
1079: -- here's the delegated call to the old PL/SQL routine
1080: okl_contract_prod_optns_pub.validate_contract_option(p_api_version,
1081: p_init_msg_list,
1082: x_return_status,
1083: x_msg_count,
1084: x_msg_data,
1091:
1092:
1093: end;
1094:
1095: end okl_contract_prod_optns_pub_w;