Using CATALYST to display a menu (AREV Specific)
At 13 JAN 1998 04:59:18PM Jim Jones wrote:
I am displaying a menu using the CATALYST code M and the name of the menu record as it appears in the menu table. The correct menu displays but it is in the 'Arev menu style' instead of the 'pulldown menu style'. This menu appears in the 'pulldown menu style' when selected from another menu and from the makemenu window (using SF1). What do I need to do so that the menu will appear as a pulldown type when using CATALYST?
Puzzled,
Jim Jones
At 14 JAN 1998 08:45AM Aaron Kaplan wrote:
Are you sure the environment variable is set to PULLDOWN, and not AREV?
Check the contents of @ENVIRON.SET (82) and make sure it reads PULLDOWN.
apk@sprezzatura.com
At 19 JAN 1998 10:06AM Jim Jones wrote:
Aaron;
I checked my user environment menu setting under the table SYSENV and found PULLDOWN listed. The code I am using is in my subroutine is:
CALL CATALYST('M', 'ITEM.ENTRY.MENU')The menu appears but in the AREV style not the pulldown style.
I would appreciate any additional suggestions that you may have.
Thanks!
At 19 JAN 1998 11:23AM Aaron Kaplan wrote:
Can't really say for sure. Maybe Cam or John can do some checking for me, but my memory of the code says
In CATALYST, an M calls the WINUS program.
WINUS then checks @ENVIRON.SET, places a '_WINUS' at the end, and calls that program.
progName=@ENVIRON.SET : '_WINUS'
call @progName( param….)
I don't remember seeing anything in either WINUS program that referenced the other. So, unless @ENVIRON.SET is set differently than what is stored on disk, I really have no clue. Sorry.
apk@sprezzatura.com
At 23 AUG 2001 06:09PM David Kafka wrote:
I know this response is ancient history, but I just did a search and found this inquiry today, so maybe someone else will do the same someday.
If you do a CATALYST("M","XYZ"), you will get a top level, not a dropdown, menu. One way I round that is to create a subroutines like this:
EXPENDABLE SUBROUTINE CALL.DROPDOWN.MENU(MENU.NAME)
CODE="; COMMAND="
CALL WINUS(MENU.NAME,COMMAND,CODE,"1","")
IF CODE AND COMMAND THEN CALL CATALYST(CODE,COMMAND)
RETURN
From your main program, you would then do:
CATALYST("S","CALL.DROPDOWN.MENU,XYZ")
FWIW, 3 years later.
David