diff --git a/LuaLibs/BeamExec.lua b/LuaLibs/BeamExec.lua
index 3a90887..28a0b9c 100644
--- a/LuaLibs/BeamExec.lua
+++ b/LuaLibs/BeamExec.lua
@@ -304,9 +304,9 @@ local function CollectFeatures( PartId, b3Raw, dCurrOvmH)
                      Proc2.Flg = -2
                      Proc2.Box = BBox3d( Proc.Box)
                      Proc2.Fct = Proc.Fct
+                     Proc2.Diam = Proc.Diam
                      Proc2.Head = Proc.Head
                      Proc2.Tail = Drill.IsTailFeature( Proc2, b3Raw)
-                     Proc2.Diam = Proc.Diam
                      Proc2.Fcs = Proc.Fce
                      Proc2.Fce = Proc.Fcs
                      table.insert( vProc, Proc2)
@@ -341,12 +341,12 @@ local function OrderFeatures( vProc, b3Raw)
       if B2.Tail and ( Split.Identify( B1) or not B1.Tail) then
          return true
       end
-      -- se primo è taglio longitudinale completo, dopo tutte le altre feature non di coda
-      if abs( B1.Box:getDimX() - b3Raw:getDimX()) < 100 then
+      -- se primo è taglio longitudinale completo o altra lav. lunga, dopo tutte le altre feature non di coda
+      if abs( B1.Box:getDimX() - b3Raw:getDimX()) < 0.2 * b3Raw:getDimX() then
          return B1.Box:getMin():getX() + 50 > B2.Box:getCenter():getX()
       end
-      -- se secondo è taglio longitudinale completo, dopo tutte le altre feature non di coda
-      if abs( B2.Box:getDimX() - b3Raw:getDimX()) < 100 then
+      -- se secondo è taglio longitudinale completo o altra lav. lunga, dopo tutte le altre feature non di coda
+      if abs( B2.Box:getDimX() - b3Raw:getDimX()) < 0.2 * b3Raw:getDimX() then
          return B1.Box:getCenter():getX() > B2.Box:getMin():getX() + 50
       end
       -- se primo è foro e l'altro no, lo penalizzo
@@ -667,7 +667,7 @@ function BeamExec.ProcessFeatures()
       local bOk, bSomeDown = ClassifyFeatures( vProc, b3Raw)
       if not bOk then
          bAddOk = false
-         sAddErrors = 'Warning : some feature not machinable due to orientation '
+         sAddErrors = 'Warning : some features not machinable'
       end
       -- debug
       if EgtGetDebugLevel() >= 1 then
