COBOL2002 メッセージ
KCCC
1237
T
-I
CASE(*** 1 ***)を実行します。