1 | XBHEDDH1 ;402,DJB,10/23/91,EDD - Help Text - Main Menu
|
---|
2 | ;;4.0;XB;;Jul 20, 2009;Build 2
|
---|
3 | ;;David Bolduc - Togus, ME
|
---|
4 | ;;Called by XBHEDD1
|
---|
5 | D INIT G:FLAGQ EX
|
---|
6 | I FLAGP,IO'=IO(0) W !!!
|
---|
7 | F I=1:1 S TEXT=$P($T(TXT+I),";;;",2) Q:TEXT="***" W !,TEXT I $Y>SIZE D PAGE Q:FLAGQ
|
---|
8 | I 'FLAGQ D ^XBHEDDH2
|
---|
9 | EX ;
|
---|
10 | K TEXT Q
|
---|
11 | TXT ;Start of text
|
---|
12 | ;;; E D D - Electonic Data Dictionary
|
---|
13 | ;;; Version 2.2 David Bolduc Togus,ME
|
---|
14 | ;;;==============================================================================
|
---|
15 | ;;; HELP [] HELP [] HELP [] HELP [] HELP [] HELP [] HELP [] HELP
|
---|
16 | ;;;==============================================================================
|
---|
17 | ;;; NOTE: When you're in EDD, enter '?' at any prompt for help.
|
---|
18 | ;;;
|
---|
19 | ;;; A) E N T R Y P O I N T S:
|
---|
20 | ;;;
|
---|
21 | ;;; DO ^XBHEDD - Main entry point. At 'Select FILE:' prompt
|
---|
22 | ;;; enter File Name, File Number, or File Global
|
---|
23 | ;;; in the form '^DG' or '^RA('.
|
---|
24 | ;;; DO GL^XBHEDD - Gives listing of your system's globals sorted
|
---|
25 | ;;; in ASCII order, including file number and name.
|
---|
26 | ;;; DO PRT^XBHEDD - Bypasses opening screen and suppressess some page
|
---|
27 | ;;; feeds. Use if you're on a printing/keyboard device
|
---|
28 | ;;; such as a counsol.
|
---|
29 | ;;; DO DIR^XBHEDD - Bypasses opening screen.
|
---|
30 | ;;;
|
---|
31 | ;;; B) M E N U O P T I O N S:
|
---|
32 | ;;;
|
---|
33 | ;;; 1) Cross References - An '*' in the far left column indicates this
|
---|
34 | ;;; XREF can be used for lookup purposes. If you
|
---|
35 | ;;; concantenate the global shown on the Main Menu
|
---|
36 | ;;; screen with this XREF, there will be data.
|
---|
37 | ;;;
|
---|
38 | ;;; 2) Pointers To This File - Lists all files that point to this file.
|
---|
39 | ;;;
|
---|
40 | ;;; 3) Pointers From This File - Lists all fields in this file that are
|
---|
41 | ;;; pointers, and the files they point to. An 'M' in
|
---|
42 | ;;; the far left column indicates the pointing field
|
---|
43 | ;;; is a multiple. Use 'Trace a Field' to determine
|
---|
44 | ;;; it's path.
|
---|
45 | ;;;
|
---|
46 | ;;; 4) Groups - In Filenanager Groups are a shorthand way for a user to
|
---|
47 | ;;; call up several fields at once for Print or
|
---|
48 | ;;; Entry/Edit purposes. Also, some programmers
|
---|
49 | ;;; use Groups to keep track of locally added/alterred
|
---|
50 | ;;; fields. See VA FILEMAN USER'S MANUAL to learn
|
---|
51 | ;;; how to use Groups.
|
---|
52 | ;;;
|
---|
53 | ;;; 5) Trace a Field - Displays the pathway to fields that are decendent
|
---|
54 | ;;; from a multiple.
|
---|
55 | ;;; Example: When looking at PATIENT file, you type
|
---|
56 | ;;; 'MOV' at the 'Enter Field Name:' prompt. Trace
|
---|
57 | ;;; a Field will display:
|
---|
58 | ;;; 401 Admission Date/Time
|
---|
59 | ;;; 5 Treating Specialty
|
---|
60 | ;;; 1000 Movement Number
|
---|
61 | ;;; This is the pathway to the MOVEMENT NUMBER field.
|
---|
62 | ;;; You can now select 'I' and type in the field
|
---|
63 | ;;; number of each field in the path. You will get
|
---|
64 | ;;; the Individual Field Listing for the MOVEMENT
|
---|
65 | ;;; NUMBER field.
|
---|
66 | ;;;***
|
---|
67 | PAGE ;
|
---|
68 | I FLAGP,IO'=IO(0) W @IOF,!!! Q
|
---|
69 | R !!?2,"<RETURN> to continue, '^' to quit: ",XX:DTIME S:'$T XX="^" S:XX["^" FLAGQ=1 I FLAGQ Q
|
---|
70 | W @IOF Q
|
---|
71 | INIT ;
|
---|
72 | I FLAGP,IO=IO(0),IOSL>25 D SCROLL^XBHEDD7 Q:FLAGQ
|
---|
73 | I FLAGP W:IO'=IO(0) " Printing.." U IO
|
---|
74 | W @IOF Q
|
---|