格の進さん、こんにちは。
MLの方でコメント流しておきましたが、念のためこちらにもアップしておきます。

＞コピーは　str_1 = DW_1.object.data　で行っています。

データウィンドウのバッファを構造体にコピーしているわけですね。
しかし！実際には構造体にデータが複写されているわけでなく、単に
構造体のポインタが複写されただけ（のハズ）です。

ですので、Retrieve関数とかReset関数を使ってデータウィンドウのバッファを
クリアしてしまうと、構造体の中身も壊れてしまい、後は野となれ山となれと
いう状態になってしまうと思われます。

Powerスクリプトって、内部的には極めてC言語に近いんですよ。
（だからPBのネィティブコンパイラも、一度Cのソースにしてからコンパイル
　しているんです。）

対策としては、構造体にデータウィンドウのバッファを移すのではなく、
データストアオブジェクトを定義して、そこにRowsCopy関数あたりを使って
データの退避を行えば良いかと思います。（未検証ですが．．．）