Re: How does ASSUME keyword work with DSPSIZ?

[Charles Wilt <charles.wilt@xxxxxxxxx>]

Heck, I added the code :)


* // 06/13/11 C.Wilt - Modified to work with both DS3 and DS4 * // screen
sizes. *I knew I recalled hitting this issue.Charles*

On Fri, Mar 6, 2015 at 4:48 PM, Charles Wilt <charles.wilt@xxxxxxxxx> wrote:

> Booth you sure about that?  As your pop-up calender does it...
>
>
> * DSPSIZ(*DS3 *DS4) ENTFLDATR(*NOCURSOR (*COLOR WHT)) CHGINPDFT R FMT001
> 90 DSPMOD(*DS4) CA03 CA12 //check current screen size, configure to match
> SetScreenSize(*omit:NbrColumns:*omit:*omit); if nbrColumns = 132; *in90 =
> *on; else; *in90 = *off; endif;Charles*
>
> On Fri, Mar 6, 2015 at 4:23 PM, Booth Martin <booth@xxxxxxxxxxxx> wrote:
>
> > There is no need to retrieve the screen size in order to write a window
> > record.  This works just fine in a window program: DSPSIZ(*DS3 *DS4)
> >
> > I do this with some regularity.  The most recent was just now to make
> > sure my memory wasn't playing tricks on me.
> >
> >
> >
> > On 3/6/2015 2:17 PM, Mark Murphy/STAR BASE Consulting Inc. wrote:
> >
> > > Thanks all for youre responses, this post was exactly what I needed,
> > > api's and all.
> > >
> > > Mark Murphy
> > > STAR BASE Consulting, Inc.
> > > mmurphy@xxxxxxxxxxxxxxx
> > >
> > > --
> >
> > --
> > Booth Martin<br>
> > www.martinvt.com<br>
> > (802)461-5349<br>
> > Skype: booth.martin<br><br>
> >
> > Modesty is of no use to a beggar.
> >         -- Homer
> >
> > --
> > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
> > list
> > To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> > or email: MIDRANGE-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/midrange-l.