From 8d865b4deb86c04fd6b5a8122f6eceeb4d03caa2 Mon Sep 17 00:00:00 2001
From: DarioS <dario.sassi@egaltech.com>
Date: Tue, 20 Apr 2021 09:31:35 +0200
Subject: [PATCH] DataWall : - correzioni per togliere tabs con pulitura
 spigoli che richiedono la rimozione degli sfridi.

---
 LuaLibs/WProcessFreeContour.lua | 14 ++++++++++----
 Process.lua                     |  2 +-
 2 files changed, 11 insertions(+), 5 deletions(-)

diff --git a/LuaLibs/WProcessFreeContour.lua b/LuaLibs/WProcessFreeContour.lua
index 98507c9..2263e93 100644
--- a/LuaLibs/WProcessFreeContour.lua
+++ b/LuaLibs/WProcessFreeContour.lua
@@ -1,4 +1,4 @@
--- ProcessFreeContour.lua by Egaltech s.r.l. 2021/03/24
+-- ProcessFreeContour.lua by Egaltech s.r.l. 2021/04/13
 -- Gestione calcolo profilo libero per Pareti
 
 -- Tabella per definizione modulo
@@ -441,6 +441,7 @@ local function GetTunnelDimension( nId, nPartId, nAddGrpId)
    EgtMove( nSurfInt, Point3d(0,0,-2*GEO.EPS_SMALL) - ORIG(), GDB_RT.GLOB)
    -- mi faccio dare il contorno della superfice e la ricreo in modo più corretto
    local nIdCont, nIdNum = EgtExtractSurfTmLoops( nSurfInt, nAddGrpId)
+   if not nIdCont then return end
    -- elimino le entità allineate dello stesso tipo
    EgtMergeCurvesInCurveCompo( nIdCont, 2*GEO.EPS_SMALL)
    EgtErase(nSurfInt)
@@ -981,9 +982,10 @@ local function AddMillCorner( nTypeConeCut, vFace, Proc, nRawId, b3Raw,
          nFacCnt = EgtSurfTmFacetCount( nNewProc)
          nFacInd = nFacCnt - 1
       else
-         local sErr = 'Error : cannot create base surface'
-         EgtOutLog( sErr)
-         return false, sErr
+         return true
+         --local sErr = 'Error : cannot create base surface'
+         --EgtOutLog( sErr)
+         --return false, sErr
       end
    else
       bMakeLocSurf = true
@@ -1133,6 +1135,8 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw, nConeCut, nAdd
             EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
             bNotThrou = true
          end
+         -- tolgo i Tabs se devo rimuovere lo sfrido
+         if nConeCut == 1 then EgtSetMachiningParam( MCH_MP.LEAVETAB, false) end
          -- aggiungo geometria
          EgtSetMachiningGeometry( {{ Proc.Id, vFace[i].Fac}})
          local dSal = 0
@@ -1186,6 +1190,8 @@ local function AddMillings( sMilling, vFace, Proc, nRawId, b3Raw, nConeCut, nAdd
             EgtSetMachiningParam( MCH_MP.LEAVETAB, false)
             bNotThrou = true
          end
+         -- tolgo i Tabs se devo rimuovere lo sfrido
+         if nConeCut == 1 then 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)
diff --git a/Process.lua b/Process.lua
index 6f96367..17e9af0 100644
--- a/Process.lua
+++ b/Process.lua
@@ -1,4 +1,4 @@
--- Process.lua by Egaltech s.r.l. 2021/04/09
+-- Process.lua by Egaltech s.r.l. 2021/04/13
 -- Gestione calcolo disposizione e lavorazioni per Pareti
 -- Si opera sulla macchina corrente
 -- 2020/12/09 Come per BatchProcess.lua si gestiscono anche rotazioni di inversione con valori negativi.