260:
261:
262: --- Added the following code as part bug fix 5265024 --
263: -- Set and get the MO line values
264: IF inv_cache.set_mol_rec(p_transaction_temp_id) THEN
265: x_transaction_type_id := inv_cache.mol_rec.transaction_type_id;
266: x_inventory_item_id := inv_cache.mol_rec.inventory_item_id;
267: x_transaction_source_type_id := inv_cache.mol_rec.transaction_source_type_id;
268:
261:
262: --- Added the following code as part bug fix 5265024 --
263: -- Set and get the MO line values
264: IF inv_cache.set_mol_rec(p_transaction_temp_id) THEN
265: x_transaction_type_id := inv_cache.mol_rec.transaction_type_id;
266: x_inventory_item_id := inv_cache.mol_rec.inventory_item_id;
267: x_transaction_source_type_id := inv_cache.mol_rec.transaction_source_type_id;
268:
269: l_transaction_action_id := inv_cache.mtt_rec.transaction_action_id;
262: --- Added the following code as part bug fix 5265024 --
263: -- Set and get the MO line values
264: IF inv_cache.set_mol_rec(p_transaction_temp_id) THEN
265: x_transaction_type_id := inv_cache.mol_rec.transaction_type_id;
266: x_inventory_item_id := inv_cache.mol_rec.inventory_item_id;
267: x_transaction_source_type_id := inv_cache.mol_rec.transaction_source_type_id;
268:
269: l_transaction_action_id := inv_cache.mtt_rec.transaction_action_id;
270:
263: -- Set and get the MO line values
264: IF inv_cache.set_mol_rec(p_transaction_temp_id) THEN
265: x_transaction_type_id := inv_cache.mol_rec.transaction_type_id;
266: x_inventory_item_id := inv_cache.mol_rec.inventory_item_id;
267: x_transaction_source_type_id := inv_cache.mol_rec.transaction_source_type_id;
268:
269: l_transaction_action_id := inv_cache.mtt_rec.transaction_action_id;
270:
271: --- This code is added to handle direct-org xfers
265: x_transaction_type_id := inv_cache.mol_rec.transaction_type_id;
266: x_inventory_item_id := inv_cache.mol_rec.inventory_item_id;
267: x_transaction_source_type_id := inv_cache.mol_rec.transaction_source_type_id;
268:
269: l_transaction_action_id := inv_cache.mtt_rec.transaction_action_id;
270:
271: --- This code is added to handle direct-org xfers
272: IF l_transaction_action_id = 3 THEN
273: l_to_organization_id := inv_cache.mol_rec.to_organization_id;
269: l_transaction_action_id := inv_cache.mtt_rec.transaction_action_id;
270:
271: --- This code is added to handle direct-org xfers
272: IF l_transaction_action_id = 3 THEN
273: l_to_organization_id := inv_cache.mol_rec.to_organization_id;
274: ELSE
275: l_from_organization_id := inv_cache.mol_rec.organization_id;
276: END IF;
277:
271: --- This code is added to handle direct-org xfers
272: IF l_transaction_action_id = 3 THEN
273: l_to_organization_id := inv_cache.mol_rec.to_organization_id;
274: ELSE
275: l_from_organization_id := inv_cache.mol_rec.organization_id;
276: END IF;
277:
278: IF p_type_code = 1 AND l_transaction_action_id = 3 THEN
279: x_organization_id := l_to_organization_id;
280: ELSE
281: x_organization_id := l_from_organization_id;
282: END IF;
283:
284: x_transaction_uom := inv_cache.mol_rec.uom_code;
285: x_primary_uom := inv_cache.item_rec.primary_uom_code;
286: x_secondary_uom := inv_cache.item_rec.secondary_uom_code ;
287:
288: open inphead1;
281: x_organization_id := l_from_organization_id;
282: END IF;
283:
284: x_transaction_uom := inv_cache.mol_rec.uom_code;
285: x_primary_uom := inv_cache.item_rec.primary_uom_code;
286: x_secondary_uom := inv_cache.item_rec.secondary_uom_code ;
287:
288: open inphead1;
289: fetch inphead1 into
282: END IF;
283:
284: x_transaction_uom := inv_cache.mol_rec.uom_code;
285: x_primary_uom := inv_cache.item_rec.primary_uom_code;
286: x_secondary_uom := inv_cache.item_rec.secondary_uom_code ;
287:
288: open inphead1;
289: fetch inphead1 into
290: x_transaction_source_id,
1861: IF (g_debug IS NULL) THEN
1862: g_debug := NVL(FND_PROFILE.VALUE('INV_DEBUG_TRACE'),0);
1863: END IF;
1864: l_debug := g_debug;
1865: l_wms_installed := INV_CACHE.wms_installed;
1866:
1867:
1868: IF p_quick_pick_flag = 'Q' THEN
1869: l_qty_tree_allowed := 'N' ;
1945: end if;
1946:
1947: --Added for bug3237702
1948: -- Check whether this is a pick release process and if locator is specified
1949: If inv_cache.is_pickrelease then
1950: is_pickrelease := true;
1951: l_req_locator_id := inv_cache.tolocator_id;
1952: l_req_subinventory_code := inv_cache.tosubinventory_code;
1953: End if;
1947: --Added for bug3237702
1948: -- Check whether this is a pick release process and if locator is specified
1949: If inv_cache.is_pickrelease then
1950: is_pickrelease := true;
1951: l_req_locator_id := inv_cache.tolocator_id;
1952: l_req_subinventory_code := inv_cache.tosubinventory_code;
1953: End if;
1954: --bug3237702 ends
1955:
1948: -- Check whether this is a pick release process and if locator is specified
1949: If inv_cache.is_pickrelease then
1950: is_pickrelease := true;
1951: l_req_locator_id := inv_cache.tolocator_id;
1952: l_req_subinventory_code := inv_cache.tosubinventory_code;
1953: End if;
1954: --bug3237702 ends
1955:
1956: -- make sure, everything is clean
1956: -- make sure, everything is clean
1957: FreeGlobals;
1958:
1959: -- [ Initilizing the lot control valuse from cache
1960: l_lot_divisible_flag := inv_cache.item_rec.lot_divisible_flag;
1961: l_lot_control_code := inv_cache.item_rec.lot_control_code;
1962: -- ]
1963:
1964: --if simulation mode is put away rule, but we are doing picking,
1957: FreeGlobals;
1958:
1959: -- [ Initilizing the lot control valuse from cache
1960: l_lot_divisible_flag := inv_cache.item_rec.lot_divisible_flag;
1961: l_lot_control_code := inv_cache.item_rec.lot_control_code;
1962: -- ]
1963:
1964: --if simulation mode is put away rule, but we are doing picking,
1965: -- ignore simulation modea