[Home] [Help]
536: --l_txn_header_id := MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL;
537:
538: SELECT MTL_MATERIAL_TRANSACTIONS_S.NEXTVAL
539: INTO l_txn_header_id
540: FROM dual;
541: l_progress := '140';
542:
543: UPDATE WMS_PUTAWAY_GROUP_TASKS_GTMP
544: SET transaction_header_id = l_txn_header_id
2031: l_progress := '205';
2032:
2033: SELECT 1
2034: INTO l_qty_disc_count
2035: FROM dual
2036: WHERE EXISTS (
2037: SELECT mtrl.line_id
2038: FROM mtl_txn_request_lines mtrl
2039: ,mtl_txn_request_headers mtrh
5914: );
5915:
5916: -- Check if the lPN is alredy loaded
5917: BEGIN
5918: SELECT 'Y' INTO x_loaded_status FROM dual where exists
5919: (SELECT 1 from
5920: wms_dispatched_tasks W,
5921: mtl_material_transactions_temp t,
5922: mtl_txn_request_lines M
5937: --bug 5590439
5938: -- Bug 5768339 ( Regression of 5590439)
5939: begin
5940: if (x_lpn_context =1 and x_loaded_status = 'N' ) then
5941: -- SELECT 'Y' INTO x_loaded_status FROM dual where exists
5942: SELECT 'Z' INTO x_loaded_status FROM dual where exists -- End of changes for the bug 5768339.
5943: (SELECT 1 FROM mtl_material_transactions_temp mmtt, wms_dispatched_tasks wdt
5944: WHERE mmtt.transaction_temp_id = wdt.transaction_temp_id
5945: AND mmtt.organization_id = wdt.organization_id
5938: -- Bug 5768339 ( Regression of 5590439)
5939: begin
5940: if (x_lpn_context =1 and x_loaded_status = 'N' ) then
5941: -- SELECT 'Y' INTO x_loaded_status FROM dual where exists
5942: SELECT 'Z' INTO x_loaded_status FROM dual where exists -- End of changes for the bug 5768339.
5943: (SELECT 1 FROM mtl_material_transactions_temp mmtt, wms_dispatched_tasks wdt
5944: WHERE mmtt.transaction_temp_id = wdt.transaction_temp_id
5945: AND mmtt.organization_id = wdt.organization_id
5946: AND wdt.status = 4
6111: ------------------------------------------------------------------------*/
6112:
6113: IF l_entire_lpn_empty THEN
6114: BEGIN
6115: SELECT 'Y' INTO x_loaded_status FROM dual where exists
6116: (select 1 from
6117: WMS_DISPATCHED_TASKS W, MTL_MATERIAL_TRANSACTIONS_TEMP T
6118: WHERE T.lpn_id = l_lpn_id
6119: AND t.organization_id = p_org_id
6578: -- Get Transaction header id.
6579:
6580: SELECT mtl_material_transactions_s.NEXTVAL
6581: INTO l_trx_header_id
6582: FROM dual;
6583:
6584:
6585: -- Pack Entire lpn witn LPN context Resides in inventory
6586: IF l_lpn_context = 1 AND p_mode = 1 THEN
7253: END IF; --IF (p_first_time = 1)
7254:
7255: SELECT rcv_transactions_interface_s.NEXTVAL
7256: INTO l_interface_transaction_id
7257: FROM dual;
7258:
7259: -- init_start_values should have called gen_txn_group_id
7260: l_group_id := inv_rcv_common_apis.g_rcv_global_var.interface_group_id;
7261:
7540: IF p_lpn_context = 3 THEN
7541: IF inv_rcv_common_apis.g_rcv_global_var.interface_group_id IS NULL THEN
7542: SELECT rcv_interface_groups_s.NEXTVAL
7543: INTO l_group_id
7544: FROM DUAL;
7545: inv_rcv_common_apis.g_rcv_global_var.interface_group_id := l_group_id;
7546: ELSE
7547: l_group_id := inv_rcv_common_apis.g_rcv_global_var.interface_group_id;
7548: END IF;
8855: -- create MMTT records for each loose item, each inner LPN
8856: -- Group them into same header, and then call inventory TM
8857: SELECT mtl_material_transactions_s.NEXTVAL
8858: INTO l_hdr_id
8859: FROM dual;
8860:
8861: l_progress := '250';
8862:
8863: IF (l_sub_loc_changed = 'Y') THEN
10253: IF (p_lpn_context IN (G_LPN_CONTEXT_INV, G_LPN_CONTEXT_WIP)) THEN
10254:
10255: SELECT mtl_material_transactions_s.NEXTVAL
10256: INTO l_new_txn_header_id
10257: FROM DUAL;
10258:
10259: --For an item drop of an Inventory/WIP LPN with quantity
10260: --discrepancy/partial lpn drop,
10261: --we would have marked the serials in UI. Have to first fetch all such
10482:
10483: IF (l_disc = 'Y' OR p_entire_lpn = 'N') THEN
10484: SELECT mtl_material_transactions_s.NEXTVAL
10485: INTO l_dummy_temp_id
10486: FROM dual;
10487: END IF;
10488:
10489: IF (l_quantity <= l_remaining_qty) THEN
10490: l_remaining_qty := l_remaining_qty - l_quantity;
10536: --ramarava
10537: IF (l_serialized_item AND l_mmtt_prm_qty = 1) THEN
10538: SELECT rcv_transactions_interface_s.NEXTVAL
10539: INTO l_product_transaction_id
10540: FROM sys.dual;
10541: END IF;
10542:
10543: --Insert MSNI for receiving LPN
10544: IF (l_lot_control_code > 1 AND p_lot_number IS NOT NULL) THEN
11501: CONNECT BY PRIOR wlpn1.lpn_id = wlpn1.parent_lpn_id);
11502:
11503: SELECT 1
11504: INTO l_count
11505: FROM dual
11506: WHERE EXISTS
11507: (SELECT 'INTO_LPN_EXISTS'
11508: FROM wms_license_plate_numbers wlpn
11509: WHERE wlpn.organization_id = p_organization_id
11762: l_count := 1;
11763: ELSE--IF p_lpn_id = l_into_lpn_id THEN
11764: BEGIN
11765: SELECT 1 INTO l_count
11766: FROM DUAL
11767: WHERE EXISTS (
11768: SELECT 'INTO_LPN_EXISTS'
11769: FROM wms_license_plate_numbers wlpn
11770: WHERE wlpn.organization_id = p_organization_id