diff --git a/LuaLibs/BeamLib.lua b/LuaLibs/BeamLib.lua
index aa86217..44deec4 100644
--- a/LuaLibs/BeamLib.lua
+++ b/LuaLibs/BeamLib.lua
@@ -593,7 +593,7 @@ function BeamLib.CalcLeadInOutTangGeom( ptP1, ptP2, vtN, dRad, vtRef, dCutExtra,
 end
 
 ---------------------------------------------------------------------
-function BeamLib.MakeOneFaceBySaw( nSurfId, nFacet, sCutting, dSawDiam, nOrthoOpposite, dCutExtra, dCutSic, dCutOffset, sNotes, b3Raw)
+function BeamLib.MakeOneFaceBySaw( nSurfId, nFacet, sCutting, dSawDiam, nOrthoOpposite, dVzLimDwnUp, dCutExtra, dCutSic, dCutOffset, sNotes, b3Raw)
    -- dati della faccia
    local ptC, vtN = EgtSurfTmFacetCenter( nSurfId, nFacet, GDB_ID.ROOT)
    -- linea o bilinea di lavorazione
@@ -604,7 +604,7 @@ function BeamLib.MakeOneFaceBySaw( nSurfId, nFacet, sCutting, dSawDiam, nOrthoOp
       return true, ''
    end
    vtV1 = - vtV1
-   local bInvert = ( ptP2:getZ() < ptP1:getZ())
+   local bInvert = ( ptP2:getZ() < ptP1:getZ() - 100 * GEO.EPS_SMALL)
    if bInvert then
       ptP1, ptP2 = ptP2, ptP1
       vtV1, vtV2 = vtV2, vtV1
@@ -626,7 +626,8 @@ function BeamLib.MakeOneFaceBySaw( nSurfId, nFacet, sCutting, dSawDiam, nOrthoOp
       vtTg = ptP2 - ptP1 ;   vtTg:normalize()
    end
    -- verifico se lavorazione con lama sotto e testa sopra
-   local bDownUp = ( vtN:getZ() < -0.5)
+   if not dVzLimDwnUp then dVzLimDwnUp = -0.5 end
+   local bDownUp = ( vtN:getZ() < dVzLimDwnUp)
    local nFaceUse = nOrthoOpposite
    if bDownUp then nFaceUse = BeamLib.GetOrtupOpposite( nOrthoOpposite) end
    local bWsRight = ( bInvert ~= bDownUp)
diff --git a/LuaLibs/FacesBySaw.lua b/LuaLibs/FacesBySaw.lua
index b77beba..680e573 100644
--- a/LuaLibs/FacesBySaw.lua
+++ b/LuaLibs/FacesBySaw.lua
@@ -115,7 +115,7 @@ function FacesBySaw.MakeTwo( Proc, nPhase, nRawId, nPartId, sCutName)
          local nOrtOpp = EgtIf( ( i % 2) == 1, nOrthoOpposite[nSmaInd], nOrthoOpposite[nBigInd])
          -- lavoro la faccia
          for j = 1, #vCuts[i] do
-            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrtOpp, dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
+            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrtOpp, nil, dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
             if not bOk then
                return bOk, sErr
             end
@@ -124,10 +124,10 @@ function FacesBySaw.MakeTwo( Proc, nPhase, nRawId, nPartId, sCutName)
       return true
    else
       -- lavoro la prima faccia
-      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite[1], dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
+      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite[1], nil, dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
       if not bOk then return bOk, sErr end
       -- lavoro seconda faccia
-      bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 1, sCutting, dSawDiam, nOrthoOpposite[2], dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
+      bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 1, sCutting, dSawDiam, nOrthoOpposite[2], nil, dCutExtra, BD.CUT_SIC, 0, nil, b3Raw)
       if not bOk then return bOk, sErr end
       return true
    end
diff --git a/LuaLibs/ProcessCut.lua b/LuaLibs/ProcessCut.lua
index 2de0c4f..1881a27 100644
--- a/LuaLibs/ProcessCut.lua
+++ b/LuaLibs/ProcessCut.lua
@@ -131,7 +131,7 @@ function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
                   if j ~= 1 then
                      nNewOrthoOpposite = EgtIf( nOrthoOpposite == MCH_MILL_FU.ORTHO_FRONT, MCH_MILL_FU.ORTHO_BACK, MCH_MILL_FU.ORTHO_FRONT)
                   end
-                  local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nNewOrthoOpposite, 0.1, BD.CUT_SIC, 0, nil, b3Raw)
+                  local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nNewOrthoOpposite, nil, 0.1, BD.CUT_SIC, 0, nil, b3Raw)
                   if not bOk then
                      return bOk, sErr
                   end
@@ -139,7 +139,7 @@ function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
                -- tutti gli altri casi vengono saltati
             -- caso generale
             else
-               local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, 0.1, BD.CUT_SIC, 0, nil, b3Raw)
+               local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, - 0.1, 0.1, BD.CUT_SIC, 0, nil, b3Raw)
                if not bOk then
                   return bOk, sErr
                end
@@ -157,7 +157,7 @@ function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       else
          nOrthoOpposite = MCH_MILL_FU.ORTHO_BACK
       end
-      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
+      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, nil, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
       if not bOk then
          return bOk, sErr
       end
diff --git a/LuaLibs/ProcessDoubleCut.lua b/LuaLibs/ProcessDoubleCut.lua
index 2a999d6..f4d5e6b 100644
--- a/LuaLibs/ProcessDoubleCut.lua
+++ b/LuaLibs/ProcessDoubleCut.lua
@@ -137,7 +137,7 @@ function ProcessDoubleCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
          end
          -- lavoro la faccia
          for j = 1, #vCuts[i] do
-            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
             if not bOk then
                return bOk, sErr
             end
