[Home] [Help]
13: G_INFO CONSTANT NUMBER := 5;
14: G_MESSAGE CONSTANT NUMBER := 9;
15:
16: PROCEDURE mdebug(msg IN VARCHAR2, LEVEL NUMBER := G_MESSAGE) IS
17: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
18: BEGIN
19: --DBMS_OUTPUT.put_line(msg);
20: IF (l_debug = 1) THEN
21: inv_trx_util_pub.TRACE(msg, 'WMS_CONTAINER_PUB', LEVEL);
54: l_changed_attributes WSH_CONTAINER_GRP.CHANGEDATTRIBUTETABTYPE;
55: l_lpn_item_id NUMBER := -99999;
56: --End Bug 5190145
57:
58: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
59: BEGIN
60: OPEN wsh_lpn_id;
61: FETCH wsh_lpn_id INTO l_dummy;
62:
214: , p_client_code IN VARCHAR2 -- Adding for LSP , bug 9087971
215: ) IS
216: l_api_name CONSTANT VARCHAR2(30) := 'Generate_LPN';
217: l_api_version CONSTANT NUMBER := 1.0;
218: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
219: l_progress VARCHAR2(500) := 'Entered API';
220: l_msgdata VARCHAR2(1000);
221:
222: -- Variables use by Auto_Create_LPNs
676: l_curr_seq NUMBER;
677: l_new_weight NUMBER;
678: l_new_weight_uom VARCHAR2(3);
679: l_net_weight NUMBER;
680: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
681: BEGIN
682: -- Standard Start of API savepoint
683: SAVEPOINT associate_lpn_pub;
684:
1194: l_locator inv_validate.LOCATOR;
1195: l_lot inv_validate.lot;
1196: l_serial inv_validate.serial;
1197: l_result NUMBER;
1198: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1199: BEGIN
1200: -- Standard Start of API savepoint
1201: SAVEPOINT create_lpn_pub;
1202:
1586: --l_lpn_contents_rec WMS_LPN_CONTENTS%ROWTYPE;
1587: l_lpn_contents_rec lpn_contents_cursor%ROWTYPE;
1588: l_lpn_serial_rec mtl_serial_numbers%ROWTYPE;
1589: l_net_weight NUMBER;
1590: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1591: BEGIN
1592: -- Standard Start of API savepoint
1593: SAVEPOINT modify_lpn_pub;
1594:
1839: l_api_name CONSTANT VARCHAR2(30) := 'Modify_LPN_Wrapper';
1840: l_api_version CONSTANT NUMBER := 1.0;
1841: l_lpn lpn;
1842: l_result NUMBER;
1843: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1844: BEGIN
1845: -- Standard Start of API savepoint
1846: SAVEPOINT modify_lpn_wrapper_pub;
1847:
2157: l_exist_variable NUMBER;
2158: l_temp_quantity NUMBER;
2159: l_temp_uom_code VARCHAR2(3);
2160: l_temp_count NUMBER;
2161: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2162: BEGIN
2163: -- Standard Start of API savepoint
2164: SAVEPOINT packunpack_container_pub;
2165:
2791: l_padded_length NUMBER;
2792: l_current_number NUMBER;
2793: l_table_index BINARY_INTEGER;
2794: l_dynamic_status NUMBER;
2795: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
2796: BEGIN
2797: -- Standard Start of API savepoint
2798: SAVEPOINT pack_prepack_container_pub;
2799:
3118: p_lpn_id IN NUMBER,
3119: p_explosion_level IN NUMBER := 0,
3120: x_content_tbl OUT NOCOPY wms_container_tbl_type
3121: ) IS
3122: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3123: BEGIN
3124: WMS_CONTAINER_PVT.explode_lpn(
3125: p_api_version=> p_api_version,
3126: p_init_msg_list=> p_init_msg_list,
3151: p_organization_id IN NUMBER,
3152: p_dest_cont_item_id IN OUT NOCOPY NUMBER,
3153: p_qty_required OUT NOCOPY NUMBER
3154: ) IS
3155: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3156: BEGIN
3157: WMS_CONTAINER_PVT.container_required_qty(
3158: p_api_version=> p_api_version,
3159: p_init_msg_list=> p_init_msg_list,
3208: x_return_status VARCHAR2(4);
3209: x_msg_count NUMBER;
3210: x_msg_data VARCHAR2(300);
3211: ret BOOLEAN;
3212: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3213: BEGIN
3214: -- Standard Start of API savepoint
3215: SAVEPOINT prepack_lpn_cp_pub;
3216:
3318: FUNCTION lpn_pack_complete(p_revert NUMBER := 0)
3319: RETURN BOOLEAN IS
3320: lpn_weight NUMBER;
3321: lpn_volume NUMBER;
3322: l_debug number := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3323: BEGIN
3324: IF (p_revert = 1) THEN
3325: -- Remove all rows from the global wt/vol changes table
3326: FOR i IN 1 .. g_lpn_wt_vol_changes.COUNT LOOP
3362: , p_outermost_lpn_id IN NUMBER
3363: ) IS
3364: l_api_name CONSTANT VARCHAR2(30) := 'Get_Default_Secondary_Quantity';
3365: l_api_version CONSTANT NUMBER := 1.0;
3366: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3367: l_progress VARCHAR2(10) := '0';
3368: l_msgdata VARCHAR2(1000);
3369:
3370: -- Variables for validation
3486: , p_outermost_lpn_id IN NUMBER
3487: ) IS
3488: l_api_name CONSTANT VARCHAR2(30) := 'Break_Down_LPN';
3489: l_api_version CONSTANT NUMBER := 1.0;
3490: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3491: l_progress VARCHAR2(10) := '0';
3492: l_msgdata VARCHAR2(1000);
3493:
3494: -- Variables for validation
3610: , p_outermost_lpn_id IN NUMBER
3611: ) IS
3612: l_api_name CONSTANT VARCHAR2(30) := 'Initialize_LPN';
3613: l_api_version CONSTANT NUMBER := 1.0;
3614: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3615: l_progress VARCHAR2(10) := '0';
3616: l_msgdata VARCHAR2(1000);
3617:
3618: -- Variables for validation
3733: l_invalid_lpn_context EXCEPTION;
3734: l_lpn_not_found EXCEPTION;
3735: l_transactions_pending EXCEPTION;
3736: l_table_name VARCHAR2(100);
3737: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3738:
3739: CURSOR all_child_wlpns
3740: IS SELECT lpn_id
3741: FROM wms_license_plate_numbers
3962: l_api_name VARCHAR2(100) := 'REUSE_LPNS';
3963: l_outermost_lpn_id NUMBER;
3964: l_outermost_lpn_name WMS_LICENSE_PLATE_NUMBERS.LICENSE_PLATE_NUMBER%TYPE;
3965: l_lpn_name WMS_LICENSE_PLATE_NUMBERS.LICENSE_PLATE_NUMBER%TYPE;
3966: l_debug NUMBER := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3967: l_api_version CONSTANT NUMBER := 1.0;
3968:
3969: CURSOR immediate_child_wlpns
3970: IS SELECT lpn_id