RE: window subfile

[J Michael Smith <JMichael.Smith@xxxxxxxx>]

I have created two service programs based on this API;

RTVDRC (Retreive display row and column)
Returns the row and column of a "field"
The only requirement is the RTNCSRLOC keyword on the display file.
0007.90      A                                      RTNCSRLOC(&DSPFMT
&DSPFLD &DSPPOS)

RTVSFP (Retreive subfile page size)
Returns the number of rows in a subfile page.
I believe that the QDFRTVFD will provide information on a window "size"; I
have not had a requirement to do that.

If anyone is interested in either of these email me off line.

Michael Smith
-----Original Message-----
From: Scott Mildenberger [mailto:Smildenber@Washcorp.com]
Sent: January 20, 2002 05:19 PM
To: 'midrange-l@midrange.com'
Subject: RE: window subfile


Booth,

This can be done using the QDFRTVFD api.  Midrange Computing had an article
on going indicatorless in RPG in Jan 2001 by Paul Ladoucheur that had a
procedure that does this and it works great.  There are some other nice
procedures as part of this also.  Here is a link to the article and the code
is available from there (site requires free registration).

http://www.mcpressonline.com/mc/.21c668d5.214a297b

Scott Mildenberger

> -----Original Message-----
> From: Booth Martin [SMTP:Booth@MartinVT.com]
> Sent: Saturday, January 19, 2002 3:45 PM
> To:   midrange-l@midrange.com
> Subject:      Re: window subfile
>
> --
> --
> This is an interesting refinement. Thank you for sharing it. I like the
> idea
> but would like to go one step farther.  Is it possible to find the
> location
> of a field on the screen? Not the cursor location, but rather the field
> itself?
>
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@midrange.com
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/cgi-bin/listinfo/midrange-l
or email: MIDRANGE-L-request@midrange.com
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.