こんにちは。

PB6.0でデータウインドウを印刷する場合に、部単位で印刷したいと思います。
ヘルプを参照したところ、データウインドウのプロパティーにCollateがあり、
どうやらそれが部単位で印刷するか制御するものだとわかりました。そこで、
下のようなプログラムを作ったんですが、うまくいきません。

たとえば2ページあるものを2部印刷する場合、
普通に考えれば
ページ１→ページ２→ページ１→ページ２と出るはずですが
ページ１→ページ１→ページ２→ページ２→ページ１→ページ１→ページ２→ページ２
と出てしまいます。

どなたか対処法を知っていらしたら教えていただきたいと思います。
よろしくお願いいたします。
------------------
//部単位が指定されていた場合
IF cbx_collate.Checked THEN
  dw_1.Object.Datawindow.Print.Collate = \"YES\"
ELSE
  dw_1.Object.Datawindow.Print.Collate = \"NO\"
END IF

//部数を指定する
dw_1.Object.Datawindow.Print.Copies = em_copies.Text

//印刷処理
dw_1.Print()