- in BacthProcess (Ts7) si forza ricalcolo ad ogni check o check+generate

2.7b3

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/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/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/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
@@ -815,6 +814,10 @@ function ProcessLapJoint.IsTailFeature( Proc, b3Raw)
    if Proc.AffectedFaces.Left and ( EgtGetInfo( Proc.Id, Q_SAW_PLUS_CHAIN, 'i') or 0) > 0 then
       return true
    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
    -- deve avere la normale principale diretta verso la coda (oppure tunnel)
    Topology.Classify( Proc, b3Raw)
    local nFacInd, dElev, nFacInd2, dElev2 = BL.GetFaceWithMostAdj( Proc, nPartId)

UpdateLog.txt

@@ -1,8 +1,9 @@
            ==== Beam Update Log ====
 
-Versione 2.7xx ()
+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.7b3'
 MIN_EXE = '2.6e5'