COBOL2002 メッセージ
KCCC
2041
C
-S
SAME AREA句のファイル名"*** 1 ***"が,SELECT句に指定されていません。