@@ -173,7 +173,7 @@ function ProcessDoubleCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
                nOrthoOpposite = EgtIf( bOver, MCH_MILL_FU.ORTHO_DOWN, MCH_MILL_FU.ORTHO_TOP)
             end
          end
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, i - 1, sCutting, dSawDiam, nOrthoOpposite, dExtraCut, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, i - 1, sCutting, dSawDiam, nOrthoOpposite, nil, dExtraCut, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then
             return bOk, sErr
          end
diff --git a/LuaLibs/ProcessDrill.lua b/LuaLibs/ProcessDrill.lua
index c4ad6c5..9841130 100644
--- a/LuaLibs/ProcessDrill.lua
+++ b/LuaLibs/ProcessDrill.lua
@@ -13,6 +13,10 @@ EgtOutLog( ' ProcessDrill started', 1)
 local BD = require( 'BeamData')
 local ML = require( 'MachiningLib')
 
+-- Costanti
+local TH_RAD = 35             -- raggio portautensile
+local COS_SLANT_LIM = 0.82    -- 35deg da piano
+
 ---------------------------------------------------------------------
 -- Riconoscimento della feature
 function ProcessDrill.Identify( Proc)
@@ -91,6 +95,10 @@ function ProcessDrill.Classify( Proc, b3Raw)
       vtExtr = - vtExtr
       ptCen = ptCen + vtExtr * dLen
    end
+   -- verifico se troppo inclinato e quindi non lavorabile
+   if not ( Proc.Fcs == 5 or Proc.Fcs == 6) and abs( vtExtr:getX()) > COS_SLANT_LIM then
+      return false, false
+   end
    local bOpen = ( Proc.Fce ~= 0)
    local bFaceDown = ( ptCen:getZ() < b3Raw:getMin():getZ() + dDiam) 
    -- verifico se il foro è fattibile solo da sotto
@@ -131,6 +139,24 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       EgtOutLog( sErr)
       return false, sErr
    end
+   -- recupero i dati dell'utensile
+   local dMaxDepth = 20
+   if EgtMdbSetCurrMachining( sDrilling) then
+      local sTuuid = EgtMdbGetCurrMachiningParam( MCH_MP.TUUID)
+      if EgtTdbSetCurrTool( EgtTdbGetToolFromUUID( sTuuid) or '') then
+         dMaxDepth = EgtTdbGetCurrToolMaxDepth() or dMaxDepth
+      end
+   end
+   -- se foro intermedio e inclinato, limito il massimo affondamento
+   if not ( Proc.Fcs == 5 or Proc.Fcs == 6) then
+      local CosB = abs( vtExtr:getX())
+      if CosB < COS_SLANT_LIM then
+         local TgA = CosB / sqrt( 1 - CosB * CosB)
+         dMaxDepth = dMaxDepth - TH_RAD * TgA
+      else
+         dMaxDepth = 0
+      end
+   end
    -- inserisco la lavorazione
    local sName = 'Drill_' .. ( EgtGetName( Proc.Id) or tostring( Proc.Id))
    local nMchId = EgtAddMachining( sName, sDrilling)
@@ -153,10 +179,12 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
       nSCC = MCH_SCC.ADIR_YP
    end
    EgtSetMachiningParam( MCH_MP.SCC, nSCC)
-   -- se foro dai due lati, aggiusto l'affondamento
+   -- aggiusto l'affondamento
+   local dDepth = min( dLen, dMaxDepth)
    if Proc.Flg == 2 or Proc.Flg == -2 then
-      EgtSetMachiningParam( MCH_MP.DEPTH, dLen / 2 + BD.DRILL_OVERLAP)
+      local dDepth = min( dLen / 2 + BD.DRILL_OVERLAP, dMaxDepth)
    end
+   EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)
    -- dichiaro non si generano sfridi per VMill
    EgtSetMachiningParam( MCH_MP.USERNOTES, 'VMRS=0;')
    -- eseguo
