- aggiunto log porta mandata in produzione

2024-10-03 10:55:43 +02:00
parent f795493425
commit 6da345d8c5
1 changed files with 1 additions and 0 deletions
@@ -173,6 +173,7 @@ Public Class DoorListPageVM
   Friend Function GetNextDoor() As Door
      Dim NextDoor As Door = m_DoorList.FirstOrDefault(Function(x) x.nState = Door.DoorStates.READY_FOR_PRODUCTION)
      If Not IsNothing(NextDoor) Then
+         Map.refSupervisorFunction.PlgOutLog("GetNextDoor: door " & NextDoor.nId & " set at ON_LOAD_STATION")
         NextDoor.SetState(Door.DoorStates.ON_LOAD_STATION)
         WriteBackup()
      End If