OmagCUT 2.1c3 :

- in controllo attrezzaggio eliminato possibile crash.

CamAuto.vb

@@ -296,7 +296,14 @@ Friend Module CamAuto
             Dim sTool2 As String = String.Empty
             EgtGetMachiningParam(MCH_MP.TUUID, sTuuid)
             EgtTdbGetToolFromUUID(sTuuid, sTool)
-            If nType = MCH_OY.SAWING Or nType = MCH_OY.SAWROUGHING Or nType = MCH_OY.SAWFINISHING Then
+            If String.IsNullOrWhiteSpace( sTool) Then
+               Dim sMchTool As String = ""
+               EgtGetMachiningParam( MCH_MP.TOOL, sMchTool)
+               bOk = False
+               If sMissingTools.IndexOf(sMchTool) = -1 Then
+                  sMissingTools = sMissingTools & sMchTool & ", "
+               End If
+            ElseIf nType = MCH_OY.SAWING Or nType = MCH_OY.SAWROUGHING Or nType = MCH_OY.SAWFINISHING Then
                If bIsMultiCut Then
                   ' L'utensile sulla seconda testa ha lo stesso nome di quello sulla prima con suffisso "-2"
                   If sTool.Substring(sTool.Length() - 2) = "-2" Then

My Project/AssemblyInfo.vb

@@ -62,5 +62,5 @@ Imports System.Windows
 ' by using the '*' as shown below:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("2.1.3.2")>
-<Assembly: AssemblyFileVersion("2.1.3.2")>
+<Assembly: AssemblyVersion("2.1.3.3")>
+<Assembly: AssemblyFileVersion("2.1.3.3")>