9 Socket Service
9-26
NJ/NX-series CPU Unit Built-in EtherNet/IP Port User’s Manual (W506)
3 : // Request reading status.
SktGetTCPStatus_instance(
Execute :=TRUE,
Socket :=WkSocket); // Socket
IF (SktGetTCPStatus_instance.Done=TRUE) THEN
Stage :=INT#4; // Normal end
ELSIF (SktGetTCPStatus_instance.Error=TRUE) THEN
Stage :=INT#30; // Error end
END_IF;
4 : // Send request
SktTCPSend_instance(
Execute :=TRUE,
Socket :=WkSocket, // Socket
SendDat :=SendSocketDat[0], // Send data
Size :=UINT#2000); // Send data size
IF (SktTCPSend_instance.Done=TRUE) THEN
Stage :=INT#5; // Normal end
ELSIF (SktTCPSend_instance.Error=TRUE) THEN
Stage :=INT#40; // Error end
END_IF;
5 : // Request receiving data.
SktTCPRcv_instance(
Execute :=TRUE,
Socket :=WkSocket, // Socket
TimeOut :=UINT#0, // Timeout value
Size :=UINT#2000, // Receive data size
RcvDat :=RcvSocketDat[0]); // Receive data
IF (SktTCPRcv_instance.Done=TRUE) THEN
Stage :=INT#6; // Normal end
ELSIF (SktTCPRcv_instance.Error=TRUE) THEN
Stage :=INT#50; // Error end
END_IF;
6 : // Request closing data.
SktClose_instance(
Execute :=TRUE,
Socket :=WkSocket); // Socket
IF (SktClose_instance.Done=TRUE) THEN
Stage :=INT#0; // Normal end
ELSIF (SktClose_instance.Error=TRUE) THEN
Stage :=INT#60; // Error end
END_IF;