COBOL2002 メッセージ
KCCC
4803
C
-S
アドレス型である"*** 1 ***"関数は指定できません。