Refactored process proc queue service to handle more throughput. Fixed Metrology_Services import CDE qual service.

This commit is contained in:
Infineon\StieberD
2025-06-17 09:35:34 -07:00
parent 76327e9dbc
commit 60493b3413
4 changed files with 160 additions and 113 deletions

View File

@ -300,18 +300,10 @@ return
SendCommand:
// Call the SRPEngineService and pass it the command
Server = Environment_Services('GetServer')
TCPServerSettings@ = Environment_Services('GetApplicationRootIP')
Convert '\\' to '' in TCPServerSettings@
// Get the port from the SRPEngineServer.ini file instead.
FilePath = Drive():'\SRPEngineServer.ini'
OSRead IniFile from FilePath then
CharIndex = Index(IniFile, 'Port', 1)
Line = IniFile[CharIndex, 'F':CRLF$]
Port = Trim(Line[-1, 'B='])
TCPServerSettings@<2> = Port
end
Server = Environment_Services('GetServer')
TCPServerSettings@ = Environment_Services('GetApplicationRootIP')
Convert '\\' to '' in TCPServerSettings@
TCPServerSettings@<2> = Environment_Services('GetServiceManagerPort')
TcpClientHandle = 0
If SRP_TcpClient(TcpClientHandle, 'CONNECT', TCPServerSettings@<1>, TCPServerSettings@<2>) then
SRP_TcpClient(TcpClientHandle, 'SEND_SES', Command)