Re: Indicator name

I wrote a little service program that maps values and returns a hex value if
anyone is interested. Yes, I wish they had a position cursor in attributes.
Left a big hole although I don't consider the ability a deal breaker.

P_MADEDATE = DSPF_GetPValues(cDSPF_Color_Red +

cDSPF_ReverseImage +
cDSPF_Underscore );

P_MADEDATE = DSPF_TurnOnProtectFlag(P_MADEDATE);

On Thu, Mar 19, 2009 at 2:15 PM, Kurt Anderson <kurt.anderson@xxxxxxxxxxxxxx

wrote:

It can do Protect, but you're right about it not being able to do Position
Cursor (completely forgot about that).

Kurt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Jeff Young
Sent: Thursday, March 19, 2009 3:03 PM
To: RPG programming on the IBM i / System i
Subject: Re: Indicator name

Craig,
The use of a program-to-system field for indicators is very nice, but
unfortunatly, it can not do a Position Cursor or Protect Field.
It can do all of the displayable attributes provided you place the correct
hex value into the field.

Jeff Young
Sr. Programmer Analyst
IBM -e(logo) server Certified Systems Exper - iSeries Technical Solutions
V5R2
IBM Certified Specialist- e(logo) server i5Series Technical Solutions
Designer V5R3
IBM Certified Specialist- e(logo)server i5Series Technical
Solutions Implementer V5R3








________________________________
From: Craig Jacobsen <CraigJacobsen@xxxxxxxxxxx>
To: RPG programming on the IBM i / System i <rpg400-l@xxxxxxxxxxxx>
Sent: Thursday, March 19, 2009 3:17:35 PM
Subject: RE: Indicator name

Kurt,

I hadn't thought of that, even though I've used this technique before.
Pretty standard in this shop to use indicators in the DDS.
I'll mull it over and talk to the head of Application Development.

Thanks,

Craig

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Kurt Anderson
Sent: Thursday, March 19, 2009 2:46 PM
To: 'RPG programming on the IBM i / System i'
Subject: RE: Indicator name

I haven't done display files in quite some time, but instead of doing a
DSPATR(RI), you can do a DSPATR(&DSPFLD1) where &DSPFLD1 is defined as a
program field in the DDS. Then in the RPG program you set the DSPFILD1
value with the hex representation of the attribute
http://wiki.midrange.com/index.php/Program_To_System_Fields

In the long run this may be correlated to your issue, but if not, maybe
it's
a future consideration for setting the display attribute.

Best of luck,
Kurt