DataBeam :

- in BatchProcess tolta uscita in caso di errore su features (permette di eseguire la verifica collisione)
- migliorata gestione dei fori.
This commit is contained in:
Dario Sassi
2019-12-30 09:18:50 +00:00
parent 47819ef9a6
commit 4b5af90c95
2 changed files with 10 additions and 5 deletions
+2 -2
View File
@@ -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
+8 -3
View File
@@ -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