DataBeam :

- in Tenon corretta scelta bordo vicino per attacco
- in LapJoint se non definito BD.MIN_LEN_LAMELLO si usa 1000, in MachineByMill migliorata ricerca utensile e corretta gestione inversione in funzione del lato di lavoro
- in Mortise migliorato controllo necessità CleanCorners.

LuaLibs/ProcessLapJoint.lua

@@ -1,4 +1,4 @@
--- ProcessLapJoint.lua by Egaltech s.r.l. 2022/09/27
+-- ProcessLapJoint.lua by Egaltech s.r.l. 2022/12/12
 -- Gestione calcolo mezzo-legno per Travi
 -- 2019/10/08 Agg. gestione OpenPocket.
 -- 2021/01/24 Con sega a catena ora sempre impostato asse A.
@@ -56,6 +56,7 @@
 --            Migliorata gestione AntiSplint (Mill e Saw)
 -- 2022/09/27 Aggiunta gestione SCC per svuotature con TURN (solo dopo applicazione lavorazione).
 -- 2022/10/20 In MakeByChainOrSaw modificato check per trovare la faccia adiacente sul lato più lungo.
+-- 2022/12/12 Default 1000 per BD.MIN_LEN_LAMELLO. In MachineByMill migliorata ricerca utensile e gestione inversione in funzione del lato di lavoro.
 
 -- Tabella per definizione modulo
 local ProcessLapJoint = {}
@@ -3246,8 +3247,10 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, tvtN, nBas
          local sMilling
          if nUseRoughTool > 0 then
             sMilling = ML.FindMilling( 'Long2Cut', nil, sTuuidPk)
+            if not sMilling then sMilling = ML.FindMilling( 'Long2Cut') end
          else
             sMilling = ML.FindMilling( 'LongSmallCut', nil, sTuuidPk)
+            if not sMilling then sMilling = ML.FindMilling( 'LongSmallCut') end
          end
          if not sMilling then
             local sErr = 'Error : Long2Cut & LongSmallCut not found in library'
@@ -3276,8 +3279,9 @@ local function MachineByMill( Proc, nPhase, nRawId, nPartId, b3Solid, tvtN, nBas
          EgtSetMachiningGeometry( {{ Proc.Id, (nSideFace)}})
          -- imposto uso faccia
          EgtSetMachiningParam( MCH_MP.FACEUSE, nFaceUse)
-         -- setto inversione del percorso
-         EgtSetMachiningParam( MCH_MP.INVERT, true)
+         -- sistemazione inversione del percorso
+         local nWrkSide = EgtGetMachiningParam( MCH_MP.WORKSIDE)
+         EgtSetMachiningParam( MCH_MP.INVERT, ( nWrkSide ~= MCH_MILL_WS.RIGHT))
          -- setto a 0 eventuali offset
          EgtSetMachiningParam( MCH_MP.OFFSR, 0)
          -- calcolo elevazione per allungamenti attacchi con fianchi chiusi
@@ -4936,7 +4940,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   local nFaces = EgtSurfTmFacetCount( nTestId)
                   while not bExit and nFaces >= 3 do 
                      local bDeleteFace
-                     nInt = 0
+                     local nInt = 0
                      while not bDeleteFace and nInt < nFaces do
                         nInt = nInt + 1
                         local b3Facet = EgtSurfTmGetFacetBBoxGlob( nTestId, nInt-1, GDB_BB.STANDARD)
@@ -4963,9 +4967,9 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
                   -- cancello la copia del percorso
                   EgtErase( nTestId)
 
-                  if bNewIsU and ( not BD.MIN_LEN_LAMELLO or
-                                   ( Proc.TotBox and Proc.TotBox:getDimX() > BD.MIN_LEN_LAMELLO) or
-                                   ( not Proc.TotBox and Proc.Box:getDimX() > BD.MIN_LEN_LAMELLO)) then
+                  if bNewIsU and 
+                     (( Proc.TotBox and Proc.TotBox:getDimX() > ( BD.MIN_LEN_LAMELLO or 1000)) or
+                      ( not Proc.TotBox and Proc.Box:getDimX() > ( BD.MIN_LEN_LAMELLO or 1000))) then
                      -- recupero la lavorazione
                      local bDownHead = BD.DOWN_HEAD and vtN:getZ() < BD.NZ_MINA
                      sMillingOnSide = ML.FindMilling( 'SideMillAsBlade_H2', nil, nil, nil, nil, not bDownHead, bDownHead)