XTCPOPN
XTCPOPN( 0 )
XTCPOPN öffnet eine Netzwerkverbindung
XTCPOPN setzt im Fehlerfall den Systemwert $syserror
XTCPOPN( 0 )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
XTCPSNDRCV( '<Q050Q>' , '>' , 20 , $buf )
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
if (strpos($buf,'<Q050Q;1>') === FALSE)
{
$syserror = "CLEAR ALL fehlgeschlagen";
XCHECKREPLY( $syserror , "<K022K $syserror;5>" )
}
XTCPCLS( 0 )
XCHECKREPLY
XTCPCLS
XTCPSNDRCV
$syserror
