データストアを使って印刷をして、その後すぐにウィンドウを閉じると
「Nullオブジェクトの参照が行われました」というエラーが出ます。
印刷が終わった後に画面を初期化しているのですが、その前にウィンドウ
が閉じてしまうのが原因のようです。
そこでdsのユーザオブジェクトを作ってPrintEndになるまで待つように
したいのですが、うまくいきませんでした。

-----------------------------------------------------------
1.uo_printds(dsのユーザオブジェクト)
インスタンス変数
Boolean ib_PrintEnd = True // 印刷終了時：True

PrintStartイベント
ib_PrintEnd = False

PrintEndイベント
ib_PrintEnd = True

2.印刷のスクリプト
uo_printds l_ds
l_ds = create uo_printds

l_ds.dataobject = \"d_sy100l_1\"
l_ds.SetTransObject (SQLCA)
row = l_ds.retrieve( ll_denno )
if row < 1 then
Messagebox (Title,\"該当データなし\")
Return -1
end if
IF l_ds.Print() <> 1 Then
Messagebox (Title,\"印刷処理でエラーが発生しました。\")
Return -1
End IF
Do Until l_ds.ib_PrintEnd
// 印刷中...
// Yield()
Loop
Destroy l_ds
-----------------------------------------------------------

ループ内にYield()をいれても同じでした。
これではだめですか？