1: package body okl_bpd_man_rct_handle_pvt_w as
2: /* $Header: OKLEMRHB.pls 120.0 2005/10/14 10:17:08 abindal 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:
71: , p_receipt_currency VARCHAR2
72: )
73:
74: as
75: ddp_xcav_tbl okl_bpd_man_rct_handle_pvt.xcav_tbl_type;
76: ddp_receipt_date date;
77: ddindx binary_integer; indx binary_integer;
78: begin
79:
131: ddp_receipt_date := rosetta_g_miss_date_in_map(p_receipt_date);
132:
133:
134: -- here's the delegated call to the old PL/SQL routine
135: okl_bpd_man_rct_handle_pvt.man_receipt_apply(p_api_version,
136: p_init_msg_list,
137: x_return_status,
138: x_msg_count,
139: x_msg_data,
205: , p_receipt_date date
206: )
207:
208: as
209: ddp_xcav_tbl okl_bpd_man_rct_handle_pvt.xcav_tbl_type;
210: ddp_receipt_date date;
211: ddindx binary_integer; indx binary_integer;
212: begin
213:
263:
264: ddp_receipt_date := rosetta_g_miss_date_in_map(p_receipt_date);
265:
266: -- here's the delegated call to the old PL/SQL routine
267: okl_bpd_man_rct_handle_pvt.man_receipt_unapply(p_api_version,
268: p_init_msg_list,
269: x_return_status,
270: x_msg_count,
271: x_msg_data,
282:
283:
284: end;
285:
286: end okl_bpd_man_rct_handle_pvt_w;