diff --git a/NestProcess.lua b/NestProcess.lua
index ff7c011..32f6c6d 100644
--- a/NestProcess.lua
+++ b/NestProcess.lua
@@ -1,4 +1,4 @@
--- NestProcess.lua by Egaltech s.r.l. 2021/05/26
+-- NestProcess.lua by Egaltech s.r.l. 2021/06/14
 -- Gestione nesting automatico pareti
 
 -- Intestazioni
@@ -118,7 +118,8 @@ end
 local sBaseDir = EgtGetSourceDir()
 EgtAddToPackagePath( sBaseDir .. 'LuaLibs\\?.lua')
 
--- Verifico che la macchina corrente sia abilitata per la lavorazione delle Travi
+-- Imposto la macchina corrente e verifico sia abilitata per la lavorazione delle Travi
+EgtSetCurrMachine( NEST.MACHINE)
 local sMachDir = EgtGetCurrMachineDir()
 if not EgtExistsFile( sMachDir .. '\\Beam\\BeamData.lua') then
    NEST.ERR = 12
@@ -166,7 +167,7 @@ while Raws.Count > 0 and PartsToFill( Parts) > 0 do
    local Res = ExecMaximumFilling( Raws, Parts)
    -- creo gruppo di lavorazione
    local MachGroupName = NewMachGroupName()
-   nMachGroup = EgtAddMachGroup( MachGroupName, sCurrMachName)
+   nMachGroup = EgtAddMachGroup( MachGroupName)
    EgtSetInfo( nMachGroup, "BARLEN", Raws.LenToFill)
    EgtSetInfo( nMachGroup, "AUTONEST", 1)
    -- scrivo dati per variabili P di comunicazione con la macchina in gruppo di lavorazione