1: PACKAGE BODY lot_split_data_insert AS
2: /* $Header: INVLSPLB.pls 120.1 2006/03/14 02:43:58 rsagar noship $ */
3: g_header_id NUMBER := 0;
4: g_pkg_name VARCHAR2(100) := 'lot_split_data_insert';
5:
1: PACKAGE BODY lot_split_data_insert AS
2: /* $Header: INVLSPLB.pls 120.1 2006/03/14 02:43:58 rsagar noship $ */
3: g_header_id NUMBER := 0;
4: g_pkg_name VARCHAR2(100) := 'lot_split_data_insert';
5:
6:
7:
8: PROCEDURE set_table (
272: THEN
273: IF (l_debug = 1) THEN
274: INV_TRX_UTIL_PUB.trace('p_split is <> nul',g_pkg_name,9);
275: END IF;
276: lot_split_data_insert.insert_mmtt(p_total_qty,
277: p_transaction_type_id,
278: p_userid,
279: x_return_status);
280: IF (l_debug = 1) THEN
1300:
1301: END select_init_parameters;
1302:
1303: --
1304: END lot_split_data_insert;
1305: