Omron Sysmac NJ Series User Manual page 250

Appendices
// Start sequence when _EC_ErrSta changes to TRUE.
EC_Err:=(_EC_ErrSta <> WORD#16#00);
R_TRIG_instance(Clk:=EC_Err, Q=>EC_Err_Trigger);
IF ( (EC_Err_Trigger=TRUE) AND (DoEC_PktSave=FALSE) AND (_EC_PktMonStop=FALSE)
AND (_EC_PktSaving=FALSE) AND (_Card1Ready=TRUE) ) THEN
DoEC_PktSave:=TRUE;
Stage
EC_StopMon_instance(Execute:=FALSE);
EC_SaveMon_instance(Execute:=FALSE);
EC_CopyMon_instance(Execute:=FALSE);
EC_StartMon_instance(Execute:=FALSE);
END_IF;
// Instruction execution
IF (DoEC_PktSave=TRUE) THEN
CASE Stage OF
1 :
EC_StopMon_instance(
Execute
IF (EC_StopMon_instance.Done=TRUE) THEN
Stage:=INT#2;
ELSIF (EC_StopMon_instance.Error=TRUE) THEN
Stage:=INT#10;
END_IF;
2 :
EC_SaveMon_instance(
Execute
IF (EC_SaveMon_instance.Done=TRUE) THEN
Stage:=INT#3;
ELSIF (EC_SaveMon_instance.Error=TRUE) THEN
Stage:=INT#20;
END_IF;
3 :
EC_CopyMon_instance(
Execute
FileName:='PacketFile');
IF (EC_CopyMon_instance.Done=TRUE) THEN
Stage:=INT#4;
ELSIF (EC_CopyMon_instance.Error=TRUE) THEN
Stage:=INT#30;
END_IF;
// Restart EtherCAT packet monitoring.
4 :
EC_StartMon_instance(
Execute
IF (EC_StartMon_instance.Done=TRUE) THEN
Stage:=INT#0;
ELSIF (EC_StartMon_instance.Error=TRUE) THEN
Stage:=INT#40;
END_IF;
0 :
DoEC_PktSave:=FALSE;
ELSE
DoEC_PktSave:=FALSE;
END_CASE;
END_IF:
A-14
:=INT#1;
// Initialize instance.
// Stop EtherCAT packet monitor.
:=TRUE);
// Normal end
// Error end
// Save EtherCAT packet data to file in system.
:=TRUE);
// Normal end
// Error end
// Copy EtherCAT packet data file to the SD Memory Card.
:=TRUE,
// Normal end
// Error end
:=TRUE);
// Normal end
// Error end
// Processing after normal end
// Processing after error end
NJ/NX-series CPU Unit Built-in EtherCAT Port User's Manual (W505)