DataBeam :

- migliorie e correzioni varie
- unificati BirdsMouth con LapJoint.

LuaLibs/ProcessDtTenon.lua

@@ -1,4 +1,4 @@
--- ProcessTenon.lua by Egaltech s.r.l. 2019/03/23
+-- ProcessTenon.lua by Egaltech s.r.l. 2019/06/29
 -- Gestione calcolo tenone a coda di rondine per Travi
 
 -- Tabella per definizione modulo
@@ -119,12 +119,10 @@ function ProcessDtTenon.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       EgtErase( nLoopId + i - 1)
    end
    EgtOutLog( 'MaxDist=' .. EgtNumToString( dMaxDist, 3), 3)
-   -- Cicli di lavorazione
-   local nStep = ceil( dMaxDist / ( 0.7 * dTDiam))
-   local dStep = 0
-   if nStep > 1 then
-      dStep = ( dMaxDist - 0.7 * dTDiam) / ( nStep - 1)
-   end
+   -- Cicli di lavorazione (max 4)
+   local MAX_PASS = 4
+   local nStep = min( ceil( dMaxDist / ( 0.7 * dTDiam)), MAX_PASS)
+   local dStep = min( dMaxDist, 0.7 * dTDiam * MAX_PASS) / nStep
    for i = nStep, 1, -1 do
       -- inserisco la passata di sgrossatura della lavorazione
       local sNameR = 'DtTn_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id)) .. '_' .. tostring( i)