This was for an RPG II program (Father, I have sinned...) but I once had the
requirement to highlight certain lines on our order entry screen. It was a
rather simple matter of setting up the Hex codes with Biton/Bitoff at the
front on the description to accomplish this. There were a few replies which
indicated the hex codes, but I used the, if I remember correctly, the 5394
controller manual. It is assumed that one knows what bits to manipulate to
obtain, say, hex 21. For those of us of a certain (advanced) age, not a
problem.
Jerry C. Adams
IBM i Programmer/Analyst
I took a pain pill. So, why are you still here?
--
NMM&D
615-832-2730
-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth
Martin
Sent: Thursday, January 15, 2015 1:29 PM
To: RPG programming on the IBM i (AS/400 and iSeries)
Subject: Re: Hex Code for Position Cursor
One assumption I made was that all 99 indicators are used on the screen.
This morning I realized there is no basis for my assumption.
If there are indicators used in your program but not in your screen then
perhaps you could free one up for use on the screen?
Or, are there left-side indicators that you can eliminate?
Or are there single-use indicators that can be converted to immediate use
only, that can be repeated in other code, thus eliminating making those
single-purpose indicators available for other use?
Or, are there any SETON/SETOFs that can be changed?
...
C IF DogsName = 'Bingo'
C SETON *IN43
C ELSE
C SETOF *IN43
...
becomes
D f43 N
C IF DogsName = 'Bingo'
C EVAL f43 = *ON
C ELSE
C EVAL f43 = *OFF
....
One other thought: Are you by any chance dealing with error situations but
not using an ERRMSG? If so, perhaps that leads to a solution by combining
error messages with highlighting and positioning the cursor??
http://www-01.ibm.com/support/knowledgecenter/ssw_i5_54/rzakc/rzakcmstdfems.
htm?lang=en
http://tinyurl.com/nbfmch2
midrange.com
