C*ソケットクローズ--------------------------------------*
C CALL 'SKCLOS'
C PARM SD 4
C PARM RC 1
C*------------------------------------------------------*