[Home] [Help]
835: This API will insert records into
836:
837: MTL_TRANSACTION_LOTS_INTERFACE: For every receipt in lot
838: (lot controlled items).
839: MTL_SERIAL_NUMBERS_INTERFACE : For every serial number
840: receipt (serial controlled
841: items.)
842: MTL_TRANSACTIONS_INTERFACE : For every transaction
843: (corresponds to qty recd
1061: DECLARE
1062: --modified the following cursor for bug 6012741
1063: CURSOR get_received_serial_number IS
1064: SELECT rtrim(ltrim(msn.serial_number))
1065: FROM mtl_serial_numbers msn
1066: WHERE msn.inventory_item_id = p_inventory_item_id
1067: AND msn.current_organization_id = p_warehouse_id
1068: AND nvl(msn.current_subinventory_code,' ') = p_secondary_inventory
1069: AND nvl(msn.current_locator_id,0) = nvl(p_locator_id,0)
1156:
1157: BEGIN
1158:
1159: IF l_debug_level > 0 THEN
1160: oe_debug_pub.add( 'Inserting into mtl_serial_numbers_interface table ' , 1 ) ;
1161: END IF;
1162:
1163: insert into mtl_serial_numbers_interface
1164: (transaction_interface_id,
1159: IF l_debug_level > 0 THEN
1160: oe_debug_pub.add( 'Inserting into mtl_serial_numbers_interface table ' , 1 ) ;
1161: END IF;
1162:
1163: insert into mtl_serial_numbers_interface
1164: (transaction_interface_id,
1165: source_code,
1166: source_line_id,
1167: last_update_date,
1204:
1205: EXCEPTION
1206: WHEN OTHERS THEN
1207: IF l_debug_level > 0 THEN
1208: oe_debug_pub.add( 'Failed inserting into mtl_serial_numbers_interface' , 1 ) ;
1209: END IF;
1210: -- bug 5357879
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: ROLLBACK TO DECREMENT_INV;
1222: (p_sn_control_code = 5))
1223: THEN
1224:
1225: BEGIN
1226: UPDATE mtl_serial_numbers
1227: SET GROUP_MARK_ID = p_line_rec.line_id
1228: where inventory_item_id = p_inventory_item_id
1229: and current_organization_id = p_warehouse_id
1230: and nvl(current_locator_id,0) = nvl(p_locator_id,0)