COBOL2002 メッセージ
KCCC
4800
C
-S
数字型である"*** 1 ***"関数は指定できません。