RE: Display file attributes

["GERALD BEASLEY" <GBEASLEY@xxxxxxxx>]

Doug,

I would like a copy of the program.

Gerald Beasley
gbeasley@xxxxxxxx

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Douglas Handy
Sent: Friday, November 05, 2004 8:23 AM
To: Midrange Systems Technical Discussion
Subject: Re: Display file attributes

Note to anyone who cares:

> PS - I just had another idea.  You can use SETATNPGM to call a small
> program which would use the DSM apis ...

I decided to follow up on this idea, and wrote a small program which
implements it.

When set as your attn pgm, it will replace each display attribute with
a @ character.  This will revert all text to normal, but the fields
remain intact and the cursor will still tab between fields.  If you
position the cursor anywhere and press Enter, the hex value of that
position will be shown in the lower right corner of the screen.  Use
F3 or F12 to resume the original program.

It should work with vitually any terminal or emulation and screen
size, as it just uses standard 5250 data streams via the DSM apis.  I
can email a copy to anyone who is interested.  At  200 lines it is
maybe too long to just post inline to the list, though most of the
length is just prototypes.  The actual RPG calcs are about 35 lines,
excluding comments.

Doug
--
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.