DEFINE BAR

Class

Menus

Purpose

Defines an option for an Xbase style pop-up menu

Syntax

DEFINE BAR <expN> OF <expC1> PROMPT <expC2>

[KEY <key>, [<expC3>]]

[MESSAGE <expC4>]

[SKIP [FOR <expL>]]

See Also

ACTIVATE POPUP, BAR(), DEFINE POPUP, DIALOG FIELDS, DIALOG FILES, DIALOG QUERY, DIALOG SCOPE, MENU FIELDS, MENU FILES, MENU QUERY, MENU SCOPE, ON SELECTION POPUP, POPUP(), PRMBAR(), PROMPT(), SET COMPATIBLE

Description

The DEFINE BAR <expN> defines a single option in a pre-defined Xbase style pop-up <expC1> menu. If you have used the PROMPT FIELD, PROMPT FILES, or the PROMPT STRUCTURE options in your pop-up menu definition, the DEFINE BAR command is unnecessary. The command SET COMPATIBLE should be set ON when using Xbase style menus. The PROMPT <expC2> defines the text that will appear in the menu item.

KEY <key>, [<expC3>]

The KEY <key>, [<expC3>] is provided for Xbase language compatibility only. The value <key> is the key combination defined to access the particular option. The <expC> defines the label displayed on the option bar.

MESSAGE <expC4>

The optional MESSAGE <expC4> displays a message centered on the last line of the screen when the bar is selected by the user.

SKIP FOR [<expL>]

The optional SKIP command allows the display of a defined bar but does not allow selection of that bar. The optional SKIP FOR <expL> allows selection of a defined bar only when the specified condition is true.

Example

define popup popup_4;
  from 1,26
define bar 1 of popup_4;
  prompt "\<Bar 1"
define bar 2 of popup_4;
  prompt "B\<ar 2"
define bar 3 of popup_4;
  prompt "Ba\<r 3"
activate popup popup_4

Products

Recital Mirage Server, Recital Terminal Developer