[Home] [Help]
2941: ) IS
2942: -- variables needed for dynamic SQL
2943: l_identifier VARCHAR2(10);
2944: l_api_name VARCHAR2(30) := 'BuildIputSQL';
2945: l_is_mat_status_used NUMBER := NVL(FND_PROFILE.VALUE('INV_MATERIAL_STATUS'), 2);
2946: BEGIN
2947: -- Initialize API return status to success
2948: x_return_status := fnd_api.g_ret_sts_success;
2949:
3173: l_return_value BOOLEAN;
3174: l_debug NUMBER;
3175: BEGIN
3176: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3177: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3178: END IF;
3179: l_debug := g_debug;
3180: IF p_simulation_mode <> wms_engine_pvt.g_no_simulation THEN
3181: l_return_value := TRUE;
3263: l_ctr := wms_rule_pvt.g_rule_list_pick_ctr;
3264: l_list_pkg := 'wms_rule_pick_pkg' || l_ctr ;
3265:
3266: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3267: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3268: END IF;
3269: l_debug := g_debug;
3270:
3271: IF l_debug = 1 THEN
3436: -- Initialize API return status to success
3437: x_return_status := fnd_api.g_ret_sts_success;
3438:
3439: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3440: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3441: END IF;
3442: l_debug := g_debug;
3443:
3444: IF l_debug = 1 THEN
3604:
3605: BEGIN
3606:
3607: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3608: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3609: END IF;
3610: l_debug := g_debug;
3611:
3612: IF wms_rule_pvt.g_rule_list_pick_ctr IS NULL THEN
3758:
3759: BEGIN
3760:
3761: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
3762: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
3763: END IF;
3764: l_debug := g_debug;
3765:
3766: if wms_rule_pvt.g_rule_list_put_ctr is null then
4111: AND line_type_code = 2
4112: GROUP BY to_locator_id;
4113: BEGIN
4114: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
4115: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
4116: END IF;
4117: l_debug := g_debug;
4118:
4119: If l_debug = 1 THEN
4298: Where reservation_id = p_reservation_id
4299: and lot_number = g_locs(p_record_id).lot_number;
4300: BEGIN
4301: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
4302: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
4303: END IF;
4304: l_debug := g_debug;
4305:
4306: x_return_status := fnd_api.g_ret_sts_success;
5075: l_debug NUMBER;
5076:
5077: BEGIN
5078: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
5079: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
5080: END IF;
5081: l_debug := g_debug;
5082:
5083: x_return_status := fnd_api.g_ret_sts_success;
5422:
5423: l_debug NUMBER;
5424: BEGIN
5425: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
5426: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
5427: END IF;
5428: l_debug := g_debug;
5429:
5430: IF l_debug = 1 THEN
5590:
5591: l_debug NUMBER;
5592: BEGIN
5593: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
5594: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
5595: END IF;
5596: l_debug := g_debug;
5597:
5598: IF l_debug = 1 THEN
6087: l_debug NUMBER;
6088:
6089: BEGIN
6090: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
6091: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6092: END IF;
6093: l_debug := g_debug;
6094: IF l_debug = 1 THEN
6095: log_procedure(l_api_name, 'start', 'Start Insert Consist Record');
6317: l_next_group NUMBER;
6318: l_debug NUMBER;
6319: BEGIN
6320: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
6321: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6322: END IF;
6323: l_debug := g_debug;
6324: IF l_debug = 1 THEN
6325: log_procedure(l_api_name, 'start', 'Start Invalidate_Lpn_Group');
6773:
6774:
6775: BEGIN
6776: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
6777: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
6778: END IF;
6779: l_debug := g_debug;
6780: l_progress := 10;
6781:
11162: l_organization_id := p_organization_id;
11163: l_inventory_item_id := p_inventory_item_id;
11164:
11165: IF g_debug IS NOT NULL THEN
11166: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
11167: END IF;
11168: l_debug := g_debug;
11169:
11170: IF l_debug = 1 THEN
11460:
11461: BEGIN
11462:
11463: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
11464: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
11465: END IF;
11466: l_debug := g_debug;
11467:
11468: If (l_debug = 1) then
14332: BEGIN
14333: SAVEPOINT assignttsp;
14334:
14335: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
14336: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
14337: END IF;
14338: l_debug := g_debug;
14339:
14340: -- Standard call to check for call compatibility
14687: OR rules.organization_id = -1
14688: ) ;
14689: ----
14690: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
14691: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
14692: END IF;
14693: l_debug := g_debug;
14694: IF l_debug = 1 THEN
14695: TRACE('Executing ApplyLabel()...Label_request_ID : '|| p_label_request_id);
15103:
15104: BEGIN
15105:
15106: IF NOT(inv_cache.is_pickrelease AND g_debug IS NOT NULL) THEN
15107: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
15108: END IF;
15109: l_debug := g_debug;
15110: l_progress := 10;
15111:
15907:
15908:
15909: BEGIN
15910: --
15911: l_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
15912: l_progress := 10;
15913: -- debugging portion
15914: -- can be commented ut for final code
15915: if nvl(inv_cache.is_pickrelease, FALSE) THEN