Merge branch 'release/2.7c1'

- In LapJoint si anticipa controllo per decidere se feature di coda

BatchProcess.lua

@@ -202,7 +202,7 @@ if bBtl and string.find( sTitle, 'Bar_', 1, true) and EgtExistsFile( sNgeFile) t
    EgtEraseFile( sDiffFile)
    local _, nDiff = EgtTextFileCompare( BEAM.FILE, sOriFile, ';', sDiffFile)
    -- se BTL corrente coincide con originale, salto il riprocessamento
-   if nDiff == 0 then
+   if nDiff == 0 and sFlag ~= 'CHECK' and sFlag ~= 'CHECK+GENERATE' then
       bToProcess = false
       -- se cambiata configurazione macchina da ultima elaborazione, devo riprocessare
       if EgtCompareFilesLastWriteTime( sOriFile, sMachDir .. '\\Beam\\TS3Data.lua') == -1  or

LuaLibs/BeamExec.lua

@@ -1863,10 +1863,14 @@ local function VerifyDrillMirrored( Proc, vProc, b3Raw)
             ( BD.DOWN_HEAD and AreOppositeVectorApprox( vtExtr, Y_AX())) then
             Proc.Double = 2
             Proc.MachDepthDouble = dMachiningDepth
+            Proc.MirrorCutId = ProcToDisable.CutId
+            Proc.MirrorTaskId = ProcToDisable.TaskId
             DisableOtherDrilling( ProcToDisable, vProc)
          elseif BD.DOWN_HEAD and AreSameVectorApprox( vtExtr, Z_AX()) then
             Proc.Double = 3
             Proc.MachDepthDouble = dMachiningDepth
+            Proc.MirrorCutId = ProcToDisable.CutId
+            Proc.MirrorTaskId = ProcToDisable.TaskId
             DisableOtherDrilling( ProcToDisable, vProc)
          end
       end
@@ -2173,8 +2177,14 @@ function BeamExec.ProcessFeatures()
                if not bOk then
                   nTotErr = nTotErr + 1
                   table.insert( Stats, {Err=1, Msg=sMsg, Rot=-2, CutId=Proc.CutId, TaskId=Proc.TaskId})
