DataWall :

- aggiunto ricalcolo lavorazione dopo ordinamento
- corretto recupero dimensioni utensili a cono per pulitura spigoli.

LuaLibs/WProcessLapJoint.lua

@@ -1,4 +1,4 @@
--- WProcessLapJoint.lua by Egaltech s.r.l. 2021/02/19
+-- WProcessLapJoint.lua by Egaltech s.r.l. 2021/03/23
 -- Gestione calcolo mezzo-legno per Pareti
 
 -- Tabella per definizione modulo
@@ -173,14 +173,13 @@ end
 
 ---------------------------------------------------------------------
 local function VerifyCornerType( Proc)
-
-   local nConeCut = 0
-   -- verifico il tipo di lavorazione su angolo. 0 : nessuna ripresa corner; 1: ripresa corner con pausa; 
-   -- 2: ripresa corner senza pausa; 3: scarico corner
-   local nParamValue = EgtGetInfo( Proc.Id, sTypeCornerCut, 'i') or nConeCut
-   -- se tipo di lavorazione con fesa conica 60° con pausa
-   nConeCut = nParamValue
-   return nConeCut
+   -- Verifico il tipo di lavorazione su angolo :
+   -- 0 : niente
+   -- 1 : ripresa corner dopo pausa per rimozione sfridi (fresa 60deg) 
+   -- 2 : ripresa corner senza pausa (fresa 30 deg)
+   -- 3 : scarico corner (tipo foro).
+   local nVal = EgtGetInfo( Proc.Id, sTypeCornerCut, 'i')
+   return ( nVal or 0)
 end
 
 ---------------------------------------------------------------------
@@ -858,7 +857,7 @@ local function AddMillCorner( nTypeConeCut, vFace, Proc, nRawId, b3Raw,
          dMillDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or dMillDiam
          dThickTool = EgtTdbGetCurrToolParam( MCH_TP.THICK) or dThickTool
          dToolLength = EgtTdbGetCurrToolParam( MCH_TP.LEN) or dToolLength
-         dMaxDepth = EgtIf( WD.MILL_MAX_DEPTH_AS_MAT, EgtTdbGetCurrToolParam( MCH_TP.MAXMAT), EgtTdbGetCurrToolMaxDepth()) or dMaxDepth
+         dMaxDepth = EgtTdbGetCurrToolParam( MCH_TP.MAXMAT) or dMaxDepth    -- qui è la distanza dal portautensile
          -- calcolo il secondo diametro del cono
          dMillTotDiam = dMillDiam + ( abs(dThickTool) * tan(dSideAng)) * 2
       end
@@ -1118,7 +1117,7 @@ local function MakeByMill( Proc, nFacet, nOthFac, nRawId, b3Raw)
          dMillDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or dMillDiam
          dMillLen = EgtTdbGetCurrToolParam( MCH_TP.LEN) or dMillLen
          dMillTotLen = EgtTdbGetCurrToolParam( MCH_TP.TOTLEN) or dMillTotLen
-         dMaxDepth = EgtTdbGetCurrToolMaxDepth() or dMaxDepth
+         dMaxDepth = EgtIf( WD.MILL_MAX_DEPTH_AS_MAT, EgtTdbGetCurrToolParam( MCH_TP.MAXMAT), EgtTdbGetCurrToolMaxDepth()) or dMaxDepth
          dThDiam = EgtTdbGetCurrToolThDiam() or dThDiam
       end
    end
@@ -1281,7 +1280,7 @@ local function MakeByPocketing( Proc, nFacet, nRawId, b3Raw, bCheckQPar)
       local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
       if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
          dMillDiam = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or dMillDiam
-         dMaxDepth = EgtTdbGetCurrToolMaxDepth() or dMaxDepth
+         dMaxDepth = EgtIf( WD.MILL_MAX_DEPTH_AS_MAT, EgtTdbGetCurrToolParam( MCH_TP.MAXMAT), EgtTdbGetCurrToolMaxDepth()) or dMaxDepth
          dThDiam = EgtTdbGetCurrToolThDiam() or dThDiam
       end
    end