DataWall :

- in lavorazione FreeContour disabilito Tabs se affondo meno del richiesto
- in lavorazione FreeContour corretta scelta fresa meno peggio per affondamento massimo
- in LapJoint aggiunta gestione tunnel.

LuaLibs/WProcessFreeContour.lua

@@ -1,4 +1,4 @@
--- ProcessFreeContour.lua by Egaltech s.r.l. 2020/07/15
+-- ProcessFreeContour.lua by Egaltech s.r.l. 2020/11/17
 -- Gestione calcolo profilo libero per Pareti
 
 -- Tabella per definizione modulo
@@ -114,7 +114,12 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw)
          if vtNz < 0 then
             dDepth = dDepth - dMillDiam * abs( vtNz) / sqrt( 1 - vtNz * vtNz)
          end
-         dDepth = min( dDepth, dMaxDepth)
+         -- se affondamento superiore ai limiti della fresa
+         if dDepth > dMaxDepth then
+            -- lo limito e tolgo eventuali Tabs
+            dDepth = dMaxDepth
+            EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
+         end
          -- aggiungo geometria
          EgtSetMachiningGeometry( {{ Proc.Id, vFace[i].Fac}})
          local dSal = 0
@@ -158,7 +163,12 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw)
          if vtNz < 0 then
             dDepth = dDepth - dMillDiam * abs( vtNz) / sqrt( 1 - vtNz * vtNz)
          end
-         dDepth = min( dDepth, dMaxDepth)
+         -- se affondamento superiore ai limiti della fresa
+         if dDepth > dMaxDepth then
+            -- lo limito e tolgo eventuali Tabs
+            dDepth = dMaxDepth
+            EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
+         end
          -- aggiungo geometria
          local vGeom = {{ Proc.Id, vFace[i].Fac}}
          local dSal = EgtIf( ( vFace[i].Type & 2) ~= 0, vFace[i].Whisk - vFace[i].Len, 0)
@@ -512,7 +522,7 @@ local function MakeByCut( Proc, nRawId, b3Raw)
    -- recupero la lavorazione di fresatura
    local sMilling, dMillMaxDepth = WM.FindMilling( 'FreeContour', dMaxWidth + WD.CUT_EXTRA)
    if not sMilling and not sSawing then
-      local sMilling = WM.FindMilling( 'FreeContour')
+      sMilling = WM.FindMilling( 'FreeContour')
       if not sMilling then
          local sErr = 'Error : milling not found in library'
          EgtOutLog( sErr)
@@ -576,7 +586,9 @@ local function MakeByMill( Proc, nRawId, b3Raw)
       dDepth = min( dDepth, b3Raw:getDimZ()) + WD.CUT_EXTRA
    end
    if dDepth > dMaxDepth then
+      -- lo limito e tolgo eventuali Tabs
       dDepth = dMaxDepth
+      EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
    end
    -- inserisco la lavorazione
    local sName = 'Free_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))