{
{   The purpose of this procedure is to free the job socket
{ record from the job pageable heap and to store a NIL pointer
{ in the corresponding entry for the given socket id in the array
{ of job sockets.
{
{       NLP$SK_DELETE_JOB_SOCKET (SOCKET_ID, JOB_SOCKET)
{
{ SOCKET_ID: (input) This parameter specifies the identifier of
{       the given job socket.
{
{ JOB_SOCKET: (input, output) This parameter contains the pointer
{       to the job socket record for the given socket id. On return
{       it is set to a NIL value.
{
