1: package body okl_setupoptions_pvt_w as
2: /* $Header: OKLESOTB.pls 115.2 2002/12/24 04:02:40 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:
77: , p0_a26 NUMBER := 0-1962.0724
78: )
79:
80: as
81: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
82: ddx_no_data_found boolean;
83: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
84: ddindx binary_integer; indx binary_integer;
85: begin
79:
80: as
81: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
82: ddx_no_data_found boolean;
83: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
84: ddindx binary_integer; indx binary_integer;
85: begin
86:
87: -- 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_setupoptions_pvt.get_rec(ddp_optv_rec,
121: x_return_status,
122: ddx_no_data_found,
123: ddx_optv_rec);
124:
222: , p5_a26 NUMBER := 0-1962.0724
223: )
224:
225: as
226: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
227: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
228: ddindx binary_integer; indx binary_integer;
229: begin
230:
223: )
224:
225: as
226: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
227: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
228: ddindx binary_integer; indx binary_integer;
229: begin
230:
231: -- copy data to the local IN or IN-OUT args, if any
263: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
264:
265:
266: -- here's the delegated call to the old PL/SQL routine
267: okl_setupoptions_pvt.insert_options(p_api_version,
268: p_init_msg_list,
269: x_return_status,
270: x_msg_count,
271: x_msg_data,
369: , p5_a26 NUMBER := 0-1962.0724
370: )
371:
372: as
373: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
374: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
375: ddindx binary_integer; indx binary_integer;
376: begin
377:
370: )
371:
372: as
373: ddp_optv_rec okl_setupoptions_pvt.optv_rec_type;
374: ddx_optv_rec okl_setupoptions_pvt.optv_rec_type;
375: ddindx binary_integer; indx binary_integer;
376: begin
377:
378: -- copy data to the local IN or IN-OUT args, if any
410: ddp_optv_rec.last_update_login := rosetta_g_miss_num_map(p5_a26);
411:
412:
413: -- here's the delegated call to the old PL/SQL routine
414: okl_setupoptions_pvt.update_options(p_api_version,
415: p_init_msg_list,
416: x_return_status,
417: x_msg_count,
418: x_msg_data,
454: p6_a25 := ddx_optv_rec.last_update_date;
455: p6_a26 := rosetta_g_miss_num_map(ddx_optv_rec.last_update_login);
456: end;
457:
458: end okl_setupoptions_pvt_w;