diff --git a/BatchProcess.lua b/BatchProcess.lua index 67f4482..abaea9e 100644 --- a/BatchProcess.lua +++ b/BatchProcess.lua @@ -536,7 +536,11 @@ end -- *** Genero programma CN *** ( se richiesto) if WALL.FLAG == 0 or WALL.FLAG == 4 then EgtOutLog( ' +++ Generating NC part program >>>') - if not EgtGenerate( '', 'EgtCAM5 - ' .. sNgeFile) then + local sInfo = 'EgtCAM5 - ' + if EgtGetExeVersion then + sInfo = 'EgtCAM5 ver.' .. EgtGetExeVersion() .. ' - ' + end + if not EgtGenerate( '', sInfo .. sNgeFile) then WALL.ERR = 20 local _, sName, _ = EgtSplitPath( WALL.FILE) WALL.MSG = 'Error generating NC part program : ' .. sName diff --git a/BatchProcessNew.lua b/BatchProcessNew.lua index 29cf2ca..69f9d29 100644 --- a/BatchProcessNew.lua +++ b/BatchProcessNew.lua @@ -520,7 +520,11 @@ end -- *** Genero programma CN *** ( se richiesto) if WALL.FLAG == 0 or WALL.FLAG == 4 then EgtOutLog( ' +++ Generating NC part program >>>') - if not EgtGenerate( '', 'EgtCAM5 - ' .. sNgeFile) then + local sInfo = 'EgtCAM5 - ' + if EgtGetExeVersion then + sInfo = 'EgtCAM5 ver.' .. EgtGetExeVersion() .. ' - ' + end + if not EgtGenerate( '', sInfo .. sNgeFile) then WALL.ERR = 20 local _, sName, _ = EgtSplitPath( WALL.FILE) WALL.MSG = 'Error generating NC part program : ' .. sName