Hallo Mach4,
bei uns hab ich die CATFRM.dcls geaendert.
Das sieht ungefaehr so aus:
/* --------------------------------------------------------------- */
/* Pulldownmenü */
/* --------------------------------------------------------------- */
CATFRM.MENUBAR.TOPLEVEL(10).TYPE = 'SUBMENU';
CATFRM.MENUBAR.TOPLEVEL(10).LABEL = 'Ausgabe';
CATFRM.MENUBAR.TOPLEVEL(10).MNEMONIC = 'A';
CATFRM.MENUBAR.TOPLEVEL(10).SUBMENID = 'AUS';
CATFRM.MENUBAR.TOPLEVEL(10).CUS_NAME = 'toolsPulldown';
CATFRM.MENUBAR.AUS(1).TYPE = 'PUSH';
CATFRM.MENUBAR.AUS(1).LABEL = ' PRTCOM ';
CATFRM.MENUBAR.AUS(1).COMMAND = '/m prtcom';
CATFRM.MENUBAR.AUS(1).MNEMONIC = 'C';
CATFRM.MENUBAR.AUS(2).TYPE = 'PUSH';
CATFRM.MENUBAR.AUS(2).LABEL = ' REAPT ';
CATFRM.MENUBAR.AUS(2).COMMAND = '/m reapt';
CATFRM.MENUBAR.AUS(2).MNEMONIC = 'x';
CATFRM.MENUBAR.AUS(3).TYPE = 'PUSH';
CATFRM.MENUBAR.AUS(3).LABEL = ' DETAILS ';
CATFRM.MENUBAR.AUS(3).COMMAND = '/m details';
CATFRM.MENUBAR.AUS(3).MNEMONIC = 'd';
usw.
TOPLEVEL(10) => die Position des neuen Menüs in der Leiste
MNEMONIC = 'A' => Buchstabe der Unterstrichen dargestellt wird
LABEL = ' DETAILS ' => Name des jeweiligen Befehls oder Menüs
COMMAND = '/m reapt' => Befehl der ausgeführt weden soll
SUBMENID = 'AUS' => Name des Untermenüs
(1),(2), ... => Position des Menüpunktes
vielleicht hilft die das.
Grüße
Andi
IP