解決方法:
必要に応じて文を再コーディングしてから再コンパイルします。
例:
次の例では、MOVE 文は送り型と受け側の両方で x1 変数を指定していますが、これは許可されない用法です。
$set warning(2) 01 x1 pic x(10). move x1 to x1