タイトル'罫線の事で'で文章が足りませんでした。

罫線の事で知っていたら教えて頂きたいのですが、あるPGMからCALLし別PGMで罫線のある画面で
処理しPGM終了時、SEETONLRの手前で罫線削除の命令を出しているのですが、罫線消去が半分しか
されず元のPGMで残りの半分が画面に表示されている状態です。罫線が表示されるSFLCTLをEXFMTを
追加して処理してみたところこちらでは全て削除されました。WRITEで全て削除される方法を教えて
頂けないでしょうか。

現在のソース
WRITEFMTCL　　　　　　　　　　　　　　　　　　　　
SETON　　　　　　　LR　　
RETRN　　　　　　　　　　　　　　　　　　　　　　　　　

EXFMT入りのソース（こちらは全部消えます）
WRITEFMTCL　　　　　　　　　　　　　　　　　　　　
ECFMTCTL20　　　　　　　　　　　　　　　　　　　　
SETON　　　　　　　LR　　
RETRN