1: package body okl_options_pvt_w as
2: /* $Header: OKLOOPTB.pls 115.4 2002/12/24 04:10:42 sgorantl 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:
104: , p5_a26 NUMBER := 0-1962.0724
105: )
106:
107: as
108: ddp_optv_rec okl_options_pvt.optv_rec_type;
109: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
110: ddx_optv_rec okl_options_pvt.optv_rec_type;
111: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
112: ddindx binary_integer; indx binary_integer;
105: )
106:
107: as
108: ddp_optv_rec okl_options_pvt.optv_rec_type;
109: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
110: ddx_optv_rec okl_options_pvt.optv_rec_type;
111: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
112: ddindx binary_integer; indx binary_integer;
113: begin
106:
107: as
108: ddp_optv_rec okl_options_pvt.optv_rec_type;
109: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
110: ddx_optv_rec okl_options_pvt.optv_rec_type;
111: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
112: ddindx binary_integer; indx binary_integer;
113: begin
114:
107: as
108: ddp_optv_rec okl_options_pvt.optv_rec_type;
109: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
110: ddx_optv_rec okl_options_pvt.optv_rec_type;
111: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
112: ddindx binary_integer; indx binary_integer;
113: begin
114:
115: -- copy data to the local IN or IN-OUT args, if any
162:
163:
164:
165: -- here's the delegated call to the old PL/SQL routine
166: okl_options_pvt.create_options(p_api_version,
167: p_init_msg_list,
168: x_return_status,
169: x_msg_count,
170: x_msg_data,
309: , p5_a26 NUMBER := 0-1962.0724
310: )
311:
312: as
313: ddp_optv_rec okl_options_pvt.optv_rec_type;
314: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
315: ddx_optv_rec okl_options_pvt.optv_rec_type;
316: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
317: ddindx binary_integer; indx binary_integer;
310: )
311:
312: as
313: ddp_optv_rec okl_options_pvt.optv_rec_type;
314: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
315: ddx_optv_rec okl_options_pvt.optv_rec_type;
316: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
317: ddindx binary_integer; indx binary_integer;
318: begin
311:
312: as
313: ddp_optv_rec okl_options_pvt.optv_rec_type;
314: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
315: ddx_optv_rec okl_options_pvt.optv_rec_type;
316: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
317: ddindx binary_integer; indx binary_integer;
318: begin
319:
312: as
313: ddp_optv_rec okl_options_pvt.optv_rec_type;
314: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
315: ddx_optv_rec okl_options_pvt.optv_rec_type;
316: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
317: ddindx binary_integer; indx binary_integer;
318: begin
319:
320: -- copy data to the local IN or IN-OUT args, if any
367:
368:
369:
370: -- here's the delegated call to the old PL/SQL routine
371: okl_options_pvt.update_options(p_api_version,
372: p_init_msg_list,
373: x_return_status,
374: x_msg_count,
375: x_msg_data,
475: , p5_a26 NUMBER := 0-1962.0724
476: )
477:
478: as
479: ddp_optv_rec okl_options_pvt.optv_rec_type;
480: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
481: ddindx binary_integer; indx binary_integer;
482: begin
483:
476: )
477:
478: as
479: ddp_optv_rec okl_options_pvt.optv_rec_type;
480: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
481: ddindx binary_integer; indx binary_integer;
482: begin
483:
484: -- copy data to the local IN or IN-OUT args, if any
529: , p6_a11
530: );
531:
532: -- here's the delegated call to the old PL/SQL routine
533: okl_options_pvt.validate_options(p_api_version,
534: p_init_msg_list,
535: x_return_status,
536: x_msg_count,
537: x_msg_data,
608: , p6_a26 out nocopy JTF_NUMBER_TABLE
609: )
610:
611: as
612: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
613: ddx_optv_tbl okl_options_pvt.optv_tbl_type;
614: ddindx binary_integer; indx binary_integer;
615: begin
616:
609: )
610:
611: as
612: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
613: ddx_optv_tbl okl_options_pvt.optv_tbl_type;
614: ddindx binary_integer; indx binary_integer;
615: begin
616:
617: -- copy data to the local IN or IN-OUT args, if any
650: );
651:
652:
653: -- here's the delegated call to the old PL/SQL routine
654: okl_options_pvt.create_options(p_api_version,
655: p_init_msg_list,
656: x_return_status,
657: x_msg_count,
658: x_msg_data,
757: , p5_a26 NUMBER := 0-1962.0724
758: )
759:
760: as
761: ddp_optv_rec okl_options_pvt.optv_rec_type;
762: ddx_optv_rec okl_options_pvt.optv_rec_type;
763: ddindx binary_integer; indx binary_integer;
764: begin
765:
758: )
759:
760: as
761: ddp_optv_rec okl_options_pvt.optv_rec_type;
762: ddx_optv_rec okl_options_pvt.optv_rec_type;
763: ddindx binary_integer; indx binary_integer;
764: begin
765:
766: -- copy data to the local IN or IN-OUT args, if any
798: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
799:
800:
801: -- here's the delegated call to the old PL/SQL routine
802: okl_options_pvt.create_options(p_api_version,
803: p_init_msg_list,
804: x_return_status,
805: x_msg_count,
806: x_msg_data,
877: , p5_a26 JTF_NUMBER_TABLE
878: )
879:
880: as
881: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
882: ddindx binary_integer; indx binary_integer;
883: begin
884:
885: -- copy data to the local IN or IN-OUT args, if any
917: , p5_a26
918: );
919:
920: -- here's the delegated call to the old PL/SQL routine
921: okl_options_pvt.lock_options(p_api_version,
922: p_init_msg_list,
923: x_return_status,
924: x_msg_count,
925: x_msg_data,
967: , p5_a26 NUMBER := 0-1962.0724
968: )
969:
970: as
971: ddp_optv_rec okl_options_pvt.optv_rec_type;
972: ddindx binary_integer; indx binary_integer;
973: begin
974:
975: -- copy data to the local IN or IN-OUT args, if any
1006: ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
1007: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
1008:
1009: -- here's the delegated call to the old PL/SQL routine
1010: okl_options_pvt.lock_options(p_api_version,
1011: p_init_msg_list,
1012: x_return_status,
1013: x_msg_count,
1014: x_msg_data,
1083: , p6_a26 out nocopy JTF_NUMBER_TABLE
1084: )
1085:
1086: as
1087: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
1088: ddx_optv_tbl okl_options_pvt.optv_tbl_type;
1089: ddindx binary_integer; indx binary_integer;
1090: begin
1091:
1084: )
1085:
1086: as
1087: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
1088: ddx_optv_tbl okl_options_pvt.optv_tbl_type;
1089: ddindx binary_integer; indx binary_integer;
1090: begin
1091:
1092: -- copy data to the local IN or IN-OUT args, if any
1125: );
1126:
1127:
1128: -- here's the delegated call to the old PL/SQL routine
1129: okl_options_pvt.update_options(p_api_version,
1130: p_init_msg_list,
1131: x_return_status,
1132: x_msg_count,
1133: x_msg_data,
1232: , p5_a26 NUMBER := 0-1962.0724
1233: )
1234:
1235: as
1236: ddp_optv_rec okl_options_pvt.optv_rec_type;
1237: ddx_optv_rec okl_options_pvt.optv_rec_type;
1238: ddindx binary_integer; indx binary_integer;
1239: begin
1240:
1233: )
1234:
1235: as
1236: ddp_optv_rec okl_options_pvt.optv_rec_type;
1237: ddx_optv_rec okl_options_pvt.optv_rec_type;
1238: ddindx binary_integer; indx binary_integer;
1239: begin
1240:
1241: -- copy data to the local IN or IN-OUT args, if any
1273: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
1274:
1275:
1276: -- here's the delegated call to the old PL/SQL routine
1277: okl_options_pvt.update_options(p_api_version,
1278: p_init_msg_list,
1279: x_return_status,
1280: x_msg_count,
1281: x_msg_data,
1352: , p5_a26 JTF_NUMBER_TABLE
1353: )
1354:
1355: as
1356: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
1357: ddindx binary_integer; indx binary_integer;
1358: begin
1359:
1360: -- copy data to the local IN or IN-OUT args, if any
1392: , p5_a26
1393: );
1394:
1395: -- here's the delegated call to the old PL/SQL routine
1396: okl_options_pvt.delete_options(p_api_version,
1397: p_init_msg_list,
1398: x_return_status,
1399: x_msg_count,
1400: x_msg_data,
1442: , p5_a26 NUMBER := 0-1962.0724
1443: )
1444:
1445: as
1446: ddp_optv_rec okl_options_pvt.optv_rec_type;
1447: ddindx binary_integer; indx binary_integer;
1448: begin
1449:
1450: -- copy data to the local IN or IN-OUT args, if any
1481: ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
1482: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
1483:
1484: -- here's the delegated call to the old PL/SQL routine
1485: okl_options_pvt.delete_options(p_api_version,
1486: p_init_msg_list,
1487: x_return_status,
1488: x_msg_count,
1489: x_msg_data,
1531: , p5_a26 JTF_NUMBER_TABLE
1532: )
1533:
1534: as
1535: ddp_optv_tbl okl_options_pvt.optv_tbl_type;
1536: ddindx binary_integer; indx binary_integer;
1537: begin
1538:
1539: -- copy data to the local IN or IN-OUT args, if any
1571: , p5_a26
1572: );
1573:
1574: -- here's the delegated call to the old PL/SQL routine
1575: okl_options_pvt.validate_options(p_api_version,
1576: p_init_msg_list,
1577: x_return_status,
1578: x_msg_count,
1579: x_msg_data,
1621: , p5_a26 NUMBER := 0-1962.0724
1622: )
1623:
1624: as
1625: ddp_optv_rec okl_options_pvt.optv_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
1660: ddp_optv_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a25);
1661: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
1662:
1663: -- here's the delegated call to the old PL/SQL routine
1664: okl_options_pvt.validate_options(p_api_version,
1665: p_init_msg_list,
1666: x_return_status,
1667: x_msg_count,
1668: x_msg_data,
1707: , p6_a11 out nocopy JTF_NUMBER_TABLE
1708: )
1709:
1710: as
1711: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
1712: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
1713: ddindx binary_integer; indx binary_integer;
1714: begin
1715:
1708: )
1709:
1710: as
1711: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
1712: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
1713: ddindx binary_integer; indx binary_integer;
1714: begin
1715:
1716: -- copy data to the local IN or IN-OUT args, if any
1734: );
1735:
1736:
1737: -- here's the delegated call to the old PL/SQL routine
1738: okl_options_pvt.create_option_values(p_api_version,
1739: p_init_msg_list,
1740: x_return_status,
1741: x_msg_count,
1742: x_msg_data,
1796: , p5_a11 NUMBER := 0-1962.0724
1797: )
1798:
1799: as
1800: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
1801: ddx_ovev_rec okl_options_pvt.ovev_rec_type;
1802: ddindx binary_integer; indx binary_integer;
1803: begin
1804:
1797: )
1798:
1799: as
1800: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
1801: ddx_ovev_rec okl_options_pvt.ovev_rec_type;
1802: ddindx binary_integer; indx binary_integer;
1803: begin
1804:
1805: -- copy data to the local IN or IN-OUT args, if any
1822: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1823:
1824:
1825: -- here's the delegated call to the old PL/SQL routine
1826: okl_options_pvt.create_option_values(p_api_version,
1827: p_init_msg_list,
1828: x_return_status,
1829: x_msg_count,
1830: x_msg_data,
1871: , p5_a11 JTF_NUMBER_TABLE
1872: )
1873:
1874: as
1875: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
1876: ddindx binary_integer; indx binary_integer;
1877: begin
1878:
1879: -- copy data to the local IN or IN-OUT args, if any
1896: , p5_a11
1897: );
1898:
1899: -- here's the delegated call to the old PL/SQL routine
1900: okl_options_pvt.lock_option_values(p_api_version,
1901: p_init_msg_list,
1902: x_return_status,
1903: x_msg_count,
1904: x_msg_data,
1931: , p5_a11 NUMBER := 0-1962.0724
1932: )
1933:
1934: as
1935: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
1936: ddindx binary_integer; indx binary_integer;
1937: begin
1938:
1939: -- copy data to the local IN or IN-OUT args, if any
1955: ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
1956: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
1957:
1958: -- here's the delegated call to the old PL/SQL routine
1959: okl_options_pvt.lock_option_values(p_api_version,
1960: p_init_msg_list,
1961: x_return_status,
1962: x_msg_count,
1963: x_msg_data,
2002: , p6_a11 out nocopy JTF_NUMBER_TABLE
2003: )
2004:
2005: as
2006: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
2007: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
2008: ddindx binary_integer; indx binary_integer;
2009: begin
2010:
2003: )
2004:
2005: as
2006: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
2007: ddx_ovev_tbl okl_options_pvt.ovev_tbl_type;
2008: ddindx binary_integer; indx binary_integer;
2009: begin
2010:
2011: -- copy data to the local IN or IN-OUT args, if any
2029: );
2030:
2031:
2032: -- here's the delegated call to the old PL/SQL routine
2033: okl_options_pvt.update_option_values(p_api_version,
2034: p_init_msg_list,
2035: x_return_status,
2036: x_msg_count,
2037: x_msg_data,
2091: , p5_a11 NUMBER := 0-1962.0724
2092: )
2093:
2094: as
2095: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
2096: ddx_ovev_rec okl_options_pvt.ovev_rec_type;
2097: ddindx binary_integer; indx binary_integer;
2098: begin
2099:
2092: )
2093:
2094: as
2095: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
2096: ddx_ovev_rec okl_options_pvt.ovev_rec_type;
2097: ddindx binary_integer; indx binary_integer;
2098: begin
2099:
2100: -- copy data to the local IN or IN-OUT args, if any
2117: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
2118:
2119:
2120: -- here's the delegated call to the old PL/SQL routine
2121: okl_options_pvt.update_option_values(p_api_version,
2122: p_init_msg_list,
2123: x_return_status,
2124: x_msg_count,
2125: x_msg_data,
2166: , p5_a11 JTF_NUMBER_TABLE
2167: )
2168:
2169: as
2170: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
2171: ddindx binary_integer; indx binary_integer;
2172: begin
2173:
2174: -- copy data to the local IN or IN-OUT args, if any
2191: , p5_a11
2192: );
2193:
2194: -- here's the delegated call to the old PL/SQL routine
2195: okl_options_pvt.delete_option_values(p_api_version,
2196: p_init_msg_list,
2197: x_return_status,
2198: x_msg_count,
2199: x_msg_data,
2226: , p5_a11 NUMBER := 0-1962.0724
2227: )
2228:
2229: as
2230: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
2231: ddindx binary_integer; indx binary_integer;
2232: begin
2233:
2234: -- copy data to the local IN or IN-OUT args, if any
2250: ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
2251: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
2252:
2253: -- here's the delegated call to the old PL/SQL routine
2254: okl_options_pvt.delete_option_values(p_api_version,
2255: p_init_msg_list,
2256: x_return_status,
2257: x_msg_count,
2258: x_msg_data,
2285: , p5_a11 JTF_NUMBER_TABLE
2286: )
2287:
2288: as
2289: ddp_ovev_tbl okl_options_pvt.ovev_tbl_type;
2290: ddindx binary_integer; indx binary_integer;
2291: begin
2292:
2293: -- copy data to the local IN or IN-OUT args, if any
2310: , p5_a11
2311: );
2312:
2313: -- here's the delegated call to the old PL/SQL routine
2314: okl_options_pvt.validate_option_values(p_api_version,
2315: p_init_msg_list,
2316: x_return_status,
2317: x_msg_count,
2318: x_msg_data,
2345: , p5_a11 NUMBER := 0-1962.0724
2346: )
2347:
2348: as
2349: ddp_ovev_rec okl_options_pvt.ovev_rec_type;
2350: ddindx binary_integer; indx binary_integer;
2351: begin
2352:
2353: -- copy data to the local IN or IN-OUT args, if any
2369: ddp_ovev_rec.last_update_date := rosetta_g_miss_date_in_map(p5_a10);
2370: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p5_a11);
2371:
2372: -- here's the delegated call to the old PL/SQL routine
2373: okl_options_pvt.validate_option_values(p_api_version,
2374: p_init_msg_list,
2375: x_return_status,
2376: x_msg_count,
2377: x_msg_data,
2384:
2385:
2386: end;
2387:
2388: end okl_options_pvt_w;