{
{    The purpose of this procedure is to return information regarding the
{ status of the given socket.  The information returned, depends on the type of
{ socket i.e., UDP or TCP.
{
{       NAP$SK_GET_SOCKET_STATUS (SOCKET_ID, SOCKET_STATUS, STATUS)
{
{ SOCKET_ID: (input)  This parameter specifies the identifier of the given
{       socket.
{
{ SOCKET_STATUS: (output)  This parameter contains information regarding the
{       status of the socket.
{
{ STATUS: (output) This parameter specifies the request status.
{       CONDITION:
{             nae$sk_invalid_user
{             nae$sk_job_recovery
{             nae$sk_socket_closed_via_peer
{             nae$sk_socket_disconnected
{             nae$sk_socket_terminated
{             nae$sk_unbound_socket
{             nae$sk_unknown_socket
{
