根据选择条件,执行几个可能的语句块之一。每个语句块至少有一个标识符。执行标识符与选择标准匹配的块。
当块完成时,程序在ENDSWITCH之后继续。
SWITCH … CASE … ENDSWITCH
如果没有与选择标准匹配的标识符,则处理DEFAULT块。如果没有DEFAULT块,则不处理任何块,并且程序在ENDSWITCH之后继续。
SWITCH语句不能使用EXIT退出。
SWITCH-CASE 指令
SWITCH-CASE 指令是一个分支,可以测试一个变量的不同值(分支)。
语法:
SWITCH 变量
CASE 1 ;Teste Variable auf Wert 1
指令
CASE 2 ;Teste Variable auf Wert 2
指令
CASE 3,4,5,10 ;Teste Variable auf Werte3,4,5,10
指令
DEFAULT ;optional
错误分析
ENDSWITCH
根据集团标准,通常通过 SWITCH-CASE 指令分析 INTEGER变量。
但是也可以分析 ENUM和 CHAR 变量。
使用故障报警信息
SWITCH $ERR.interpreter
CASE #R_INT
$OUT[par] = TRUE
CASE #S_INT
sub_prog_s()
CASE #EXT_S_INT1
sub_prog_1()
CASE #EXT_S_INT2
sub_prog_2()
CASE #EXT_S_INT3
sub_prog_3()
...
ENDSWITCH
...
END
选择标准和标识符属于INT类型。
INT VERSION
...
SWITCH VERSION
CASE 1
UP_1()
CASE 2,3
UP_2()
UP_3()
UP_3A()
DEFAULT
ERROR_UP()
ENDSWITCH
选择标准和标识符属于CHAR类型。这里从不执行语句UP_5(),因为以前使用过标识符C。
SWITCH NAME
CASE "A"
UP_1()
CASE "B","C"
UP_2()
UP_3()
CASE "C"
UP_5()
ENDSWITCH
审核编辑:黄飞
全部0条评论
快来发表一下你的评论吧 !