COBOL2002 メッセージ
KCCC
1767
C
-S
PERFORM〜THROUGHの直後に手続き名がありません。