× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



What will the young f#$%ts do when we old f#$%ts fade away?

Of course, even I hope that old f#$%ts DO fade away and quickly!

Alright, I apologize on a Friday!!

Vern

On 1/16/2015 4:24 PM, Jerry Adams wrote:
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




As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.