source: FOIAVistA/trunk/r/HEALTH_SUMMARY-GMTS/GMTSXQ11.m@ 1397

Last change on this file since 1397 was 628, checked in by George Lilly, 15 years ago

initial load of FOIAVistA 6/30/08 version

File size: 1.4 KB
Line 
1GMTSXQ11 ; SLC/JER - XQORM5 for Export w/Health Summary ;1/10/92 15:07
2 ;;2.5;Health Summary;;Dec 16, 1992
3XQORM5 ; SLC/KCM - Menu Help ;10/10/89 14:02 ;
4 ;;6.52;Copyright 1990, DVA;
5HELP1 ;From: XQORM4
6 I $D(XQORM("?"))'[0 X XQORM("?") Q:X="?"
7 W ! F J=1:1 S ORUSV=$T(HTX1+J) Q:ORUSV["ZZZZ" W !,$P(ORUSV,";",3,99)
8 W ! ;I $D(XQORM("?"))'[0 X XQORM("?")
9 Q
10HELP2 ;From: XQORM4
11 F J=1:1 S ORUSV=$T(HTX2+J) Q:ORUSV["ZZZZ" W !,$P(ORUSV,";",3,99)
12 Q
13HELP3 ;From: XQORM3
14 W !!,"Enter a number or type another selection",!
15 Q
16HTX1 ;;Help Text for "?"
17 ;;Enter selection(s) by typing the name(s), number(s), or abbreviation(s).
18 ;;ZZZZ
19HTX2 ;;Help Text for "??"
20 ;;ALL items may be selected by typing "ALL".
21 ;;
22 ;;RANGES of items (if numbered) may be selected using the dash.
23 ;; For example, "2-5" selects the items numbered 2,3,4,5.
24 ;;
25 ;;EXCEPTIONS may be entered by preceding them with an minus.
26 ;; For example, "2-5,-4" selects the items numbered 2,3,5.
27 ;; or, "ALL,-THAT" selects all items except "THAT".
28 ;;
29 ;;PRE-SELECTION of items may be done by separating them with ";".
30 ;; For example, "ADD;LAB;WARD;GEN;GLUCOSE" will advance through the
31 ;; 5 menus, automatically selecting the items.
32 ;;
33 ;;JUMP AND RETURN may be done by typing "^^item".
34 ;; For example, "^^GLUCOSE" jumps directly to the prompts for ordering
35 ;; a glucose and then returns to the menu where you typed "^^GLUCOSE".
36 ;;ZZZZ
Note: See TracBrowser for help on using the repository browser.