1: package body okl_fe_eo_term_options_pvt_w as
2: /* $Header: OKLEEOTB.pls 120.0 2005/07/07 10:37:19 viselvar noship $ */
3: procedure rosetta_table_copy_in_p9(t out nocopy okl_fe_eo_term_options_pvt.invalid_object_tbl, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_300
5: , a2 JTF_VARCHAR2_TABLE_100
1: package body okl_fe_eo_term_options_pvt_w as
2: /* $Header: OKLEEOTB.pls 120.0 2005/07/07 10:37:19 viselvar noship $ */
3: procedure rosetta_table_copy_in_p9(t out nocopy okl_fe_eo_term_options_pvt.invalid_object_tbl, a0 JTF_NUMBER_TABLE
4: , a1 JTF_VARCHAR2_TABLE_300
5: , a2 JTF_VARCHAR2_TABLE_100
6: , a3 JTF_VARCHAR2_TABLE_100
7: ) as
24: end loop;
25: end if;
26: end if;
27: end rosetta_table_copy_in_p9;
28: procedure rosetta_table_copy_out_p9(t okl_fe_eo_term_options_pvt.invalid_object_tbl, a0 out nocopy JTF_NUMBER_TABLE
29: , a1 out nocopy JTF_VARCHAR2_TABLE_300
30: , a2 out nocopy JTF_VARCHAR2_TABLE_100
31: , a3 out nocopy JTF_VARCHAR2_TABLE_100
32: ) as
102: , p7_a28 out nocopy JTF_NUMBER_TABLE
103: )
104:
105: as
106: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
107: ddindx binary_integer; indx binary_integer;
108: begin
109:
110: -- copy data to the local IN or IN-OUT args, if any
116:
117:
118:
119: -- here's the delegated call to the old PL/SQL routine
120: okl_fe_eo_term_options_pvt.get_item_lines(p_api_version,
121: p_init_msg_list,
122: x_return_status,
123: x_msg_count,
124: x_msg_data,
201: , p7_a25 out nocopy JTF_NUMBER_TABLE
202: )
203:
204: as
205: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
206: ddindx binary_integer; indx binary_integer;
207: begin
208:
209: -- copy data to the local IN or IN-OUT args, if any
215:
216:
217:
218: -- here's the delegated call to the old PL/SQL routine
219: okl_fe_eo_term_options_pvt.get_eo_term_values(p_api_version,
220: p_init_msg_list,
221: x_return_status,
222: x_msg_count,
223: x_msg_data,
388: , p10_a25 out nocopy JTF_NUMBER_TABLE
389: )
390:
391: as
392: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
393: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
394: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
395: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
396: ddindx binary_integer; indx binary_integer;
389: )
390:
391: as
392: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
393: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
394: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
395: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
396: ddindx binary_integer; indx binary_integer;
397: begin
390:
391: as
392: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
393: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
394: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
395: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
396: ddindx binary_integer; indx binary_integer;
397: begin
398:
391: as
392: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
393: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
394: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
395: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
396: ddindx binary_integer; indx binary_integer;
397: begin
398:
399: -- copy data to the local IN or IN-OUT args, if any
408:
409:
410:
411: -- here's the delegated call to the old PL/SQL routine
412: okl_fe_eo_term_options_pvt.get_end_of_term_option(p_api_version,
413: p_init_msg_list,
414: x_return_status,
415: x_msg_count,
416: x_msg_data,
794: , p12_a25 out nocopy JTF_NUMBER_TABLE
795: )
796:
797: as
798: ddp_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
795: )
796:
797: as
798: ddp_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
796:
797: as
798: ddp_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
797: as
798: ddp_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
805: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
798: ddp_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
805: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
806: ddindx binary_integer; indx binary_integer;
799: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
805: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
806: ddindx binary_integer; indx binary_integer;
807: begin
800: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
805: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
806: ddindx binary_integer; indx binary_integer;
807: begin
808:
801: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
802: ddx_ethv_rec okl_fe_eo_term_options_pvt.okl_ethv_rec;
803: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
804: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
805: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
806: ddindx binary_integer; indx binary_integer;
807: begin
808:
809: -- copy data to the local IN or IN-OUT args, if any
939:
940:
941:
942: -- here's the delegated call to the old PL/SQL routine
943: okl_fe_eo_term_options_pvt.insert_end_of_term_option(p_api_version,
944: p_init_msg_list,
945: x_return_status,
946: x_msg_count,
947: x_msg_data,
1261: , p10_a25 out nocopy JTF_NUMBER_TABLE
1262: )
1263:
1264: as
1265: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1262: )
1263:
1264: as
1265: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1270: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1263:
1264: as
1265: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1270: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1271: ddindx binary_integer; indx binary_integer;
1264: as
1265: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1270: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1271: ddindx binary_integer; indx binary_integer;
1272: begin
1265: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1270: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1271: ddindx binary_integer; indx binary_integer;
1272: begin
1273:
1266: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1267: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1268: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1269: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1270: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1271: ddindx binary_integer; indx binary_integer;
1272: begin
1273:
1274: -- copy data to the local IN or IN-OUT args, if any
1368:
1369:
1370:
1371: -- here's the delegated call to the old PL/SQL routine
1372: okl_fe_eo_term_options_pvt.update_end_of_term_option(p_api_version,
1373: p_init_msg_list,
1374: x_return_status,
1375: x_msg_count,
1376: x_msg_data,
1652: , p10_a25 out nocopy JTF_NUMBER_TABLE
1653: )
1654:
1655: as
1656: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1653: )
1654:
1655: as
1656: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1661: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1654:
1655: as
1656: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1661: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1662: ddindx binary_integer; indx binary_integer;
1655: as
1656: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1661: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1662: ddindx binary_integer; indx binary_integer;
1663: begin
1656: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1661: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1662: ddindx binary_integer; indx binary_integer;
1663: begin
1664:
1657: ddp_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1658: ddp_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1659: ddx_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1660: ddx_eto_tbl okl_fe_eo_term_options_pvt.okl_eto_tbl;
1661: ddx_etv_tbl okl_fe_eo_term_options_pvt.okl_etv_tbl;
1662: ddindx binary_integer; indx binary_integer;
1663: begin
1664:
1665: -- copy data to the local IN or IN-OUT args, if any
1759:
1760:
1761:
1762: -- here's the delegated call to the old PL/SQL routine
1763: okl_fe_eo_term_options_pvt.create_version(p_api_version,
1764: p_init_msg_list,
1765: x_return_status,
1766: x_msg_count,
1767: x_msg_data,
1882: , p6_a3 out nocopy JTF_VARCHAR2_TABLE_100
1883: )
1884:
1885: as
1886: ddx_obj_tbl okl_fe_eo_term_options_pvt.invalid_object_tbl;
1887: ddindx binary_integer; indx binary_integer;
1888: begin
1889:
1890: -- copy data to the local IN or IN-OUT args, if any
1895:
1896:
1897:
1898: -- here's the delegated call to the old PL/SQL routine
1899: okl_fe_eo_term_options_pvt.invalid_objects(p_api_version,
1900: p_init_msg_list,
1901: x_return_status,
1902: x_msg_count,
1903: x_msg_data,
1910:
1911:
1912:
1913:
1914: okl_fe_eo_term_options_pvt_w.rosetta_table_copy_out_p9(ddx_obj_tbl, p6_a0
1915: , p6_a1
1916: , p6_a2
1917: , p6_a3
1918: );
1954: , x_cal_eff_from out nocopy DATE
1955: )
1956:
1957: as
1958: ddp_eve_rec okl_fe_eo_term_options_pvt.okl_eve_rec;
1959: ddindx binary_integer; indx binary_integer;
1960: begin
1961:
1962: -- copy data to the local IN or IN-OUT args, if any
1995: ddp_eve_rec.last_update_login := p5_a27;
1996:
1997:
1998: -- here's the delegated call to the old PL/SQL routine
1999: okl_fe_eo_term_options_pvt.calculate_start_date(p_api_version,
2000: p_init_msg_list,
2001: x_return_status,
2002: x_msg_count,
2003: x_msg_data,
2012:
2013:
2014: end;
2015:
2016: end okl_fe_eo_term_options_pvt_w;