[Home] [Help]
1: package body okl_acc_gen_rule_pvt_w as
2: /* $Header: OKLOAGRB.pls 120.1 2005/07/07 13:34:06 dkagrawa 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:
102: , p5_a9 NUMBER := 0-1962.0724
103: )
104:
105: as
106: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
107: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
108: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
109: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
110: ddindx binary_integer; indx binary_integer;
103: )
104:
105: as
106: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
107: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
108: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
109: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
110: ddindx binary_integer; indx binary_integer;
111: begin
104:
105: as
106: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
107: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
108: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
109: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
110: ddindx binary_integer; indx binary_integer;
111: begin
112:
105: as
106: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
107: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
108: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
109: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
110: ddindx binary_integer; indx binary_integer;
111: begin
112:
113: -- copy data to the local IN or IN-OUT args, if any
159:
160:
161:
162: -- here's the delegated call to the old PL/SQL routine
163: okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
164: p_init_msg_list,
165: x_return_status,
166: x_msg_count,
167: x_msg_data,
303: , p5_a9 NUMBER := 0-1962.0724
304: )
305:
306: as
307: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
308: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
309: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
310: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
311: ddindx binary_integer; indx binary_integer;
304: )
305:
306: as
307: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
308: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
309: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
310: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
311: ddindx binary_integer; indx binary_integer;
312: begin
305:
306: as
307: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
308: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
309: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
310: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
311: ddindx binary_integer; indx binary_integer;
312: begin
313:
306: as
307: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
308: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
309: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
310: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
311: ddindx binary_integer; indx binary_integer;
312: begin
313:
314: -- copy data to the local IN or IN-OUT args, if any
360:
361:
362:
363: -- here's the delegated call to the old PL/SQL routine
364: okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
365: p_init_msg_list,
366: x_return_status,
367: x_msg_count,
368: x_msg_data,
466: , p5_a9 NUMBER := 0-1962.0724
467: )
468:
469: as
470: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
471: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
472: ddindx binary_integer; indx binary_integer;
473: begin
474:
467: )
468:
469: as
470: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
471: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
472: ddindx binary_integer; indx binary_integer;
473: begin
474:
475: -- copy data to the local IN or IN-OUT args, if any
519: , p6_a27
520: );
521:
522: -- here's the delegated call to the old PL/SQL routine
523: okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
524: p_init_msg_list,
525: x_return_status,
526: x_msg_count,
527: x_msg_data,
564: , p6_a9 out nocopy JTF_NUMBER_TABLE
565: )
566:
567: as
568: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
569: ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
570: ddindx binary_integer; indx binary_integer;
571: begin
572:
565: )
566:
567: as
568: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
569: ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
570: ddindx binary_integer; indx binary_integer;
571: begin
572:
573: -- copy data to the local IN or IN-OUT args, if any
589: );
590:
591:
592: -- here's the delegated call to the old PL/SQL routine
593: okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
594: p_init_msg_list,
595: x_return_status,
596: x_msg_count,
597: x_msg_data,
645: , p5_a9 NUMBER := 0-1962.0724
646: )
647:
648: as
649: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
650: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
651: ddindx binary_integer; indx binary_integer;
652: begin
653:
646: )
647:
648: as
649: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
650: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
651: ddindx binary_integer; indx binary_integer;
652: begin
653:
654: -- copy data to the local IN or IN-OUT args, if any
669: ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
670:
671:
672: -- here's the delegated call to the old PL/SQL routine
673: okl_acc_gen_rule_pvt.create_acc_gen_rule(p_api_version,
674: p_init_msg_list,
675: x_return_status,
676: x_msg_count,
677: x_msg_data,
714: , p5_a9 JTF_NUMBER_TABLE
715: )
716:
717: as
718: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
719: ddindx binary_integer; indx binary_integer;
720: begin
721:
722: -- copy data to the local IN or IN-OUT args, if any
737: , p5_a9
738: );
739:
740: -- here's the delegated call to the old PL/SQL routine
741: okl_acc_gen_rule_pvt.lock_acc_gen_rule(p_api_version,
742: p_init_msg_list,
743: x_return_status,
744: x_msg_count,
745: x_msg_data,
770: , p5_a9 NUMBER := 0-1962.0724
771: )
772:
773: as
774: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
775: ddindx binary_integer; indx binary_integer;
776: begin
777:
778: -- copy data to the local IN or IN-OUT args, if any
792: ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
793: ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
794:
795: -- here's the delegated call to the old PL/SQL routine
796: okl_acc_gen_rule_pvt.lock_acc_gen_rule(p_api_version,
797: p_init_msg_list,
798: x_return_status,
799: x_msg_count,
800: x_msg_data,
835: , p6_a9 out nocopy JTF_NUMBER_TABLE
836: )
837:
838: as
839: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
840: ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
841: ddindx binary_integer; indx binary_integer;
842: begin
843:
836: )
837:
838: as
839: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
840: ddx_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
841: ddindx binary_integer; indx binary_integer;
842: begin
843:
844: -- copy data to the local IN or IN-OUT args, if any
860: );
861:
862:
863: -- here's the delegated call to the old PL/SQL routine
864: okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
865: p_init_msg_list,
866: x_return_status,
867: x_msg_count,
868: x_msg_data,
916: , p5_a9 NUMBER := 0-1962.0724
917: )
918:
919: as
920: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
921: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
922: ddindx binary_integer; indx binary_integer;
923: begin
924:
917: )
918:
919: as
920: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
921: ddx_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
922: ddindx binary_integer; indx binary_integer;
923: begin
924:
925: -- copy data to the local IN or IN-OUT args, if any
940: ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
941:
942:
943: -- here's the delegated call to the old PL/SQL routine
944: okl_acc_gen_rule_pvt.update_acc_gen_rule(p_api_version,
945: p_init_msg_list,
946: x_return_status,
947: x_msg_count,
948: x_msg_data,
985: , p5_a9 JTF_NUMBER_TABLE
986: )
987:
988: as
989: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
990: ddindx binary_integer; indx binary_integer;
991: begin
992:
993: -- copy data to the local IN or IN-OUT args, if any
1008: , p5_a9
1009: );
1010:
1011: -- here's the delegated call to the old PL/SQL routine
1012: okl_acc_gen_rule_pvt.delete_acc_gen_rule(p_api_version,
1013: p_init_msg_list,
1014: x_return_status,
1015: x_msg_count,
1016: x_msg_data,
1041: , p5_a9 NUMBER := 0-1962.0724
1042: )
1043:
1044: as
1045: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
1046: ddindx binary_integer; indx binary_integer;
1047: begin
1048:
1049: -- copy data to the local IN or IN-OUT args, if any
1063: ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
1064: ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
1065:
1066: -- here's the delegated call to the old PL/SQL routine
1067: okl_acc_gen_rule_pvt.delete_acc_gen_rule(p_api_version,
1068: p_init_msg_list,
1069: x_return_status,
1070: x_msg_count,
1071: x_msg_data,
1096: , p5_a9 JTF_NUMBER_TABLE
1097: )
1098:
1099: as
1100: ddp_agrv_tbl okl_acc_gen_rule_pvt.agrv_tbl_type;
1101: ddindx binary_integer; indx binary_integer;
1102: begin
1103:
1104: -- copy data to the local IN or IN-OUT args, if any
1119: , p5_a9
1120: );
1121:
1122: -- here's the delegated call to the old PL/SQL routine
1123: okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
1124: p_init_msg_list,
1125: x_return_status,
1126: x_msg_count,
1127: x_msg_data,
1152: , p5_a9 NUMBER := 0-1962.0724
1153: )
1154:
1155: as
1156: ddp_agrv_rec okl_acc_gen_rule_pvt.agrv_rec_type;
1157: ddindx binary_integer; indx binary_integer;
1158: begin
1159:
1160: -- copy data to the local IN or IN-OUT args, if any
1174: ddp_agrv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a8);
1175: ddp_agrv_rec.last_update_login := rosetta_g_miss_num_map(p5_a9);
1176:
1177: -- here's the delegated call to the old PL/SQL routine
1178: okl_acc_gen_rule_pvt.validate_acc_gen_rule(p_api_version,
1179: p_init_msg_list,
1180: x_return_status,
1181: x_msg_count,
1182: x_msg_data,
1253: , p6_a27 out nocopy JTF_NUMBER_TABLE
1254: )
1255:
1256: as
1257: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1258: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1259: ddindx binary_integer; indx binary_integer;
1260: begin
1261:
1254: )
1255:
1256: as
1257: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1258: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1259: ddindx binary_integer; indx binary_integer;
1260: begin
1261:
1262: -- copy data to the local IN or IN-OUT args, if any
1296: );
1297:
1298:
1299: -- here's the delegated call to the old PL/SQL routine
1300: okl_acc_gen_rule_pvt.create_acc_gen_rule_lns(p_api_version,
1301: p_init_msg_list,
1302: x_return_status,
1303: x_msg_count,
1304: x_msg_data,
1406: , p5_a27 NUMBER := 0-1962.0724
1407: )
1408:
1409: as
1410: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1411: ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1412: ddindx binary_integer; indx binary_integer;
1413: begin
1414:
1407: )
1408:
1409: as
1410: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1411: ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1412: ddindx binary_integer; indx binary_integer;
1413: begin
1414:
1415: -- copy data to the local IN or IN-OUT args, if any
1448: ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1449:
1450:
1451: -- here's the delegated call to the old PL/SQL routine
1452: okl_acc_gen_rule_pvt.create_acc_gen_rule_lns(p_api_version,
1453: p_init_msg_list,
1454: x_return_status,
1455: x_msg_count,
1456: x_msg_data,
1529: , p5_a27 JTF_NUMBER_TABLE
1530: )
1531:
1532: as
1533: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1534: ddindx binary_integer; indx binary_integer;
1535: begin
1536:
1537: -- copy data to the local IN or IN-OUT args, if any
1570: , p5_a27
1571: );
1572:
1573: -- here's the delegated call to the old PL/SQL routine
1574: okl_acc_gen_rule_pvt.lock_acc_gen_rule_lns(p_api_version,
1575: p_init_msg_list,
1576: x_return_status,
1577: x_msg_count,
1578: x_msg_data,
1621: , p5_a27 NUMBER := 0-1962.0724
1622: )
1623:
1624: as
1625: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1626: ddindx binary_integer; indx binary_integer;
1627: begin
1628:
1629: -- copy data to the local IN or IN-OUT args, if any
1661: ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
1662: ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1663:
1664: -- here's the delegated call to the old PL/SQL routine
1665: okl_acc_gen_rule_pvt.lock_acc_gen_rule_lns(p_api_version,
1666: p_init_msg_list,
1667: x_return_status,
1668: x_msg_count,
1669: x_msg_data,
1740: , p6_a27 out nocopy JTF_NUMBER_TABLE
1741: )
1742:
1743: as
1744: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1745: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1746: ddindx binary_integer; indx binary_integer;
1747: begin
1748:
1741: )
1742:
1743: as
1744: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1745: ddx_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
1746: ddindx binary_integer; indx binary_integer;
1747: begin
1748:
1749: -- copy data to the local IN or IN-OUT args, if any
1783: );
1784:
1785:
1786: -- here's the delegated call to the old PL/SQL routine
1787: okl_acc_gen_rule_pvt.update_acc_gen_rule_lns(p_api_version,
1788: p_init_msg_list,
1789: x_return_status,
1790: x_msg_count,
1791: x_msg_data,
1893: , p5_a27 NUMBER := 0-1962.0724
1894: )
1895:
1896: as
1897: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1898: ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1899: ddindx binary_integer; indx binary_integer;
1900: begin
1901:
1894: )
1895:
1896: as
1897: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1898: ddx_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
1899: ddindx binary_integer; indx binary_integer;
1900: begin
1901:
1902: -- copy data to the local IN or IN-OUT args, if any
1935: ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
1936:
1937:
1938: -- here's the delegated call to the old PL/SQL routine
1939: okl_acc_gen_rule_pvt.update_acc_gen_rule_lns(p_api_version,
1940: p_init_msg_list,
1941: x_return_status,
1942: x_msg_count,
1943: x_msg_data,
2016: , p5_a27 JTF_NUMBER_TABLE
2017: )
2018:
2019: as
2020: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
2021: ddindx binary_integer; indx binary_integer;
2022: begin
2023:
2024: -- copy data to the local IN or IN-OUT args, if any
2057: , p5_a27
2058: );
2059:
2060: -- here's the delegated call to the old PL/SQL routine
2061: okl_acc_gen_rule_pvt.delete_acc_gen_rule_lns(p_api_version,
2062: p_init_msg_list,
2063: x_return_status,
2064: x_msg_count,
2065: x_msg_data,
2108: , p5_a27 NUMBER := 0-1962.0724
2109: )
2110:
2111: as
2112: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
2113: ddindx binary_integer; indx binary_integer;
2114: begin
2115:
2116: -- copy data to the local IN or IN-OUT args, if any
2148: ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
2149: ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
2150:
2151: -- here's the delegated call to the old PL/SQL routine
2152: okl_acc_gen_rule_pvt.delete_acc_gen_rule_lns(p_api_version,
2153: p_init_msg_list,
2154: x_return_status,
2155: x_msg_count,
2156: x_msg_data,
2199: , p5_a27 JTF_NUMBER_TABLE
2200: )
2201:
2202: as
2203: ddp_aulv_tbl okl_acc_gen_rule_pvt.aulv_tbl_type;
2204: ddindx binary_integer; indx binary_integer;
2205: begin
2206:
2207: -- copy data to the local IN or IN-OUT args, if any
2240: , p5_a27
2241: );
2242:
2243: -- here's the delegated call to the old PL/SQL routine
2244: okl_acc_gen_rule_pvt.validate_acc_gen_rule_lns(p_api_version,
2245: p_init_msg_list,
2246: x_return_status,
2247: x_msg_count,
2248: x_msg_data,
2291: , p5_a27 NUMBER := 0-1962.0724
2292: )
2293:
2294: as
2295: ddp_aulv_rec okl_acc_gen_rule_pvt.aulv_rec_type;
2296: ddindx binary_integer; indx binary_integer;
2297: begin
2298:
2299: -- copy data to the local IN or IN-OUT args, if any
2331: ddp_aulv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a26);
2332: ddp_aulv_rec.last_update_login := rosetta_g_miss_num_map(p5_a27);
2333:
2334: -- here's the delegated call to the old PL/SQL routine
2335: okl_acc_gen_rule_pvt.validate_acc_gen_rule_lns(p_api_version,
2336: p_init_msg_list,
2337: x_return_status,
2338: x_msg_count,
2339: x_msg_data,
2346:
2347:
2348: end;
2349:
2350: end okl_acc_gen_rule_pvt_w;