1: package body okl_inv_type_delete_pub_w as
2: /* $Header: OKLUITDB.pls 120.1 2005/07/14 12:03:36 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:
32: , p5_a5 VARCHAR2 := fnd_api.g_miss_char
33: )
34:
35: as
36: ddp_ity_del_rec okl_inv_type_delete_pub.ity_del_rec_type;
37: ddindx binary_integer; indx binary_integer;
38: begin
39:
40: -- copy data to the local IN or IN-OUT args, if any
50: ddp_ity_del_rec.group_asset_yn := p5_a4;
51: ddp_ity_del_rec.group_by_contract_yn := p5_a5;
52:
53: -- here's the delegated call to the old PL/SQL routine
54: okl_inv_type_delete_pub.delete_type(p_api_version,
55: p_init_msg_list,
56: x_return_status,
57: x_msg_count,
58: x_msg_data,
79: , p5_a5 JTF_VARCHAR2_TABLE_100
80: )
81:
82: as
83: ddp_ity_del_tbl okl_inv_type_delete_pub.ity_del_tbl_type;
84: ddindx binary_integer; indx binary_integer;
85: begin
86:
87: -- copy data to the local IN or IN-OUT args, if any
98: , p5_a5
99: );
100:
101: -- here's the delegated call to the old PL/SQL routine
102: okl_inv_type_delete_pub.delete_type(p_api_version,
103: p_init_msg_list,
104: x_return_status,
105: x_msg_count,
106: x_msg_data,
113:
114:
115: end;
116:
117: end okl_inv_type_delete_pub_w;