diff --git a/BatchProcess.lua b/BatchProcess.lua index 2983ed7..f41ad50 100644 --- a/BatchProcess.lua +++ b/BatchProcess.lua @@ -1,4 +1,4 @@ --- BatchProcess.lua by Egaltech s.r.l. 2021/08/04 +-- BatchProcess.lua by Egaltech s.r.l. 2022/04/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. @@ -22,6 +22,7 @@ -- 2021/02/25 Aggiunta gestione tipo scarico (standard, lav. incomplete, a caduta). -- 2021/06/16 Se disponibile si aggiunge la versione dell'eseguibile alle info del programma CN. -- 2021/08/04 Direzione vista simulazione da BD.SIMUL_VIEW_DIR se esiste. +-- 2022/04/28 In info generazione aggiunta indicazione se 64bit. -- Intestazioni require( 'EgtBase') @@ -521,10 +522,11 @@ end -- *** Genero programma CN *** ( se richiesto) if BEAM.FLAG == 0 or BEAM.FLAG == 4 then EgtOutLog( ' +++ Generating NC part program >>>') - local sInfo = 'EgtCAM5 - ' + local sInfo = 'EgtCAM5' .. EgtIf( EgtIs64bit(), ' 64bit', '') if EgtGetExeVersion then - sInfo = 'EgtCAM5 ver.' .. EgtGetExeVersion() .. ' - ' + sInfo = sInfo .. ' ver.' .. EgtGetExeVersion() end + sInfo = sInfo .. ' - ' if not EgtGenerate( '', sInfo .. sNgeFile) then BEAM.ERR = 20 local _, sName, _ = EgtSplitPath( BEAM.FILE) diff --git a/BatchProcessNew.lua b/BatchProcessNew.lua index 70fb0c9..7469ad1 100644 --- a/BatchProcessNew.lua +++ b/BatchProcessNew.lua @@ -1,4 +1,4 @@ --- BatchProcessNew.lua by Egaltech s.r.l. 2022/02/09 +-- BatchProcessNew.lua by Egaltech s.r.l. 2022/04/28 -- Gestione calcolo batch disposizione e lavorazioni per Travi -- 2021/01/07 Per nuova interfaccia Egt. -- 2021/01/15 CREATE_BAR ora FLAG = 6 (prima 5). @@ -9,6 +9,7 @@ -- 2021/08/04 Direzione vista simulazione da BD.SIMUL_VIEW_DIR se esiste. -- 2022/01/07 Per CUTID/TASKID senza ToProcess si verificano anche eventuali Duplo. -- 2022/02/09 Aggiornato come Wall per gestione errori e verifica attrezzaggio utensili. +-- 2022/04/28 In info generazione aggiunta indicazione se 64bit. -- Intestazioni require( 'EgtBase') @@ -621,10 +622,11 @@ end -- *** Genero programma CN *** ( se richiesto) if BEAM.FLAG == 0 or BEAM.FLAG == 4 then EgtOutLog( ' +++ Generating NC part program >>>') - local sInfo = 'EgtCAM5 - ' + local sInfo = 'EgtCAM5' .. EgtIf( EgtIs64bit(), ' 64bit', '') if EgtGetExeVersion then - sInfo = 'EgtCAM5 ver.' .. EgtGetExeVersion() .. ' - ' + sInfo = sInfo .. ' ver.' .. EgtGetExeVersion() end + sInfo = sInfo .. ' - ' if not EgtGenerate( '', sInfo .. sNgeFile) then BEAM.ERR = 20 local _, sName, _ = EgtSplitPath( BEAM.FILE)