Re: Supress printing of blank last page

[Deborah Wirth <DWIRTH@NOVELL.COM>]

Dave,

If your SQR includes 'Reset.sqc', check for the following module in the SQC:

begin-footing 1
  if $End_of_Report = 'Y'
    !*******************************************************************
    !  Use a globalized string if one was gotten from stdhdgtr         *
    !*******************************************************************
    if $stdhdg_end_rep = ''
      print 'End of Report' (+0,1) center
    else
      print $stdhdg_end_rep (+0,1) center
    end-if
!   encode '<27>E' into $Reset
    print $Reset (+0,+1)
  end-if
end-footing

The line that is commented out sets $Reset to Esc-E which is a printer reset command.  It resets the printer to its power-on state, and it also causes a form feed (which produces a blank page at the conclusion of every report).  Commenting the line out avoids printing that blank page.

Deborah
Business Information Technology, Inc.