diff --git a/BatchProcess.lua b/BatchProcess.lua
index 66271c8..9aefe5f 100644
--- a/BatchProcess.lua
+++ b/BatchProcess.lua
@@ -1,4 +1,4 @@
--- BatchProcess.lua by Egaltech s.r.l. 2021/02/25
+-- BatchProcess.lua by Egaltech s.r.l. 2021/06/16
 -- 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.
@@ -20,6 +20,7 @@
 -- 2021/02/14 Modifica per macchine senza BD.MAX_WIDTH2 e BD.MAX_HEIGHT2.
 -- 2021/02/22 Aggiunto anche controllo su file macchina mlde per aggiornare calcoli.
 -- 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.
 
 -- Intestazioni
 require( 'EgtBase')
@@ -505,7 +506,11 @@ end
 -- *** Genero programma CN *** ( se richiesto)
 if BEAM.FLAG == 0 or BEAM.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
       BEAM.ERR = 20
       local _, sName, _ = EgtSplitPath( BEAM.FILE)
       BEAM.MSG = 'Error generating NC part program : ' .. sName
diff --git a/BatchProcessNew.lua b/BatchProcessNew.lua
index d86658b..b5578ce 100644
--- a/BatchProcessNew.lua
+++ b/BatchProcessNew.lua
@@ -1,10 +1,11 @@
--- BatchProcess.lua by Egaltech s.r.l. 2021/06/02
+-- BatchProcess.lua by Egaltech s.r.l. 2021/06/16
 -- 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).
 -- 2021/02/04 Se necessario ricalcolo allora si aggiorna anche l'attrezzaggio.
 -- 2021/02/14 Modifica per macchine senza BD.MAX_WIDTH2 e BD.MAX_HEIGHT2.
 -- 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.
 
 -- Intestazioni
 require( 'EgtBase')
@@ -596,7 +597,11 @@ end
 -- *** Genero programma CN *** ( se richiesto)
 if BEAM.FLAG == 0 or BEAM.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
       BEAM.ERR = 20
       local _, sName, _ = EgtSplitPath( BEAM.FILE)
       BEAM.MSG = 'Error generating NC part program : ' .. sName