diff --git a/LuaLibs/ProcessHeadCut.lua b/LuaLibs/ProcessHeadCut.lua
index 91ff6a7..ea2f973 100644
--- a/LuaLibs/ProcessHeadCut.lua
+++ b/LuaLibs/ProcessHeadCut.lua
@@ -60,14 +60,14 @@ function ProcessHeadCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
    if bDoubleCut then
       for i = nCuts, 1, -1 do
          local dCutOffset = ( i - 1) * dOffsL
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_BACK, dCutExtra, BD.CUT_SIC, dCutOffset, '', b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_BACK, nil, dCutExtra, BD.CUT_SIC, dCutOffset, '', b3Raw)
          if not bOk then return false, sErr end
       end
    end
    -- eseguo i tagli necessari
    for i = nCuts, 1, -1 do
       local dCutOffset = ( i - 1) * dOffsL
-      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, dCutExtra, BD.CUT_SIC, dCutOffset, '', b3Raw)
+      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, nil, dCutExtra, BD.CUT_SIC, dCutOffset, '', b3Raw)
       if not bOk then return false, sErr end
    end
    return true
diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index 496bdd5..ce5091e 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -1,4 +1,4 @@
--- ProcessLapJoint.lua by Egaltech s.r.l. 2019/06/14
+-- ProcessLapJoint.lua by Egaltech s.r.l. 2019/06/20
 -- Gestione calcolo mezzo-legno per Travi
 
 -- Tabella per definizione modulo
@@ -359,7 +359,7 @@ local function MakeByChainOrSaw( Proc, nPhase, nRawId, nPartId, nFacInd, rfFac,
       end
       for i = 1, nStep do
          local dOffs = ( i - 1) * dStep
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, nFacAdj, sCutting, dSawDiam, nFaceUse, 0, BD.CUT_SIC, dOffs, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, nFacAdj, sCutting, dSawDiam, nFaceUse, nil, 0, BD.CUT_SIC, dOffs, nil, b3Raw)
          if not bOk then
             return bOk, sErr
          end
@@ -522,12 +522,12 @@ end
 ---------------------------------------------------------------------
 function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId)
    -- limiti di fresatura semplice
-   local MAX_MILL_X = 80
+   local MAX_MILL_XZ = 80
    local MAX_MILL_VOL = ( 80 * 240 * 20) / 2
    -- una faccia
    if Proc.Fct == 1 then
       -- se piccola, con fresa
-      if Proc.Box:getDimX() < MAX_MILL_X or Proc.Box:getDimX() * Proc.Box:getDimY() * Proc.Box:getDimZ() < MAX_MILL_VOL then
+      if ( Proc.Box:getDimX() < MAX_MILL_XZ and Proc.Box:getDimZ() < MAX_MILL_XZ) or Proc.Box:getDimX() * Proc.Box:getDimY() * Proc.Box:getDimZ() < MAX_MILL_VOL then
          return MakeOneFaceByMill( Proc, nPhase, nRawId, nPartId)
       -- altrimenti, con lama
       else
@@ -535,8 +535,11 @@ function ProcessLapJoint.Make( Proc, nPhase, nRawId, nPartId)
       end
    -- due facce
    elseif Proc.Fct == 2 then
-      -- se piccole, con fresa
-      if Proc.Box:getDimX() < MAX_MILL_X or Proc.Box:getDimX() * Proc.Box:getDimY() * Proc.Box:getDimZ() < MAX_MILL_VOL then
+      -- determino l'angolo tra le facce
+      local _, _, _, dAng = EgtSurfTmFacetsContact( Proc.Id, 0, 1, GDB_ID.ROOT)
+      -- se ortogonali e piccole, con fresa
+      if abs( dAng + 90) < 1 and
+         (( Proc.Box:getDimX() < MAX_MILL_XZ and Proc.Box:getDimZ() < MAX_MILL_XZ) or Proc.Box:getDimX() * Proc.Box:getDimY() * Proc.Box:getDimZ() < MAX_MILL_VOL) then
          return MakeTwoFacesByMill( Proc, nPhase, nRawId, nPartId)
       -- altrimenti, con lama
       else
diff --git a/LuaLibs/ProcessRidgeLap.lua b/LuaLibs/ProcessRidgeLap.lua
index 7891dcf..dc97615 100644
--- a/LuaLibs/ProcessRidgeLap.lua
+++ b/LuaLibs/ProcessRidgeLap.lua
@@ -118,7 +118,7 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       -- se va fatto, inserisco la lavorazione
       if bCut then
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtN[vFaceOrd[3]])
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[1] - 1, sCutting, dSawDiam, nOrthoOpposite, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[1] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sErr end
       end
    end
