Omron CJ1W-EIP21 - Page 230

8 Message Communications
8-24
CJ-series EtherNet/IP Units Operation Manual for NJ-series CPU Unit (W495)
IF (DoCIPTrigger=TRUE) THEN
CASE Stage OF
1 : // Open CIP class 3 connection.
CIPOpen_instance(
Execute :=TRUE,
TimeOut :=UINT#20, // Timeout time: 2.0 s
RoutePath :='RoutePathDat'); // Route path
IF (CIPOpen_instance.Done=TRUE) THEN
Stage :=INT#2; // Normal end
ELSIF (CIPOpen_instance.Error=TRUE) THEN
Stage :=INT#10; // Error end
END_IF;
2 : // Request writing value of variable.
CIPWrite_instance(
Execute :=TRUE,
Handle :=CIPOpen_instance.Handle, // Handle
DstDat :='WritingDat', // Source variable name
Size :=UINT#1, // Number of elements to write
SrcDat :=WriteDat); // Write data
IF (CIPWrite_instance.Done=TRUE) THEN
Stage :=INT#3; // Normal end
ELSIF (CIPWrite_instance.Error=TRUE) THEN
Stage :=INT#20; // Error end
END_IF;
3 : // Request reading value of variable.
CIPRead_instance(
Execute :=TRUE,
Handle :=CIPOpen_instance.Handle, // Handle
SrcDat :='OriginalDat', // Source variable name
Size :=UINT#1, // Number of elements to read
DstDat :=ReadDat); // Read data
IF (CIPRead_instance.Done=TRUE) THEN
Stage :=INT#4; // Normal end
ELSIF (CIPRead_instance.Error=TRUE) THEN
Stage :=INT#30; // Error end
END_IF;