Re: DSPSIZ question

I'd probably define a 75-column data structure & 75 column screen field and a 120 column data structure & 120 column screen field. Then define the subfields as character fields and populate them both, every time. All that is left to do then is to write the *DSPF record that matches the display size.

I found it easier to make work if there are two separate *DSPF; an 80 and a 132. But then, I am a pretty simple programmer.

d wNbrCols s 10i 0
// ...................... Prototypes
d SetScreenSize pr extproc('QsnRtvScrDim')
d NbrRows 10i 0 options(*omit)
d NbrCols 10i 0 options(*omit)
d Handle 10i 0 options(*omit)
d ErrorCode 32767 options(*varsize: *omit)
...
//check current screen size, configure to match
SetScreenSize(*omit:wNbrCols:*omit:*omit);
if wNbrCols = 132;
*in90 = *on;
else;
*in90 = *off;
endif;

http://martinvt.com/Code_Samples/Message_Window/message_window.html

On 10/14/2015 3:59 PM, James H. H. Lampert wrote:

On 10/14/15 1:44 PM, Jeff Young wrote:

use DSPSIZ(*DS4 132 *DS3 80) at the file level.

That's the part I remember (and I thought I implied that in the original
question).

But this is a situation in which the display consists largely of single
fields running nearly the full display width.

The manuals are full of examples of adjusting the POSITION of a field
according to the active display size. But I can't find ANYTHING about
either adjusting the field LENGTH according to the active display size,
or selecting an alternate RECORD according to the active display size.

And THAT is what I need to do. Because most of the lines of this display
contain a single field, running nearly the full width of the screen.

--
JHHL