IBM Mainframe Forum

[Eka1618]

Hello,

I have a map with a page size on 179. There are several different situations where all 179 would not be used. Is it possible to program the map in such a way that would compress the length when these lines are not used (providing that there is no static text used)?

Thank You in advance.

~Erica~

[Eka1618]

The map is used as a WRITE statement. A PF key executes it and the map is displayed to the user until they've pressed "ENTER" enough times to get back to the original screen. I would like to compress this map according to how many lines are actually used. If 50 lines are used, then the user has to "ENTER" through a bank page or two before they get back to the original screen. Can this be done?

Thanks again!

[RGZbrog]

You could try eliminating all the blank lines.

Select all

WRITE (ES=T) field-list ...

If you have multiple WRITE, DISPLAY, WRITE TITLE, etc, then code

Select all

FORMAT ES=T

before the first output statement.

[Eka1618]

Thanks RGZbrog,

The program uses multiple write statements, so at a statement level, using ES is not compiling. here is the write statement:

WRITE NOTITLE USING FORM 'PGMNAME1'

[RGZbrog]

I misread the statement "The map is used as a WRITE statement." Sorry.

WRITE USING FORM should be used only to mimic a preprinted form, not for "standard" computer reports. A preprinted form has a fixed number of lines; your report has a variable number of lines. To get the output you want, you'll need to convert to standard WRITE/WRITE TITLE statements.

[Eka1618]

This is what I've been suspecting about using a map. The program was already designed to use the map and I am investigating what could be done to compress the empty lines.

Thanks Again!

~Erica~