RE: Indicator Redux

[jstevens@xxxxxxxxxxxxxx]

This might be a shot in the dark - but are you sure that the DDS will 
overlay the "in"?

Maybe you should try changing the DDS to this...

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


Jeff Stevens
Mize, Houser & Co. P.A.
913 451 1882
JStevens@xxxxxxxxxxxxxx





"Turnidge, Dave" <DTurnidge@xxxxxxxxxxxxxxxxxxxx> 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
12/06/2006 11:20 AM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
RE: Indicator Redux






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