[Home] [Help]
177: * If the transaction is an InterOrg transfer type, call the CostGroup
178: * API to determine cost groups.
179: *******************************************************************/
180: PROCEDURE insert_line_trx(
181: curlpnrec wms_container_pub.wms_container_content_rec_type
182: , v_trxtempid NUMBER
183: , v_trxaction NUMBER
184: , v_orgid NUMBER
185: , v_subinv VARCHAR2
619:
620: /********************************************************************
621: * Insert a row into MTL_TRANSACTION_LOTS_TEMP
622: *******************************************************************/
623: FUNCTION insert_lot_trx(curlpnrec wms_container_pub.wms_container_content_rec_type, trxtmpid NUMBER)
624: RETURN NUMBER IS
625: lotobjid NUMBER;
626: sertrxid NUMBER;
627: retval NUMBER;
776: * Explode the contents of the lpn and insert into MMTT, MSNT and MTLT
777: *******************************************************************/
778: FUNCTION explode_and_insert(p_lpn_id NUMBER, p_hdr_id NUMBER, p_mmtt IN OUT NOCOPY mtl_material_transactions_temp%ROWTYPE)
779: RETURN NUMBER IS
780: tb_lpn_cnts wms_container_pub.wms_container_tbl_type;
781: lpnitndx NUMBER;
782: curlpnrec wms_container_pub.wms_container_content_rec_type;
783: insrowcnt NUMBER := 0;
784: trxtmpid NUMBER;
778: FUNCTION explode_and_insert(p_lpn_id NUMBER, p_hdr_id NUMBER, p_mmtt IN OUT NOCOPY mtl_material_transactions_temp%ROWTYPE)
779: RETURN NUMBER IS
780: tb_lpn_cnts wms_container_pub.wms_container_tbl_type;
781: lpnitndx NUMBER;
782: curlpnrec wms_container_pub.wms_container_content_rec_type;
783: insrowcnt NUMBER := 0;
784: trxtmpid NUMBER;
785: sertrxid NUMBER;
786: l_pre_sertrxid NUMBER;
836: WMS_Container_PVT.Explode_LPN(1.0, fnd_api.g_false, fnd_api.g_false, ret_status, ret_msgcnt, ret_msgdata, p_lpn_id, 0, tb_lpn_cnts);
837:
838: IF ( ret_status <> fnd_api.g_ret_sts_success) THEN
839: IF (l_debug = 1) THEN
840: inv_log_util.TRACE('**Error: Failed in wms_container_pub.explode_lpn API :' || ret_msgdata, 'INV_LPN_TRX_PUB', 1);
841: END IF;
842:
843: RAISE fnd_api.g_exc_error;
844: END IF;
2186:
2187: /********************************************************************
2188: * Update the status of the LPN
2189: *******************************************************************/
2190: PROCEDURE update_lpn_status(v_lpn wms_container_pub.lpn) IS
2191: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
2192: BEGIN
2193: WMS_Container_PVT.Modify_LPN (
2194: p_api_version => 1.0
3705: failedrowcnt NUMBER := 0;
3706: expldrowcnt NUMBER := 0;
3707: retval NUMBER := 0;
3708: v_mmtt mtl_material_transactions_temp%ROWTYPE;
3709: v_lpn wms_container_pub.lpn;
3710: v_deleterow BOOLEAN := FALSE; -- Should the original row in MMTT be deleted ?
3711: l_cst_grp VARCHAR2(30);
3712: l_req_id NUMBER;
3713: l_proc_mode NUMBER := p_proc_mode;
5273: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
5274: l_progress VARCHAR2(500) := '0';
5275: l_msgdata VARCHAR2(1000);
5276: l_item_rec inv_validate.item;
5277: v_lpn wms_container_pub.lpn;
5278: v_lpn_ctx NUMBER;
5279: v_cnt_lpn_ctx NUMBER;
5280: v_xfrlpn_ctx NUMBER;
5281: v_autounpack NUMBER := 1;
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
5652: IF (l_debug = 1) THEN
5757: inv_log_util.TRACE('Got v_cnt_lpn_ctx='||v_cnt_lpn_ctx, 'INV_LPN_TRX_PUB', 9);
5758: END IF;
5759: END IF;
5760:
5761: IF ( v_cnt_lpn_ctx <> wms_container_pub.lpn_context_intransit ) THEN
5762: v_lpn.lpn_context := wms_container_pub.lpn_context_stores;
5763: END IF;
5764: ELSE
5765: -- For manual rcpt, both Inventory and Expense Internal orders lpns context
5758: END IF;
5759: END IF;
5760:
5761: IF ( v_cnt_lpn_ctx <> wms_container_pub.lpn_context_intransit ) THEN
5762: v_lpn.lpn_context := wms_container_pub.lpn_context_stores;
5763: END IF;
5764: ELSE
5765: -- For manual rcpt, both Inventory and Expense Internal orders lpns context
5766: -- should be marked as intransit for recieving
5763: END IF;
5764: ELSE
5765: -- For manual rcpt, both Inventory and Expense Internal orders lpns context
5766: -- should be marked as intransit for recieving
5767: v_lpn.lpn_context := wms_container_pub.lpn_context_intransit;
5768: END IF;
5769: ELSIF(p_transaction_action_id = inv_globals.g_action_issue
5770: AND p_transaction_source_type_id = inv_globals.g_sourcetype_wip) THEN
5771: -- For WIP Issues the LPN set to be defined but not used
5768: END IF;
5769: ELSIF(p_transaction_action_id = inv_globals.g_action_issue
5770: AND p_transaction_source_type_id = inv_globals.g_sourcetype_wip) THEN
5771: -- For WIP Issues the LPN set to be defined but not used
5772: v_lpn.lpn_context := wms_container_pub.lpn_context_pregenerated;
5773:
5774: IF (l_debug = 1) THEN
5775: inv_log_util.TRACE('WIP Issue, unpack all items', 'INV_LPN_TRX_PUB', 9);
5776: END IF;
5818: --13884722
5819: ELSIF(p_transaction_action_id = inv_globals.g_action_issue
5820: AND p_transaction_source_type_id= inv_globals.g_sourcetype_moveorder
5821: AND p_lpn_id IS NOT NULL AND p_lpn_id <> NVL(p_transfer_lpn_id,-9999)) THEN
5822: v_lpn.lpn_context := wms_container_pub.lpn_context_stores;
5823:
5824: IF (l_debug = 1) THEN
5825: inv_log_util.TRACE('MO Issue, unpack the content LPN', 'INV_LPN_TRX_PUB', 9);
5826: END IF;
5853: RAISE fnd_api.g_exc_error;
5854: END IF;
5855: --13884722
5856: ELSE
5857: v_lpn.lpn_context := wms_container_pub.lpn_context_stores; --ISSUED OUT
5858: END IF;
5859:
5860: -- For an Intransit Shipment, update the LPN with the shipmentNumber
5861: -- so that this LPN can be tracked during the corresponding receipt
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;
5925:
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;
5980:
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;
6022:
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
6121: -- Default Action
6151: inv_log_util.TRACE('** Updating lpn to issued out :' || p_lpn_id, 'INV_LPN_TRX_PUB', 9);
6152: END IF;
6153:
6154: v_lpn.lpn_id := p_lpn_id;
6155: v_lpn.lpn_context := wms_container_pub.lpn_context_stores;
6156: v_lpn.organization_id := p_organization_id;
6157: v_lpn.subinventory_code := NULL;
6158: v_lpn.locator_id := NULL;
6159: v_lpn.inventory_item_id := NULL;
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;
6519: ELSE
6520: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6521: END IF;
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;
6519: ELSE
6520: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6521: END IF;
6522:
6516:
6517: IF (v_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6518: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6519: ELSE
6520: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6521: END IF;
6522:
6523: v_lpn.organization_id := p_organization_id;
6524: v_lpn.subinventory_code := p_subinventory_code;
6608: IF (l_debug = 1) THEN
6609: inv_log_util.TRACE('SUBXFER from LPN context=' || v_lpn_ctx, 'INV_LPN_TRX_PUB', 9);
6610: END IF;
6611:
6612: IF (v_lpn_ctx = wms_container_pub.lpn_context_picked) THEN
6613: split_delivery(
6614: p_tempid => p_transaction_temp_id
6615: , p_lpn_id => p_lpn_id
6616: , p_xfr_lpn_id => p_transfer_lpn_id
6649: inv_log_util.TRACE('p_subinventory_code: '||p_subinventory_code, 'INV_LPN_TRX_PUB', 1);
6650: inv_log_util.TRACE('p_locator_id: '||p_locator_id, 'INV_LPN_TRX_PUB', 1);
6651: END IF;
6652: --14189803
6653: IF (v_lpn_ctx = wms_container_pub.lpn_context_packing
6654: AND p_transaction_action_id IN (inv_globals.g_action_stgxfr,inv_globals.g_action_subxfr)) THEN -- 12736705
6655:
6656: IF (l_debug = 1) THEN
6657: inv_log_util.TRACE('LPN Packing context and transaction is staging xfer/sub xfer:' || v_lpn_ctx, 'INV_LPN_TRX_PUB', 1);
6656: IF (l_debug = 1) THEN
6657: inv_log_util.TRACE('LPN Packing context and transaction is staging xfer/sub xfer:' || v_lpn_ctx, 'INV_LPN_TRX_PUB', 1);
6658: END IF;
6659:
6660: ELSIF (v_lpn_ctx <> wms_container_pub.lpn_context_inv
6661: AND v_lpn_ctx <> wms_container_pub.lpn_context_picked
6662:
6663: ) THEN
6664: x_proc_msg := 'Error. Invalid LPN context for Transfer Trx:' || v_lpn_ctx;
6657: inv_log_util.TRACE('LPN Packing context and transaction is staging xfer/sub xfer:' || v_lpn_ctx, 'INV_LPN_TRX_PUB', 1);
6658: END IF;
6659:
6660: ELSIF (v_lpn_ctx <> wms_container_pub.lpn_context_inv
6661: AND v_lpn_ctx <> wms_container_pub.lpn_context_picked
6662:
6663: ) THEN
6664: x_proc_msg := 'Error. Invalid LPN context for Transfer Trx:' || v_lpn_ctx;
6665:
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
6706: AND lpn_context = wms_container_pub.lpn_context_pregenerated;
6707: END IF;
6708: END IF;
6709:
6710: IF (p_transaction_action_id = inv_globals.g_action_orgxfr) THEN
6768:
6769: -- For Sub transfers reservations should be transfered
6770: -- for content lpn of who's context is not picked
6771: IF (p_transaction_action_id = inv_globals.g_action_subxfr
6772: AND(l_lpn_ctx_tmp <> wms_container_pub.lpn_context_picked
6773: AND ((NVL(l_system_task_type, -1) <> 7) AND (NVL(l_system_task_type, -1) <> 5))) -- Added for Bug 14741165
6774: AND l_reservation_id IS NULL --9869993
6775: ) THEN
6776: IF (l_debug = 1) THEN
6864: -- For Sub transfers reservations should be transfered
6865: -- for content lpn of who's context is not picked
6866: IF (
6867: p_transaction_action_id = inv_globals.g_action_subxfr
6868: AND(v_cnt_lpn_ctx <> wms_container_pub.lpn_context_picked
6869: AND NVL(l_system_task_type, -1) <> 7)
6870: AND l_reservation_id IS NULL --9869993
6871: ) -- bug 2879208 added nv for 3240617
6872: THEN
6911: inv_log_util.TRACE('Done with call to Transfer_LPN_Reservations', 'INV_LPN_TRX_PUB', 9);
6912: END IF;
6913: END IF;
6914:
6915: /*if ( v_lpn_ctx <> WMS_Container_PUB.LPN_CONTEXT_PICKED ) then
6916: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_INV;
6917: else
6918: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_PICKED;
6919: end if;
6912: END IF;
6913: END IF;
6914:
6915: /*if ( v_lpn_ctx <> WMS_Container_PUB.LPN_CONTEXT_PICKED ) then
6916: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_INV;
6917: else
6918: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_PICKED;
6919: end if;
6920: */
6914:
6915: /*if ( v_lpn_ctx <> WMS_Container_PUB.LPN_CONTEXT_PICKED ) then
6916: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_INV;
6917: else
6918: v_lpn.lpn_context := WMS_Container_PUB.LPN_CONTEXT_PICKED;
6919: end if;
6920: */
6921: v_lpn.lpn_id := p_content_lpn_id;
6922: v_lpn.organization_id := v_xfr_org;
6959: RAISE fnd_api.g_exc_error;
6960: END IF;
6961: ELSE
6962: IF ( l_system_task_type = 7 AND
6963: v_cnt_lpn_ctx = wms_container_pub.lpn_loaded_in_stage )
6964: THEN
6965: -- Bug 4247497 Staging Move. Context should be changed to pick
6966: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6967: ELSIF (v_cnt_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6962: IF ( l_system_task_type = 7 AND
6963: v_cnt_lpn_ctx = wms_container_pub.lpn_loaded_in_stage )
6964: THEN
6965: -- Bug 4247497 Staging Move. Context should be changed to pick
6966: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6967: ELSIF (v_cnt_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6968: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6969: ELSE
6970: --Bug 5509764
6963: v_cnt_lpn_ctx = wms_container_pub.lpn_loaded_in_stage )
6964: THEN
6965: -- Bug 4247497 Staging Move. Context should be changed to pick
6966: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6967: ELSIF (v_cnt_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6968: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6969: ELSE
6970: --Bug 5509764
6971: --For direct org transfer against an internal req, set the lpn_context
6964: THEN
6965: -- Bug 4247497 Staging Move. Context should be changed to pick
6966: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6967: ELSIF (v_cnt_lpn_ctx <> wms_container_pub.lpn_context_picked) THEN
6968: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6969: ELSE
6970: --Bug 5509764
6971: --For direct org transfer against an internal req, set the lpn_context
6972: --to "In Inventory" from Picked to reflect the correct status
6975: ) THEN
6976: IF (l_debug = 1) THEN
6977: inv_log_util.trace('int req direct org/sub xfr. setting lpn_ctxt to in inventory','INV_LPN_TRX_PUB',1);
6978: END IF;
6979: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6980: ELSE
6981: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6982: END IF; --END IF check txn_source_type intorder and action direct org xfr
6983: END IF; --END IF LPN context is picked
6977: inv_log_util.trace('int req direct org/sub xfr. setting lpn_ctxt to in inventory','INV_LPN_TRX_PUB',1);
6978: END IF;
6979: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
6980: ELSE
6981: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
6982: END IF; --END IF check txn_source_type intorder and action direct org xfr
6983: END IF; --END IF LPN context is picked
6984:
6985: v_lpn.subinventory_code := p_transfer_subinventory;
6988:
6989: -- Bug 4247497 Moving update of context to TM. If this is a stagexfr transaction
6990: -- then lpn-context should be updated to 'picked'
6991: IF ( p_transaction_action_id = inv_globals.G_ACTION_STGXFR ) THEN
6992: v_lpn.lpn_context := wms_container_pub.LPN_CONTEXT_PICKED;
6993: END IF;
6994:
6995: /** moved update here to fix bug3299521, this way we would avoid updating
6996: the parent_lpn context for unpacked inner lpns**/
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
7013: -- and xfr sub is not non-LPN controlled sub
7014: IF (
7015: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7016: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7017: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7018: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7019: )
7012: -- status of that LPN, provided the context is 2, 3, or 8
7013: -- and xfr sub is not non-LPN controlled sub
7014: IF (
7015: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7016: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7017: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7018: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7019: )
7020: AND(v_autounpack <> 2) THEN
7013: -- and xfr sub is not non-LPN controlled sub
7014: IF (
7015: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7016: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7017: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7018: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7019: )
7020: AND(v_autounpack <> 2) THEN
7021: -- If context is pre-generated, then inherit the context of the contentLPN or fromLPN
7014: IF (
7015: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7016: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7017: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7018: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7019: )
7020: AND(v_autounpack <> 2) THEN
7021: -- If context is pre-generated, then inherit the context of the contentLPN or fromLPN
7022: -- if that context is INV or PICKED
7019: )
7020: AND(v_autounpack <> 2) THEN
7021: -- If context is pre-generated, then inherit the context of the contentLPN or fromLPN
7022: -- if that context is INV or PICKED
7023: IF (v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7024: AND NVL(v_cnt_lpn_ctx, v_lpn_ctx) NOT IN
7025: (
7026: wms_container_pub.lpn_context_wip
7027: , wms_container_pub.lpn_context_rcv
7022: -- if that context is INV or PICKED
7023: IF (v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7024: AND NVL(v_cnt_lpn_ctx, v_lpn_ctx) NOT IN
7025: (
7026: wms_container_pub.lpn_context_wip
7027: , wms_container_pub.lpn_context_rcv
7028: , wms_container_pub.lpn_context_packing
7029: , wms_container_pub.lpn_context_vendor
7030: ) THEN
7023: IF (v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7024: AND NVL(v_cnt_lpn_ctx, v_lpn_ctx) NOT IN
7025: (
7026: wms_container_pub.lpn_context_wip
7027: , wms_container_pub.lpn_context_rcv
7028: , wms_container_pub.lpn_context_packing
7029: , wms_container_pub.lpn_context_vendor
7030: ) THEN
7031: v_lpn.lpn_context := NVL(v_cnt_lpn_ctx, v_lpn_ctx);
7024: AND NVL(v_cnt_lpn_ctx, v_lpn_ctx) NOT IN
7025: (
7026: wms_container_pub.lpn_context_wip
7027: , wms_container_pub.lpn_context_rcv
7028: , wms_container_pub.lpn_context_packing
7029: , wms_container_pub.lpn_context_vendor
7030: ) THEN
7031: v_lpn.lpn_context := NVL(v_cnt_lpn_ctx, v_lpn_ctx);
7032:
7025: (
7026: wms_container_pub.lpn_context_wip
7027: , wms_container_pub.lpn_context_rcv
7028: , wms_container_pub.lpn_context_packing
7029: , wms_container_pub.lpn_context_vendor
7030: ) THEN
7031: v_lpn.lpn_context := NVL(v_cnt_lpn_ctx, v_lpn_ctx);
7032:
7033: IF (l_debug = 1) THEN
7036: END IF;
7037: ELSE
7038: -- Bug 4247497 Moving update of context to TM
7039: IF ( p_transaction_action_id = inv_globals.g_action_stgxfr ) THEN
7040: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
7041: ELSE
7042: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7043: END IF;
7044: END IF;
7038: -- Bug 4247497 Moving update of context to TM
7039: IF ( p_transaction_action_id = inv_globals.g_action_stgxfr ) THEN
7040: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
7041: ELSE
7042: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7043: END IF;
7044: END IF;
7045:
7046: v_lpn.lpn_id := p_transfer_lpn_id;
7049: v_lpn.locator_id := p_transfer_to_location;
7050: v_xfrlpn_ctx := v_lpn.lpn_context; --BUG13810580
7051: update_lpn_status(v_lpn);
7052: ELSIF(
7053: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7054: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7055: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_pregenerated
7056: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing /*added for 3160462*/
7057: ) THEN
7050: v_xfrlpn_ctx := v_lpn.lpn_context; --BUG13810580
7051: update_lpn_status(v_lpn);
7052: ELSIF(
7053: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7054: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7055: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_pregenerated
7056: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing /*added for 3160462*/
7057: ) THEN
7058: -- Verify that the context of this LPN is 'Resides in Inventory'
7051: update_lpn_status(v_lpn);
7052: ELSIF(
7053: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7054: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7055: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_pregenerated
7056: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing /*added for 3160462*/
7057: ) THEN
7058: -- Verify that the context of this LPN is 'Resides in Inventory'
7059: x_proc_msg := 'Error. Invalid LPN context for XFR_LPN:' || v_xfrlpn_ctx;
7052: ELSIF(
7053: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7054: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7055: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_pregenerated
7056: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing /*added for 3160462*/
7057: ) THEN
7058: -- Verify that the context of this LPN is 'Resides in Inventory'
7059: x_proc_msg := 'Error. Invalid LPN context for XFR_LPN:' || v_xfrlpn_ctx;
7060:
7085:
7086: /*We should do transfer reservation only for subxfer actions*/
7087: IF ( p_transaction_action_id = inv_globals.g_action_subxfr
7088: AND l_reservation_id IS NULL --9869993
7089: AND NOT(v_xfrlpn_ctx = wms_container_pub.lpn_context_picked --BUG13810580
7090: AND NVL(l_system_task_type, -1) <> 7
7091: AND p_lpn_id <> p_transfer_lpn_id)
7092: AND NVL(l_system_task_type, -1) <> 5 -- Added for Bug 14741165
7093: ) THEN --Bug7692251
7154: , p_sec_qty => abs(l_secondary_trx_quantity) --INVCONV kkillams
7155: , p_sec_uom => p_secondary_uom_code --INVCONV kkillams
7156: , p_source_trx_id => p_source_transaction_id
7157: );
7158: ELSIF(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing) THEN
7159: -- Since the transfer sub is non lpn controlled, change xfer lpn
7160: -- is not packed into and should become defined but not used again.
7161:
7162: --Bug#7010169,We need to chekc for other tasks loaded into same LPN.
7173: IF (l_loaded_tasks_count = 0 ) THEN
7174:
7175: v_lpn.organization_id := v_xfr_org;
7176: v_lpn.lpn_id := p_transfer_lpn_id;
7177: v_lpn.lpn_context := wms_container_pub.lpn_context_pregenerated;
7178: update_lpn_status(v_lpn);
7179: END IF;
7180: END IF;
7181: END IF;
7198: -- If the lpn is transfered update the status of that LPN
7199: -- provided the context is 2, 3, or 8
7200: IF (p_transaction_source_type_id <> inv_globals.g_sourcetype_salesorder)
7201: AND(
7202: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7203: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7204: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7205: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7206: ) THEN
7199: -- provided the context is 2, 3, or 8
7200: IF (p_transaction_source_type_id <> inv_globals.g_sourcetype_salesorder)
7201: AND(
7202: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7203: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7204: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7205: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7206: ) THEN
7207: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7200: IF (p_transaction_source_type_id <> inv_globals.g_sourcetype_salesorder)
7201: AND(
7202: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7203: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7204: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7205: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7206: ) THEN
7207: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7208: ELSE
7201: AND(
7202: (v_xfrlpn_ctx = wms_container_pub.lpn_context_wip)
7203: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7204: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7205: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7206: ) THEN
7207: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7208: ELSE
7209: IF (p_transaction_action_id = inv_globals.g_action_stgxfr) THEN --15851366 start
7203: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_rcv)
7204: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_packing)
7205: OR(v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)
7206: ) THEN
7207: v_lpn.lpn_context := wms_container_pub.lpn_context_inv;
7208: ELSE
7209: IF (p_transaction_action_id = inv_globals.g_action_stgxfr) THEN --15851366 start
7210:
7211: -- bug 5620764
7209: IF (p_transaction_action_id = inv_globals.g_action_stgxfr) THEN --15851366 start
7210:
7211: -- bug 5620764
7212: -- For staging transfer transactions change context to picked
7213: v_lpn.lpn_context := wms_container_pub.lpn_context_picked;
7214: --v_lpn.lpn_context := NULL;
7215: END IF; --15851366 end
7216:
7217: -- Verify that the context of this LPN is 'Resides in Inventory'
7215: END IF; --15851366 end
7216:
7217: -- Verify that the context of this LPN is 'Resides in Inventory'
7218: IF (
7219: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7220: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7221: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing
7222: ) THEN
7223: x_proc_msg := 'Error. Invalid LPN context for XFR_LPN:' || v_xfrlpn_ctx;
7216:
7217: -- Verify that the context of this LPN is 'Resides in Inventory'
7218: IF (
7219: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7220: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7221: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing
7222: ) THEN
7223: x_proc_msg := 'Error. Invalid LPN context for XFR_LPN:' || v_xfrlpn_ctx;
7224:
7217: -- Verify that the context of this LPN is 'Resides in Inventory'
7218: IF (
7219: v_xfrlpn_ctx <> wms_container_pub.lpn_context_inv
7220: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_picked
7221: AND v_xfrlpn_ctx <> wms_container_pub.lpn_context_packing
7222: ) THEN
7223: x_proc_msg := 'Error. Invalid LPN context for XFR_LPN:' || v_xfrlpn_ctx;
7224:
7225: IF (l_debug = 1) THEN
7295: IF (l_debug = 1) THEN
7296: inv_log_util.TRACE('SUBXFER cont LPN context=' || v_cnt_lpn_ctx, 'INV_LPN_TRX_PUB', 9);
7297: END IF;
7298:
7299: IF (v_cnt_lpn_ctx = wms_container_pub.lpn_context_picked)
7300: OR (NVL(l_system_task_type, -1) = 7) THEN --Bug 3620318
7301: --A call to transfer the reservation is also needed if LPN is of the picked context
7302: --Consolidating lpn across subinventories, must transfer reservations
7303: inv_reservation_pvt.transfer_lpn_trx_reservation(
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 ****/
7366: ELSIF(p_transaction_action_id = inv_globals.g_action_containerunpack) THEN
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 ****/
7366: ELSIF(p_transaction_action_id = inv_globals.g_action_containerunpack) THEN
7367: IF (l_debug = 1) THEN
7368: inv_log_util.TRACE(' Action = UnPack', 'INV_LPN_TRX_PUB', 9);
7419: inv_log_util.trace('no data found', 'INV_LPN_TRX_PUB', 9);
7420: END IF;
7421: END;
7422:
7423: IF(l_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated)THEN
7424: OPEN c_wdd_exists(p_transfer_lpn_id,p_organization_id);
7425: FETCH c_wdd_exists into l_delivery_id,l_delivery_detail_id,l_status_code;
7426: IF c_wdd_exists%NOTFOUND THEN
7427: CLOSE c_wdd_exists;
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(
7477: p_tempid => p_transaction_temp_id
7478: , p_lpn_id => p_lpn_id
7479: , p_xfr_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
7505: IF (
7506: v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated
7507: AND v_lpn_ctx NOT IN
7508: (
7509: wms_container_pub.lpn_context_wip
7510: , wms_container_pub.lpn_context_rcv
7505: IF (
7506: v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated
7507: AND v_lpn_ctx NOT IN
7508: (
7509: wms_container_pub.lpn_context_wip
7510: , wms_container_pub.lpn_context_rcv
7511: , wms_container_pub.lpn_context_packing
7512: , wms_container_pub.lpn_context_vendor
7513: )
7506: v_xfrlpn_ctx = wms_container_pub.lpn_context_pregenerated
7507: AND v_lpn_ctx NOT IN
7508: (
7509: wms_container_pub.lpn_context_wip
7510: , wms_container_pub.lpn_context_rcv
7511: , wms_container_pub.lpn_context_packing
7512: , wms_container_pub.lpn_context_vendor
7513: )
7514: ) THEN
7507: AND v_lpn_ctx NOT IN
7508: (
7509: wms_container_pub.lpn_context_wip
7510: , wms_container_pub.lpn_context_rcv
7511: , wms_container_pub.lpn_context_packing
7512: , wms_container_pub.lpn_context_vendor
7513: )
7514: ) THEN
7515: v_lpn.lpn_id := p_transfer_lpn_id;
7508: (
7509: wms_container_pub.lpn_context_wip
7510: , wms_container_pub.lpn_context_rcv
7511: , wms_container_pub.lpn_context_packing
7512: , wms_container_pub.lpn_context_vendor
7513: )
7514: ) THEN
7515: v_lpn.lpn_id := p_transfer_lpn_id;
7516: v_lpn.lpn_context := v_lpn_ctx;