diff --git a/LuaLibs/ProcessDrill.lua b/LuaLibs/ProcessDrill.lua
index 6576192..1e241ad 100644
--- a/LuaLibs/ProcessDrill.lua
+++ b/LuaLibs/ProcessDrill.lua
@@ -45,14 +45,14 @@ end
 
 ---------------------------------------------------------------------
 local function FindDrilling( dDiam)
-   -- ricerca sulle forature con punte, dal diametro maggiore al minore
+   -- ricerca sulle forature, dal diametro maggiore al minore
    for i = #Drillings, 1, -1 do
       local Drilling = Drillings[i]
       if ( Drilling.Type == 'Drill' and Drilling.Diam < dDiam + 10 * GEO.EPS_SMALL  and  Drilling.Diam > dDiam - BD.DRILL_TOL - 10 * GEO.EPS_SMALL) then
          return i, Drilling.Name, Drilling.Type
       end
    end
-   -- ricerca sull svuotature con frese, dal diametro maggiore al minore
+   -- ricerca sulle svuotature, dal diametro maggiore al minore
    for i = #Drillings, 1, -1 do
       local Drilling = Drillings[i]
       if ( Drilling.Type == 'Pocket' and dDiam > Drilling.Diam + 10 * GEO.EPS_SMALL) then
@@ -169,6 +169,8 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    if Proc.Flg == 2 or Proc.Flg == -2 then
       EgtSetMachiningParam( MCH_MP.DEPTH, dLen / 2 + BD.DRILL_OVERLAP)
    end
+   -- dichiaro non si generano sfridi per VMill
+   EgtSetMachiningParam( MCH_MP.USERNOTES, 'VMRS=0;')
    -- eseguo
    if not EgtApplyMachining( true, false) then
       local _, sErr = EgtGetLastMachMgrError()
diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index c05fd62..ffc2037 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -1,4 +1,4 @@
--- ProcessLapJoint.lua by Egaltech s.r.l. 2019/03/26
+-- ProcessLapJoint.lua by Egaltech s.r.l. 2019/04/24
 -- Gestione calcolo mezzo-legno per Travi
 
 -- Tabella per definizione modulo
@@ -158,7 +158,7 @@ local function MakeOneFaceByMill( Proc, nPhase, nRawId, nPartId)
    -- imposto lato di correzione
    EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
    -- imposto posizione braccio porta testa
-   if vtN:getY() <= 0 then
+   if vtN:getY() < GEO.EPS_SMALL then
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YM)
    else
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YP)
@@ -239,7 +239,7 @@ local function MakeTwoFacesByMill( Proc, nPhase, nRawId, nPartId)
    -- imposto lato di correzione
    EgtSetMachiningParam( MCH_MP.WORKSIDE, MCH_MILL_WS.LEFT)
    -- imposto posizione braccio porta testa
-   if vtN[nFacInd]:getY() <= 0 then
+   if vtN[nFacInd]:getY() < GEO.EPS_SMALL then
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YM)
    else
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YP)
@@ -468,7 +468,7 @@ local function MakeMoreFacesByMillOrChain( Proc, nPhase, nRawId, nPartId)
    -- imposto uso faccia
    EgtSetMachiningParam( MCH_MP.FACEUSE, MCH_MILL_FU.ORTHO_CONT)
    -- imposto posizione braccio porta testa
-   if vtN:getY() <= 0 then
+   if vtN:getY() < GEO.EPS_SMALL then
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YM)
    else
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YP)
diff --git a/LuaLibs/ProcessMortise.lua b/LuaLibs/ProcessMortise.lua
index cfc38db..c92413d 100644
--- a/LuaLibs/ProcessMortise.lua
+++ b/LuaLibs/ProcessMortise.lua
@@ -1,4 +1,4 @@
--- ProcessMortise.lua by Egaltech s.r.l. 2018/03/23
+-- ProcessMortise.lua by Egaltech s.r.l. 2018/04/24
 -- Gestione calcolo mortase per Travi
 
 -- Tabella per definizione modulo
@@ -93,7 +93,7 @@ function ProcessMortise.Make( Proc, nPhase, nRawId, nPartId)
    -- aggiungo geometria
    EgtSetMachiningGeometry( {{ AuxId, -1}})
    -- imposto posizione braccio porta testa
-   if vtN:getY() < - GEO.EPS_SMALL then
+   if vtN:getY() < GEO.EPS_SMALL then
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YM)
    else
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YP)
diff --git a/LuaLibs/ProcessPocket.lua b/LuaLibs/ProcessPocket.lua
index 87d6e7e..19988d2 100644
--- a/LuaLibs/ProcessPocket.lua
+++ b/LuaLibs/ProcessPocket.lua
@@ -1,4 +1,4 @@
--- ProcessPocket.lua by Egaltech s.r.l. 2018/10/21
+-- ProcessPocket.lua by Egaltech s.r.l. 2019/04/24
 -- Gestione calcolo tasche per Travi
 
 -- Tabella per definizione modulo
@@ -82,7 +82,7 @@ function ProcessPocket.Make( Proc, nPhase, nRawId, nPartId)
    -- aggiungo geometria
    EgtSetMachiningGeometry( {{ Proc.Id, nFacInd}})
    -- imposto posizione braccio porta testa
-   if vtN:getY() < - GEO.EPS_SMALL then
+   if vtN:getY() < GEO.EPS_SMALL then
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YM)
    else
       EgtSetMachiningParam( MCH_MP.SCC, MCH_SCC.ADIR_YP)