DataBeam :

- in travi con scarico a caduta migliorata gestione di taglio parziale obliquo
- in travi con scarico a caduta aggiunta gestione in anticipo di profili qunado fatti con solo smusso.

LuaLibs/ProcessProfHead.lua

@@ -1,8 +1,9 @@
--- ProcessProfHead.lua by Egaltech s.r.l. 2021/10/12
+-- ProcessProfHead.lua by Egaltech s.r.l. 2022/02/02
 -- Gestione calcolo profilo di testa per Travi
 -- 2021/05/03 Aggiunta gestione smusso da sopra e sotto per macchina con testa sotto.
 -- 2021/06/28 Per macchine con testa sotto, smussi di lato con questa testa se non c'è lav.ne da sopra.
 -- 2021/10/12 Estesa gestione di testa da sotto, se presente.
+-- 2022/02/02 Aggiunta funzione OnlyChamfer.
 
 -- Tabella per definizione modulo
 local ProcessProfHead = {}
@@ -56,6 +57,12 @@ function ProcessProfHead.Classify( Proc, b3Raw)
    end
 end
 
+---------------------------------------------------------------------
+-- Verifico se richiesto il solo smusso
+function ProcessProfHead.OnlyChamfer( Proc)
+   return (( EgtGetInfo( Proc.Id, sDepthChamferMill, 'd') or 0) > 0.1 and EgtGetInfo( Proc.Id, sPreemptiveChamfer, 'i') == 1)
+end
+
 ---------------------------------------------------------------------
 local function GetSawCutData( AuxId, vtN)
    -- assegno la normale
@@ -120,12 +127,12 @@ local function VerifyCham( Proc, AuxId, nRawId, bMakeVertCham, sDephtCham, sOnly
    local b3Raw = EgtGetRawPartBBox( nRawId)
    -- verifico che lo smusso sia richiesto
    local dDepth = EgtGetInfo( Proc.Id, sDephtCham, 'd') or 0
-   if dDepth > 0 then
+   if dDepth > 0.1 then
       nChamfer = 1
    end
    -- verifico se posso fare solo lo smusso
    if EgtGetInfo( Proc.Id, sOnlyCham, 'i') == 1 then
-      if dDepth > 0 then
+      if nChamfer == 1 then
          nChamfer = nChamfer + 1
       -- altrimenti se non ho l'affondamento esco
       else