From c1032afc73af69e12b9e4e8e78027b51fcd1114d Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Tue, 23 Feb 2021 08:49:12 +0000
Subject: [PATCH] DataBeam : - modifiche per PF1250.

---
 LuaLibs/ProcessCut.lua      | 6 +++---
 LuaLibs/ProcessLapJoint.lua | 4 ++--
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/LuaLibs/ProcessCut.lua b/LuaLibs/ProcessCut.lua
index 892f32f..eab02e4 100644
--- a/LuaLibs/ProcessCut.lua
+++ b/LuaLibs/ProcessCut.lua
@@ -1,4 +1,4 @@
--- ProcessCut.lua by Egaltech s.r.l. 2021/02/21
+-- ProcessCut.lua by Egaltech s.r.l. 2021/02/23
 -- Gestione calcolo singoli tagli di lama per Travi
 
 -- Tabella per definizione modulo
@@ -691,9 +691,9 @@ function ProcessCut.Make( Proc, nPhase, nRawId, nPartId, dOvmHead, bFromBottom,
    if Proc.CutFront then
       return true
    end
-   -- abilitazione lavorazione da sotto (testa da sotto e direzione normale sotto -20deg)
+   -- abilitazione lavorazione da sotto (testa da sotto e direzione normale sotto -20deg e sbandamento oltre 10deg)
    local bTopHead = ( BD.DOWN_HEAD and vtN:getZ() > -0.342)
-   local bDownHead = ( BD.DOWN_HEAD and vtN:getZ() < -0.342)
+   local bDownHead = ( BD.DOWN_HEAD and vtN:getZ() < -0.342 and ( abs( vtN:getY()) > 0.174 or b3Raw:getDimY() > 2 * BD.MAX_DIM_HTCUT))
    -- recupero la lavorazione
    local sCutType = EgtIf( Proc.Head, 'HeadSide', 'TailSide')
    local sCutting = ML.FindCutting( sCutType .. EgtIf( bDownHead, '_H2', ''))
diff --git a/LuaLibs/ProcessLapJoint.lua b/LuaLibs/ProcessLapJoint.lua
index 6495be4..157fbb1 100644
--- a/LuaLibs/ProcessLapJoint.lua
+++ b/LuaLibs/ProcessLapJoint.lua
@@ -1,4 +1,4 @@
--- ProcessLapJoint.lua by Egaltech s.r.l. 2021/02/15
+-- ProcessLapJoint.lua by Egaltech s.r.l. 2021/02/23
 -- Gestione calcolo mezzo-legno per Travi
 -- 2019/10/08 Agg. gestione OpenPocket.
 -- 2021/01/24 Con sega a catena ora sempre impostato asse A.
@@ -3419,7 +3419,7 @@ local function MakeMoreFaces( Proc, nPhase, nRawId, nPartId, dOvmHead, bSinglePa
             end
             --EgtOutLog( 'Mortise Find Diam =' .. EgtNumToString( dDiam))
             local sPocketing
-            if BD.DOWN_HEAD and sMchFind and vtN:getZ() < -BD.NZ_MINA then sMchFind = sMchFind .. '_H2' end
+            if BD.DOWN_HEAD and sMchFind and vtN:getZ() < 0.174 then sMchFind = sMchFind .. '_H2' end
             if nUseRoughTool == 1 then
                sMyPocketing, dMyTDiam, dMyTMaxDepth = ML.FindPocketing( sMchFind, dDiam)
                if sMyPocketing and dMyTMaxDepth > 0.8 * dFacElev + dCollSic then