1 | XQORM5 ; SLC/KCM - Menu Help ;10/10/89 14:02 ;
|
---|
2 | ;;8.0;KERNEL;;Jul 10, 1995
|
---|
3 | HELP1 ;From: XQORM4
|
---|
4 | I $D(XQORM("?"))'[0 X XQORM("?") Q:X="?"
|
---|
5 | W ! F J=1:1 S ORUSV=$T(HTX1+J) Q:ORUSV["ZZZZ" W !,$P(ORUSV,";",3,99)
|
---|
6 | W ! ;I $D(XQORM("?"))'[0 X XQORM("?")
|
---|
7 | Q
|
---|
8 | HELP2 ;From: XQORM4
|
---|
9 | F J=1:1 S ORUSV=$T(HTX2+J) Q:ORUSV["ZZZZ" W !,$P(ORUSV,";",3,99)
|
---|
10 | Q
|
---|
11 | HELP3 ;From: XQORM3
|
---|
12 | W !!,"Enter a number or type another selection",!
|
---|
13 | Q
|
---|
14 | HTX1 ;;Help Text for "?"
|
---|
15 | ;;Enter selection(s) by typing the name(s), number(s), or abbreviation(s).
|
---|
16 | ;;ZZZZ
|
---|
17 | HTX2 ;;Help Text for "??"
|
---|
18 | ;;ALL items may be selected by typing "ALL".
|
---|
19 | ;;
|
---|
20 | ;;RANGES of items (if numbered consecutively) may be selected using the dash.
|
---|
21 | ;; For example, "2-5" selects the items numbered 2,3,4,5.
|
---|
22 | ;;
|
---|
23 | ;;EXCEPTIONS may be entered by preceding them with an minus.
|
---|
24 | ;; For example, "2-5,-4" selects the items numbered 2,3,5.
|
---|
25 | ;; or, "ALL,-THAT" selects all items except "THAT".
|
---|
26 | ;;
|
---|
27 | ;;PRE-SELECTION of items may be done by separating them with ";".
|
---|
28 | ;; For example, "THIS MENU SELECTION;NEXT MENU SELECTION;FINAL SELECTION"
|
---|
29 | ;; automatically steps through 3 successive menu selections.
|
---|
30 | ;;
|
---|
31 | ;;JUMP AND RETURN may be done by typing "^^item".
|
---|
32 | ;; For example, "^^ABC" jumps directly to ABC, allows interaction,
|
---|
33 | ;; then returns to the menu where you first typed "^^ABC".
|
---|
34 | ;;ZZZZ
|
---|