× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: Hiding options in UIM menus
  • From: "Kevin Watkins" <kevinw@xxxxxxxxxxxxxxxxx>
  • Date: Wed, 6 Jan 1999 16:46:18 -0600

here is an excerpt from a coreattn menu i use. Notice F9 and option 5 on the
menu.



.* Declare conditions
.*
:COND   NAME=secofr      EXPR='chkusrcls("*SECADM")'.
:COND   NAME=notsecofr   EXPR='*NOT(chkusrcls("*SECADM"))'.
:COND   NAME=cmdlineok   EXPR='*NOT(zlmtcpb="*YES")'.

.* -------------------------------------------------------------------
.*
.* Declare menu keys
.*
:KEYL   NAME=menukeys   HELP=keylist.

:KEYI   KEY=F1      ACTION=help           HELP=f1help.
:KEYI   KEY=F3      ACTION='exit set'     HELP=f3exit.F3=Exit
:KEYI   KEY=F9      ACTION=cmdline        COND=cmdlineok
        HELP=f9command.F9=Command line
:KEYI   KEY=F12     ACTION='cancel set'   HELP=f12cancel.F12=Cancel
.* Describe menu
.*
:PANEL   NAME=coreattn  HELP=menuhelp   KEYL=menukeys
         PANELID=zmenu  ENTER='MSG CPD9818 QCPFMSG'
         TOPSEP=sysnam.CoreAttn Menu
:MENU    DEPTH='*'      BOTSEP=space    SCROLL=yes.
:TOPINST.Select one of the following:

.* ----------------------------------------------------------
.*
.* Describe menu options
.*

.* 1. Work with spooled files -------------------------------
:MENUI   OPTION=1    ACTION='CMD wrksplf'
         HELP=wrksplf.Work with spooled files
.* 2. Work with submitted jobs ----------------------------------------
:MENUI   OPTION=2    ACTION='CMD wrksbmjob'
         HELP=wrksbmjob.Work with submitted jobs

.* 3. Display messages ------------------------------------------------
:MENUI   OPTION=3    ACTION='CMD dspmsg *WRKUSR'
         HELP=DSPMSG.Display messages

.* 5. Work with user profiles/Change your password --------------------
:MENUI   OPTION=4    COND=secofr      ACTION='CMD wrkusrprf *all'
         HELP='wrkusrprf/all'.Work with user profiles
:MENUI   OPTION=4    COND=notsecofr   ACTION='CMD chgpwd'
         HELP='chgpwd'.Change your password



-----Original Message-----
From: lg - Loyd Goodbar <lgoodbar@watervalley.net>
To: midrange-l@midrange.com <midrange-l@midrange.com>
Date: Wednesday, January 06, 1999 4:51 PM
Subject: Hiding options in UIM menus


>Is there an easy way to hide certain menu options in UIM menus depending on
>user profile? I was thinking of doing something along the lines of the
OS/400
>Main Menu, which hides certain menu options depending on user class.
>
>Thanks,
>Loyd Goodbar
>+---
>| This is the Midrange System Mailing List!
>| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
>| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
>| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
>| Questions should be directed to the list owner/operator:
david@midrange.com
>+---

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.