COBOL2002 メッセージ
KCCC
4243
C
-S
THROUGHは指定できません。