COBOL2002 メッセージ
KCCC
4818
C
-S
ポインタ型である"*** 1 ***"は指定できません。