Re: Hex Code for Position Cursor

[Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

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