Re: Indicator Redux

["Peter Dow (ML)" <maillist@xxxxxxxxxxxxxxx>]

Hi Dave,

What you have is a conditioned field overlaying a portion of an 
unconditioned field.  Try this instead in your display file:

    A N27                             23 53'F17=Exclude System'
    A                                      COLOR(BLU)
    A  27                             23 53'F17=Include System'
    A                                      COLOR(BLU)

Any field defined on the display file is always preceded by an attribute 
byte that takes up one displayable position.  So if you had been able to 
overlay "F17=Exclude System" with "In", what you actually would've 
gotten is "F17= Inlude System" or maybe "F17=In ude System"; probably 
not what you wanted.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

Turnidge, Dave wrote:
> Hokkaii... Here is the portion of the screen that's supposed to change:
>
>  F17=Exclude System
>
> When I click on F17 it turns variable F17System *ON.
>
> D Workstnind      ds
>      D  FunctionKeys          01     30                        
>        ----
>      D  F17System             17     17n  <---------------
>         ----
>      D  ExcludeSys            27     27n  <---------------
>
> Then I turn ExcludeSys on or off
>
>                 // Exclude system in sort
>                 When F17system;
>                    if ExcludeSys;
>                       ExcludeSys = *OFF;
>                    else;
>                       ExcludeSys = *ON;
>                    endif;                 
>
> At this point (first time through) ExcludeSys is *ON
>
> However, my display file never changes...
>
>      A                                 23 53'F17=Exclude System'
>      A                                      COLOR(BLU)
>      A  27                             23 58'In'
>      A                                      COLOR(BLU)
>
> What it should show is "F17=Include System"
> But it still shows "F17=Exclude System"
>
> What am I doing wrong?
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Ryan
> Sent: Wednesday, December 06, 2006 10:58 AM
> To: RPG programming on the AS400 / iSeries
> Subject: Re: Indicator Redux
>
> That looks good to me. Sure you've got the right display file, and that
> it compiled with no errors regarding INDARA?
>
> On 12/6/06, Turnidge, Dave <DTurnidge@xxxxxxxxxxxxxxxxxxxx> wrote:
>   
> > A                                      DSPSIZ(24 80 *DS3)
> > A                                      VLDCMDKEY(75 'RETURN')
> > A                                      INDARA
> > <------------------------
> > A*                                     PRINT
> > A*                                     HELP
> >
> >     
>
>