Re: usage of indictators with menu options

["Glenn Gundermann" <ggundermann@xxxxxx>]

Douglas, 

You create source using a language called UIM (User Interface Manager), 
normally stored in a source file QMNUSRC (or is it QPNLSRC, I can't 
remember). 

You create the menu using the Create Menu (CRTMNU) command and specify the 
menu type as *UIM. 

     .
     .
     . 

    :cond name=a
          expr='(var1 = 100 *AND var2 > 0)'
          expr='*OR *NOT(var3 = 0)'.
    :cond name=b
          expr='chkobj("MENU2","*MENU","*READ, *UPD")'.
    :cond name=c
          expr='chkusrcls("*PGMR")'. 


     .
     .
     . 

    :menui
           cond=a
           help='option1/help'
           action='CMD CALL PGM01'
           option=1.Run report
    :menui
           cond=b
           help='option2/help'
           action='MENU MENU2'
           option=2.Administration
    :menui
           cond=c
           help='option30/help'
           action='MENU UTIL'
           option=30.Utilities 


The above snippit can be found at:
http://publib.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/QB3AUK00/APPENDIX1.1.19. 
3.1?SHELF=&DT=19970312124213&CASE= 

The complete table of contents is at:
http://publib.boulder.ibm.com/cgi-bin/bookmgr/BOOKS/QB3AUK00/APPENDIX1.1?DT= 
19970312124213 

I'm sure there are better manuals out there somewhere. 

I personally have some complete source members but not with me. 

Hope this helps. 

Glenn 

Douglas W. Palme writes: 

> I am not sure what you are referring to when you say that you create IBM-
> style UIM menus Glen, could you elaborate?

Douglas W. Palme writes: 

> Glenn,
> How are you controlling the display with a UIM menu? I did not see any 
> option that would allow me to nondisplay the item if the authority was not 
> granted.