Omron Sysmac NY512-1300, User Manual

Page: 222 / 460

8 CIP Message Communications
8-26 NY-series Industrial Panel PC / Industrial Box PC Built-in EtherNet/IP Port User’s Manual (W563)
4 : // Send message
ReqPath.ClassID :=UINT#01;
ReqPath.InstanceID :=UINT#01;
ReqPath.isAttributeID:=TRUE;
ReqPath.AttributeID :=UINT#07;
CIPSend_instance(
Execute :=TRUE,
Handle :=CIPOpen_instance.Handle, // Handle
ServiceCode:=BYTE#16#0E, // Service code
RqPath :=ReqPath, // Request path
ServiceDat :=Dummy, // Service data
Size :=UINT#0, // Number of elements
RespServiceDat:=RespDat); // Response data
IF (CIPSend_instance.Done=TRUE) THEN
Stage :=INT#5; // Normal end
ELSIF (CIPSend_instance.Error=TRUE) THEN
Stage :=INT#40; // Error end
END_IF;
5 : // Request closing CIP class 3 connection.
CIPClose_instance(
Execute :=TRUE,
Handle :=CIPOpen_instance.Handle); // Handle
IF (CIPClose_instance.Done=TRUE) THEN
Stage :=INT#0;
ELSIF (CIPClose_instance.Error=TRUE) THEN
Stage :=INT#50;
END_IF;
0: // Processing after normal end
DoCIPTrigger:=FALSE;
Trigger
:=FALSE;
ELSE // Processing after error end
DoCIPTrigger :=FALSE;
Trigger
:=FALSE;
END_CASE;
END_IF;