COBOL2002 メッセージ
KCCC
3108
C
-S
カーソル名"*** 1 ***"が二重に定義されています。