根據(jù)選擇條件，執(zhí)行幾個可能的語句塊之一。每個語句塊至少有一個標識符。執(zhí)行標識符與選擇標準匹配的塊。

當塊完成時，程序在ENDSWITCH之后繼續(xù)。

SWITCH … CASE … ENDSWITCH

如果沒有與選擇標準匹配的標識符，則處理DEFAULT塊。如果沒有DEFAULT塊，則不處理任何塊，并且程序在ENDSWITCH之后繼續(xù)。

SWITCH語句不能使用EXIT退出。

SWITCH-CASE 指令

SWITCH-CASE 指令是一個分支，可以測試一個變量的不同值（分支）。

語法：

SWITCH 變量

CASE1 ;Teste Variable auf Wert 1

指令

CASE2 ;Teste Variable auf Wert 2

指令

CASE3,4,5,10 ;Teste Variable auf Werte3,4,5,10

指令

DEFAULT ;optional

錯誤分析

ENDSWITCH

根據(jù)集團標準，通常通過 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類型。這里從不執(zhí)行語句UP_5（），因為以前使用過標識符C。

SWITCH NAME

CASE "A"

UP_1()

CASE "B","C"

UP_2()

UP_3()

CASE "C"

UP_5()

ENDSWITCH

審核編輯：黃飛