corretto commit

2026-05-08 15:25:28 +02:00
parent 77a708f35f
commit 6efad10da5
1 changed files with 1 additions and 2 deletions
@@ -251,8 +251,7 @@ Public Class MachiningParameterExpanderVM
               If MatType = MaterialType.STONE5 Then
                  ' se macchina di tipo STONE ricavo il tipo di utensile
                  Dim sMachiningToolName = String.Empty
-                  EgtMdbSetCurrMachining(sName)
-                  EgtMdbGetCurrMachiningParam(MCH_MP.TOOL, sMachiningToolName)
+                  EgtGetMachiningParam(MCH_MP.TOOL, sMachiningToolName)
                  EgtTdbSetCurrTool(sMachiningToolName)
                  Dim dValue As Double = 0
                  Dim nToolType As Integer