1: package body IEM_AMV_PVT as
2: /* $Header: iemvamvb.pls 120.1 2005/06/10 12:34:50 appldev $*/
3: G_PKG_NAME varchar2(100):='IEM_AMV_PVT';
4: G_cat_tbl category_tbl;
5:
1: package body IEM_AMV_PVT as
2: /* $Header: iemvamvb.pls 120.1 2005/06/10 12:34:50 appldev $*/
3: G_PKG_NAME varchar2(100):='IEM_AMV_PVT';
4: G_cat_tbl category_tbl;
5:
6: PROCEDURE get_categories (p_api_version_number IN NUMBER,
7: p_init_msg_list IN VARCHAR2 := NULL,
73: G_cat_tbl(l_index).category_name := '--' || l_cat_names_tbl(i);
74:
75: l_index := l_index + 1;
76:
77: iem_amv_pvt.get_sub_categories (p_api_version_number => p_api_version_number,
78: p_init_msg_list => p_init_msg_list,
79: p_commit => p_commit,
80: p_category_id => l_cat_ids_tbl(i),
81: p_index => l_index,
231: G_cat_tbl(x_index).category_name := l_string || l_cat_names_tbl(i);
232:
233: x_index := x_index + 1;
234:
235: iem_amv_pvt.get_sub_categories (p_api_version_number => p_api_version_number,
236: p_init_msg_list => p_init_msg_list,
237: p_commit => p_commit,
238: p_category_id => l_cat_ids_tbl(i),
239: p_index => x_index,
304: );
305:
306: END get_sub_categories;
307:
308: end IEM_AMV_PVT ;