C*ソケットオープン--------------------------------------*
C CALL 'SKOPEN'
C PARM SD 4
C PARM RC 1
C*------------------------------------------------------*