m-yamagutiさん、こんばんは。

画面に表示されている間は全ページの最下行に表示させ、印刷時は最終ページにのみ表示させる、
ということでしょうか?
だとすれば、今までどおりフッタ行に計算フィールドを置き、印刷ボタンをクリックした時に
次のようなスクリプトを記述してください。

dw_x.SetRedraw( FALSE )
dw_x.Modify( \"xxx.Visible = \'0~tIF(page()=pageCount(),1,0)\'\" )
dw_x.Print( )
dw_x.Modify( \"xxx.Visible = 1\" )
dw_x.SetRedraw( TRUE )

要点は、Modify 関数で Visible 属性を「最終ページのみ表示。それ以外は非表示」に設定し、
Print 関数で印刷、その後無条件に表示するよう戻します。
先頭と最後の SetRedraw 関数は、印刷している間、画面上から計算フィールドが消滅しないよう
にするために入れています。
ただし、グループを組んであるデータウィンドウオブジェクトなどでは、page() と pageCount()
の比較が正しく行なわれるかわかりません。この辺のことは、過去ログを見てください。

＞Chicchiさん、こんばんは。
＞
＞回答有り難うございます。
＞確かに、教えて頂いた通り、サマリー行にすると
＞印字されなくなりました。
＞しかし、サマリー行にすると一覧画面において最後まで
＞スクロールしないと確認ができなくなってしまいますので、
＞やはりフッタ行に値を設定しておいて、印刷は
＞最後のページのみに印字することはできないでしょうか？