IKD様

ご丁寧な回答ありがとうございます。
解決いたしました。
大変お恥ずかしいのですが、全フィールドに
35　DSPATR(ND)
がセットされていまして
この35の標識の制御がうまくいってなかったために2回目は非表示になっておりました。

ご指摘の通り、元のプログラムがまさに
　　SFLINZ　でサブ・ファイルをブランク・レコードで
　　埋め尽くしたもののを　UPDATE　命令でレコードを更新する
となっておりまして、メインファイルがREADできなくなったら
標識35をONにして全フィールドを非表示にしており、そのまま35がONになったままでした。。
今回、改めてSFLINZの動きを勉強する良い機会となりました。

本当にありがとうございました。