DataBeam :

- correzioni varie.

LuaLibs/BeamExec.lua

@@ -1,4 +1,4 @@
--- BeamExec.lua by Egaltech s.r.l. 2020/06/04
+-- BeamExec.lua by Egaltech s.r.l. 2020/07/25
 -- Libreria esecuzione lavorazioni per Travi
 -- 2019/07/11 Aggiunta gestione stato rotazione di feature per TS3.
 -- 2019/09/04 Corretto controllo feature di testa e coda con sovramateriale di testa elevato.
@@ -14,6 +14,7 @@
 -- 2020/05/21 Correzione rotazione di 90deg (caso DY > DZ).
 -- 2020/05/25 Correzione rotazione di 90deg dopo scarico su carico.
 -- 2020/06/02 Per dati foro si chiama funzione GetData di ProcessDrill (per gestire variazioni di diametro da UserParams).
+-- 2020/07/25 Ricalcolati flag head e tail della prima parte del foro dopo lo split.
 
 -- Tabella per definizione modulo
 local BeamExec = {}
@@ -344,8 +345,8 @@ local function CollectFeatures( PartId, b3Raw, dCurrOvmH)
                Proc.TaskId = nTaskId
                Proc.Box = EgtGetBBoxGlob( ProcId, GDB_BB.STANDARD)
                if Proc.Box and not Proc.Box:isEmpty() then 
-                  Proc.Head = Proc.Box and IsHeadFeature( Proc, b3Raw, dCurrOvmH)
-                  Proc.Tail = Proc.Box and IsTailFeature( Proc, b3Raw, dCurrOvmH)
+                  Proc.Head = IsHeadFeature( Proc, b3Raw, dCurrOvmH)
+                  Proc.Tail = IsTailFeature( Proc, b3Raw, dCurrOvmH)
                   table.insert( vProc, Proc)
                   -- se foro
                   if Drill.Identify( Proc) then
@@ -353,8 +354,10 @@ local function CollectFeatures( PartId, b3Raw, dCurrOvmH)
                      Proc.Diam, Proc.Fcs, Proc.Fce = Drill.GetData( Proc, b3Raw)
                      -- verifico se necessaria seconda lavorazione da parte opposta per foro più lungo della punta
                      if Drill.Split( Proc, b3Raw) then
-                        -- aggiorno flag prima parte foro (dati tabelle sempre per riferimento)
+                        -- aggiorno flags prima parte foro (dati tabelle sempre per riferimento)
                         Proc.Flg = 2
+                        Proc.Head = IsHeadFeature( Proc, b3Raw, dCurrOvmH)
+                        Proc.Tail = IsTailFeature( Proc, b3Raw, dCurrOvmH)
                         -- definisco dati seconda parte
                         local Proc2 = {}
                         Proc2.Id = ProcId