检测对枚举数据类型变量的操作 允许赋值。
理由枚举不应作为普通整数值使用。也可以定义别名数据类型或使用子范围类型。
重要性:中型
例外情况:如果一个枚举用 pragma{attribute 'strict'}
标记,那么编译器已经报告了这种操作。
如果通过 pragma{attribute 'flags'}
将枚举声明为标志,则在进行AND
,OR
,NOT
或XOR
操作时不会出错。
示例
TYPE My_Enum : ( red := 1, blue := 2, green := 3, black := 4 ); END_TYPE PROGRAM PLC_PRG VAR iTemp1 : INT; abc : My_Enum; END_VAR iTemp1 := iTemp1 + INT#1; abc := My_Enum.red; // OK iTemp1 := My_Enum.black / My_Enum.blue; // SA0058 iTemp1 := My_Enum.green / My_Enum.red; // SA0058 --> SA0058: Operations on enumeration variables
使用 pragma {属性'flags'}的示例
{attribute 'flags'} // declaring the enumeration as a "flag" TYPE Flags : ( Unknown := 16#00000001, Stopped := 16#00000002, Running := 16#00000004 ) DWORD; END_TYPE PROGRAM PLC_PRG VAR iTemp1 : INT; abc : Flags; batate : BYTE; dwFlags : DWORD; dwState : DWORD; END_VAR // OK for the following IF (dwFlags AND Flags.Unknown) <> DWORD#0 THEN dwState := dwState AND Flags.Unknown; ELSIF (dwFlags OR Flags.Stopped) <>DWORD#0 THEN dwState := dwState OR Flags.Running; END_IF