diff --git a/EgtBEAMWALL.Supervisor/Comms/NUMAxiumPcToolkitComm.vb b/EgtBEAMWALL.Supervisor/Comms/NUMAxiumPcToolkitComm.vb
index 2084793b..74e8f53b 100644
--- a/EgtBEAMWALL.Supervisor/Comms/NUMAxiumPcToolkitComm.vb
+++ b/EgtBEAMWALL.Supervisor/Comms/NUMAxiumPcToolkitComm.vb
@@ -542,7 +542,7 @@ Public Class NUMAxiumPcToolkitComm
                      Var.SetValue(nVal)
                   End If
                End If
-               EgtOutLog("Variabile: " & Var.sAddress & " Tipo: " & nType & " NAddres: " & nAddressNumber & " Valore: " & nVal)
+               'EgtOutLog("Variabile: " & Var.sAddress & " Tipo: " & nType & " NAddres: " & nAddressNumber & " Valore: " & nVal)
             ElseIf Var.nType = CommVar.Types.PLC Then
                Dim nRet As Short = -1
                Dim nRes As Integer
diff --git a/EgtBEAMWALL.Supervisor/Constants/ConstCommVar.vb b/EgtBEAMWALL.Supervisor/Constants/ConstCommVar.vb
index 733b7e29..97de79a5 100644
--- a/EgtBEAMWALL.Supervisor/Constants/ConstCommVar.vb
+++ b/EgtBEAMWALL.Supervisor/Constants/ConstCommVar.vb
@@ -47,6 +47,8 @@ Module ConstCommVar
    ' indice della lavorazione in corso (pareti NUM)
    Public Const MACHINDEX As String = "MachIndex"
    ' variabile per lettura errori PLC bit a bit
+   Public Const PLC_MESSAGES As String = "PLC_Messages"
+   ' variabile per leggere e scrivere permesso invio cn a macchina
    Public Const SENDPERMISSION As String = "SendPermission"
 
    Public Enum OPStates