1: package body okl_prtfl_contracts_pub_w as
2: /* $Header: OKLUPFCB.pls 115.1 2002/12/19 23:30:26 gkadarka 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:
90: , p6_a31 out nocopy JTF_NUMBER_TABLE
91: )
92:
93: as
94: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
95: ddx_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
96: ddindx binary_integer; indx binary_integer;
97: begin
98:
91: )
92:
93: as
94: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
95: ddx_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
96: ddindx binary_integer; indx binary_integer;
97: begin
98:
99: -- copy data to the local IN or IN-OUT args, if any
137: );
138:
139:
140: -- here's the delegated call to the old PL/SQL routine
141: okl_prtfl_contracts_pub.insert_prtfl_contracts(p_api_version,
142: p_init_msg_list,
143: x_return_status,
144: x_msg_count,
145: x_msg_data,
259: , p5_a31 NUMBER := 0-1962.0724
260: )
261:
262: as
263: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
264: ddx_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
265: ddindx binary_integer; indx binary_integer;
266: begin
267:
260: )
261:
262: as
263: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
264: ddx_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
265: ddindx binary_integer; indx binary_integer;
266: begin
267:
268: -- copy data to the local IN or IN-OUT args, if any
305: ddp_pfcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a31);
306:
307:
308: -- here's the delegated call to the old PL/SQL routine
309: okl_prtfl_contracts_pub.insert_prtfl_contracts(p_api_version,
310: p_init_msg_list,
311: x_return_status,
312: x_msg_count,
313: x_msg_data,
394: , p5_a31 JTF_NUMBER_TABLE
395: )
396:
397: as
398: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
399: ddindx binary_integer; indx binary_integer;
400: begin
401:
402: -- copy data to the local IN or IN-OUT args, if any
439: , p5_a31
440: );
441:
442: -- here's the delegated call to the old PL/SQL routine
443: okl_prtfl_contracts_pub.lock_prtfl_contracts(p_api_version,
444: p_init_msg_list,
445: x_return_status,
446: x_msg_count,
447: x_msg_data,
494: , p5_a31 NUMBER := 0-1962.0724
495: )
496:
497: as
498: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
499: ddindx binary_integer; indx binary_integer;
500: begin
501:
502: -- copy data to the local IN or IN-OUT args, if any
538: ddp_pfcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a30);
539: ddp_pfcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a31);
540:
541: -- here's the delegated call to the old PL/SQL routine
542: okl_prtfl_contracts_pub.lock_prtfl_contracts(p_api_version,
543: p_init_msg_list,
544: x_return_status,
545: x_msg_count,
546: x_msg_data,
625: , p6_a31 out nocopy JTF_NUMBER_TABLE
626: )
627:
628: as
629: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
630: ddx_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
631: ddindx binary_integer; indx binary_integer;
632: begin
633:
626: )
627:
628: as
629: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
630: ddx_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
631: ddindx binary_integer; indx binary_integer;
632: begin
633:
634: -- copy data to the local IN or IN-OUT args, if any
672: );
673:
674:
675: -- here's the delegated call to the old PL/SQL routine
676: okl_prtfl_contracts_pub.update_prtfl_contracts(p_api_version,
677: p_init_msg_list,
678: x_return_status,
679: x_msg_count,
680: x_msg_data,
794: , p5_a31 NUMBER := 0-1962.0724
795: )
796:
797: as
798: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
799: ddx_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
800: ddindx binary_integer; indx binary_integer;
801: begin
802:
795: )
796:
797: as
798: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
799: ddx_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
800: ddindx binary_integer; indx binary_integer;
801: begin
802:
803: -- copy data to the local IN or IN-OUT args, if any
840: ddp_pfcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a31);
841:
842:
843: -- here's the delegated call to the old PL/SQL routine
844: okl_prtfl_contracts_pub.update_prtfl_contracts(p_api_version,
845: p_init_msg_list,
846: x_return_status,
847: x_msg_count,
848: x_msg_data,
929: , p5_a31 JTF_NUMBER_TABLE
930: )
931:
932: as
933: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
934: ddindx binary_integer; indx binary_integer;
935: begin
936:
937: -- copy data to the local IN or IN-OUT args, if any
974: , p5_a31
975: );
976:
977: -- here's the delegated call to the old PL/SQL routine
978: okl_prtfl_contracts_pub.delete_prtfl_contracts(p_api_version,
979: p_init_msg_list,
980: x_return_status,
981: x_msg_count,
982: x_msg_data,
1029: , p5_a31 NUMBER := 0-1962.0724
1030: )
1031:
1032: as
1033: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
1034: ddindx binary_integer; indx binary_integer;
1035: begin
1036:
1037: -- copy data to the local IN or IN-OUT args, if any
1073: ddp_pfcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a30);
1074: ddp_pfcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a31);
1075:
1076: -- here's the delegated call to the old PL/SQL routine
1077: okl_prtfl_contracts_pub.delete_prtfl_contracts(p_api_version,
1078: p_init_msg_list,
1079: x_return_status,
1080: x_msg_count,
1081: x_msg_data,
1128: , p5_a31 JTF_NUMBER_TABLE
1129: )
1130:
1131: as
1132: ddp_pfcv_tbl okl_prtfl_contracts_pub.pfcv_tbl_type;
1133: ddindx binary_integer; indx binary_integer;
1134: begin
1135:
1136: -- copy data to the local IN or IN-OUT args, if any
1173: , p5_a31
1174: );
1175:
1176: -- here's the delegated call to the old PL/SQL routine
1177: okl_prtfl_contracts_pub.validate_prtfl_contracts(p_api_version,
1178: p_init_msg_list,
1179: x_return_status,
1180: x_msg_count,
1181: x_msg_data,
1228: , p5_a31 NUMBER := 0-1962.0724
1229: )
1230:
1231: as
1232: ddp_pfcv_rec okl_prtfl_contracts_pub.pfcv_rec_type;
1233: ddindx binary_integer; indx binary_integer;
1234: begin
1235:
1236: -- copy data to the local IN or IN-OUT args, if any
1272: ddp_pfcv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a30);
1273: ddp_pfcv_rec.last_update_login := rosetta_g_miss_num_map(p5_a31);
1274:
1275: -- here's the delegated call to the old PL/SQL routine
1276: okl_prtfl_contracts_pub.validate_prtfl_contracts(p_api_version,
1277: p_init_msg_list,
1278: x_return_status,
1279: x_msg_count,
1280: x_msg_data,
1287:
1288:
1289: end;
1290:
1291: end okl_prtfl_contracts_pub_w;