We are using sockets for an internet app. Sometimes when it does a read from the app it hangs and I cannot get the dll to return control to me.
We then need to kill the port and restart the service. We originally did not use a timeout but now using value of -1 which is the default?
MOVE "Servicing HTTP request 1:" TO W-COMMAND
PERFORM V910-DISPLAY-PROMPT
* Setup Socket to return buffer length
MOVE -1 TO W-SVR-LNGTH
CALL "C$SOCKET" USING AGS-READ, W-CLI-HANDLE,
W-SVR-RCVD(W-SVR-RCVD-SUB:),
W-SVR-LNGTH
********************CLT 16/6/2023
, W-SVR-TIMEOUT
GIVING W-SVR-READ