1: PACKAGE BODY INV_FLEX_LOT_ALLOCATION_PUB AS
2: /* $Header: INVFLAPB.pls 120.0.12020000.11 2013/05/20 07:11:08 ptian noship $ */
3:
4: PROCEDURE print_debug(p_err_msg VARCHAR2) IS
5: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2: /* $Header: INVFLAPB.pls 120.0.12020000.11 2013/05/20 07:11:08 ptian noship $ */
3:
4: PROCEDURE print_debug(p_err_msg VARCHAR2) IS
5: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6: l_pkg_name VARCHAR2(100) := 'INV_FLEX_LOT_ALLOCATION_PUB:';
7: BEGIN
8: IF (l_debug = 1) THEN
9: inv_mobile_helper_functions.tracelog(p_err_msg => p_err_msg, p_module => l_pkg_name, p_level => 9);
10: END IF;
89: END;
90:
91: PROCEDURE SET_LOT_VALIDATION(P_LOT_VALIDATION IN VARCHAR2) IS
92: BEGIN
93: INV_FLEX_LOT_ALLOCATION_PUB.G_LOT_VALIDATION := P_LOT_VALIDATION;
94:
95: END SET_LOT_VALIDATION;
96:
97:
94:
95: END SET_LOT_VALIDATION;
96:
97:
98: END INV_FLEX_LOT_ALLOCATION_PUB;