1: package body okl_system_acct_opt_pub_w as
2: /* $Header: OKLUSYOB.pls 120.5.12010000.2 2008/09/12 22:48:20 smereddy ship $ */
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: rosetta_g_mistake_date_high date := to_date('01/01/+4710', 'MM/DD/SYYYY');
88: , p6_a57 out nocopy VARCHAR2
89: )
90:
91: as
92: ddx_saov_rec okl_system_acct_opt_pub.saov_rec_type;
93: ddindx binary_integer; indx binary_integer;
94: begin
95:
96: -- copy data to the local IN or IN-OUT args, if any
101:
102:
103:
104: -- here's the delegated call to the old PL/SQL routine
105: okl_system_acct_opt_pub.get_system_acct_opt(p_api_version,
106: p_init_msg_list,
107: x_return_status,
108: x_msg_count,
109: x_msg_data,
300: , p5_a57 VARCHAR2 := fnd_api.g_miss_char
301: )
302:
303: as
304: ddp_saov_rec okl_system_acct_opt_pub.saov_rec_type;
305: ddx_saov_rec okl_system_acct_opt_pub.saov_rec_type;
306: ddindx binary_integer; indx binary_integer;
307: begin
308:
301: )
302:
303: as
304: ddp_saov_rec okl_system_acct_opt_pub.saov_rec_type;
305: ddx_saov_rec okl_system_acct_opt_pub.saov_rec_type;
306: ddindx binary_integer; indx binary_integer;
307: begin
308:
309: -- copy data to the local IN or IN-OUT args, if any
372: ddp_saov_rec.secondary_rep_method := p5_a57;
373:
374:
375: -- here's the delegated call to the old PL/SQL routine
376: okl_system_acct_opt_pub.updt_system_acct_opt(p_api_version,
377: p_init_msg_list,
378: x_return_status,
379: x_msg_count,
380: x_msg_data,
447: p6_a56 := rosetta_g_miss_num_map(ddx_saov_rec.pay_dist_set_id);
448: p6_a57 := ddx_saov_rec.secondary_rep_method;
449: end;
450:
451: end okl_system_acct_opt_pub_w;