DataBeam :

- in tagli di testa e coda aumentato appena (10.123) spessore minimo applicazione cubetti speciali
- in tagli di coda cubetti speciali rimesse note lavorazione 'PreCut;' e 'Cut;'
- in tagli di coda cubetti speciali rimessa restituzione 3° parametro nNewPhase
- in tagli longitudinali per macchine PF (BD.C_SIMM) modificata assegnazione SCC.

LuaLibs/ProcessHeadCut.lua

@@ -273,7 +273,7 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bNeedHCut
 
       -- per travi alte faccio faccio dei tagli orizzontali aggiuntivi
       local _, _, dimV = BL.GetFaceHvRefDim( Proc.Id, 0, b3Raw)
-      local dMinOvmHeadForHorizontalCuts = 10
+      local dMinOvmHeadForHorizontalCuts = 10.123
       local bAreHorizontalCutsNeeded = ( dimV > BD.MAX_LEN_DICE) and not bBigSectionCut and ( dOvmHead > dMinOvmHeadForHorizontalCuts - 10 * GEO.EPS_SMALL)
       if bAreHorizontalCutsNeeded then
          local nHorizontalCuts = ceil ( dimV / BD.MAX_DIM_DICE) - 1

LuaLibs/ProcessLongCut.lua

@@ -175,8 +175,8 @@ function ProcessLongCut.GetSCC( Proc, nFacet, sMachining, nFaceUse, bInvert, nCu
       else
          nSCC = EgtIf( ( not ( nCuttingStep == 1 or nCuttingStep == nC - 1)), MCH_SCC.ADIR_XM, MCH_SCC.ADIR_XP)
       end
-   -- per PF o simili oppure se Fast ( caso speciale con taglio non passante e inclinato in X) e lama con aggregato lo posiziono per stare il più lontano possibile dalla trave
-   elseif ( bIsBlade and bIsTopBlade) or not BD.C_SIMM then
+   -- per Fast ( caso speciale con taglio non passante e inclinato in X)
+   elseif not BD.C_SIMM then
       local vtAux = GetProcessSpecificVectors( Proc, nFacet, nFaceUse, bInvert, sMachining)
       if bCustUseBlade then
          nSCC = EgtIf( ( nFaceUse == MCH_MILL_FU.ORTHO_TOP or nFaceUse == MCH_MILL_FU.ORTHO_FRONT) and vtN:getY() > -GEO.EPS_SMALL, MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
@@ -185,6 +185,9 @@ function ProcessLongCut.GetSCC( Proc, nFacet, sMachining, nFaceUse, bInvert, nCu
       else
          nSCC = EgtIf( ( vtAux:getY() > -GEO.EPS_SMALL), MCH_SCC.ADIR_YP, MCH_SCC.ADIR_YM)
       end
+   -- per PF o simili e lama con aggregato lo posiziono per stare il più lontano possibile dalla trave
+   elseif ( bIsBlade and bIsTopBlade) then
+      nSCC = MCH_SCC.ADIR_XP
    -- per PF o simili e lama senza aggregato o fresa non do alcuna preferenza
    else
       nSCC = MCH_SCC.NONE

LuaLibs/ProcessSplit.lua

@@ -475,7 +475,7 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
 
       -- per travi alte faccio faccio dei tagli orizzontali aggiuntivi
       local _, _, dimV = BL.GetFaceHvRefDim( Proc.Id, 0, b3Raw)
-      local dMinTailScrapForHorizontalCuts = 10
+      local dMinTailScrapForHorizontalCuts = 10.123
       local bAreHorizontalCutsNeeded = ( dimV > BD.MAX_LEN_DICE) and not bBigSectionCut and ( dLenEndRaw > dMinTailScrapForHorizontalCuts - 10 * GEO.EPS_SMALL)
       if bAreHorizontalCutsNeeded then
          local nHorizontalCuts = ceil ( dimV / BD.MAX_DIM_DICE) - 1
@@ -489,21 +489,21 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId, nOrd, sDownOrSideOrSt
                local nForceWorkSide = MCH_MILL_WS.LEFT
                local bForceInvert = true
                local nForceSCC = MCH_SCC.ADIR_XM
-               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0 , sCutting, dSawDiam, nFaceUse, nil, -0.1 - dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, '', b3Raw, bForceInvert, nForceWorkSide, nForceSCC)
-               if not bOk then return bOk, sErr end
+               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0 , sCutting, dSawDiam, nFaceUse, nil, -0.1 - dCutXOffset, BD.CUT_SIC, dHorizontalCutOffset, 0, 0, 'Precut;', b3Raw, bForceInvert, nForceWorkSide, nForceSCC)
+               if not bOk then return false, sErr end
             end
             -- se necessario taglio verticale doppio, eseguo l'opposto
             if bDoubleCut then
                -- gli accorciamenti vanno invertiti per il taglio opposto
                local dAccStartDoubleCut, dAccEndDoubleCut = dAccEnd, dAccStart
-               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_FRONT, nil, dCutExtra, BD.CUT_SIC, dCutXOffset, dAccStartDoubleCut, dAccEndDoubleCut, '', b3Raw, true)
+               local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_FRONT, nil, dCutExtra, BD.CUT_SIC, dCutXOffset, dAccStartDoubleCut, dAccEndDoubleCut, 'Precut;', b3Raw, true)
                if not bOk then return false, sErr end
             end
             -- taglio verticale
-            local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, nil, dCutExtra, BD.CUT_SIC, dCutXOffset, dAccStart, dAccEnd, '', b3Raw)
-            if not bOk then return bOk, sErr end
+            local bOk, sErr = Fbs.MakeOne( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, nil, dCutExtra, BD.CUT_SIC, dCutXOffset, dAccStart, dAccEnd, 'Cut;', b3Raw)
+            if not bOk then return false, sErr end
          end
-         return true, sWarn
+         return true, sWarn, nNewPhase
       end
 
       -- se necessari tagli in doppio, eseguo gli opposti

Version.lua

@@ -2,5 +2,5 @@
 -- Gestione della versione di Beam
 
 NAME = 'Beam'
-VERSION = '2.5d1'
+VERSION = '2.5d2'
 MIN_EXE = '2.5c1'