Multiple Headings

[David Anderson <DANDERS1@SMTPGW.IS.HFH.EDU>]

I have a program that produces two reports requiring different headings.
I have setup two kinds of reports:
declare-layout Default
        paper-size      =       (11, 8.5)
        orientation     =       LANDSCAPE
        top-margin      =       0.5
        left-margin     =       0.05
        max-columns     =       177
        max-lines       =       58
        char-width      =       4.32
        line-height     =       9
end-declare

declare-printer HPLaserJet
        type            =       HPLASERJET
        font            =       0
        point-size      =       6
        pitch           =       17
end-declare

declare-report Report9          !Debug Report
        layout          =       Default
        printer-type=   HPLaserJet
end-declare

declare-report Report0          !Dollars Report - Current Activity
        layout          =       Default
        printer-type=   HPLaserJet
end-declare

declare-report Report1          !Hours Report - Current Activity
        layout          =       Default
        printer-type=   HPLaserJet
end-declare

I then installed an evaluation statement in the HEADING section:
        evaluate #ReportNumber
                when = 9        !Debug Report
                                stuff
                when = 0        !Activity Report - Dollars
                                stuff
                when = 1        !Activity Report - Hours
                                  stuff
        end-evaluate

Finally, throughout the program I use use-report Reportx to write to the
correct report.  However, if the report is only a page long the report uses
the last #ReportNumber.  What should I be doing?????????????