COBOL2002 メッセージ
KCCC
3018
C
-S
"*** 1 ***"は正しくない修飾語です。