COBOL2002 メッセージ
-ScreenSpeedオプション指定時,*** 1 ***句にTHROUGHを指定するとERASE(ATTRIBUTE)文を正しく実行しない場合があります。書かれているとおりに翻訳します。