[Home] [Help]
847: SELECT subinventory_code
848: , locator_id
849: INTO l_lpn_subinv
850: , l_lpn_locator_id
851: FROM wms_license_plate_numbers
852: WHERE lpn_id = p_lpn_id;
853:
854: -- If No Subinventory associated with LPN, then pick sub and locator from MMT
855: IF (l_lpn_subinv IS NULL) THEN
5335:
5336: CURSOR c_wdd_exists(p_transfer_lpn_id NUMBER,p_organization_id NUMBER) is
5337: SELECT distinct wda.delivery_id,wdd.delivery_detail_id,wdd.released_status
5338: FROM wsh_delivery_details wdd, wsh_delivery_assignments wda
5339: WHERE wdd.lpn_id IN (select lpn_id from wms_license_plate_numbers
5340: where organization_id = p_organization_id
5341: and (lpn_id = p_transfer_lpn_id
5342: or parent_lpn_id = p_transfer_lpn_id
5343: or outermost_lpn_id = p_transfer_lpn_id))
5643:
5644: -- Update the context of lpn to resides in receiving
5645: -- if it's a adj of whole lpn. lpn_id = transfer_lpn_id
5646: IF (p_lpn_id = p_transfer_lpn_id) THEN
5647: UPDATE wms_license_plate_numbers
5648: SET lpn_context = wms_container_pub.lpn_context_rcv
5649: WHERE lpn_id = p_lpn_id;
5650: END IF;
5651: ELSE
5749: -- LPN is in intransit state, that the LPN has non expense items in them
5750: IF ( v_cnt_lpn_ctx IS NULL ) THEN
5751: SELECT lpn_context
5752: INTO v_cnt_lpn_ctx
5753: FROM wms_license_plate_numbers
5754: WHERE lpn_id = p_content_lpn_id;
5755:
5756: IF (l_debug = 1) THEN
5757: inv_log_util.TRACE('Got v_cnt_lpn_ctx='||v_cnt_lpn_ctx, 'INV_LPN_TRX_PUB', 9);
5776: END IF;
5777: --Bug 16245192 start
5778: SELECT subinventory_code, locator_id
5779: INTO l_wlpn_sub, l_wlpn_loc_id
5780: FROM wms_license_plate_numbers
5781: WHERE lpn_id = p_content_lpn_id;
5782:
5783: IF (l_debug = 1) THEN
5784: inv_log_util.TRACE('p_content_lpn_id: '||p_content_lpn_id , 'INV_LPN_TRX_PUB', 1);
5916:
5917: IF (p_lpn_id IS NULL
5918: AND p_transfer_lpn_id IS NOT NULL) THEN
5919: -- Change context of transfer lpn to recieving
5920: UPDATE wms_license_plate_numbers
5921: SET lpn_context = wms_container_pub.lpn_context_rcv
5922: , subinventory_code = nvl(l_sub,subinventory_code) --6374764
5923: , locator_id = nvl(l_loc_id,locator_id) --6374764
5924: WHERE lpn_id = p_transfer_lpn_id;
5971: , p_source_trx_id => p_source_transaction_id
5972: );
5973:
5974: -- Change context of transfer lpn to recieving
5975: UPDATE wms_license_plate_numbers
5976: SET lpn_context = wms_container_pub.lpn_context_rcv
5977: , subinventory_code = nvl(l_sub,subinventory_code) --6374764
5978: , locator_id = nvl(l_loc_id,locator_id) --6374764
5979: WHERE lpn_id = p_transfer_lpn_id;
6013: , cost_group_id = NULL
6014: WHERE parent_lpn_id = p_lpn_id;
6015:
6016: -- Change context of transfer lpn to recieving
6017: UPDATE wms_license_plate_numbers
6018: SET lpn_context = wms_container_pub.lpn_context_rcv
6019: , subinventory_code = nvl(l_sub,subinventory_code) --6374764
6020: , locator_id = nvl(l_loc_id,locator_id) --6374764
6021: WHERE lpn_id = p_lpn_id;
6112:
6113: -- Since correction is in same lpn, need to change context
6114: -- of lpn to recieving
6115: -- Change context of transfer lpn to recieving
6116: UPDATE wms_license_plate_numbers
6117: SET lpn_context = wms_container_pub.lpn_context_rcv
6118: WHERE lpn_id = p_lpn_id;
6119: END IF;
6120: ELSE
6191: IF (p_transfer_lpn_id IS NOT NULL) THEN
6192:
6193: select subinventory_code,locator_id
6194: into l_wlpn_sub,l_wlpn_loc_id
6195: from wms_license_plate_numbers
6196: where lpn_id = p_transfer_lpn_id
6197: and organization_id = p_organization_id;
6198:
6199: IF (l_debug = 1) THEN
6510:
6511: -- Update the LPN status and location
6512: SELECT lpn_context
6513: INTO v_lpn_ctx
6514: FROM wms_license_plate_numbers
6515: WHERE lpn_id = v_lpn.lpn_id;
6516:
6517: IF (v_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6518: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6600: IF(p_transfer_lpn_id IS NOT NULL AND p_lpn_id IS NOT NULL) THEN
6601: IF ( v_lpn_ctx IS NULL ) THEN
6602: SELECT lpn_context
6603: INTO v_lpn_ctx
6604: FROM wms_license_plate_numbers
6605: WHERE lpn_id = p_lpn_id;
6606: END IF;
6607:
6608: IF (l_debug = 1) THEN
6639: OR(p_transaction_action_id = inv_globals.g_action_costgroupxfr)) THEN
6640: -- Verify that the context of this LPN is 'Resides in Inventory'
6641: SELECT lpn_context, subinventory_code, locator_id /*14189803 Fetching LPN Sub/Loc */
6642: INTO v_lpn_ctx, l_wlpn_sub, l_wlpn_loc_id
6643: FROM wms_license_plate_numbers
6644: WHERE lpn_id = p_lpn_id;
6645: --14189803
6646: IF (l_debug = 1) THEN
6647: inv_log_util.TRACE('LPN Sub: '||l_wlpn_sub , 'INV_LPN_TRX_PUB', 1);
6697: );
6698:
6699: --bug2747049
6700: IF (p_transaction_action_id = inv_globals.g_action_costgroupxfr) THEN
6701: UPDATE wms_license_plate_numbers
6702: SET lpn_context = v_lpn_ctx
6703: , subinventory_code = p_subinventory_code
6704: , locator_id = p_locator_id
6705: WHERE lpn_id = p_lpn_id
6762: IF (p_lpn_id IS NOT NULL) THEN
6763:
6764: SELECT lpn_context
6765: INTO l_lpn_ctx_tmp
6766: FROM wms_license_plate_numbers
6767: WHERE lpn_id = p_lpn_id;
6768:
6769: -- For Sub transfers reservations should be transfered
6770: -- for content lpn of who's context is not picked
6846: IF (p_content_lpn_id IS NOT NULL) THEN
6847: -- Update the LPN status and location
6848: SELECT lpn_context
6849: INTO v_cnt_lpn_ctx
6850: FROM wms_license_plate_numbers
6851: WHERE lpn_id = p_content_lpn_id;
6852:
6853:
6854: -- Bug 6733277 :Update WLC's serial_summary entry to 2 is serial control is 6 and transaction in intransit receipt
6881: IF (l_debug = 1) THEN
6882: inv_log_util.TRACE('entered here cyclecount.. ','INV_LPN_TRX_PUB', 9);
6883: END IF;
6884: SELECT OUTERMOST_LPN_ID into l_cyclpn_id
6885: from wms_license_plate_numbers
6886: where lpn_id=p_content_lpn_id;
6887: END IF;
6888: /*End of Bug#6043776*/
6889:
7004: AND((NVL(p_lpn_id, 0) <> p_transfer_lpn_id)
7005: OR(p_transaction_action_id = inv_globals.g_action_costgroupxfr)) THEN
7006: SELECT lpn_context
7007: INTO v_xfrlpn_ctx
7008: FROM wms_license_plate_numbers
7009: WHERE lpn_id = p_transfer_lpn_id;
7010:
7011: -- If the item/lpn is transfered to another LPN, then update the
7012: -- status of that LPN, provided the context is 2, 3, or 8
7186: AND Removing this Condition for Bug#12595055*/
7187: (p_lpn_id = p_transfer_lpn_id) THEN
7188: SELECT lpn_context
7189: INTO v_xfrlpn_ctx
7190: FROM wms_license_plate_numbers
7191: WHERE lpn_id = p_transfer_lpn_id;
7192:
7193: -- bug 5620764: add debug
7194: IF (l_debug = 1) THEN
7288: THEN
7289: IF (p_content_lpn_id IS NOT NULL) THEN
7290: SELECT lpn_context
7291: INTO v_cnt_lpn_ctx
7292: FROM wms_license_plate_numbers
7293: WHERE lpn_id = p_content_lpn_id;
7294:
7295: IF (l_debug = 1) THEN
7296: inv_log_util.TRACE('SUBXFER cont LPN context=' || v_cnt_lpn_ctx, 'INV_LPN_TRX_PUB', 9);
7357: -- It is possible that the LPN to which the packing is done could be in
7358: -- Receiving. However, after packing, the LPN has to be Inventory.
7359: -- Note: Since only the context of LPN is changed, directly modifying on Table
7360: -- instead of calling modify_LPN API except when the context is picking
7361: UPDATE wms_license_plate_numbers
7362: SET lpn_context = wms_container_pub.lpn_context_inv
7363: WHERE lpn_id = p_transfer_lpn_id
7364: AND lpn_context <> wms_container_pub.lpn_context_picked;
7365: /***** Actions for UNPACK transactions ****/
7405: BEGIN
7406:
7407: SELECT license_plate_number,lpn_context
7408: INTO l_lpn_name,l_xfrlpn_ctx
7409: FROM wms_license_plate_numbers
7410: WHERE organization_id = p_organization_id
7411: AND (lpn_id = p_transfer_lpn_id
7412: OR parent_lpn_id = p_transfer_lpn_id
7413: or outermost_lpn_id = p_transfer_lpn_id)
7468:
7469: IF (p_content_lpn_id IS NULL) THEN
7470: SELECT lpn_context
7471: INTO v_lpn_ctx
7472: FROM wms_license_plate_numbers
7473: WHERE lpn_id = p_lpn_id;
7474:
7475: IF (v_lpn_ctx = wms_container_pub.lpn_context_picked) THEN
7476: split_delivery(
7496: -- Note: Since only the context of LPN is changed, directly modifying on Table
7497: -- instead of calling modify_LPN API
7498: SELECT lpn_context
7499: INTO v_xfrlpn_ctx
7500: FROM wms_license_plate_numbers
7501: WHERE lpn_id = p_transfer_lpn_id;
7502:
7503: -- If context is pre-generated, then inherit the context of the contentLPN or fromLPN
7504: -- If that context is INV or PICKED
7667: p_transaction_action_id = inv_globals.G_Action_IntransitShipment))) then
7668: BEGIN
7669: UPDATE mtl_material_transactions_temp
7670: SET content_lpn_id = (SELECT outermost_lpn_id
7671: FROM wms_license_plate_numbers
7672: WHERE lpn_id = p_content_lpn_id
7673: AND rownum < 2)
7674: WHERE transaction_temp_id = p_transaction_temp_id;
7675: EXCEPTION