My program hangs on IBM's service program QSOSRV1 when it runs the 'recv' procedure. It's hung at statement 9. This only happens occasionally. Most of the time the 'recv' procedure works fine. I'm new to sockets programming and would appreciate any help or suggestions. The 'recv' statement receives a weight from a scale and that weight is then displayed to the user via my RPGLE program.