CALL "C$RBMENU" [ USING text-1 [, text-2] ... [, text-n] [, exitCode]] |
text-1 text-2 ... text-n | Any alphanumeric data item or literal | These parameters define the items in the pulldown menu along with the strings that are returned to the COBOL program when an item is selected. Using the following syntax, it can specify either a value to be returned or additional sub-menu items: itemname["hint"]=menu where itemname is the string that is displayed in the menu bar. hint is an optional text string that is displayed as tool tip when the mouse hovers over the menu item. menu defines the items in the pulldown menu along with the key codes that are returned to the COBOL program when an item is selected. The syntax for menu is: menu -> [(]items[)] items -> item name=[keycode | (menu)][,items] item name -> pulldownname["menu prompt"] keycode -> key code to be sent (see RM/COBOL key codes for C$MBAR, C$RBMENU and C$TBAR routines for details) If the first character of itemname is a tilde (~), the menu is disabled. An ampersand (&) in itemname causes the next character to be underlined and used as an accelerator. |
exitCode | PIC 9(n) BINARY | Optional parameter that returns the status. It will receive zero for success and non-zero for failure. |
CALL "C$RBMENU" USING "Edit=(Cut=\f1,Copy=\f2,Paste=\f3)" |