From 4b5af90c95ed56b7fb59a86acfe54e0fec2b0515 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Mon, 30 Dec 2019 09:18:50 +0000
Subject: [PATCH] DataBeam : - in BatchProcess tolta uscita in caso di errore
 su features (permette di eseguire la verifica collisione) - migliorata
 gestione dei fori.

---
 BatchProcess.lua         |  4 ++--
 LuaLibs/ProcessDrill.lua | 11 ++++++++---
 2 files changed, 10 insertions(+), 5 deletions(-)

diff --git a/BatchProcess.lua b/BatchProcess.lua
index 0fa5f39..1d1254e 100644
--- a/BatchProcess.lua
+++ b/BatchProcess.lua
@@ -1,4 +1,4 @@
--- BatchProcess.lua by Egaltech s.r.l. 2019/12/20
+-- BatchProcess.lua by Egaltech s.r.l. 2019/12/28
 -- Gestione calcolo batch disposizione e lavorazioni per Travi
 -- 2019/07/11 Aggiunta gestione stato rotazione di feature per TS3.
 -- 2019/07/16 Aggiunta gestione modalità oltre 10 per impostazione macchina e uscita.
@@ -10,6 +10,7 @@
 -- 2019/10/09 In ImportBtl aggiunto flag per usare UserAttr.
 -- 2019/12/09 Gestione conservazione modifiche su barre.
 -- 2019/12/20 Gestione LOAD90 tramite file ausiliario (btm).
+-- 2019/12/28 Tolta uscita in caso di errore su features.
 
 -- Intestazioni
 require( 'EgtBase')
@@ -370,7 +371,6 @@ if bToProcess then
    if #sOutput > 0 then EgtOutLog( sOutput) end
    if nErrCnt > 0 then
       PostErrView( 19, sOutput)
-      return
    elseif nWarnCnt > 0 then
       PostWarnView( 19, sOutput)
    end
diff --git a/LuaLibs/ProcessDrill.lua b/LuaLibs/ProcessDrill.lua
index 3aeed17..3b1f4f1 100644
--- a/LuaLibs/ProcessDrill.lua
+++ b/LuaLibs/ProcessDrill.lua
@@ -1,4 +1,4 @@
--- ProcessDrill.lua by Egaltech s.r.l. 2019/10/22
+-- ProcessDrill.lua by Egaltech s.r.l. 2019/10/28
 -- Gestione calcolo forature per Travi
 
 -- Tabella per definizione modulo
@@ -199,9 +199,14 @@ function ProcessDrill.Make( Proc, nPhase, nRawId, nPartId)
    EgtSetMachiningParam( MCH_MP.DEPTH, dDepth)
    -- Note utente con dichiarazione nessuna generazione sfridi per Vmill
    local sUserNotes = 'VMRS=0;'
-   -- se foratura, aggiungo alle note massima elevazione (coincide con affondamento)
+   -- se foratura
    if nType == 'Drill' then
-      sUserNotes = sUserNotes .. 'MaxElev=' .. EgtNumToString( dDepth, 1) .. ','
+      -- aggiungo alle note massima elevazione (coincide con affondamento)
+      sUserNotes = sUserNotes .. 'MaxElev=' .. EgtNumToString( dDepth, 1) .. ';'
+      -- se foro passante, aggiungo questa qualifica alle note
+      if bOpen then
+         sUserNotes = sUserNotes .. 'Open=1;'
+      end
    end
    EgtSetMachiningParam( MCH_MP.USERNOTES, sUserNotes)
    -- eseguo