[Home] [Help]
6637: l_lot_control_code NUMBER;
6638:
6639: l_label_status VARCHAR2(300);
6640: l_input_param_tbl inv_label.input_parameter_rec_type;
6641: l_input_param_rec mtl_material_transactions_temp%ROWTYPE;
6642: l_counter NUMBER := 1; -- Counter variable initialized to 1
6643: l_qty NUMBER := 0;
6644: error_msg VARCHAR2(2000);
6645:
6665: NVL(msnt1.fm_serial_number, msnt2.fm_serial_number),
6666: NVL(msnt1.to_serial_number, msnt2.to_serial_number)
6667: , mmtt.secondary_transaction_quantity --INVCONV kkillams
6668: , mmtt.secondary_uom_code --INVCONV kkillams
6669: FROM mtl_material_transactions_temp mmtt, mtl_transaction_lots_temp mtlt, mtl_serial_numbers_temp msnt1, mtl_serial_numbers_temp msnt2
6670: WHERE mmtt.organization_id = p_organization_id
6671: AND mmtt.transaction_header_id = l_trx_header_id
6672: AND mtlt.transaction_temp_id(+) = mmtt.transaction_temp_id
6673: AND msnt1.transaction_temp_id(+) = mtlt.serial_transaction_temp_id
7110: mdebug('packing lpn='|| l_lpn_to_pack || ' with qty=' || l_primary_quantity || ' ' ||l_primary_uom);
7111: mdebug('with lot='|| l_lot_number || ' serials=' || l_serial_number_from || '-' || l_serial_number_to);
7112: END IF;
7113:
7114: --If an invenotory prepack, insert trx in mtl_material_transactions_temp table
7115: IF (p_source = 1) THEN
7116: -- if inventory prepack, trx header id required
7117: SELECT mtl_material_transactions_s.NEXTVAL
7118: INTO l_trx_header_id
7386: WHERE process_id = l_process_id;
7387:
7388: -- Delete lpn entries from temp table
7389: IF (p_container_item_id IS NULL) THEN
7390: DELETE FROM mtl_material_transactions_temp
7391: WHERE transaction_header_id = l_trx_header_id;
7392: END IF;
7393:
7394: -- End of API body
8044: -- lpn has been allocatied
8045: BEGIN
8046: SELECT WMS_CONTAINER_PVT.F
8047: INTO l_lpn_is_valid
8048: FROM mtl_material_transactions_temp
8049: WHERE organization_id = p_organization_id
8050: AND ( ALLOCATED_LPN_ID = lpn_rec.lpn_id OR
8051: lpn_id = lpn_rec.lpn_id OR
8052: content_lpn_id = lpn_rec.lpn_id OR
8221: FROM DUAL;
8222:
8223: FOR Nested_LPN_rec IN Nested_LPN_cur LOOP
8224: -- Insert an 'UNPACK' transaction of child LPN from parent LPN into
8225: -- MTL_MATERIAL_TRANSACTIONS_TEMP using standard MMTT insert API
8226: l_return_status := INV_TRX_UTIL_PUB.INSERT_LINE_TRX (
8227: p_trx_hdr_id => l_trx_hdr_id
8228: , p_item_id => -1
8229: , p_org_id => p_organization_id
8433: ELSE
8434: l_converted_qty := l_crnt_item_rec.quantity;
8435: END IF;
8436:
8437: -- MTL_MATERIAL_TRANSACTIONS_TEMP cannot use API because
8438: -- need to use sepecific transaction temp id
8439: INSERT INTO mtl_material_transactions_temp (
8440: transaction_header_id
8441: , transaction_temp_id
8435: END IF;
8436:
8437: -- MTL_MATERIAL_TRANSACTIONS_TEMP cannot use API because
8438: -- need to use sepecific transaction temp id
8439: INSERT INTO mtl_material_transactions_temp (
8440: transaction_header_id
8441: , transaction_temp_id
8442: , process_flag
8443: , creation_date
8624:
8625: --Every nested lpn will need to be deconsolidated from the outermost lpn,
8626: FOR lpn_rec IN nested_lpn_cursor LOOP
8627: -- Insert an 'UNPACK' transaction of child LPN from parent LPN into
8628: -- MTL_MATERIAL_TRANSACTIONS_TEMP using standard MMTT insert API
8629: l_return_status := INV_TRX_UTIL_PUB.INSERT_LINE_TRX (
8630: p_trx_hdr_id => l_trx_hdr_id
8631: , p_item_id => -1
8632: , p_org_id => p_organization_id