1: package body okl_setupoptvalues_pub_w as
2: /* $Header: OKLUSOVB.pls 115.2 2002/12/24 04:19:57 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:
48: , p0_a11 NUMBER := 0-1962.0724
49: )
50:
51: as
52: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
53: ddx_no_data_found boolean;
54: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
55: ddindx binary_integer; indx binary_integer;
56: begin
50:
51: as
52: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
53: ddx_no_data_found boolean;
54: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
55: ddindx binary_integer; indx binary_integer;
56: begin
57:
58: -- copy data to the local IN or IN-OUT args, if any
73:
74:
75:
76: -- here's the delegated call to the old PL/SQL routine
77: okl_setupoptvalues_pub.get_rec(ddp_ovev_rec,
78: x_return_status,
79: x_msg_data,
80: ddx_no_data_found,
81: ddx_ovev_rec);
163: , p6_a11 NUMBER := 0-1962.0724
164: )
165:
166: as
167: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
168: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
169: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
170: ddindx binary_integer; indx binary_integer;
171: begin
164: )
165:
166: as
167: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
168: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
169: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
170: ddindx binary_integer; indx binary_integer;
171: begin
172:
165:
166: as
167: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
168: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
169: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
170: ddindx binary_integer; indx binary_integer;
171: begin
172:
173: -- copy data to the local IN or IN-OUT args, if any
218: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
219:
220:
221: -- here's the delegated call to the old PL/SQL routine
222: okl_setupoptvalues_pub.insert_optvalues(p_api_version,
223: p_init_msg_list,
224: x_return_status,
225: x_msg_count,
226: x_msg_data,
308: , p6_a11 NUMBER := 0-1962.0724
309: )
310:
311: as
312: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
313: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
314: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
315: ddindx binary_integer; indx binary_integer;
316: begin
309: )
310:
311: as
312: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
313: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
314: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
315: ddindx binary_integer; indx binary_integer;
316: begin
317:
310:
311: as
312: ddp_optv_rec okl_setupoptvalues_pub.optv_rec_type;
313: ddp_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
314: ddx_ovev_rec okl_setupoptvalues_pub.ovev_rec_type;
315: ddindx binary_integer; indx binary_integer;
316: begin
317:
318: -- copy data to the local IN or IN-OUT args, if any
363: ddp_ovev_rec.last_update_login := rosetta_g_miss_num_map(p6_a11);
364:
365:
366: -- here's the delegated call to the old PL/SQL routine
367: okl_setupoptvalues_pub.update_optvalues(p_api_version,
368: p_init_msg_list,
369: x_return_status,
370: x_msg_count,
371: x_msg_data,
394: p7_a10 := ddx_ovev_rec.last_update_date;
395: p7_a11 := rosetta_g_miss_num_map(ddx_ovev_rec.last_update_login);
396: end;
397:
398: end okl_setupoptvalues_pub_w;