Module MachCommConst

   Public Enum PVars As Integer
      PROD = 0
      MACHGROUP = 1
      PART = 2
      STATE = 3
   End Enum

   ' stati pezzo
   Public Enum PartState As Integer
      NULL = 0
      START = 1
      END_ = 2
   End Enum

   Public Delegate Sub ResultCallbackDlg(CommandType As CommandTypes, CommandState As CommandStates, ResultType As ResultTypes, Params As String)
   Public Delegate Sub CloseCallbackDlg(ByRef bCancel As Boolean)
   Public Delegate Sub UpdateCallbackDlg(Param As String, Params As String)
   Public Delegate Sub AlarmCallbackDlg(ByVal AlarmOperation As Integer, ByVal AlarmType As Integer, ByVal AlarmMessage As String, ByVal AlarmCode As String, ByVal AlarmDateTime As String)
   Public Delegate Sub AxisCoordinatesCallbackDlg(ByVal AxisValue As Double, ByVal AxisIndex As Integer)
   Public Delegate Sub OpStateCallbackDlg(ByVal newOpState As Integer)
   Public Delegate Sub ReadVarCallbackDlg(CommandExecutedCorrectly As Boolean, VarAddress As String, VarValue As String, VarType As Integer)

   Friend m_ResultCallbackDlg As ResultCallbackDlg
   Friend m_CloseCallbackDlg As CloseCallbackDlg
   Friend m_UpdateCallbackDlg As UpdateCallbackDlg
   Friend m_AlarmCallbackDlg As AlarmCallbackDlg
   Friend m_AxisCoordinatesCallbackDlg As AxisCoordinatesCallbackDlg
   Friend m_OpStateCallbackDlg As OpStateCallbackDlg
   Friend m_ReadVarCallbackDlg As ReadVarCallbackDlg

End Module