IBM Mainframe Forum

I am converting my program to use a single paragraph as a universal write statement for a report.

Currently the code is write print-record from hold-area after top-of-page (using C01 statement).

Is it possible to use a variable for the advancing? I am doing this successfully with line numbers.

Basically, will this work the same as the following



Also what should the line-skip variable be assigned as. I have as the following currently

As far as I can tell, you can specify a variables with an integer value for 'WRITE record AFTER/BEFORE ADVANCING', i.e.:

01 LINE-SKIP PIC 9(02) VALUE ZERO.
...
WRITE PRINT-RECORD AFTER ADVANCING LINE-SKIP.
...
MOVE 10 TO LINE-SKIP.
...
WRITE PRINT-RECORD AFTER ADVANCING LINE-SKIP.
...

Thanks, Spock.