+                  if Proc.Double == 2 or Proc.Double == 3 then
+                     table.insert( Stats, {Err=1, Msg=sMsg, Rot=-2, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+                  end
                elseif sMsg and #sMsg > 0 then
                   table.insert( Stats, {Err=-1, Msg=sMsg, Rot=-2, CutId=Proc.CutId, TaskId=Proc.TaskId})
+                  if Proc.Double == 2 or Proc.Double == 3 then
+                     table.insert( Stats, {Err=-1, Msg=sMsg, Rot=-2, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+                  end
                else
                   table.insert( Stats, {Err=0, Msg='', Rot=-2, CutId=Proc.CutId, TaskId=Proc.TaskId})
                   if Proc.Double == 2 or Proc.Double == 3 then
@@ -2263,8 +2273,14 @@ function BeamExec.ProcessFeatures()
                if not bOk then
                   nTotErr = nTotErr + 1
                   table.insert( Stats, {Err=1, Msg=sMsg, Rot=-1, CutId=Proc.CutId, TaskId=Proc.TaskId})
+                  if Proc.Double == 2 or Proc.Double == 3 then
+                     table.insert( Stats, {Err=1, Msg=sMsg, Rot=-1, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+                  end
                elseif sMsg and #sMsg > 0 then
                   table.insert( Stats, {Err=-1, Msg=sMsg, Rot=-1, CutId=Proc.CutId, TaskId=Proc.TaskId})
+                  if Proc.Double == 2 or Proc.Double == 3 then
+                     table.insert( Stats, {Err=-1, Msg=sMsg, Rot=-1, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+                  end
                else
                   table.insert( Stats, {Err=0, Msg='', Rot=-1, CutId=Proc.CutId, TaskId=Proc.TaskId})
                   if Proc.Double == 2 or Proc.Double == 3 then
@@ -2341,8 +2357,14 @@ function BeamExec.ProcessFeatures()
             if not bOk then
                nTotErr = nTotErr + 1
                table.insert( Stats, {Err=1, Msg=sMsg, Rot=0, CutId=Proc.CutId, TaskId=Proc.TaskId})
+               if Proc.Double == 2 or Proc.Double == 3 then
+                  table.insert( Stats, {Err=1, Msg=sMsg, Rot=0, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+               end
             elseif sMsg and #sMsg > 0 then
                table.insert( Stats, {Err=-1, Msg=sMsg, Rot=0, CutId=Proc.CutId, TaskId=Proc.TaskId})
+               if Proc.Double == 2 or Proc.Double == 3 then
+                  table.insert( Stats, {Err=-1, Msg=sMsg, Rot=0, CutId=Proc.MirrorCutId, TaskId=Proc.MirrorTaskId})
+               end
             else
                table.insert( Stats, {Err=0, Msg='', Rot=0, CutId=Proc.CutId, TaskId=Proc.TaskId})
                if Proc.Double == 2 or Proc.Double == 3 then

LuaLibs/BeamLib.lua

@@ -1345,6 +1345,12 @@ function BeamLib.GetToolFromMachining( sMachiningName)
          Tool.IsCCW = ( EgtMdbGetCurrMachiningParam( MCH_MP.SPEED) < 0)
          Tool.Type = EgtTdbGetCurrToolParam( MCH_TP.TYPE)
          Tool.Diameter = EgtTdbGetCurrToolParam( MCH_TP.DIAM) or 0
+         Tool.HeadType = {}
+         Tool.PreferredSide = {}
+         if BD.GetSetupInfo then
+            Tool.HeadType = BD.GetSetupInfo( EgtTdbGetCurrToolParam( MCH_TP.HEAD)).HeadType
+            Tool.PreferredSide = BD.GetSetupInfo( EgtTdbGetCurrToolParam( MCH_TP.HEAD)).PreferredSide
+         end
          -- lama
          if Tool.Type == MCH_TY.SAW_STD or Tool.Type == MCH_TY.SAW_FLAT then
             Tool.Thickness = EgtTdbGetCurrToolParam(MCH_TP.THICK) or 0

LuaLibs/ProcessCut.lua

@@ -92,7 +92,7 @@ function ProcessCut.Classify( Proc, b3Raw)
       -- calcolo l'ingombro orizzontale della faccia
       local _, DimH, DimV = BL.GetFaceHvRefDim( Proc.Id, 0)
       -- confronto questo ingombro con il doppio della massima dimensione del DiceCut (impossibile lavorare sotto da sopra se più di 2 tagli oppure se tipo PF, taglio inclinato in Y e non taglio singolo orizzontale)
-      if DimH > 2 * BD.MAX_DIM_DICE  or ( BD.C_SIMM and abs( vtN:getY()) > 0.1 and dMaxMat < DimH + BD.CUT_EXTRA) then
+      if DimH > 2 * BD.MAX_DIM_DICE  or ( BD.C_SIMM and ( abs( vtN:getY()) > 0.1 or bDownCut) and dMaxMat < DimH + BD.CUT_EXTRA) then
          return true, true
       end
    end

LuaLibs/ProcessDrill.lua

@@ -485,22 +485,13 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    -- eventuale inversione foro in base al lato di lavoro e al lato testa dell'utensile scelto
    -- se non già richiesta inversione e foro quasi orizzontale (15deg) passante
    if not bToInvert and Proc.Flg == 1 and bOpen and abs( vtExtr:getZ()) < 0.259 and abs( vtExtr:getY()) > 0.966 then
-      if BD.GetSetupInfo then
-         if EgtMdbSetCurrMachining( sDrilling or '') then
-            local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
-            local sHead = ''
-            if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid or '') or '') then
-               sHead = EgtTdbGetCurrToolParam( MCH_TP.HEAD)
-            end
-            local SetupInfo = BD.GetSetupInfo( sHead)
-            -- lato testa e lato di lavoro devono corrispondere
-            if ( ( SetupInfo.bIsFrontHead == true) and vtExtr:getY() > 10 * GEO.EPS_SMALL)
-               or ( ( SetupInfo.bIsBackHead == false) and vtExtr:getY() < - 10 * GEO.EPS_SMALL) then
-               ptCen = ptCen - vtExtr * dLen
-               vtExtr = - vtExtr
-               bToInvert = true
-            end
-         end
+      local Tool = BL.GetToolFromMachining( sDrilling)
+      -- lato testa e lato di lavoro devono corrispondere
+      if ( ( Tool.PreferredSide.bFront == true) and vtExtr:getY() > 10 * GEO.EPS_SMALL)
+         or ( ( Tool.PreferredSide.bBack == true) and vtExtr:getY() < - 10 * GEO.EPS_SMALL) then
+         ptCen = ptCen - vtExtr * dLen
+         vtExtr = - vtExtr
+         bToInvert = true
       end
    end
    -- Determino la faccia di inizio del foro e dati correlati 

LuaLibs/ProcessHeadCut.lua

@@ -412,7 +412,8 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
                           ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth, dMaxVertDepth + dMaxDepth2) - 2 * BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
    local bHorizCut = ( ( b3Raw:getDimY() > b3Raw:getDimZ() + 10 * GEO.EPS_SMALL or BD.TURN) and b3Raw:getDimZ() < dMaxVertDepth - BD.CUT_EXTRA)
    local bDoubleHorizCut = ( ( BD.DOWN_HEAD or BD.TURN) and not bHorizCut and b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
-   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA + 10 * GEO.EPS_SMALL)
+   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA  + 10 * GEO.EPS_SMALL) and
+                      ( b3Raw:getDimY() < 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
    -- verifico necessità di tagli aggiuntivi orizzontali o verticali
    local dMinOvmHeadForAddeddCuts = 10.123
    local bNeedVerticalAddedCuts = ( Proc.Face[1].WidthTrimmed > BD.MAX_LEN_DICE) and ( dOvmHead > dMinOvmHeadForAddeddCuts - 10 * GEO.EPS_SMALL)

LuaLibs/ProcessLapJoint.lua

@@ -788,7 +788,6 @@ function ProcessLapJoint.IsTailFeature( Proc, b3Raw)
    local nPartId = EgtGetParent( EgtGetParent( Proc.Id) or GDB_ID.NULL)
    local b3Solid = EgtGetBBoxGlob( EgtGetFirstNameInGroup( nPartId, 'Box') or GDB_ID.NULL, GDB_BB.STANDARD)
    -- verifico se è in coda
-   
    local dEndDist = Proc.Box:getMin():getX() - b3Solid:getMin():getX()
    if ( dEndDist > BD.MAX_DIST_HTFEA) or bUseBHSideMill then
       if not( BD.BH_MACHINE) and bUseBHSideMill and ( Proc.Box:getMax():getX() - b3Solid:getMin():getX()) < 400 then
@@ -803,6 +802,12 @@ function ProcessLapJoint.IsTailFeature( Proc, b3Raw)
       ( b3Solid:getDimX() > BD.LEN_SHORT_PART and Proc.Box:getDimX() > min( BD.MAX_LEN_HTFEA, 0.8 * b3Solid:getDimX())) then
       return false
    end
+
+   -- se interessa la coda, e pezzo lungo, si sposta dopo separazione
+   if b3Solid:getDimX() > BD.LEN_SHORT_PART and Proc.AffectedFaces.Left and Proc.Fct >= 2 then
+      return true
+   end
+
    -- se una o due facce e interessa veramente la coda, allora di coda
    if Proc.Fct <= 2 then
       if Proc.Box:getMin():getX() < b3Solid:getMin():getX() + 1. then

LuaLibs/ProcessSplit.lua

@@ -634,7 +634,8 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
                           ( b3Raw:getDimZ() > EgtIf( BD.TURN, 2 * dMaxVertDepth,  dMaxVertDepth + dSawMaxDepth2) - 2 * BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
    local bHorizCut = ( ( b3Raw:getDimY() > b3Raw:getDimZ() + 10 * GEO.EPS_SMALL or BD.TURN) and ( b3Raw:getDimZ() < dMaxVertDepth - BD.CUT_EXTRA))
    local bDoubleHorizCut = ( ( BD.DOWN_HEAD or BD.TURN) and not bHorizCut and b3Raw:getDimY() > 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
-   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA  + 10 * GEO.EPS_SMALL)
+   local bDoubleCut = ( not bHorizCut and not bDoubleHorizCut and b3Raw:getDimY() > dDimYRef - BD.CUT_EXTRA  + 10 * GEO.EPS_SMALL) and
+                      ( b3Raw:getDimY() < 2 * dDimYRef - BD.CUT_EXTRA_MIN + 10 * GEO.EPS_SMALL)
    -- dati geometrici del taglio
    local ptC, vtN = EgtSurfTmFacetCenter( Proc.Id, 0, GDB_ID.ROOT)
    -- separazione solo se esiste grezzo successivo con pezzi o scaricabile

UpdateLog.txt

@@ -1,8 +1,16 @@
            ==== Beam Update Log ====
 
-Versione 2.7xx ()
+Versione 2.7c1 (17/03/2025)
+- Modif : in HeadCut e Split, per decidere se fare doppio taglio verticale, si controlla anche il massimo possibile e non solo il minimo
+- Modif : in LapJoint migliorato controllo per decidere se feature di coda
+- Modif : nei tagli, se taglio rivolto verso il basso e non possibile tagliare di fianco, si fa in fase ribaltata
+- Fixed : in BacthProcess (Ts7) corretta restituzione stato feature erroneamente segnalata verde
+- Fixed : corretta restituzione stato feature lavorata in doppio
+
+Versione 2.7b3 (03/03/2025)
 - Modif : in forature passanti orizzontali fatte da un solo lato, si inverte il lato di lavoro in base all'utensile scelto
-- Modif : in LapJoint in lavorazione tipo BH permessa U passante non parallela agli assi principali
+- Modif : in LapJoint in lavorazione tipo BH permessa U passante non parallela agli assi principali; attacchi migliorati
+- Modif : in LapJoint le feature di coda con pezzo lungo vengono spostate sempre dopo separazione
 - Fixed : in macchine tipo Turn piccoli miglioramenti ai tagli di lama
 
 Versione 2.7b2 (05/02/2025)

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.7b2'
+VERSION = '2.7c1'
 MIN_EXE = '2.6e5'