RE: Indicator Redux

["Turnidge, Dave" <DTurnidge@xxxxxxxxxxxxxxxxxxxx>]

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