CHGVIEW "Changes the displayed view of a list by switching defined
sets of columns to be shown" with :VAR :COND :LISTVIEW
http://publib.boulder.ibm.com/infoce...gapdlprint.htm
http://publib.boulder.ibm.com/infoce...s/sc415715.pdf
Chapter 16 Pg 294 in the above .pdf defines an F11 key to establish a
CHGVIEW action, under the heading "Source for Example List Panel” on
page 290.

In the below snippet, the variable THEview defines which of the
LISTVIEW elements is displayed.


..* Data types
:CLASS NAME=bin15
BASETYPE='BIN 15'.
:ECLASS.
:CLASS NAME=char10
BASETYPE='CHAR 10'.
:ECLASS.
..* Variables
:VAR NAME=THEview
CLASS=bin15.
:VAR NAME=orig
CLASS=char10.
:VAR NAME=other
CLASS=char10.
..* List definition
:LISTDEF NAME=THELST
VARS='orig other'.
..* Conditions for views of the list
:COND NAME=THEVIEW1
EXPR='THEVIEW=0'.
:COND NAME=THEVIEW2
EXPR='THEVIEW=1'.
..* Keys. F11 to change views
:KEYL NAME=THEkeys.
:KEYI KEY=F11
HELP='DSPOTHR'
PRIORITY=5
COND=THEVIEW1
VARUPD=YES
ACTION='CHGVIEW'.F11=Display Other Information
:KEYI KEY=F11
HELP='DSPORIG'
PRIORITY=5
COND=THEVIEW2
VARUPD=YES
ACTION='CHGVIEW'.F11=Display Original Information
:EKEYL.
<ATA ATACOL :EDATA.>>
<>
:LISTCOL VAR=orig
:LISTCOL VAR=other
:LISTVIEW COLS='orig'.
:LISTVIEW COLS='other'.
:ELIST.
:EPANEL.


Regards, Chuck
--
All comments provided "as is" with no warranties of any kind
whatsoever and may not represent positions, strategies, nor views of my
employer

xyzzy wrote:
> I've recently been writing a few "work with ..." type programs using
> UIM and RPG. However, I'm not sure how you change the display view
> (i.e. like pressing F10 or F11 when using WRKSPLF). Can someone point
> me in the right direction or post a simple example?

Brilliant. Thanks Chuck. I'll give it a go when I get into the
office.

Thanks again.