DataWall :

- modifiche per forature orizzontali lunghe da dividere in due parti
- corretta gestione mortasature passanti
- modifiche a nesting
- in FreeContour penna e chiodatura sempre riportate sulla superficie sopra.

LuaLibs/WallExec.lua

@@ -163,10 +163,32 @@ function WallExec.CollectFeatures( PartId, b3Raw)
                Proc.TaskId = nTaskId
                Proc.Box = EgtGetBBoxGlob( ProcId, GDB_BB.STANDARD)
                if Proc.Box and not Proc.Box:isEmpty() then 
-                  if Drill.Identify( Proc) then
-                     Proc.Diam, Proc.Fcs, Proc.Fce = Drill.GetData( Proc, b3Raw)
-                  end
                   table.insert( vProc, Proc)
+                  -- se foro
+                  if Drill.Identify( Proc) then
+                     -- assegno diametro e facce di ingresso e uscita (dati tabelle sempre per riferimento)
+                     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 flags prima parte foro (dati tabelle sempre per riferimento)
+                        Proc.Flg = 2
+                        -- definisco dati seconda parte
+                        local Proc2 = {}
+                        Proc2.PartId = PartId
+                        Proc2.Id = ProcId
+                        Proc2.Grp = nGrp
+                        Proc2.Prc = nPrc
+                        Proc2.Flg = -2
+                        Proc2.Box = BBox3d( Proc.Box)
+                        Proc2.Fct = Proc.Fct
+                        Proc2.Diam = Proc.Diam
+                        Proc2.Fcs = Proc.Fce
+                        Proc2.Fce = Proc.Fcs
+                        Proc2.CutId = Proc.CutId
+                        Proc2.TaskId = Proc.TaskId
+                        table.insert( vProc, Proc2)
+                     end
+                  end
                else
                   EgtOutLog( ' Feature ' .. tostring( Proc.Id) .. ' is empty (no geometry)')
                end