diff --git a/BatchProcess.lua b/BatchProcess.lua index d853571..1058fe1 100644 --- a/BatchProcess.lua +++ b/BatchProcess.lua @@ -1,4 +1,4 @@ --- BatchProcess.lua by Egaltech s.r.l. 2020/01/08 +-- BatchProcess.lua by Egaltech s.r.l. 2020/01/14 -- 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. @@ -12,6 +12,7 @@ -- 2019/12/20 Gestione LOAD90 tramite file ausiliario (btm). -- 2019/12/28 Tolta uscita in caso di errore su features. -- 2020/01/08 Aggiunta seconda sezione limite (BD.MAX_WIDTH2 x BD.MAX_HEIGHT2). +-- 2020/01/14 Si carica ultimo gruppo di lavoro. Corretto problema con nome non definito in segnalazione errore in generazione o stima. -- Intestazioni require( 'EgtBase') @@ -409,7 +410,7 @@ else EgtSaveFile( sNgeFile) end -- Passo in modalità lavora - EgtSetCurrMachGroup() + EgtSetCurrMachGroup( EgtGetLastMachGroup()) end -- *** Eseguo simulazione in cieco *** ( se richiesta verifica) @@ -450,6 +451,7 @@ end if BEAM.FLAG == 0 or BEAM.FLAG == 4 then if not EgtGenerate( '', 'EgtCAM5 - ' .. sNgeFile) then BEAM.ERR = 20 + local _, sName, _ = EgtSplitPath( BEAM.FILE) BEAM.MSG = 'Error generating NC part program : ' .. sName WriteErrToLogFile( BEAM.ERR, BEAM.MSG) PostErrView( BEAM.ERR, BEAM.MSG) @@ -460,6 +462,7 @@ end -- *** Eseguo stima tempi *** if not EgtEstimate( '', 'EgtCAM5 - ' .. sNgeFile) then BEAM.ERR = 21 + local _, sName, _ = EgtSplitPath( BEAM.FILE) BEAM.MSG = 'Error estimating production time : ' .. sName WriteErrToLogFile( BEAM.ERR, BEAM.MSG) PostErrView( BEAM.ERR, BEAM.MSG)