1: package body okl_setupformulae_pub_w as
2: /* $Header: OKLUSFMB.pls 120.1 2005/07/19 07:29:57 asawanka 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:
92: , p0_a33 NUMBER := 0-1962.0724
93: )
94:
95: as
96: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
97: ddx_no_data_found boolean;
98: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
99: ddindx binary_integer; indx binary_integer;
100: begin
94:
95: as
96: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
97: ddx_no_data_found boolean;
98: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
99: ddindx binary_integer; indx binary_integer;
100: begin
101:
102: -- copy data to the local IN or IN-OUT args, if any
139:
140:
141:
142: -- here's the delegated call to the old PL/SQL routine
143: okl_setupformulae_pub.get_rec(ddp_fmav_rec,
144: x_return_status,
145: x_msg_data,
146: ddx_no_data_found,
147: ddx_fmav_rec);
268: , p5_a33 NUMBER := 0-1962.0724
269: )
270:
271: as
272: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
273: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
274: ddindx binary_integer; indx binary_integer;
275: begin
276:
269: )
270:
271: as
272: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
273: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
274: ddindx binary_integer; indx binary_integer;
275: begin
276:
277: -- copy data to the local IN or IN-OUT args, if any
316: ddp_fmav_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
317:
318:
319: -- here's the delegated call to the old PL/SQL routine
320: okl_setupformulae_pub.insert_formulae(p_api_version,
321: p_init_msg_list,
322: x_return_status,
323: x_msg_count,
324: x_msg_data,
443: , p5_a33 NUMBER := 0-1962.0724
444: )
445:
446: as
447: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
448: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
449: ddindx binary_integer; indx binary_integer;
450: begin
451:
444: )
445:
446: as
447: ddp_fmav_rec okl_setupformulae_pub.fmav_rec_type;
448: ddx_fmav_rec okl_setupformulae_pub.fmav_rec_type;
449: ddindx binary_integer; indx binary_integer;
450: begin
451:
452: -- copy data to the local IN or IN-OUT args, if any
491: ddp_fmav_rec.last_update_login := rosetta_g_miss_num_map(p5_a33);
492:
493:
494: -- here's the delegated call to the old PL/SQL routine
495: okl_setupformulae_pub.update_formulae(p_api_version,
496: p_init_msg_list,
497: x_return_status,
498: x_msg_count,
499: x_msg_data,
542: p6_a32 := ddx_fmav_rec.last_update_date;
543: p6_a33 := rosetta_g_miss_num_map(ddx_fmav_rec.last_update_login);
544: end;
545:
546: end okl_setupformulae_pub_w;