my columns problem

[Aaron Solomon <aaron.solomon@GS.COM>]

Below is the complete code for a test script I'm written to try out the
columns.  When I run this, it compiles and creates a .lis file just fine.  the
only problem is that the page that gets printed on have 1 column of lines, in
the middle of the page (seemingly the 2nd column). I can't get it to print in
any other column.  HELP!!!
AJ


! *** Test SQR script to print columns ***

#define header_lines 1
#define footer_lines 1
#define font 3 6

BEGIN-REPORT
        DO MAIN
END-REPORT

BEGIN-SETUP
        page-size 90 175
        declare printer
                !type = LINEPRINTER
                !orientation = portrait
                !line-size = 8
                type = HPLASERJET
                orientation = landscape
                line-size = 6
                left-margin = .15
                top-margin = .25
END-SETUP

BEGIN-HEADING {header_lines}
        GRAPHIC () FONT {font}
        print 'ACTIVITY REPORT' (1) center
END-HEADING

BEGIN-FOOTING {footer_lines}
        print 'Solomon & Co.' (1,1)
END-FOOTING

BEGIN-PROCEDURE MAIN
        COLUMNS 50 50 50

        LET #line = 1
        print 'Line number:  1' (1,1)
        WHILE (#line <25)
                add 1 to #line
                print 'Line number: ' (+1,1)
                print #line () edit 99
        end-while

        next-column

        LET #line = 1
        print 'Line number:  1' (1,1)
        WHILE (#line <25)
                add 1 to #line
                print 'Line number: ' (+1,1)
                print #line () edit 99
        end-while

        next-column

        LET #line = 1
        print 'Line number:  1' (1,1)
        WHILE (#line <25)
                add 1 to #line
                print 'Line number: ' (+1,1)
                print #line () edit 99
        end-while

END-PROCEDURE

! *** END OF SCRIPT ***