source: WorldVistAEHR/trunk/r/VA_FILEMAN-ARJT-DI-DD-DM-DT-%DT-%RCR/DINIT00S.m@ 1667

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

initial load of WorldVistAEHR
File size: 6.7 KB
RevLine 
[613]1DINIT00S ; SFISC/TKW-DIALOG & LANGUAGE FILE INITS ; 3/30/99 10:41:48
2 ;;22.0;VA FileMan;;Mar 30, 1999
3 ;Per VHA Directive 10-93-142, this routine should not be modified.
4 F I=1:2 S X=$T(Q+I) Q:X="" S Y=$E($T(Q+I+1),4,999),X=$E(X,4,999) S:$A(Y)=126 I=I+1,Y=$E(Y,2,999)_$E($T(Q+I+1),5,99) S:$A(Y)=61 Y=$E(Y,2,999) S @X=Y
5Q Q
6 ;;^UTILITY(U,$J,.84,9202,2,5,0)
7 ;;=selected, pressing the arrow right key causes the jump to occur. To return to
8 ;;^UTILITY(U,$J,.84,9202,2,6,0)
9 ;;=the previous jump location from the jump, press the arrow left key. On the
10 ;;^UTILITY(U,$J,.84,9202,2,7,0)
11 ;;=return, the selected hypertext represent the previous jump made.
12 ;;^UTILITY(U,$J,.84,9202,2,8,0)
13 ;;=
14 ;;^UTILITY(U,$J,.84,9202,2,9,0)
15 ;;=To EXIT the VA FileMan Browser, in hypertext mode, press <PF1> followed by the
16 ;;^UTILITY(U,$J,.84,9202,2,10,0)
17 ;;=letter 'E'. This is also true for this HELP document which is being presented
18 ;;^UTILITY(U,$J,.84,9202,2,11,0)
19 ;;=by the Browser, in hypertext mode. Pressing the letter 'R', returns the Browser
20 ;;^UTILITY(U,$J,.84,9202,2,12,0)
21 ;;=to the hypertext document.
22 ;;^UTILITY(U,$J,.84,9202,2,13,0)
23 ;;=
24 ;;^UTILITY(U,$J,.84,9202,2,14,0)
25 ;;=For help, select, using TAB and press ARROW RIGHT to jump:
26 ;;^UTILITY(U,$J,.84,9202,2,15,0)
27 ;;= * $.%#NAVIGATION^Navigation$.%
28 ;;^UTILITY(U,$J,.84,9202,2,16,0)
29 ;;= * $.%#SEARCH^Search$.%
30 ;;^UTILITY(U,$J,.84,9202,2,17,0)
31 ;;= * $.%#SCREEN^Screen$.%
32 ;;^UTILITY(U,$J,.84,9202,2,18,0)
33 ;;= * $.%#CLIPBOARD^Clipboard$.%
34 ;;^UTILITY(U,$J,.84,9202,2,19,0)
35 ;;= * $.%#HELP^Help$.%
36 ;;^UTILITY(U,$J,.84,9202,2,20,0)
37 ;;= * $.%#EXIT^Exit$.%
38 ;;^UTILITY(U,$J,.84,9202,2,21,0)
39 ;;= * $.%#MORE_HELP^More Help$.%
40 ;;^UTILITY(U,$J,.84,9202,2,22,0)
41 ;;=
42 ;;^UTILITY(U,$J,.84,9202,2,23,0)
43 ;;= ---------------------------------------------------------------------------
44 ;;^UTILITY(U,$J,.84,9202,2,24,0)
45 ;;=
46 ;;^UTILITY(U,$J,.84,9202,2,25,0)
47 ;;=$.$NAVIGATION$.$NAVIGATION:
48 ;;^UTILITY(U,$J,.84,9202,2,26,0)
49 ;;============
50 ;;^UTILITY(U,$J,.84,9202,2,27,0)
51 ;;=Select hypertext, left to right and down TAB
52 ;;^UTILITY(U,$J,.84,9202,2,28,0)
53 ;;=Select hypertext right to left and up Q
54 ;;^UTILITY(U,$J,.84,9202,2,29,0)
55 ;;=Invoke hypertext jump, selected ARROW RIGHT
56 ;;^UTILITY(U,$J,.84,9202,2,30,0)
57 ;;=Return from hypertext jump ARROW LEFT
58 ;;^UTILITY(U,$J,.84,9202,2,31,0)
59 ;;=Scroll Down (one line) ARROW DOWN
60 ;;^UTILITY(U,$J,.84,9202,2,32,0)
61 ;;=Scroll Up (one line) ARROW UP
62 ;;^UTILITY(U,$J,.84,9202,2,33,0)
63 ;;=Page Down <PF1>ARROW DOWN
64 ;;^UTILITY(U,$J,.84,9202,2,34,0)
65 ;;=Page Up <PF1>ARROW UP
66 ;;^UTILITY(U,$J,.84,9202,2,35,0)
67 ;;=Jump to the Top <PF1>T
68 ;;^UTILITY(U,$J,.84,9202,2,36,0)
69 ;;=Jump to the Bottom <PF1>B
70 ;;^UTILITY(U,$J,.84,9202,2,37,0)
71 ;;=Goto <PF1>G
72 ;;^UTILITY(U,$J,.84,9202,2,38,0)
73 ;;=
74 ;;^UTILITY(U,$J,.84,9202,2,39,0)
75 ;;=$.$SEARCH$.$SEARCH:
76 ;;^UTILITY(U,$J,.84,9202,2,40,0)
77 ;;========
78 ;;^UTILITY(U,$J,.84,9202,2,41,0)
79 ;;=Find text <PF1>F
80 ;;^UTILITY(U,$J,.84,9202,2,42,0)
81 ;;=Next (occurrence) <PF1>N
82 ;;^UTILITY(U,$J,.84,9202,2,43,0)
83 ;;=
84 ;;^UTILITY(U,$J,.84,9202,2,44,0)
85 ;;=Direction-terminate find text with:
86 ;;^UTILITY(U,$J,.84,9202,2,45,0)
87 ;;=-----------------------------------
88 ;;^UTILITY(U,$J,.84,9202,2,46,0)
89 ;;=Down ARROW DOWN
90 ;;^UTILITY(U,$J,.84,9202,2,47,0)
91 ;;=Up ARROW UP
92 ;;^UTILITY(U,$J,.84,9202,2,48,0)
93 ;;=
94 ;;^UTILITY(U,$J,.84,9202,2,49,0)
95 ;;=$.$SCREEN$.$SCREEN:
96 ;;^UTILITY(U,$J,.84,9202,2,50,0)
97 ;;========
98 ;;^UTILITY(U,$J,.84,9202,2,51,0)
99 ;;=Repaint screen <PF1>P
100 ;;^UTILITY(U,$J,.84,9202,2,52,0)
101 ;;=Split screen <PF2>S
102 ;;^UTILITY(U,$J,.84,9202,2,53,0)
103 ;;=Restore Full screen <PF2>F
104 ;;^UTILITY(U,$J,.84,9202,2,54,0)
105 ;;=
106 ;;^UTILITY(U,$J,.84,9202,2,55,0)
107 ;;=Split Screen Mode Navigation:
108 ;;^UTILITY(U,$J,.84,9202,2,56,0)
109 ;;=-----------------------------
110 ;;^UTILITY(U,$J,.84,9202,2,57,0)
111 ;;=Navigate to bottom screen <PF2>ARROW DOWN
112 ;;^UTILITY(U,$J,.84,9202,2,58,0)
113 ;;=Navigate to top screen <PF2>ARROW UP
114 ;;^UTILITY(U,$J,.84,9202,2,59,0)
115 ;;=Resize Split Screen:
116 ;;^UTILITY(U,$J,.84,9202,2,60,0)
117 ;;=--------------------
118 ;;^UTILITY(U,$J,.84,9202,2,61,0)
119 ;;=Top/Bottom screen larger/smaller <PF2><PF2>ARROW DOWN
120 ;;^UTILITY(U,$J,.84,9202,2,62,0)
121 ;;=Bottom/Top screen larger/smaller <PF2><PF2>ARROW UP
122 ;;^UTILITY(U,$J,.84,9202,2,63,0)
123 ;;=
124 ;;^UTILITY(U,$J,.84,9202,2,64,0)
125 ;;=$.$HELP$.$HELP:
126 ;;^UTILITY(U,$J,.84,9202,2,65,0)
127 ;;======
128 ;;^UTILITY(U,$J,.84,9202,2,66,0)
129 ;;=Browse Key Summary <PF1>H
130 ;;^UTILITY(U,$J,.84,9202,2,67,0)
131 ;;=More Help <PF1><PF1>H
132 ;;^UTILITY(U,$J,.84,9202,2,68,0)
133 ;;=Print Help <PF1><PF1><PF1>H
134 ;;^UTILITY(U,$J,.84,9202,2,69,0)
135 ;;=Return to hypertext document, from HELP R
136 ;;^UTILITY(U,$J,.84,9202,2,70,0)
137 ;;=
138 ;;^UTILITY(U,$J,.84,9202,2,71,0)
139 ;;=$.$CLIPBOARD$.$CLIPBOARD:
140 ;;^UTILITY(U,$J,.84,9202,2,72,0)
141 ;;===========
142 ;;^UTILITY(U,$J,.84,9202,2,73,0)
143 ;;=Copy to FileMan's Clipboard <PF1>C
144 ;;^UTILITY(U,$J,.84,9202,2,74,0)
145 ;;=View FileMan's Clipboard <PF1>V
146 ;;^UTILITY(U,$J,.84,9202,2,75,0)
147 ;;=
148 ;;^UTILITY(U,$J,.84,9202,2,76,0)
149 ;;=$.$EXIT$.$EXIT:
150 ;;^UTILITY(U,$J,.84,9202,2,77,0)
151 ;;======
152 ;;^UTILITY(U,$J,.84,9202,2,78,0)
153 ;;=Exit Browser or help text <PF1>E or "EXIT"
154 ;;^UTILITY(U,$J,.84,9202,2,79,0)
155 ;;=Quit <PF1>Q
156 ;;^UTILITY(U,$J,.84,9202,2,80,0)
157 ;;=
158 ;;^UTILITY(U,$J,.84,9202,2,81,0)
159 ;;=
160 ;;^UTILITY(U,$J,.84,9202,2,82,0)
161 ;;= ---------------------------------------------------------------------------
162 ;;^UTILITY(U,$J,.84,9202,2,83,0)
163 ;;=
164 ;;^UTILITY(U,$J,.84,9202,2,84,0)
165 ;;=$.$MORE_HELP$.$MORE HELP
166 ;;^UTILITY(U,$J,.84,9202,2,85,0)
167 ;;=
168 ;;^UTILITY(U,$J,.84,9202,2,86,0)
169 ;;=To GOTO a specific screen or line press the <PF1> key followed by the letter
170 ;;^UTILITY(U,$J,.84,9202,2,87,0)
171 ;;='G'. This will cause a prompt to be displayed where a screen or line number can
172 ;;^UTILITY(U,$J,.84,9202,2,88,0)
173 ;;=be entered preceded by an 'S' or 'L'. The default is screen, meaning that the
174 ;;^UTILITY(U,$J,.84,9202,2,89,0)
175 ;;='S' is optional when entering a screen number. 10 or S10 will Goto screen 10,
Note: See TracBrowser for help on using the repository browser.