Omron NY532-5400 Reference Manual page 1349

2 :
StrDat:='';
// Concatenate text strings 0 to 8.
FOR Index0 :=INT#0 TO INT#8 BY INT#1 DO
END_FOR;
// Concatenate text string 9 and add CR+LF.
Temp
Temp
StrDat:=CONCAT(In1:=StrDat, In2:=Temp);
Stage:=INT#3;
3 :
FilePuts_instance(
IF (FilePuts_instance.Done=TRUE) THEN
END_IF;
IF (FilePuts_instance.Error=TRUE) THEN
END_IF;
4 :
FileClose_instance(
IF (FileClose_instance.Done=TRUE) THEN
END_IF;
IF (FileClose_instance.Error=TRUE) THEN
END_IF;
99 :
Operating:=FALSE;
END_CASE;
END_IF;
NY-series Instructions Reference Manual (W560)
// Create a text string for one line.
Temp :=INT_TO_STRING(Dat[Index1, Index0]);
Temp :=CONCAT(In1:=Temp, In2:=',');
StrDat:=CONCAT(In1:=StrDat, In2:=Temp);
:=INT_TO_STRING(Dat[Index1, Index0]);
:=CONCAT(In1:=Temp, In2:='$r$l');
// Write text string.
Execute:=TRUE,
FileID :=Fid,
In :=StrDat);
Index1:=Index1+INT#1;
IF (Index1>INT#99) THEN
Stage:=INT#4;
ELSE
FilePuts_instance(Execute:=FALSE);
Stage:=INT#2;
END_IF;
Stage:=INT#99; // Error end
// Close file.
Execute:=TRUE,
FileID :=Fid); // File ID
Operating:=FALSE; // Normal end
Stage:=INT#99; // Error end
// Processing after error end.
2 Instruction Descriptions
// If 100 lines were written...
2
2-1297