@@ -155,7 +155,7 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
          end
          -- lavoro la faccia
          for j = 1, #vCuts[i] do
-            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
             if not bOk then
                return bOk, sErr
             end
@@ -166,14 +166,14 @@ function ProcessRidgeLap.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       if vFaceOrd[2] ~= 0 then
          -- inserisco la lavorazione
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtN[vFaceOrd[3]])
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sErr end
       end
       -- taglio sulla faccia intermedia
       if vFaceOrd[3] ~= 0 then
          -- inserisco la lavorazione
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtN[vFaceOrd[2]])
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sErr end
       end
    end
diff --git a/LuaLibs/ProcessSimpleScarf.lua b/LuaLibs/ProcessSimpleScarf.lua
index 3f44cb7..3591cb4 100644
--- a/LuaLibs/ProcessSimpleScarf.lua
+++ b/LuaLibs/ProcessSimpleScarf.lua
@@ -117,7 +117,7 @@ function ProcessSimpleScarf.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       -- se va fatto, inserisco la lavorazione
       if bCut then
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef)
-         local bOk, sNameOrErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[1] - 1, sCutting, dSawDiam, nOrthoOpposite, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sNameOrErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[1] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, BD.CUT_EXTRA, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sNameOrErr end
       end
    end
@@ -153,7 +153,7 @@ function ProcessSimpleScarf.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
          end
          -- lavoro la faccia
          for j = 1, #vCuts[i] do
-            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+            local bOk, sErr = BL.MakeOneFaceBySaw( vCuts[i][j], 0, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
             if not bOk then
                return bOk, sErr
             end
@@ -165,7 +165,7 @@ function ProcessSimpleScarf.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
       if vFaceOrd[2] ~= 0 then
          -- inserisco la lavorazione
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef)
-         local bOk, sNameOrErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sNameOrErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[2] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sNameOrErr end
          if #sNameOrErr > 0 then bIntCut = true end
       end
@@ -182,7 +182,7 @@ function ProcessSimpleScarf.Make( Proc, nPhase, nRawId, nPartId, dOvmHead)
             end
          end
          local nOrthoOpposite = BL.GetNearestOrthoOpposite( vtRef2)
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, 0, BD.CUT_SIC, 0, nil, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, vFaceOrd[3] - 1, sCutting, dSawDiam, nOrthoOpposite, nil, 0, BD.CUT_SIC, 0, nil, b3Raw)
          if not bOk then return bOk, sErr end
       end
    end
diff --git a/LuaLibs/ProcessSplit.lua b/LuaLibs/ProcessSplit.lua
index 2f25434..8aa6bd6 100644
--- a/LuaLibs/ProcessSplit.lua
+++ b/LuaLibs/ProcessSplit.lua
@@ -70,7 +70,7 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId)
       for i = nCuts, 1, -1 do
          local dCutOffset = ( i - 1) * dOffsL
          local sNotes = EgtIf( bSplit, 'Presplit;', 'Precut;')
-         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_BACK, dCutExtra, BD.CUT_SIC, dCutOffset, sNotes, b3Raw)
+         local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, MCH_MILL_FU.ORTHO_BACK, nil, dCutExtra, BD.CUT_SIC, dCutOffset, sNotes, b3Raw)
          if not bOk then return false, true, sErr end
       end
    end
@@ -83,7 +83,7 @@ function ProcessSplit.Make( Proc, nPhase, nRawId, nPartId)
       else
          sNotes = EgtIf( i == 1, 'Cut;', 'Precut;')
       end
-      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, dCutExtra, BD.CUT_SIC, dCutOffset, sNotes, b3Raw)
+      local bOk, sErr = BL.MakeOneFaceBySaw( Proc.Id, 0, sCutting, dSawDiam, nOrthoOpposite, nil, dCutExtra, BD.CUT_SIC, dCutOffset, sNotes, b3Raw)
       if not bOk then return false, true, sErr end
    end
    -- ritorno anche flag di passaggio a fase successiva