We used to use the QDFRTVFD API to retrieve the field positions, but if you
are looking for an easier way, you could do the following:
Execute an DSPFFD (Diplay Field File Description) for the display file into
an out file at the beginning of the program.
The field location can be found in the columns:
WHDROW (Row Position)
WHDCOL (Column Position)
With this information it is easy to position the cursor on any field.
... but you still need indicators for Subfiles
Mit freundlichen Grüßen / Best regards
Birgitta Hauser
"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"
?Train people well enough so they can leave, treat them well enough so they
don't want to.? (Richard Branson)
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Dan
Sent: Donnerstag, 3. August 2017 20:03
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Subject: Indicatorless display files?
I am attempting to eliminate numbered indicators in a new, simple
maintenance program. We currently use indicators to set display attributes
for fields in error:
A 81 DSPATR(RI)
A 81 DSPATR(PC)
A 81 COLOR(RED)
I know I can use a program-to-system field to do the reverse-image and red,
but not sure how to do the position cursor part of this. I know about the
QDFRTVFD API, but would rather avoid that if there's a simpler way to do
this. Also, just so no one attempts to go there, there will be no
hard-coding of the x,y coordinates of the fields in the RPG program.
Apparently, we also condition the ALARM keyword in the display file, and I
am wondering if this, too, can be conditioned somehow without a numbered
indicator.
- Dan
--
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.
Please contact support@xxxxxxxxxxxx for any subscription related questions.
Help support midrange.com by shopping at amazon.com with our affiliate link:
http://amzn.to/2dEadiD
midrange.com
