- introdotto stato TakingRequest in ExecProcessManager per fare in modo che non risulti free mentre sta avviando un calcolo
- ridotto tempo di riavvio programma a 5 secondi - corretto nome pc per RemoteDebug
This commit is contained in:
@@ -438,6 +438,7 @@ Public Class ExecProcessManager
|
||||
While Not m_bStopProcess AndAlso Not Proc.HasExited
|
||||
Select Case MyThreadData.ProcessStatus
|
||||
Case ThreadData.ProcessStatuses.NULL
|
||||
MyThreadData.SetProcessStatus(ThreadData.ProcessStatuses.TAKINGREQUEST)
|
||||
Dim NextProcessArgs As QuestionDTO = Nothing
|
||||
If m_delGetNextProcessArgs IsNot Nothing Then
|
||||
NextProcessArgs = m_delGetNextProcessArgs()
|
||||
@@ -453,6 +454,8 @@ Public Class ExecProcessManager
|
||||
Proc.StandardInput.WriteLine("#8477271#" & NextProcessArgs.sProcessArgs & "#8477271#")
|
||||
Proc.StandardInput.Flush()
|
||||
MyThreadData.SetProcessStatus(ThreadData.ProcessStatuses.WAITINGANSWER)
|
||||
Else
|
||||
MyThreadData.SetProcessStatus(ThreadData.ProcessStatuses.NULL)
|
||||
End If
|
||||
Case ThreadData.ProcessStatuses.WAITINGANSWER
|
||||
Thread.Sleep(10)
|
||||
|
||||
@@ -4,8 +4,9 @@ Public Class ThreadData
|
||||
|
||||
Public Enum ProcessStatuses As Integer
|
||||
NULL = 0
|
||||
WAITINGANSWER = 1
|
||||
ANSWERRECEIVED = 2
|
||||
TAKINGREQUEST = 1
|
||||
WAITINGANSWER = 2
|
||||
ANSWERRECEIVED = 3
|
||||
TOBESTARTED = 10
|
||||
End Enum
|
||||
|
||||
|
||||
@@ -80,7 +80,7 @@ Class Application
|
||||
Private Sub RestartBtn_Click(sender As Object, e As EventArgs)
|
||||
'Process.Start(Application.ResourceAssembly.Location)
|
||||
Quit()
|
||||
Threading.Thread.Sleep(1000 * 65)
|
||||
Threading.Thread.Sleep(1000 * 5)
|
||||
System.Windows.Forms.Application.Restart()
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -45,7 +45,7 @@ switch ($config) {
|
||||
Copy-Item "c:\EgtDev\EgwMultiEngineManager\ExtData\Tray.DataRoot.ini" $datarootdest -Force
|
||||
# Uncomment the appropriate ROBOCOPY line(s) as needed
|
||||
# Write-Host "Debug remoto: effettuo robocopy sync (verificare remote per cliente)"
|
||||
ROBOCOPY "$directory" "\\w11-calc-01\c$\EgtProg\EgwMultiEngineManager" /MIR
|
||||
ROBOCOPY "$directory" "\\w11-calc-03\c$\EgtProg\EgwMultiEngineManager" /MIR
|
||||
}
|
||||
default {
|
||||
Write-Host "Configurazione non riconosciuta: $config"
|
||||
|
||||
Reference in New Issue
Block a user