Produced by Araxis Merge on 6/12/2018 12:04:37 PM Central Daylight Time. See www.araxis.com for information about Merge. This report uses XHTML and CSS2, and is best viewed with a modern standards-compliant browser. For optimum results when printing this report, use landscape orientation and enable printing of background images and colours in your browser.
# | Location | File | Last Modified |
---|---|---|---|
1 | MASS.zip\MASS | DVBA-2.7-202.KID | Wed Jun 6 14:44:36 2018 UTC |
2 | MASS.zip\MASS | DVBA-2.7-202.KID | Tue Jun 12 16:55:55 2018 UTC |
Description | Between Files 1 and 2 |
|
---|---|---|
Text Blocks | Lines | |
Unchanged | 9 | 5010 |
Changed | 9 | 18 |
Inserted | 0 | 0 |
Removed | 0 | 0 |
Whitespace | |
---|---|
Character case | Differences in character case are significant |
Line endings | Differences in line endings (CR and LF characters) are ignored |
CR/LF characters | Not shown in the comparison detail |
No regular expressions were active.
1 | $TXT Creat ed by MARQ UEZ,JUSTO at DEVVFF.
|
|
2 | $END TXT | |
3 | $KID DVBA* 2.7*202 | |
4 | **INSTALL NAME** | |
5 | DVBA*2.7*2 02 | |
6 | "BLD",1063 9,0) | |
7 | DVBA*2.7*2 02^AUTOMAT ED MED INF O EXCHANGE ^0^3180504 ^y | |
8 | "BLD",1063 9,1,0) | |
9 | ^^370^370^ 3180419^^ | |
10 | "BLD",1063 9,1,1,0) | |
11 | Associated patches: DG*5.3*948 | |
12 | "BLD",1063 9,1,2,0) | |
13 | SD*5.3*676 | |
14 | "BLD",1063 9,1,3,0) | |
15 | OR*3.0*470 | |
16 | "BLD",1063 9,1,4,0) | |
17 | GMRC*3.0*9 5 | |
18 | "BLD",1063 9,1,5,0) | |
19 | ||
20 | "BLD",1063 9,1,6,0) | |
21 | Subject: MASS 2507 EXAM PATCH | |
22 | "BLD",1063 9,1,7,0) | |
23 | ||
24 | "BLD",1063 9,1,8,0) | |
25 | Category: 2507 EXAM | |
26 | "BLD",1063 9,1,9,0) | |
27 | ROUTINE | |
28 | "BLD",1063 9,1,10,0) | |
29 | PROTOCOLS | |
30 | "BLD",1063 9,1,11,0) | |
31 | ||
32 | "BLD",1063 9,1,12,0) | |
33 | The follow ing patche s must be installed in order f or a succe ssful | |
34 | "BLD",1063 9,1,13,0) | |
35 | instalatio n: | |
36 | "BLD",1063 9,1,14,0) | |
37 | SD*5.3*67 6 | |
38 | "BLD",1063 9,1,15,0) | |
39 | DG*5.3*94 8 | |
40 | "BLD",1063 9,1,16,0) | |
41 | OR*3.0*47 0 | |
42 | "BLD",1063 9,1,17,0) | |
43 | GMRC*3.0* 95 | |
44 | "BLD",1063 9,1,18,0) | |
45 | DVBA*2.7* 202 | |
46 | "BLD",1063 9,1,19,0) | |
47 | ||
48 | "BLD",1063 9,1,20,0) | |
49 | Descriptio n: | |
50 | "BLD",1063 9,1,21,0) | |
51 | ---------- -- | |
52 | "BLD",1063 9,1,22,0) | |
53 | Automated Medical In formation Exchange p atch DVBA* 2.7*202 is the | |
54 | "BLD",1063 9,1,23,0) | |
55 | initial re lease of t he Medical Appointme nt Schedul ing System (MASS) | |
56 | "BLD",1063 9,1,24,0) | |
57 | Scheduling integrati on develop ment for t he VistA P ilot at | |
58 | "BLD",1063 9,1,25,0) | |
59 | Columbus, OH. This p atch inclu des all of the neces sary compo nents | |
60 | "BLD",1063 9,1,26,0) | |
61 | that will enable out going HL7 (Health Le vel 7) V2 | |
62 | "BLD",1063 9,1,27,0) | |
63 | ORM (Order Message) ordering i ntegration with MASS . | |
64 | "BLD",1063 9,1,28,0) | |
65 | ||
66 | "BLD",1063 9,1,29,0) | |
67 | Patch Comp onents: | |
68 | "BLD",1063 9,1,30,0) | |
69 | ---------- ------- | |
70 | "BLD",1063 9,1,31,0) | |
71 | N/A (Not Applicable ) | |
72 | "BLD",1063 9,1,32,0) | |
73 | ||
74 | "BLD",1063 9,1,33,0) | |
75 | ||
76 | "BLD",1063 9,1,34,0) | |
77 | Files & Fi elds Assoc iated: | |
78 | "BLD",1063 9,1,35,0) | |
79 | ||
80 | "BLD",1063 9,1,36,0) | |
81 | File Name (Number) Field Name (Numb er) Ne w/Modified /Deleted | |
82 | "BLD",1063 9,1,37,0) | |
83 | ---------- -------- ------ ---------- --- -- ---------- -------- | |
84 | "BLD",1063 9,1,38,0) | |
85 | 2507 EXAM (396.4) 2507 R EQUEST (.0 2) MO DIFIED | |
86 | "BLD",1063 9,1,39,0) | |
87 | 2507 EXAM (396.4) EXAM T YPE (.03) MO DIFIED | |
88 | "BLD",1063 9,1,40,0) | |
89 | 2507 EXAM (396.4) STATUS (.04) MO DIFIED | |
90 | "BLD",1063 9,1,41,0) | |
91 | ||
92 | "BLD",1063 9,1,42,0) | |
93 | ||
94 | "BLD",1063 9,1,43,0) | |
95 | Forms Asso ciated: | |
96 | "BLD",1063 9,1,44,0) | |
97 | ||
98 | "BLD",1063 9,1,45,0) | |
99 | Form Name File # New/Mo dified/Del eted | |
100 | "BLD",1063 9,1,46,0) | |
101 | --------- ---- -- ------ ---------- ---- | |
102 | "BLD",1063 9,1,47,0) | |
103 | None N/A N/A | |
104 | "BLD",1063 9,1,48,0) | |
105 | ||
106 | "BLD",1063 9,1,49,0) | |
107 | ||
108 | "BLD",1063 9,1,50,0) | |
109 | Mail Group s Associat ed: | |
110 | "BLD",1063 9,1,51,0) | |
111 | ||
112 | "BLD",1063 9,1,52,0) | |
113 | Mail Group Name New/ Modified/D eleted | |
114 | "BLD",1063 9,1,53,0) | |
115 | ---------- ----- ---- ---------- ------ | |
116 | "BLD",1063 9,1,54,0) | |
117 | None N/A | |
118 | "BLD",1063 9,1,55,0) | |
119 | ||
120 | "BLD",1063 9,1,56,0) | |
121 | ||
122 | "BLD",1063 9,1,57,0) | |
123 | Options As sociated: | |
124 | "BLD",1063 9,1,58,0) | |
125 | ||
126 | "BLD",1063 9,1,59,0) | |
127 | Option Nam e Type New/Mo dified/Del eted | |
128 | "BLD",1063 9,1,60,0) | |
129 | ---------- - ---- ------ ---------- ---- | |
130 | "BLD",1063 9,1,61,0) | |
131 | None N/A N/A | |
132 | "BLD",1063 9,1,62,0) | |
133 | ||
134 | "BLD",1063 9,1,63,0) | |
135 | ||
136 | "BLD",1063 9,1,64,0) | |
137 | Protocols Associated : | |
138 | "BLD",1063 9,1,65,0) | |
139 | ||
140 | "BLD",1063 9,1,66,0) | |
141 | Protocol N ame New/ Modified/D eleted | |
142 | "BLD",1063 9,1,67,0) | |
143 | ---------- --- ---- ---------- ------ | |
144 | "BLD",1063 9,1,68,0) | |
145 | None N/A | |
146 | "BLD",1063 9,1,69,0) | |
147 | ||
148 | "BLD",1063 9,1,70,0) | |
149 | ||
150 | "BLD",1063 9,1,71,0) | |
151 | Security K eys Associ ated: | |
152 | "BLD",1063 9,1,72,0) | |
153 | ||
154 | "BLD",1063 9,1,73,0) | |
155 | Security K ey Name | |
156 | "BLD",1063 9,1,74,0) | |
157 | ---------- ------- | |
158 | "BLD",1063 9,1,75,0) | |
159 | N/A | |
160 | "BLD",1063 9,1,76,0) | |
161 | ||
162 | "BLD",1063 9,1,77,0) | |
163 | ||
164 | "BLD",1063 9,1,78,0) | |
165 | Templates Associated : | |
166 | "BLD",1063 9,1,79,0) | |
167 | ||
168 | "BLD",1063 9,1,80,0) | |
169 | Template N ame Type File N ame (Numbe r) New/Mo dified/Del eted | |
170 | "BLD",1063 9,1,81,0) | |
171 | ---------- --- ---- ------ ---------- -- ------ ---------- ---- | |
172 | "BLD",1063 9,1,82,0) | |
173 | None N/A N/A N/A | |
174 | "BLD",1063 9,1,83,0) | |
175 | ||
176 | "BLD",1063 9,1,84,0) | |
177 | Additional Informati on: N/A | |
178 | "BLD",1063 9,1,85,0) | |
179 | ||
180 | "BLD",1063 9,1,86,0) | |
181 | ||
182 | "BLD",1063 9,1,87,0) | |
183 | New Servic e Requests (NSRs): | |
184 | "BLD",1063 9,1,88,0) | |
185 | ---------- ---------- -------- | |
186 | "BLD",1063 9,1,89,0) | |
187 | N/A | |
188 | "BLD",1063 9,1,90,0) | |
189 | ||
190 | "BLD",1063 9,1,91,0) | |
191 | ||
192 | "BLD",1063 9,1,92,0) | |
193 | Patient Sa fety Issue s (PSIs): | |
194 | "BLD",1063 9,1,93,0) | |
195 | ---------- ---------- --------- | |
196 | "BLD",1063 9,1,94,0) | |
197 | N/A | |
198 | "BLD",1063 9,1,95,0) | |
199 | ||
200 | "BLD",1063 9,1,96,0) | |
201 | ||
202 | "BLD",1063 9,1,97,0) | |
203 | Defect Tra cking Syst em Ticket( s) & Overv iew: | |
204 | "BLD",1063 9,1,98,0) | |
205 | ---------- ---------- ---------- ---------- ---- | |
206 | "BLD",1063 9,1,99,0) | |
207 | N/A | |
208 | "BLD",1063 9,1,100,0) | |
209 | ||
210 | "BLD",1063 9,1,101,0) | |
211 | ||
212 | "BLD",1063 9,1,102,0) | |
213 | Problem: | |
214 | "BLD",1063 9,1,103,0) | |
215 | ------- | |
216 | "BLD",1063 9,1,104,0) | |
217 | N/A | |
218 | "BLD",1063 9,1,105,0) | |
219 | ||
220 | "BLD",1063 9,1,106,0) | |
221 | ||
222 | "BLD",1063 9,1,107,0) | |
223 | Resolution : | |
224 | "BLD",1063 9,1,108,0) | |
225 | ---------- | |
226 | "BLD",1063 9,1,109,0) | |
227 | N/A | |
228 | "BLD",1063 9,1,110,0) | |
229 | ||
230 | "BLD",1063 9,1,111,0) | |
231 | ||
232 | "BLD",1063 9,1,112,0) | |
233 | Test Sites : | |
234 | "BLD",1063 9,1,113,0) | |
235 | ---------- | |
236 | "BLD",1063 9,1,114,0) | |
237 | 1. EPIC DE VELOPMENT ACCOUNT | |
238 | "BLD",1063 9,1,115,0) | |
239 | 2. VISTA D EVVFF DEVE LOPMENT AC COUNT | |
240 | "BLD",1063 9,1,116,0) | |
241 | 3. Columbu s, OH (PRE -PRODUCTIO N and PROD UCTION) | |
242 | "BLD",1063 9,1,117,0) | |
243 | ||
244 | "BLD",1063 9,1,118,0) | |
245 | Software a nd Documen tation Ret rieval Ins tructions: | |
246 | "BLD",1063 9,1,119,0) | |
247 | ---------- ---------- ---------- ---------- ---------- | |
248 | "BLD",1063 9,1,120,0) | |
249 | Software b eing relea sed as a h ost file a nd/or docu mentation describing | |
250 | "BLD",1063 9,1,121,0) | |
251 | the new fu nctionalit y introduc ed by this patch are available . | |
252 | "BLD",1063 9,1,122,0) | |
253 | ||
254 | "BLD",1063 9,1,123,0) | |
255 | The prefer red method is to ret rieve file s from dow nload. DNS . DNS . | |
256 | "BLD",1063 9,1,124,0) | |
257 | This trans mits the f iles from the first available server. Si tes may | |
258 | "BLD",1063 9,1,125,0) | |
259 | also elect to retrie ve files d irectly fr om a speci fic server . | |
260 | "BLD",1063 9,1,126,0) | |
261 | ||
262 | "BLD",1063 9,1,127,0) | |
263 | Sites may retrieve t he softwar e and/or d ocumentati on directl y using | |
264 | "BLD",1063 9,1,128,0) | |
265 | Secure Fil e Transfer Protocol (SFTP) fro m the ANON YMOUS.SOFT WARE | |
266 | "BLD",1063 9,1,129,0) | |
267 | directory at the fol lowing | |
268 | "BLD",1063 9,1,130,0) | |
269 | OI Field O ffices: | |
270 | "BLD",1063 9,1,131,0) | |
271 | ||
272 | "BLD",1063 9,1,132,0) | |
273 | Hines: DN S .URL | |
274 | "BLD",1063 9,1,133,0) | |
275 | Salt Lake City:
|
|
276 | "BLD",1063 9,1,134,0) | |
277 | ||
278 | "BLD",1063 9,1,135,0) | |
279 | Documentat ion can al so be foun d on the V A Software Documenta tion Libra ry | |
280 | "BLD",1063 9,1,136,0) | |
281 | at: | |
282 | "BLD",1063 9,1,137,0) | |
283 | http://www . DNS /vdl/ | |
284 | "BLD",1063 9,1,138,0) | |
285 | ||
286 | "BLD",1063 9,1,139,0) | |
287 | Title File Name FTP Mode | |
288 | "BLD",1063 9,1,140,0) | |
289 | ----- --------- -------- | |
290 | "BLD",1063 9,1,141,0) | |
291 | MASS VistA Technical Manual MASS Vist A SFTP | |
292 | "BLD",1063 9,1,142,0) | |
293 | Technical Manual | |
294 | "BLD",1063 9,1,143,0) | |
295 | ||
296 | "BLD",1063 9,1,144,0) | |
297 | ||
298 | "BLD",1063 9,1,145,0) | |
299 | Patch Inst allation: | |
300 | "BLD",1063 9,1,146,0) | |
301 | ||
302 | "BLD",1063 9,1,147,0) | |
303 | Pre/Post I nstallatio n Overview : | |
304 | "BLD",1063 9,1,148,0) | |
305 | ---------- ---------- ---------- - | |
306 | "BLD",1063 9,1,149,0) | |
307 | See Techni cal Manual for proje ct level i nstallatio n instruct ions. | |
308 | "BLD",1063 9,1,150,0) | |
309 | ||
310 | "BLD",1063 9,1,151,0) | |
311 | ||
312 | "BLD",1063 9,1,152,0) | |
313 | Pre-Instal lation Ins tructions: | |
314 | "BLD",1063 9,1,153,0) | |
315 | ---------- ---------- ---------- | |
316 | "BLD",1063 9,1,154,0) | |
317 | See Techni cal Manual for proje ct level i nstallatio n instruct ions. | |
318 | "BLD",1063 9,1,155,0) | |
319 | ||
320 | "BLD",1063 9,1,156,0) | |
321 | This patch may not b e installe d with use rs on the system. T his patch | |
322 | "BLD",1063 9,1,157,0) | |
323 | should tak e less tha n 5 minute s to insta ll. | |
324 | "BLD",1063 9,1,158,0) | |
325 | ||
326 | "BLD",1063 9,1,159,0) | |
327 | OR | |
328 | "BLD",1063 9,1,160,0) | |
329 | ||
330 | "BLD",1063 9,1,161,0) | |
331 | This patch may be in stalled wi th users o n the syst em althoug h it is | |
332 | "BLD",1063 9,1,162,0) | |
333 | recommende d that it be install ed during non-peak h ours to mi nimize | |
334 | "BLD",1063 9,1,163,0) | |
335 | potential disruption to users. This pat ch should take less than 5 | |
336 | "BLD",1063 9,1,164,0) | |
337 | minutes to install. | |
338 | "BLD",1063 9,1,165,0) | |
339 | ||
340 | "BLD",1063 9,1,166,0) | |
341 | There are no ListMan Options t hat need t o be disab led for th is patch. | |
342 | "BLD",1063 9,1,167,0) | |
343 | ||
344 | "BLD",1063 9,1,168,0) | |
345 | ||
346 | "BLD",1063 9,1,169,0) | |
347 | Installati on Instruc tions: | |
348 | "BLD",1063 9,1,170,0) | |
349 | ---------- ---------- ------ | |
350 | "BLD",1063 9,1,171,0) | |
351 | ||
352 | "BLD",1063 9,1,172,0) | |
353 | 1. Choose the PackMa n message containing this patc h. | |
354 | "BLD",1063 9,1,173,0) | |
355 | ||
356 | "BLD",1063 9,1,174,0) | |
357 | 2. Choose the INSTAL L/CHECK ME SSAGE Pack Man option . | |
358 | "BLD",1063 9,1,175,0) | |
359 | ||
360 | "BLD",1063 9,1,176,0) | |
361 | 3. From th e Kernel I nstallatio n and Dist ribution S ystem Menu , select | |
362 | "BLD",1063 9,1,177,0) | |
363 | the Ins tallation Menu (See Install Pr ompts Samp le below f or more | |
364 | "BLD",1063 9,1,178,0) | |
365 | detail) . From th is menu, y ou may ele ct to use the follow ing option s. | |
366 | "BLD",1063 9,1,179,0) | |
367 | When pr ompted for the INSTA LL NAME en ter the pa tch DVBA*2 .7*202: | |
368 | "BLD",1063 9,1,180,0) | |
369 | ||
370 | "BLD",1063 9,1,181,0) | |
371 | a. Bac kup a Tran sport Glob al - This option wil l create a backup | |
372 | "BLD",1063 9,1,182,0) | |
373 | mes sage of an y routines exported with this patch. It will not | |
374 | "BLD",1063 9,1,183,0) | |
375 | bac kup any ot her change s such as DDs or tem plates. | |
376 | "BLD",1063 9,1,184,0) | |
377 | ||
378 | "BLD",1063 9,1,185,0) | |
379 | b. Com pare Trans port Globa l to Curre nt System - This opt ion will | |
380 | "BLD",1063 9,1,186,0) | |
381 | (al low you to view all changes th at will be made when this | |
382 | "BLD",1063 9,1,187,0) | |
383 | patch | |
384 | "BLD",1063 9,1,188,0) | |
385 | is installed. It compa res all co mponents o f this pat ch routine s, | |
386 | "BLD",1063 9,1,189,0) | |
387 | DDs , template s, etc.). | |
388 | "BLD",1063 9,1,190,0) | |
389 | ||
390 | "BLD",1063 9,1,191,0) | |
391 | c. Ver ify Checks ums in Tra nsport Glo bal - This option wi ll allow y ou | |
392 | "BLD",1063 9,1,192,0) | |
393 | to ensure the integrity of the ro utines tha t are in t he transpo rt | |
394 | "BLD",1063 9,1,193,0) | |
395 | glo bal. | |
396 | "BLD",1063 9,1,194,0) | |
397 | ||
398 | "BLD",1063 9,1,195,0) | |
399 | 4. From th e Installa tion Menu, select th e Install Package(s) option | |
400 | "BLD",1063 9,1,196,0) | |
401 | and cho ose the pa tch to ins tall. | |
402 | "BLD",1063 9,1,197,0) | |
403 | ||
404 | "BLD",1063 9,1,198,0) | |
405 | 5. When pr ompted 'Wa nt KIDS to Rebuild M enu Trees Upon Compl etion of | |
406 | "BLD",1063 9,1,199,0) | |
407 | Install ? NO//' | |
408 | "BLD",1063 9,1,200,0) | |
409 | ||
410 | "BLD",1063 9,1,201,0) | |
411 | 6. When pr ompted 'Wa nt KIDS to INHIBIT L OGONs duri ng the ins tall? | |
412 | "BLD",1063 9,1,202,0) | |
413 | NO//' | |
414 | "BLD",1063 9,1,203,0) | |
415 | ||
416 | "BLD",1063 9,1,204,0) | |
417 | 7. When pr ompted 'Wa nt to DISA BLE Schedu led Option s, Menu Op tions, | |
418 | "BLD",1063 9,1,205,0) | |
419 | and Pro tocols? NO //' | |
420 | "BLD",1063 9,1,206,0) | |
421 | ||
422 | "BLD",1063 9,1,207,0) | |
423 | 8. If prom pted 'Dela y Install (Minutes): (0 - 60) : 0//' res pond 0. | |
424 | "BLD",1063 9,1,208,0) | |
425 | ||
426 | "BLD",1063 9,1,209,0) | |
427 | ||
428 | "BLD",1063 9,1,210,0) | |
429 | Install Pr ompts Samp le: | |
430 | "BLD",1063 9,1,211,0) | |
431 | ---------- ---------- ------ | |
432 | "BLD",1063 9,1,212,0) | |
433 | ||
434 | "BLD",1063 9,1,213,0) | |
435 | VISTA>D ^X UP | |
436 | "BLD",1063 9,1,214,0) | |
437 | ||
438 | "BLD",1063 9,1,215,0) | |
439 | Setting up programme r environm ent | |
440 | "BLD",1063 9,1,216,0) | |
441 | This is a TEST accou nt. | |
442 | "BLD",1063 9,1,217,0) | |
443 | ||
444 | "BLD",1063 9,1,218,0) | |
445 | Terminal T ype set to : C-VT100 | |
446 | "BLD",1063 9,1,219,0) | |
447 | ||
448 | "BLD",1063 9,1,220,0) | |
449 | Select OPT ION NAME: XPD LOAD D ISTRIBUTIO N Lo ad a Distr ibution | |
450 | "BLD",1063 9,1,221,0) | |
451 | Load a Dis tribution | |
452 | "BLD",1063 9,1,222,0) | |
453 | Enter a Ho st File: < File locat ion>\DVBA_ 2_7_202.KI D | |
454 | "BLD",1063 9,1,223,0) | |
455 | ||
456 | "BLD",1063 9,1,224,0) | |
457 | KIDS Distr ibution sa ved on Dec 11, 2017@ 17:29:45 | |
458 | "BLD",1063 9,1,225,0) | |
459 | Comment: D VBA*2.7*20 2 12/11/17 | |
460 | "BLD",1063 9,1,226,0) | |
461 | ||
462 | "BLD",1063 9,1,227,0) | |
463 | This Distr ibution co ntains Tra nsport Glo bals for t he followi ng Package (s): | |
464 | "BLD",1063 9,1,228,0) | |
465 | It cons isted of t he followi ng Install (s): | |
466 | "BLD",1063 9,1,229,0) | |
467 | DBVA* 2.7*202 | |
468 | "BLD",1063 9,1,230,0) | |
469 | ||
470 | "BLD",1063 9,1,231,0) | |
471 | OK to cont inue with Load? NO// YES | |
472 | "BLD",1063 9,1,232,0) | |
473 | ||
474 | "BLD",1063 9,1,233,0) | |
475 | Distributi on OK! | |
476 | "BLD",1063 9,1,234,0) | |
477 | ||
478 | "BLD",1063 9,1,235,0) | |
479 | Want to Co ntinue wit h Load? YE S// | |
480 | "BLD",1063 9,1,236,0) | |
481 | Loading Di stribution ... | |
482 | "BLD",1063 9,1,237,0) | |
483 | ||
484 | "BLD",1063 9,1,238,0) | |
485 | DVBA*2. 7*202 | |
486 | "BLD",1063 9,1,239,0) | |
487 | Use INSTAL L NAME: DV BA*2.7*202 to instal l this Dis tribution. | |
488 | "BLD",1063 9,1,240,0) | |
489 | ||
490 | "BLD",1063 9,1,241,0) | |
491 | VISTA>D ^X UP | |
492 | "BLD",1063 9,1,242,0) | |
493 | ||
494 | "BLD",1063 9,1,243,0) | |
495 | Setting up programme r environm ent | |
496 | "BLD",1063 9,1,244,0) | |
497 | This is a TEST accou nt. | |
498 | "BLD",1063 9,1,245,0) | |
499 | ||
500 | "BLD",1063 9,1,246,0) | |
501 | Terminal T ype set to : C-VT100 | |
502 | "BLD",1063 9,1,247,0) | |
503 | ||
504 | "BLD",1063 9,1,248,0) | |
505 | Select OPT ION NAME: XPD IN | |
506 | "BLD",1063 9,1,249,0) | |
507 | 1 X PD INSTALL BUILD Install Package(s ) | |
508 | "BLD",1063 9,1,250,0) | |
509 | 2 X PD INSTALL ATION MENU Ins tallation | |
510 | "BLD",1063 9,1,251,0) | |
511 | CHOOSE 1-2 : 1 XPD I NSTALL BUI LD Ins tall Packa ge(s) | |
512 | "BLD",1063 9,1,252,0) | |
513 | Install Pa ckage(s) | |
514 | "BLD",1063 9,1,253,0) | |
515 | Select INS TALL NAME: DVBA*2 .7*202 Loaded fr om Distrib ution | |
516 | "BLD",1063 9,1,254,0) | |
517 | 12/12/17@2 3 | |
518 | "BLD",1063 9,1,255,0) | |
519 | :47:16 | |
520 | "BLD",1063 9,1,256,0) | |
521 | => DV BA*2.7*202 12/11/17 ;Created on Dec 11, 2017@17:2 9:45 | |
522 | "BLD",1063 9,1,257,0) | |
523 | ||
524 | "BLD",1063 9,1,258,0) | |
525 | This Distr ibution wa s loaded o n Dec 12, 2017@23:47 :16 with h eader of | |
526 | "BLD",1063 9,1,259,0) | |
527 | DVBA*2. 7*202 12/1 1/17 ;Cre ated on De c 11, 2017 @17:29:45 | |
528 | "BLD",1063 9,1,260,0) | |
529 | It cons isted of t he followi ng Install (s): | |
530 | "BLD",1063 9,1,261,0) | |
531 | DVBA*2. 7*202 | |
532 | "BLD",1063 9,1,262,0) | |
533 | Checking I nstall for Package D VBA*2.7*20 2 | |
534 | "BLD",1063 9,1,263,0) | |
535 | ||
536 | "BLD",1063 9,1,264,0) | |
537 | Install Qu estions fo r DVBA*2.7 *202 | |
538 | "BLD",1063 9,1,265,0) | |
539 | ||
540 | "BLD",1063 9,1,266,0) | |
541 | Incoming F iles: | |
542 | "BLD",1063 9,1,267,0) | |
543 | ||
544 | "BLD",1063 9,1,268,0) | |
545 | 396.4 2507 EX AM (Parti al Definit ion) | |
546 | "BLD",1063 9,1,269,0) | |
547 | Note: You already h ave the '2 507 EXAM' File. | |
548 | "BLD",1063 9,1,270,0) | |
549 | ||
550 | "BLD",1063 9,1,271,0) | |
551 | ||
552 | "BLD",1063 9,1,272,0) | |
553 | Want KIDS to INHIBIT LOGONs du ring the i nstall? NO // | |
554 | "BLD",1063 9,1,273,0) | |
555 | Want to DI SABLE Sche duled Opti ons, Menu Options, a nd Protoco ls? NO// | |
556 | "BLD",1063 9,1,274,0) | |
557 | ||
558 | "BLD",1063 9,1,275,0) | |
559 | Enter the Device you want to p rint the I nstall mes sages. | |
560 | "BLD",1063 9,1,276,0) | |
561 | You can qu eue the in stall by e nter a 'Q' at the de vice promp t. | |
562 | "BLD",1063 9,1,277,0) | |
563 | Enter a '^ ' to abort the insta ll. | |
564 | "BLD",1063 9,1,278,0) | |
565 | ||
566 | "BLD",1063 9,1,279,0) | |
567 | DEVICE: HO ME// CON SOLE | |
568 | "BLD",1063 9,1,280,0) | |
569 | ||
570 | "BLD",1063 9,1,281,0) | |
571 | Install S tarted for DVBA*2.7* 202 : | |
572 | "BLD",1063 9,1,282,0) | |
573 | Dec 1 2, 2017@23 :47:24 | |
574 | "BLD",1063 9,1,283,0) | |
575 | ||
576 | "BLD",1063 9,1,284,0) | |
577 | Build Dist ribution D ate: Dec 1 1, 2017 | |
578 | "BLD",1063 9,1,285,0) | |
579 | ||
580 | "BLD",1063 9,1,286,0) | |
581 | Installin g Routines : | |
582 | "BLD",1063 9,1,287,0) | |
583 | Dec 12, 2017@2 3:47:25 | |
584 | "BLD",1063 9,1,288,0) | |
585 | ||
586 | "BLD",1063 9,1,289,0) | |
587 | Installin g Data Dic tionaries: | |
588 | "BLD",1063 9,1,290,0) | |
589 | Dec 12, 2017@2 3:47:25 | |
590 | "BLD",1063 9,1,291,0) | |
591 | ||
592 | "BLD",1063 9,1,292,0) | |
593 | Updating Routine fi le... | |
594 | "BLD",1063 9,1,293,0) | |
595 | ||
596 | "BLD",1063 9,1,294,0) | |
597 | Updating KIDS files ... | |
598 | "BLD",1063 9,1,295,0) | |
599 | ||
600 | "BLD",1063 9,1,296,0) | |
601 | DVBA*2.7* 202 Instal led. | |
602 | "BLD",1063 9,1,297,0) | |
603 | Dec 1 2, 2017@23 :47:25 | |
604 | "BLD",1063 9,1,298,0) | |
605 | ||
606 | "BLD",1063 9,1,299,0) | |
607 | No link t o PACKAGE file | |
608 | "BLD",1063 9,1,300,0) | |
609 | ||
610 | "BLD",1063 9,1,301,0) | |
611 | Install M essage sen t | |
612 | "BLD",1063 9,1,302,0) | |
613 | ||
614 | "BLD",1063 9,1,303,0) | |
615 | Install Co mpleted | |
616 | "BLD",1063 9,1,304,0) | |
617 | ||
618 | "BLD",1063 9,1,305,0) | |
619 | Dec 1 2, 2017@23 :47:25 | |
620 | "BLD",1063 9,1,306,0) | |
621 | ||
622 | "BLD",1063 9,1,307,0) | |
623 | Installin g Data Dic tionaries: | |
624 | "BLD",1063 9,1,308,0) | |
625 | Dec 12, 2017@2 3:47:25 | |
626 | "BLD",1063 9,1,309,0) | |
627 | ||
628 | "BLD",1063 9,1,310,0) | |
629 | Updating Routine fi le... | |
630 | "BLD",1063 9,1,311,0) | |
631 | ||
632 | "BLD",1063 9,1,312,0) | |
633 | Updating KIDS files ... | |
634 | "BLD",1063 9,1,313,0) | |
635 | ||
636 | "BLD",1063 9,1,314,0) | |
637 | DVBA*2.7* 202 Instal led. | |
638 | "BLD",1063 9,1,315,0) | |
639 | Dec 1 2, 2017@23 :47:25 | |
640 | "BLD",1063 9,1,316,0) | |
641 | ||
642 | "BLD",1063 9,1,317,0) | |
643 | No link t o PACKAGE file | |
644 | "BLD",1063 9,1,318,0) | |
645 | ||
646 | "BLD",1063 9,1,319,0) | |
647 | VISTA> | |
648 | "BLD",1063 9,1,320,0) | |
649 | ||
650 | "BLD",1063 9,1,321,0) | |
651 | ||
652 | "BLD",1063 9,1,322,0) | |
653 | Patch Back out Instru ctions: | |
654 | "BLD",1063 9,1,323,0) | |
655 | ---------- ---------- ------ | |
656 | "BLD",1063 9,1,324,0) | |
657 | ||
658 | "BLD",1063 9,1,325,0) | |
659 | 1. Go to MailMan me nu, choose option Re ad/Manage Messages a nd select | |
660 | "BLD",1063 9,1,326,0) | |
661 | the ba ckup messa ge that wa s creating during In stallation step | |
662 | "BLD",1063 9,1,327,0) | |
663 | 3.c - Backup | |
664 | "BLD",1063 9,1,328,0) | |
665 | ||
666 | "BLD",1063 9,1,329,0) | |
667 | 2. When p rompted 'T ype <Enter > to conti nue or '^' to exit:' type '^' | |
668 | "BLD",1063 9,1,330,0) | |
669 | and th en <Enter> | |
670 | "BLD",1063 9,1,331,0) | |
671 | ||
672 | "BLD",1063 9,1,332,0) | |
673 | 3. When p rompted 'E nter messa ge action: ' type 'Xt ract PackM an' and | |
674 | "BLD",1063 9,1,333,0) | |
675 | then < Enter> | |
676 | "BLD",1063 9,1,334,0) | |
677 | ||
678 | "BLD",1063 9,1,335,0) | |
679 | 4. The fo llowing me ssage and the prompt will disp lay: | |
680 | "BLD",1063 9,1,336,0) | |
681 | Warnin g: Install ing this m essage wil l cause a permanent update of | |
682 | "BLD",1063 9,1,337,0) | |
683 | global s and rout ines. | |
684 | "BLD",1063 9,1,338,0) | |
685 | Do you really wa nt to do t his? NO//' type 'YES ' and then <Enter> | |
686 | "BLD",1063 9,1,339,0) | |
687 | ||
688 | "BLD",1063 9,1,340,0) | |
689 | 5. When p rompted: | |
690 | "BLD",1063 9,1,341,0) | |
691 | 'Shall I preserv e the rout ines on di sk in a se parate bac k-up | |
692 | "BLD",1063 9,1,342,0) | |
693 | messag e? YES//' type 'NO' and then < Enter> | |
694 | "BLD",1063 9,1,343,0) | |
695 | ||
696 | "BLD",1063 9,1,344,0) | |
697 | 6. The sy stem will display th e followin g message and show a ll the | |
698 | "BLD",1063 9,1,345,0) | |
699 | routin es that we re unloade d confirmi ng that al l the rout ines in th e | |
700 | "BLD",1063 9,1,346,0) | |
701 | build have been restored t o the prio r version (unloaded) : | |
702 | "BLD",1063 9,1,347,0) | |
703 | 'No ba ckup messa ge built. | |
704 | "BLD",1063 9,1,348,0) | |
705 | ***LIS T of routi nes from b ackup. See full rout ine list a t the end of | |
706 | "BLD",1063 9,1,349,0) | |
707 | the do cument*** | |
708 | "BLD",1063 9,1,350,0) | |
709 | ||
710 | "BLD",1063 9,1,351,0) | |
711 | Select PackMan f unction: a nd then <E nter>' | |
712 | "BLD",1063 9,1,352,0) | |
713 | ||
714 | "BLD",1063 9,1,353,0) | |
715 | 7. Verify that all six routin es are lis ted as abo ve have be en | |
716 | "BLD",1063 9,1,354,0) | |
717 | backed out: | |
718 | "BLD",1063 9,1,355,0) | |
719 | No bac kup messag e built. | |
720 | "BLD",1063 9,1,356,0) | |
721 | When p rompted 'W ant KIDS t o INHIBIT LOGONs dur ing the in stall? NO/ /' | |
722 | "BLD",1063 9,1,357,0) | |
723 | Press <Enter>. | |
724 | "BLD",1063 9,1,358,0) | |
725 | When p rompted 'W ant to DIS ABLE Sched uled Optio ns, Menu O ptions, an d | |
726 | "BLD",1063 9,1,359,0) | |
727 | Protoc ols? NO//' Press <En ter>. | |
728 | "BLD",1063 9,1,360,0) | |
729 | If pro mpted 'Del ay Install (Minutes) : (0 - 60 ): 0//' re spond 0. | |
730 | "BLD",1063 9,1,361,0) | |
731 | ||
732 | "BLD",1063 9,1,362,0) | |
733 | 8. To cle an up the cross refe rences run BACKOUT^D VBAPOST to clean up | |
734 | "BLD",1063 9,1,363,0) | |
735 | the cr oss refere nces. | |
736 | "BLD",1063 9,1,364,0) | |
737 | ||
738 | "BLD",1063 9,1,365,0) | |
739 | Post-Insta llation In structions : | |
740 | "BLD",1063 9,1,366,0) | |
741 | ---------- ---------- ---------- - | |
742 | "BLD",1063 9,1,367,0) | |
743 | See Techni cal Manual for cross reference /object co ntents ver ification | |
744 | "BLD",1063 9,1,368,0) | |
745 | ||
746 | "BLD",1063 9,1,369,0) | |
747 | Check list to Verify : | |
748 | "BLD",1063 9,1,370,0) | |
749 | 1. It em .02, .0 3, and .04 in the 25 07 EXAM fi le. | |
750 | "BLD",1063 9,4,0) | |
751 | ^9.64PA^39 6.4^1 | |
752 | "BLD",1063 9,4,396.4, 0) | |
753 | 396.4 | |
754 | "BLD",1063 9,4,396.4, 2,0) | |
755 | ^9.641^396 .4^1 | |
756 | "BLD",1063 9,4,396.4, 2,396.4,0) | |
757 | 2507 EXAM (File-top level) | |
758 | "BLD",1063 9,4,396.4, 2,396.4,1, 0) | |
759 | ^9.6411^.0 4^3 | |
760 | "BLD",1063 9,4,396.4, 2,396.4,1, .02,0) | |
761 | 2507 REQUE ST | |
762 | "BLD",1063 9,4,396.4, 2,396.4,1, .03,0) | |
763 | EXAM TYPE | |
764 | "BLD",1063 9,4,396.4, 2,396.4,1, .04,0) | |
765 | STATUS | |
766 | "BLD",1063 9,4,396.4, 222) | |
767 | y^y^p^^^^n ^^n | |
768 | "BLD",1063 9,4,396.4, 224) | |
769 | ||
770 | "BLD",1063 9,4,"APDD" ,396.4,396 .4) | |
771 | ||
772 | "BLD",1063 9,4,"APDD" ,396.4,396 .4,.02) | |
773 | ||
774 | "BLD",1063 9,4,"APDD" ,396.4,396 .4,.03) | |
775 | ||
776 | "BLD",1063 9,4,"APDD" ,396.4,396 .4,.04) | |
777 | ||
778 | "BLD",1063 9,4,"B",39 6.4,396.4) | |
779 | ||
780 | "BLD",1063 9,6.3) | |
781 | 28 | |
782 | "BLD",1063 9,"ABPKG") | |
783 | n | |
784 | "BLD",1063 9,"INI") | |
785 | DVMXPRE | |
786 | "BLD",1063 9,"INID") | |
787 | ^n^n | |
788 | "BLD",1063 9,"INIT") | |
789 | DVMXPOST | |
790 | "BLD",1063 9,"KRN",0) | |
791 | ^9.67PA^77 9.2^20 | |
792 | "BLD",1063 9,"KRN",.4 ,0) | |
793 | .4 | |
794 | "BLD",1063 9,"KRN",.4 01,0) | |
795 | .401 | |
796 | "BLD",1063 9,"KRN",.4 02,0) | |
797 | .402 | |
798 | "BLD",1063 9,"KRN",.4 03,0) | |
799 | .403 | |
800 | "BLD",1063 9,"KRN",.5 ,0) | |
801 | .5 | |
802 | "BLD",1063 9,"KRN",.8 4,0) | |
803 | .84 | |
804 | "BLD",1063 9,"KRN",3. 6,0) | |
805 | 3.6 | |
806 | "BLD",1063 9,"KRN",3. 8,0) | |
807 | 3.8 | |
808 | "BLD",1063 9,"KRN",9. 2,0) | |
809 | 9.2 | |
810 | "BLD",1063 9,"KRN",9. 8,0) | |
811 | 9.8 | |
812 | "BLD",1063 9,"KRN",9. 8,"NM",0) | |
813 | ^9.68A^4^4 | |
814 | "BLD",1063 9,"KRN",9. 8,"NM",1,0 ) | |
815 | DVBCLOGE^^ 0^B2356225 7 | |
816 | "BLD",1063 9,"KRN",9. 8,"NM",2,0 ) | |
817 | DVBCREDT^^ 0^B2422148 5 | |
818 | "BLD",1063 9,"KRN",9. 8,"NM",3,0 ) | |
819 | DVMXPRE^^0 ^B1810422 | |
820 | "BLD",1063 9,"KRN",9. 8,"NM",4,0 ) | |
821 | DVMXPOST^^ 0^B2689746 | |
822 | "BLD",1063 9,"KRN",9. 8,"NM","B" ,"DVBCLOGE ",1) | |
823 | ||
824 | "BLD",1063 9,"KRN",9. 8,"NM","B" ,"DVBCREDT ",2) | |
825 | ||
826 | "BLD",1063 9,"KRN",9. 8,"NM","B" ,"DVMXPOST ",4) | |
827 | ||
828 | "BLD",1063 9,"KRN",9. 8,"NM","B" ,"DVMXPRE" ,3) | |
829 | ||
830 | "BLD",1063 9,"KRN",19 ,0) | |
831 | 19 | |
832 | "BLD",1063 9,"KRN",19 .1,0) | |
833 | 19.1 | |
834 | "BLD",1063 9,"KRN",10 1,0) | |
835 | 101 | |
836 | "BLD",1063 9,"KRN",40 9.61,0) | |
837 | 409.61 | |
838 | "BLD",1063 9,"KRN",77 1,0) | |
839 | 771 | |
840 | "BLD",1063 9,"KRN",77 9.2,0) | |
841 | 779.2 | |
842 | "BLD",1063 9,"KRN",87 0,0) | |
843 | 870 | |
844 | "BLD",1063 9,"KRN",89 89.51,0) | |
845 | 8989.51 | |
846 | "BLD",1063 9,"KRN",89 89.52,0) | |
847 | 8989.52 | |
848 | "BLD",1063 9,"KRN",89 94,0) | |
849 | 8994 | |
850 | "BLD",1063 9,"KRN","B ",.4,.4) | |
851 | ||
852 | "BLD",1063 9,"KRN","B ",.401,.40 1) | |
853 | ||
854 | "BLD",1063 9,"KRN","B ",.402,.40 2) | |
855 | ||
856 | "BLD",1063 9,"KRN","B ",.403,.40 3) | |
857 | ||
858 | "BLD",1063 9,"KRN","B ",.5,.5) | |
859 | ||
860 | "BLD",1063 9,"KRN","B ",.84,.84) | |
861 | ||
862 | "BLD",1063 9,"KRN","B ",3.6,3.6) | |
863 | ||
864 | "BLD",1063 9,"KRN","B ",3.8,3.8) | |
865 | ||
866 | "BLD",1063 9,"KRN","B ",9.2,9.2) | |
867 | ||
868 | "BLD",1063 9,"KRN","B ",9.8,9.8) | |
869 | ||
870 | "BLD",1063 9,"KRN","B ",19,19) | |
871 | ||
872 | "BLD",1063 9,"KRN","B ",19.1,19. 1) | |
873 | ||
874 | "BLD",1063 9,"KRN","B ",101,101) | |
875 | ||
876 | "BLD",1063 9,"KRN","B ",409.61,4 09.61) | |
877 | ||
878 | "BLD",1063 9,"KRN","B ",771,771) | |
879 | ||
880 | "BLD",1063 9,"KRN","B ",779.2,77 9.2) | |
881 | ||
882 | "BLD",1063 9,"KRN","B ",870,870) | |
883 | ||
884 | "BLD",1063 9,"KRN","B ",8989.51, 8989.51) | |
885 | ||
886 | "BLD",1063 9,"KRN","B ",8989.52, 8989.52) | |
887 | ||
888 | "BLD",1063 9,"KRN","B ",8994,899 4) | |
889 | ||
890 | "BLD",1063 9,"QDEF") | |
891 | ^^^^NO^^^^ NO^^NO | |
892 | "BLD",1063 9,"QUES",0 ) | |
893 | ^9.62^^ | |
894 | "BLD",1063 9,"REQB",0 ) | |
895 | ^9.611^4^4 | |
896 | "BLD",1063 9,"REQB",1 ,0) | |
897 | DG*5.3*948 ^2 | |
898 | "BLD",1063 9,"REQB",2 ,0) | |
899 | GMRC*3.0*9 5^2 | |
900 | "BLD",1063 9,"REQB",3 ,0) | |
901 | OR*3.0*470 ^2 | |
902 | "BLD",1063 9,"REQB",4 ,0) | |
903 | SD*5.3*676 ^2 | |
904 | "BLD",1063 9,"REQB"," B","DG*5.3 *948",1) | |
905 | ||
906 | "BLD",1063 9,"REQB"," B","GMRC*3 .0*95",2) | |
907 | ||
908 | "BLD",1063 9,"REQB"," B","OR*3.0 *470",3) | |
909 | ||
910 | "BLD",1063 9,"REQB"," B","SD*5.3 *676",4) | |
911 | ||
912 | "FIA",396. 4) | |
913 | 2507 EXAM | |
914 | "FIA",396. 4,0) | |
915 | ^DVB(396.4 , | |
916 | "FIA",396. 4,0,0) | |
917 | 396.4I | |
918 | "FIA",396. 4,0,1) | |
919 | y^y^p^^^^n ^^n | |
920 | "FIA",396. 4,0,10) | |
921 | ||
922 | "FIA",396. 4,0,11) | |
923 | ||
924 | "FIA",396. 4,0,"RLRO" ) | |
925 | ||
926 | "FIA",396. 4,0,"VR") | |
927 | 2.7^DVBA | |
928 | "FIA",396. 4,396.4) | |
929 | 1 | |
930 | "FIA",396. 4,396.4,.0 2) | |
931 | ||
932 | "FIA",396. 4,396.4,.0 3) | |
933 | ||
934 | "FIA",396. 4,396.4,.0 4) | |
935 | ||
936 | "INI") | |
937 | DVMXPRE | |
938 | "INIT") | |
939 | DVMXPOST | |
940 | "IX",396.4 ,396.4,"AG ",0) | |
941 | 396.4^AG^T his sends MASS order messages for exam s tatus chan ges^MU^^R^ IR^I^396.4 ^^^^^A | |
942 | "IX",396.4 ,396.4,"AG ",.1,0) | |
943 | ^^2^2^3171 117^ | |
944 | "IX",396.4 ,396.4,"AG ",.1,1,0) | |
945 | This cross -reference sends an HL7 messag e from MAS S to Epic Cadence wh en | |
946 | "IX",396.4 ,396.4,"AG ",.1,2,0) | |
947 | any of the fields in this cros s-referenc e change. | |
948 | "IX",396.4 ,396.4,"AG ",1) | |
949 | D TRCPMSG^ ORMXTR | |
950 | "IX",396.4 ,396.4,"AG ",2) | |
951 | Q | |
952 | "IX",396.4 ,396.4,"AG ",11.1,0) | |
953 | ^.114IA^3^ 3 | |
954 | "IX",396.4 ,396.4,"AG ",11.1,1,0 ) | |
955 | 1^F^396.4^ .02^^^F | |
956 | "IX",396.4 ,396.4,"AG ",11.1,2,0 ) | |
957 | 2^F^396.4^ .03^^^F | |
958 | "IX",396.4 ,396.4,"AG ",11.1,3,0 ) | |
959 | 3^F^396.4^ .04^^^F | |
960 | "MBREQ") | |
961 | 0 | |
962 | "PKG",93,- 1) | |
963 | 1^1 | |
964 | "PKG",93,0 ) | |
965 | AUTOMATED MED INFO E XCHANGE^DV BA^The ent ire AMIE p ackage 713 1/2507. | |
966 | "PKG",93,2 0,0) | |
967 | ^9.402P^^ | |
968 | "PKG",93,2 2,0) | |
969 | ^9.49I^1^1 | |
970 | "PKG",93,2 2,1,0) | |
971 | 2.7^305111 9^2960819 | |
972 | "PKG",93,2 2,1,"PAH", 1,0) | |
973 | 202^318050 4 | |
974 | "PKG",93,2 2,1,"PAH", 1,1,0) | |
975 | ^^370^370^ 3180504 | |
976 | "PKG",93,2 2,1,"PAH", 1,1,1,0) | |
977 | Associated patches: DG*5.3*948 | |
978 | "PKG",93,2 2,1,"PAH", 1,1,2,0) | |
979 | SD*5.3*676 | |
980 | "PKG",93,2 2,1,"PAH", 1,1,3,0) | |
981 | OR*3.0*470 | |
982 | "PKG",93,2 2,1,"PAH", 1,1,4,0) | |
983 | GMRC*3.0*9 5 | |
984 | "PKG",93,2 2,1,"PAH", 1,1,5,0) | |
985 | ||
986 | "PKG",93,2 2,1,"PAH", 1,1,6,0) | |
987 | Subject: MASS 2507 EXAM PATCH | |
988 | "PKG",93,2 2,1,"PAH", 1,1,7,0) | |
989 | ||
990 | "PKG",93,2 2,1,"PAH", 1,1,8,0) | |
991 | Category: 2507 EXAM | |
992 | "PKG",93,2 2,1,"PAH", 1,1,9,0) | |
993 | ROUTINE | |
994 | "PKG",93,2 2,1,"PAH", 1,1,10,0) | |
995 | PROTOCOLS | |
996 | "PKG",93,2 2,1,"PAH", 1,1,11,0) | |
997 | ||
998 | "PKG",93,2 2,1,"PAH", 1,1,12,0) | |
999 | The follow ing patche s must be installed in order f or a succe ssful | |
1000 | "PKG",93,2 2,1,"PAH", 1,1,13,0) | |
1001 | instalatio n: | |
1002 | "PKG",93,2 2,1,"PAH", 1,1,14,0) | |
1003 | SD*5.3*67 6 | |
1004 | "PKG",93,2 2,1,"PAH", 1,1,15,0) | |
1005 | DG*5.3*94 8 | |
1006 | "PKG",93,2 2,1,"PAH", 1,1,16,0) | |
1007 | OR*3.0*47 0 | |
1008 | "PKG",93,2 2,1,"PAH", 1,1,17,0) | |
1009 | GMRC*3.0* 95 | |
1010 | "PKG",93,2 2,1,"PAH", 1,1,18,0) | |
1011 | DVBA*2.7* 202 | |
1012 | "PKG",93,2 2,1,"PAH", 1,1,19,0) | |
1013 | ||
1014 | "PKG",93,2 2,1,"PAH", 1,1,20,0) | |
1015 | Descriptio n: | |
1016 | "PKG",93,2 2,1,"PAH", 1,1,21,0) | |
1017 | ---------- -- | |
1018 | "PKG",93,2 2,1,"PAH", 1,1,22,0) | |
1019 | Automated Medical In formation Exchange p atch DVBA* 2.7*202 is the | |
1020 | "PKG",93,2 2,1,"PAH", 1,1,23,0) | |
1021 | initial re lease of t he Medical Appointme nt Schedul ing System (MASS) | |
1022 | "PKG",93,2 2,1,"PAH", 1,1,24,0) | |
1023 | Scheduling integrati on develop ment for t he VistA P ilot at | |
1024 | "PKG",93,2 2,1,"PAH", 1,1,25,0) | |
1025 | Columbus, OH. This p atch inclu des all of the neces sary compo nents | |
1026 | "PKG",93,2 2,1,"PAH", 1,1,26,0) | |
1027 | that will enable out going HL7 (Health Le vel 7) V2 | |
1028 | "PKG",93,2 2,1,"PAH", 1,1,27,0) | |
1029 | ORM (Order Message) ordering i ntegration with MASS . | |
1030 | "PKG",93,2 2,1,"PAH", 1,1,28,0) | |
1031 | ||
1032 | "PKG",93,2 2,1,"PAH", 1,1,29,0) | |
1033 | Patch Comp onents: | |
1034 | "PKG",93,2 2,1,"PAH", 1,1,30,0) | |
1035 | ---------- ------- | |
1036 | "PKG",93,2 2,1,"PAH", 1,1,31,0) | |
1037 | N/A (Not Applicable ) | |
1038 | "PKG",93,2 2,1,"PAH", 1,1,32,0) | |
1039 | ||
1040 | "PKG",93,2 2,1,"PAH", 1,1,33,0) | |
1041 | ||
1042 | "PKG",93,2 2,1,"PAH", 1,1,34,0) | |
1043 | Files & Fi elds Assoc iated: | |
1044 | "PKG",93,2 2,1,"PAH", 1,1,35,0) | |
1045 | ||
1046 | "PKG",93,2 2,1,"PAH", 1,1,36,0) | |
1047 | File Name (Number) Field Name (Numb er) Ne w/Modified /Deleted | |
1048 | "PKG",93,2 2,1,"PAH", 1,1,37,0) | |
1049 | ---------- -------- ------ ---------- --- -- ---------- -------- | |
1050 | "PKG",93,2 2,1,"PAH", 1,1,38,0) | |
1051 | 2507 EXAM (396.4) 2507 R EQUEST (.0 2) MO DIFIED | |
1052 | "PKG",93,2 2,1,"PAH", 1,1,39,0) | |
1053 | 2507 EXAM (396.4) EXAM T YPE (.03) MO DIFIED | |
1054 | "PKG",93,2 2,1,"PAH", 1,1,40,0) | |
1055 | 2507 EXAM (396.4) STATUS (.04) MO DIFIED | |
1056 | "PKG",93,2 2,1,"PAH", 1,1,41,0) | |
1057 | ||
1058 | "PKG",93,2 2,1,"PAH", 1,1,42,0) | |
1059 | ||
1060 | "PKG",93,2 2,1,"PAH", 1,1,43,0) | |
1061 | Forms Asso ciated: | |
1062 | "PKG",93,2 2,1,"PAH", 1,1,44,0) | |
1063 | ||
1064 | "PKG",93,2 2,1,"PAH", 1,1,45,0) | |
1065 | Form Name File # New/Mo dified/Del eted | |
1066 | "PKG",93,2 2,1,"PAH", 1,1,46,0) | |
1067 | --------- ---- -- ------ ---------- ---- | |
1068 | "PKG",93,2 2,1,"PAH", 1,1,47,0) | |
1069 | None N/A N/A | |
1070 | "PKG",93,2 2,1,"PAH", 1,1,48,0) | |
1071 | ||
1072 | "PKG",93,2 2,1,"PAH", 1,1,49,0) | |
1073 | ||
1074 | "PKG",93,2 2,1,"PAH", 1,1,50,0) | |
1075 | Mail Group s Associat ed: | |
1076 | "PKG",93,2 2,1,"PAH", 1,1,51,0) | |
1077 | ||
1078 | "PKG",93,2 2,1,"PAH", 1,1,52,0) | |
1079 | Mail Group Name New/ Modified/D eleted | |
1080 | "PKG",93,2 2,1,"PAH", 1,1,53,0) | |
1081 | ---------- ----- ---- ---------- ------ | |
1082 | "PKG",93,2 2,1,"PAH", 1,1,54,0) | |
1083 | None N/A | |
1084 | "PKG",93,2 2,1,"PAH", 1,1,55,0) | |
1085 | ||
1086 | "PKG",93,2 2,1,"PAH", 1,1,56,0) | |
1087 | ||
1088 | "PKG",93,2 2,1,"PAH", 1,1,57,0) | |
1089 | Options As sociated: | |
1090 | "PKG",93,2 2,1,"PAH", 1,1,58,0) | |
1091 | ||
1092 | "PKG",93,2 2,1,"PAH", 1,1,59,0) | |
1093 | Option Nam e Type New/Mo dified/Del eted | |
1094 | "PKG",93,2 2,1,"PAH", 1,1,60,0) | |
1095 | ---------- - ---- ------ ---------- ---- | |
1096 | "PKG",93,2 2,1,"PAH", 1,1,61,0) | |
1097 | None N/A N/A | |
1098 | "PKG",93,2 2,1,"PAH", 1,1,62,0) | |
1099 | ||
1100 | "PKG",93,2 2,1,"PAH", 1,1,63,0) | |
1101 | ||
1102 | "PKG",93,2 2,1,"PAH", 1,1,64,0) | |
1103 | Protocols Associated : | |
1104 | "PKG",93,2 2,1,"PAH", 1,1,65,0) | |
1105 | ||
1106 | "PKG",93,2 2,1,"PAH", 1,1,66,0) | |
1107 | Protocol N ame New/ Modified/D eleted | |
1108 | "PKG",93,2 2,1,"PAH", 1,1,67,0) | |
1109 | ---------- --- ---- ---------- ------ | |
1110 | "PKG",93,2 2,1,"PAH", 1,1,68,0) | |
1111 | None N/A | |
1112 | "PKG",93,2 2,1,"PAH", 1,1,69,0) | |
1113 | ||
1114 | "PKG",93,2 2,1,"PAH", 1,1,70,0) | |
1115 | ||
1116 | "PKG",93,2 2,1,"PAH", 1,1,71,0) | |
1117 | Security K eys Associ ated: | |
1118 | "PKG",93,2 2,1,"PAH", 1,1,72,0) | |
1119 | ||
1120 | "PKG",93,2 2,1,"PAH", 1,1,73,0) | |
1121 | Security K ey Name | |
1122 | "PKG",93,2 2,1,"PAH", 1,1,74,0) | |
1123 | ---------- ------- | |
1124 | "PKG",93,2 2,1,"PAH", 1,1,75,0) | |
1125 | N/A | |
1126 | "PKG",93,2 2,1,"PAH", 1,1,76,0) | |
1127 | ||
1128 | "PKG",93,2 2,1,"PAH", 1,1,77,0) | |
1129 | ||
1130 | "PKG",93,2 2,1,"PAH", 1,1,78,0) | |
1131 | Templates Associated : | |
1132 | "PKG",93,2 2,1,"PAH", 1,1,79,0) | |
1133 | ||
1134 | "PKG",93,2 2,1,"PAH", 1,1,80,0) | |
1135 | Template N ame Type File N ame (Numbe r) New/Mo dified/Del eted | |
1136 | "PKG",93,2 2,1,"PAH", 1,1,81,0) | |
1137 | ---------- --- ---- ------ ---------- -- ------ ---------- ---- | |
1138 | "PKG",93,2 2,1,"PAH", 1,1,82,0) | |
1139 | None N/A N/A N/A | |
1140 | "PKG",93,2 2,1,"PAH", 1,1,83,0) | |
1141 | ||
1142 | "PKG",93,2 2,1,"PAH", 1,1,84,0) | |
1143 | Additional Informati on: N/A | |
1144 | "PKG",93,2 2,1,"PAH", 1,1,85,0) | |
1145 | ||
1146 | "PKG",93,2 2,1,"PAH", 1,1,86,0) | |
1147 | ||
1148 | "PKG",93,2 2,1,"PAH", 1,1,87,0) | |
1149 | New Servic e Requests (NSRs): | |
1150 | "PKG",93,2 2,1,"PAH", 1,1,88,0) | |
1151 | ---------- ---------- -------- | |
1152 | "PKG",93,2 2,1,"PAH", 1,1,89,0) | |
1153 | N/A | |
1154 | "PKG",93,2 2,1,"PAH", 1,1,90,0) | |
1155 | ||
1156 | "PKG",93,2 2,1,"PAH", 1,1,91,0) | |
1157 | ||
1158 | "PKG",93,2 2,1,"PAH", 1,1,92,0) | |
1159 | Patient Sa fety Issue s (PSIs): | |
1160 | "PKG",93,2 2,1,"PAH", 1,1,93,0) | |
1161 | ---------- ---------- --------- | |
1162 | "PKG",93,2 2,1,"PAH", 1,1,94,0) | |
1163 | N/A | |
1164 | "PKG",93,2 2,1,"PAH", 1,1,95,0) | |
1165 | ||
1166 | "PKG",93,2 2,1,"PAH", 1,1,96,0) | |
1167 | ||
1168 | "PKG",93,2 2,1,"PAH", 1,1,97,0) | |
1169 | Defect Tra cking Syst em Ticket( s) & Overv iew: | |
1170 | "PKG",93,2 2,1,"PAH", 1,1,98,0) | |
1171 | ---------- ---------- ---------- ---------- ---- | |
1172 | "PKG",93,2 2,1,"PAH", 1,1,99,0) | |
1173 | N/A | |
1174 | "PKG",93,2 2,1,"PAH", 1,1,100,0) | |
1175 | ||
1176 | "PKG",93,2 2,1,"PAH", 1,1,101,0) | |
1177 | ||
1178 | "PKG",93,2 2,1,"PAH", 1,1,102,0) | |
1179 | Problem: | |
1180 | "PKG",93,2 2,1,"PAH", 1,1,103,0) | |
1181 | ------- | |
1182 | "PKG",93,2 2,1,"PAH", 1,1,104,0) | |
1183 | N/A | |
1184 | "PKG",93,2 2,1,"PAH", 1,1,105,0) | |
1185 | ||
1186 | "PKG",93,2 2,1,"PAH", 1,1,106,0) | |
1187 | ||
1188 | "PKG",93,2 2,1,"PAH", 1,1,107,0) | |
1189 | Resolution : | |
1190 | "PKG",93,2 2,1,"PAH", 1,1,108,0) | |
1191 | ---------- | |
1192 | "PKG",93,2 2,1,"PAH", 1,1,109,0) | |
1193 | N/A | |
1194 | "PKG",93,2 2,1,"PAH", 1,1,110,0) | |
1195 | ||
1196 | "PKG",93,2 2,1,"PAH", 1,1,111,0) | |
1197 | ||
1198 | "PKG",93,2 2,1,"PAH", 1,1,112,0) | |
1199 | Test Sites : | |
1200 | "PKG",93,2 2,1,"PAH", 1,1,113,0) | |
1201 | ---------- | |
1202 | "PKG",93,2 2,1,"PAH", 1,1,114,0) | |
1203 | 1. EPIC DE VELOPMENT ACCOUNT | |
1204 | "PKG",93,2 2,1,"PAH", 1,1,115,0) | |
1205 | 2. VISTA D EVVFF DEVE LOPMENT AC COUNT | |
1206 | "PKG",93,2 2,1,"PAH", 1,1,116,0) | |
1207 | 3. Columbu s, OH (PRE -PRODUCTIO N and PROD UCTION) | |
1208 | "PKG",93,2 2,1,"PAH", 1,1,117,0) | |
1209 | ||
1210 | "PKG",93,2 2,1,"PAH", 1,1,118,0) | |
1211 | Software a nd Documen tation Ret rieval Ins tructions: | |
1212 | "PKG",93,2 2,1,"PAH", 1,1,119,0) | |
1213 | ---------- ---------- ---------- ---------- ---------- | |
1214 | "PKG",93,2 2,1,"PAH", 1,1,120,0) | |
1215 | Software b eing relea sed as a h ost file a nd/or docu mentation describing | |
1216 | "PKG",93,2 2,1,"PAH", 1,1,121,0) | |
1217 | the new fu nctionalit y introduc ed by this patch are available . | |
1218 | "PKG",93,2 2,1,"PAH", 1,1,122,0) | |
1219 | ||
1220 | "PKG",93,2 2,1,"PAH", 1,1,123,0) | |
1221 | The prefer red method is to ret rieve file s from dow nload. DNS . DNS . | |
1222 | "PKG",93,2 2,1,"PAH", 1,1,124,0) | |
1223 | This trans mits the f iles from the first available server. Si tes may | |
1224 | "PKG",93,2 2,1,"PAH", 1,1,125,0) | |
1225 | also elect to retrie ve files d irectly fr om a speci fic server . | |
1226 | "PKG",93,2 2,1,"PAH", 1,1,126,0) | |
1227 | ||
1228 | "PKG",93,2 2,1,"PAH", 1,1,127,0) | |
1229 | Sites may retrieve t he softwar e and/or d ocumentati on directl y using | |
1230 | "PKG",93,2 2,1,"PAH", 1,1,128,0) | |
1231 | Secure Fil e Transfer Protocol (SFTP) fro m the ANON YMOUS.SOFT WARE | |
1232 | "PKG",93,2 2,1,"PAH", 1,1,129,0) | |
1233 | directory at the fol lowing | |
1234 | "PKG",93,2 2,1,"PAH", 1,1,130,0) | |
1235 | OI Field O ffices: | |
1236 | "PKG",93,2 2,1,"PAH", 1,1,131,0) | |
1237 | ||
1238 | "PKG",93,2 2,1,"PAH", 1,1,132,0) | |
1239 | Hines: DN S .URL | |
1240 | "PKG",93,2 2,1,"PAH", 1,1,133,0) | |
1241 | Salt Lake City:
|
|
1242 | "PKG",93,2 2,1,"PAH", 1,1,134,0) | |
1243 | ||
1244 | "PKG",93,2 2,1,"PAH", 1,1,135,0) | |
1245 | Documentat ion can al so be foun d on the V A Software Documenta tion Libra ry | |
1246 | "PKG",93,2 2,1,"PAH", 1,1,136,0) | |
1247 | at: | |
1248 | "PKG",93,2 2,1,"PAH", 1,1,137,0) | |
1249 | http://www . DNS /vdl/ | |
1250 | "PKG",93,2 2,1,"PAH", 1,1,138,0) | |
1251 | ||
1252 | "PKG",93,2 2,1,"PAH", 1,1,139,0) | |
1253 | Title File Name FTP Mode | |
1254 | "PKG",93,2 2,1,"PAH", 1,1,140,0) | |
1255 | ----- --------- -------- | |
1256 | "PKG",93,2 2,1,"PAH", 1,1,141,0) | |
1257 | MASS VistA Technical Manual MASS Vist A SFTP | |
1258 | "PKG",93,2 2,1,"PAH", 1,1,142,0) | |
1259 | Technical Manual | |
1260 | "PKG",93,2 2,1,"PAH", 1,1,143,0) | |
1261 | ||
1262 | "PKG",93,2 2,1,"PAH", 1,1,144,0) | |
1263 | ||
1264 | "PKG",93,2 2,1,"PAH", 1,1,145,0) | |
1265 | Patch Inst allation: | |
1266 | "PKG",93,2 2,1,"PAH", 1,1,146,0) | |
1267 | ||
1268 | "PKG",93,2 2,1,"PAH", 1,1,147,0) | |
1269 | Pre/Post I nstallatio n Overview : | |
1270 | "PKG",93,2 2,1,"PAH", 1,1,148,0) | |
1271 | ---------- ---------- ---------- - | |
1272 | "PKG",93,2 2,1,"PAH", 1,1,149,0) | |
1273 | See Techni cal Manual for proje ct level i nstallatio n instruct ions. | |
1274 | "PKG",93,2 2,1,"PAH", 1,1,150,0) | |
1275 | ||
1276 | "PKG",93,2 2,1,"PAH", 1,1,151,0) | |
1277 | ||
1278 | "PKG",93,2 2,1,"PAH", 1,1,152,0) | |
1279 | Pre-Instal lation Ins tructions: | |
1280 | "PKG",93,2 2,1,"PAH", 1,1,153,0) | |
1281 | ---------- ---------- ---------- | |
1282 | "PKG",93,2 2,1,"PAH", 1,1,154,0) | |
1283 | See Techni cal Manual for proje ct level i nstallatio n instruct ions. | |
1284 | "PKG",93,2 2,1,"PAH", 1,1,155,0) | |
1285 | ||
1286 | "PKG",93,2 2,1,"PAH", 1,1,156,0) | |
1287 | This patch may not b e installe d with use rs on the system. T his patch | |
1288 | "PKG",93,2 2,1,"PAH", 1,1,157,0) | |
1289 | should tak e less tha n 5 minute s to insta ll. | |
1290 | "PKG",93,2 2,1,"PAH", 1,1,158,0) | |
1291 | ||
1292 | "PKG",93,2 2,1,"PAH", 1,1,159,0) | |
1293 | OR | |
1294 | "PKG",93,2 2,1,"PAH", 1,1,160,0) | |
1295 | ||
1296 | "PKG",93,2 2,1,"PAH", 1,1,161,0) | |
1297 | This patch may be in stalled wi th users o n the syst em althoug h it is | |
1298 | "PKG",93,2 2,1,"PAH", 1,1,162,0) | |
1299 | recommende d that it be install ed during non-peak h ours to mi nimize | |
1300 | "PKG",93,2 2,1,"PAH", 1,1,163,0) | |
1301 | potential disruption to users. This pat ch should take less than 5 | |
1302 | "PKG",93,2 2,1,"PAH", 1,1,164,0) | |
1303 | minutes to install. | |
1304 | "PKG",93,2 2,1,"PAH", 1,1,165,0) | |
1305 | ||
1306 | "PKG",93,2 2,1,"PAH", 1,1,166,0) | |
1307 | There are no ListMan Options t hat need t o be disab led for th is patch. | |
1308 | "PKG",93,2 2,1,"PAH", 1,1,167,0) | |
1309 | ||
1310 | "PKG",93,2 2,1,"PAH", 1,1,168,0) | |
1311 | ||
1312 | "PKG",93,2 2,1,"PAH", 1,1,169,0) | |
1313 | Installati on Instruc tions: | |
1314 | "PKG",93,2 2,1,"PAH", 1,1,170,0) | |
1315 | ---------- ---------- ------ | |
1316 | "PKG",93,2 2,1,"PAH", 1,1,171,0) | |
1317 | ||
1318 | "PKG",93,2 2,1,"PAH", 1,1,172,0) | |
1319 | 1. Choose the PackMa n message containing this patc h. | |
1320 | "PKG",93,2 2,1,"PAH", 1,1,173,0) | |
1321 | ||
1322 | "PKG",93,2 2,1,"PAH", 1,1,174,0) | |
1323 | 2. Choose the INSTAL L/CHECK ME SSAGE Pack Man option . | |
1324 | "PKG",93,2 2,1,"PAH", 1,1,175,0) | |
1325 | ||
1326 | "PKG",93,2 2,1,"PAH", 1,1,176,0) | |
1327 | 3. From th e Kernel I nstallatio n and Dist ribution S ystem Menu , select | |
1328 | "PKG",93,2 2,1,"PAH", 1,1,177,0) | |
1329 | the Ins tallation Menu (See Install Pr ompts Samp le below f or more | |
1330 | "PKG",93,2 2,1,"PAH", 1,1,178,0) | |
1331 | detail) . From th is menu, y ou may ele ct to use the follow ing option s. | |
1332 | "PKG",93,2 2,1,"PAH", 1,1,179,0) | |
1333 | When pr ompted for the INSTA LL NAME en ter the pa tch DVBA*2 .7*202: | |
1334 | "PKG",93,2 2,1,"PAH", 1,1,180,0) | |
1335 | ||
1336 | "PKG",93,2 2,1,"PAH", 1,1,181,0) | |
1337 | a. Bac kup a Tran sport Glob al - This option wil l create a backup | |
1338 | "PKG",93,2 2,1,"PAH", 1,1,182,0) | |
1339 | mes sage of an y routines exported with this patch. It will not | |
1340 | "PKG",93,2 2,1,"PAH", 1,1,183,0) | |
1341 | bac kup any ot her change s such as DDs or tem plates. | |
1342 | "PKG",93,2 2,1,"PAH", 1,1,184,0) | |
1343 | ||
1344 | "PKG",93,2 2,1,"PAH", 1,1,185,0) | |
1345 | b. Com pare Trans port Globa l to Curre nt System - This opt ion will | |
1346 | "PKG",93,2 2,1,"PAH", 1,1,186,0) | |
1347 | (al low you to view all changes th at will be made when this | |
1348 | "PKG",93,2 2,1,"PAH", 1,1,187,0) | |
1349 | patch | |
1350 | "PKG",93,2 2,1,"PAH", 1,1,188,0) | |
1351 | is installed. It compa res all co mponents o f this pat ch routine s, | |
1352 | "PKG",93,2 2,1,"PAH", 1,1,189,0) | |
1353 | DDs , template s, etc.). | |
1354 | "PKG",93,2 2,1,"PAH", 1,1,190,0) | |
1355 | ||
1356 | "PKG",93,2 2,1,"PAH", 1,1,191,0) | |
1357 | c. Ver ify Checks ums in Tra nsport Glo bal - This option wi ll allow y ou | |
1358 | "PKG",93,2 2,1,"PAH", 1,1,192,0) | |
1359 | to ensure the integrity of the ro utines tha t are in t he transpo rt | |
1360 | "PKG",93,2 2,1,"PAH", 1,1,193,0) | |
1361 | glo bal. | |
1362 | "PKG",93,2 2,1,"PAH", 1,1,194,0) | |
1363 | ||
1364 | "PKG",93,2 2,1,"PAH", 1,1,195,0) | |
1365 | 4. From th e Installa tion Menu, select th e Install Package(s) option | |
1366 | "PKG",93,2 2,1,"PAH", 1,1,196,0) | |
1367 | and cho ose the pa tch to ins tall. | |
1368 | "PKG",93,2 2,1,"PAH", 1,1,197,0) | |
1369 | ||
1370 | "PKG",93,2 2,1,"PAH", 1,1,198,0) | |
1371 | 5. When pr ompted 'Wa nt KIDS to Rebuild M enu Trees Upon Compl etion of | |
1372 | "PKG",93,2 2,1,"PAH", 1,1,199,0) | |
1373 | Install ? NO//' | |
1374 | "PKG",93,2 2,1,"PAH", 1,1,200,0) | |
1375 | ||
1376 | "PKG",93,2 2,1,"PAH", 1,1,201,0) | |
1377 | 6. When pr ompted 'Wa nt KIDS to INHIBIT L OGONs duri ng the ins tall? | |
1378 | "PKG",93,2 2,1,"PAH", 1,1,202,0) | |
1379 | NO//' | |
1380 | "PKG",93,2 2,1,"PAH", 1,1,203,0) | |
1381 | ||
1382 | "PKG",93,2 2,1,"PAH", 1,1,204,0) | |
1383 | 7. When pr ompted 'Wa nt to DISA BLE Schedu led Option s, Menu Op tions, | |
1384 | "PKG",93,2 2,1,"PAH", 1,1,205,0) | |
1385 | and Pro tocols? NO //' | |
1386 | "PKG",93,2 2,1,"PAH", 1,1,206,0) | |
1387 | ||
1388 | "PKG",93,2 2,1,"PAH", 1,1,207,0) | |
1389 | 8. If prom pted 'Dela y Install (Minutes): (0 - 60) : 0//' res pond 0. | |
1390 | "PKG",93,2 2,1,"PAH", 1,1,208,0) | |
1391 | ||
1392 | "PKG",93,2 2,1,"PAH", 1,1,209,0) | |
1393 | ||
1394 | "PKG",93,2 2,1,"PAH", 1,1,210,0) | |
1395 | Install Pr ompts Samp le: | |
1396 | "PKG",93,2 2,1,"PAH", 1,1,211,0) | |
1397 | ---------- ---------- ------ | |
1398 | "PKG",93,2 2,1,"PAH", 1,1,212,0) | |
1399 | ||
1400 | "PKG",93,2 2,1,"PAH", 1,1,213,0) | |
1401 | VISTA>D ^X UP | |
1402 | "PKG",93,2 2,1,"PAH", 1,1,214,0) | |
1403 | ||
1404 | "PKG",93,2 2,1,"PAH", 1,1,215,0) | |
1405 | Setting up programme r environm ent | |
1406 | "PKG",93,2 2,1,"PAH", 1,1,216,0) | |
1407 | This is a TEST accou nt. | |
1408 | "PKG",93,2 2,1,"PAH", 1,1,217,0) | |
1409 | ||
1410 | "PKG",93,2 2,1,"PAH", 1,1,218,0) | |
1411 | Terminal T ype set to : C-VT100 | |
1412 | "PKG",93,2 2,1,"PAH", 1,1,219,0) | |
1413 | ||
1414 | "PKG",93,2 2,1,"PAH", 1,1,220,0) | |
1415 | Select OPT ION NAME: XPD LOAD D ISTRIBUTIO N Lo ad a Distr ibution | |
1416 | "PKG",93,2 2,1,"PAH", 1,1,221,0) | |
1417 | Load a Dis tribution | |
1418 | "PKG",93,2 2,1,"PAH", 1,1,222,0) | |
1419 | Enter a Ho st File: < File locat ion>\DVBA_ 2_7_202.KI D | |
1420 | "PKG",93,2 2,1,"PAH", 1,1,223,0) | |
1421 | ||
1422 | "PKG",93,2 2,1,"PAH", 1,1,224,0) | |
1423 | KIDS Distr ibution sa ved on Dec 11, 2017@ 17:29:45 | |
1424 | "PKG",93,2 2,1,"PAH", 1,1,225,0) | |
1425 | Comment: D VBA*2.7*20 2 12/11/17 | |
1426 | "PKG",93,2 2,1,"PAH", 1,1,226,0) | |
1427 | ||
1428 | "PKG",93,2 2,1,"PAH", 1,1,227,0) | |
1429 | This Distr ibution co ntains Tra nsport Glo bals for t he followi ng Package (s): | |
1430 | "PKG",93,2 2,1,"PAH", 1,1,228,0) | |
1431 | It cons isted of t he followi ng Install (s): | |
1432 | "PKG",93,2 2,1,"PAH", 1,1,229,0) | |
1433 | DBVA* 2.7*202 | |
1434 | "PKG",93,2 2,1,"PAH", 1,1,230,0) | |
1435 | ||
1436 | "PKG",93,2 2,1,"PAH", 1,1,231,0) | |
1437 | OK to cont inue with Load? NO// YES | |
1438 | "PKG",93,2 2,1,"PAH", 1,1,232,0) | |
1439 | ||
1440 | "PKG",93,2 2,1,"PAH", 1,1,233,0) | |
1441 | Distributi on OK! | |
1442 | "PKG",93,2 2,1,"PAH", 1,1,234,0) | |
1443 | ||
1444 | "PKG",93,2 2,1,"PAH", 1,1,235,0) | |
1445 | Want to Co ntinue wit h Load? YE S// | |
1446 | "PKG",93,2 2,1,"PAH", 1,1,236,0) | |
1447 | Loading Di stribution ... | |
1448 | "PKG",93,2 2,1,"PAH", 1,1,237,0) | |
1449 | ||
1450 | "PKG",93,2 2,1,"PAH", 1,1,238,0) | |
1451 | DVBA*2. 7*202 | |
1452 | "PKG",93,2 2,1,"PAH", 1,1,239,0) | |
1453 | Use INSTAL L NAME: DV BA*2.7*202 to instal l this Dis tribution. | |
1454 | "PKG",93,2 2,1,"PAH", 1,1,240,0) | |
1455 | ||
1456 | "PKG",93,2 2,1,"PAH", 1,1,241,0) | |
1457 | VISTA>D ^X UP | |
1458 | "PKG",93,2 2,1,"PAH", 1,1,242,0) | |
1459 | ||
1460 | "PKG",93,2 2,1,"PAH", 1,1,243,0) | |
1461 | Setting up programme r environm ent | |
1462 | "PKG",93,2 2,1,"PAH", 1,1,244,0) | |
1463 | This is a TEST accou nt. | |
1464 | "PKG",93,2 2,1,"PAH", 1,1,245,0) | |
1465 | ||
1466 | "PKG",93,2 2,1,"PAH", 1,1,246,0) | |
1467 | Terminal T ype set to : C-VT100 | |
1468 | "PKG",93,2 2,1,"PAH", 1,1,247,0) | |
1469 | ||
1470 | "PKG",93,2 2,1,"PAH", 1,1,248,0) | |
1471 | Select OPT ION NAME: XPD IN | |
1472 | "PKG",93,2 2,1,"PAH", 1,1,249,0) | |
1473 | 1 X PD INSTALL BUILD Install Package(s ) | |
1474 | "PKG",93,2 2,1,"PAH", 1,1,250,0) | |
1475 | 2 X PD INSTALL ATION MENU Ins tallation | |
1476 | "PKG",93,2 2,1,"PAH", 1,1,251,0) | |
1477 | CHOOSE 1-2 : 1 XPD I NSTALL BUI LD Ins tall Packa ge(s) | |
1478 | "PKG",93,2 2,1,"PAH", 1,1,252,0) | |
1479 | Install Pa ckage(s) | |
1480 | "PKG",93,2 2,1,"PAH", 1,1,253,0) | |
1481 | Select INS TALL NAME: DVBA*2 .7*202 Loaded fr om Distrib ution | |
1482 | "PKG",93,2 2,1,"PAH", 1,1,254,0) | |
1483 | 12/12/17@2 3 | |
1484 | "PKG",93,2 2,1,"PAH", 1,1,255,0) | |
1485 | :47:16 | |
1486 | "PKG",93,2 2,1,"PAH", 1,1,256,0) | |
1487 | => DV BA*2.7*202 12/11/17 ;Created on Dec 11, 2017@17:2 9:45 | |
1488 | "PKG",93,2 2,1,"PAH", 1,1,257,0) | |
1489 | ||
1490 | "PKG",93,2 2,1,"PAH", 1,1,258,0) | |
1491 | This Distr ibution wa s loaded o n Dec 12, 2017@23:47 :16 with h eader of | |
1492 | "PKG",93,2 2,1,"PAH", 1,1,259,0) | |
1493 | DVBA*2. 7*202 12/1 1/17 ;Cre ated on De c 11, 2017 @17:29:45 | |
1494 | "PKG",93,2 2,1,"PAH", 1,1,260,0) | |
1495 | It cons isted of t he followi ng Install (s): | |
1496 | "PKG",93,2 2,1,"PAH", 1,1,261,0) | |
1497 | DVBA*2. 7*202 | |
1498 | "PKG",93,2 2,1,"PAH", 1,1,262,0) | |
1499 | Checking I nstall for Package D VBA*2.7*20 2 | |
1500 | "PKG",93,2 2,1,"PAH", 1,1,263,0) | |
1501 | ||
1502 | "PKG",93,2 2,1,"PAH", 1,1,264,0) | |
1503 | Install Qu estions fo r DVBA*2.7 *202 | |
1504 | "PKG",93,2 2,1,"PAH", 1,1,265,0) | |
1505 | ||
1506 | "PKG",93,2 2,1,"PAH", 1,1,266,0) | |
1507 | Incoming F iles: | |
1508 | "PKG",93,2 2,1,"PAH", 1,1,267,0) | |
1509 | ||
1510 | "PKG",93,2 2,1,"PAH", 1,1,268,0) | |
1511 | 396.4 2507 EX AM (Parti al Definit ion) | |
1512 | "PKG",93,2 2,1,"PAH", 1,1,269,0) | |
1513 | Note: You already h ave the '2 507 EXAM' File. | |
1514 | "PKG",93,2 2,1,"PAH", 1,1,270,0) | |
1515 | ||
1516 | "PKG",93,2 2,1,"PAH", 1,1,271,0) | |
1517 | ||
1518 | "PKG",93,2 2,1,"PAH", 1,1,272,0) | |
1519 | Want KIDS to INHIBIT LOGONs du ring the i nstall? NO // | |
1520 | "PKG",93,2 2,1,"PAH", 1,1,273,0) | |
1521 | Want to DI SABLE Sche duled Opti ons, Menu Options, a nd Protoco ls? NO// | |
1522 | "PKG",93,2 2,1,"PAH", 1,1,274,0) | |
1523 | ||
1524 | "PKG",93,2 2,1,"PAH", 1,1,275,0) | |
1525 | Enter the Device you want to p rint the I nstall mes sages. | |
1526 | "PKG",93,2 2,1,"PAH", 1,1,276,0) | |
1527 | You can qu eue the in stall by e nter a 'Q' at the de vice promp t. | |
1528 | "PKG",93,2 2,1,"PAH", 1,1,277,0) | |
1529 | Enter a '^ ' to abort the insta ll. | |
1530 | "PKG",93,2 2,1,"PAH", 1,1,278,0) | |
1531 | ||
1532 | "PKG",93,2 2,1,"PAH", 1,1,279,0) | |
1533 | DEVICE: HO ME// CON SOLE | |
1534 | "PKG",93,2 2,1,"PAH", 1,1,280,0) | |
1535 | ||
1536 | "PKG",93,2 2,1,"PAH", 1,1,281,0) | |
1537 | Install S tarted for DVBA*2.7* 202 : | |
1538 | "PKG",93,2 2,1,"PAH", 1,1,282,0) | |
1539 | Dec 1 2, 2017@23 :47:24 | |
1540 | "PKG",93,2 2,1,"PAH", 1,1,283,0) | |
1541 | ||
1542 | "PKG",93,2 2,1,"PAH", 1,1,284,0) | |
1543 | Build Dist ribution D ate: Dec 1 1, 2017 | |
1544 | "PKG",93,2 2,1,"PAH", 1,1,285,0) | |
1545 | ||
1546 | "PKG",93,2 2,1,"PAH", 1,1,286,0) | |
1547 | Installin g Routines : | |
1548 | "PKG",93,2 2,1,"PAH", 1,1,287,0) | |
1549 | Dec 12, 2017@2 3:47:25 | |
1550 | "PKG",93,2 2,1,"PAH", 1,1,288,0) | |
1551 | ||
1552 | "PKG",93,2 2,1,"PAH", 1,1,289,0) | |
1553 | Installin g Data Dic tionaries: | |
1554 | "PKG",93,2 2,1,"PAH", 1,1,290,0) | |
1555 | Dec 12, 2017@2 3:47:25 | |
1556 | "PKG",93,2 2,1,"PAH", 1,1,291,0) | |
1557 | ||
1558 | "PKG",93,2 2,1,"PAH", 1,1,292,0) | |
1559 | Updating Routine fi le... | |
1560 | "PKG",93,2 2,1,"PAH", 1,1,293,0) | |
1561 | ||
1562 | "PKG",93,2 2,1,"PAH", 1,1,294,0) | |
1563 | Updating KIDS files ... | |
1564 | "PKG",93,2 2,1,"PAH", 1,1,295,0) | |
1565 | ||
1566 | "PKG",93,2 2,1,"PAH", 1,1,296,0) | |
1567 | DVBA*2.7* 202 Instal led. | |
1568 | "PKG",93,2 2,1,"PAH", 1,1,297,0) | |
1569 | Dec 1 2, 2017@23 :47:25 | |
1570 | "PKG",93,2 2,1,"PAH", 1,1,298,0) | |
1571 | ||
1572 | "PKG",93,2 2,1,"PAH", 1,1,299,0) | |
1573 | No link t o PACKAGE file | |
1574 | "PKG",93,2 2,1,"PAH", 1,1,300,0) | |
1575 | ||
1576 | "PKG",93,2 2,1,"PAH", 1,1,301,0) | |
1577 | Install M essage sen t | |
1578 | "PKG",93,2 2,1,"PAH", 1,1,302,0) | |
1579 | ||
1580 | "PKG",93,2 2,1,"PAH", 1,1,303,0) | |
1581 | Install Co mpleted | |
1582 | "PKG",93,2 2,1,"PAH", 1,1,304,0) | |
1583 | ||
1584 | "PKG",93,2 2,1,"PAH", 1,1,305,0) | |
1585 | Dec 1 2, 2017@23 :47:25 | |
1586 | "PKG",93,2 2,1,"PAH", 1,1,306,0) | |
1587 | ||
1588 | "PKG",93,2 2,1,"PAH", 1,1,307,0) | |
1589 | Installin g Data Dic tionaries: | |
1590 | "PKG",93,2 2,1,"PAH", 1,1,308,0) | |
1591 | Dec 12, 2017@2 3:47:25 | |
1592 | "PKG",93,2 2,1,"PAH", 1,1,309,0) | |
1593 | ||
1594 | "PKG",93,2 2,1,"PAH", 1,1,310,0) | |
1595 | Updating Routine fi le... | |
1596 | "PKG",93,2 2,1,"PAH", 1,1,311,0) | |
1597 | ||
1598 | "PKG",93,2 2,1,"PAH", 1,1,312,0) | |
1599 | Updating KIDS files ... | |
1600 | "PKG",93,2 2,1,"PAH", 1,1,313,0) | |
1601 | ||
1602 | "PKG",93,2 2,1,"PAH", 1,1,314,0) | |
1603 | DVBA*2.7* 202 Instal led. | |
1604 | "PKG",93,2 2,1,"PAH", 1,1,315,0) | |
1605 | Dec 1 2, 2017@23 :47:25 | |
1606 | "PKG",93,2 2,1,"PAH", 1,1,316,0) | |
1607 | ||
1608 | "PKG",93,2 2,1,"PAH", 1,1,317,0) | |
1609 | No link t o PACKAGE file | |
1610 | "PKG",93,2 2,1,"PAH", 1,1,318,0) | |
1611 | ||
1612 | "PKG",93,2 2,1,"PAH", 1,1,319,0) | |
1613 | VISTA> | |
1614 | "PKG",93,2 2,1,"PAH", 1,1,320,0) | |
1615 | ||
1616 | "PKG",93,2 2,1,"PAH", 1,1,321,0) | |
1617 | ||
1618 | "PKG",93,2 2,1,"PAH", 1,1,322,0) | |
1619 | Patch Back out Instru ctions: | |
1620 | "PKG",93,2 2,1,"PAH", 1,1,323,0) | |
1621 | ---------- ---------- ------ | |
1622 | "PKG",93,2 2,1,"PAH", 1,1,324,0) | |
1623 | ||
1624 | "PKG",93,2 2,1,"PAH", 1,1,325,0) | |
1625 | 1. Go to MailMan me nu, choose option Re ad/Manage Messages a nd select | |
1626 | "PKG",93,2 2,1,"PAH", 1,1,326,0) | |
1627 | the ba ckup messa ge that wa s creating during In stallation step | |
1628 | "PKG",93,2 2,1,"PAH", 1,1,327,0) | |
1629 | 3.c - Backup | |
1630 | "PKG",93,2 2,1,"PAH", 1,1,328,0) | |
1631 | ||
1632 | "PKG",93,2 2,1,"PAH", 1,1,329,0) | |
1633 | 2. When p rompted 'T ype <Enter > to conti nue or '^' to exit:' type '^' | |
1634 | "PKG",93,2 2,1,"PAH", 1,1,330,0) | |
1635 | and th en <Enter> | |
1636 | "PKG",93,2 2,1,"PAH", 1,1,331,0) | |
1637 | ||
1638 | "PKG",93,2 2,1,"PAH", 1,1,332,0) | |
1639 | 3. When p rompted 'E nter messa ge action: ' type 'Xt ract PackM an' and | |
1640 | "PKG",93,2 2,1,"PAH", 1,1,333,0) | |
1641 | then < Enter> | |
1642 | "PKG",93,2 2,1,"PAH", 1,1,334,0) | |
1643 | ||
1644 | "PKG",93,2 2,1,"PAH", 1,1,335,0) | |
1645 | 4. The fo llowing me ssage and the prompt will disp lay: | |
1646 | "PKG",93,2 2,1,"PAH", 1,1,336,0) | |
1647 | Warnin g: Install ing this m essage wil l cause a permanent update of | |
1648 | "PKG",93,2 2,1,"PAH", 1,1,337,0) | |
1649 | global s and rout ines. | |
1650 | "PKG",93,2 2,1,"PAH", 1,1,338,0) | |
1651 | Do you really wa nt to do t his? NO//' type 'YES ' and then <Enter> | |
1652 | "PKG",93,2 2,1,"PAH", 1,1,339,0) | |
1653 | ||
1654 | "PKG",93,2 2,1,"PAH", 1,1,340,0) | |
1655 | 5. When p rompted: | |
1656 | "PKG",93,2 2,1,"PAH", 1,1,341,0) | |
1657 | 'Shall I preserv e the rout ines on di sk in a se parate bac k-up | |
1658 | "PKG",93,2 2,1,"PAH", 1,1,342,0) | |
1659 | messag e? YES//' type 'NO' and then < Enter> | |
1660 | "PKG",93,2 2,1,"PAH", 1,1,343,0) | |
1661 | ||
1662 | "PKG",93,2 2,1,"PAH", 1,1,344,0) | |
1663 | 6. The sy stem will display th e followin g message and show a ll the | |
1664 | "PKG",93,2 2,1,"PAH", 1,1,345,0) | |
1665 | routin es that we re unloade d confirmi ng that al l the rout ines in th e | |
1666 | "PKG",93,2 2,1,"PAH", 1,1,346,0) | |
1667 | build have been restored t o the prio r version (unloaded) : | |
1668 | "PKG",93,2 2,1,"PAH", 1,1,347,0) | |
1669 | 'No ba ckup messa ge built. | |
1670 | "PKG",93,2 2,1,"PAH", 1,1,348,0) | |
1671 | ***LIS T of routi nes from b ackup. See full rout ine list a t the end of | |
1672 | "PKG",93,2 2,1,"PAH", 1,1,349,0) | |
1673 | the do cument*** | |
1674 | "PKG",93,2 2,1,"PAH", 1,1,350,0) | |
1675 | ||
1676 | "PKG",93,2 2,1,"PAH", 1,1,351,0) | |
1677 | Select PackMan f unction: a nd then <E nter>' | |
1678 | "PKG",93,2 2,1,"PAH", 1,1,352,0) | |
1679 | ||
1680 | "PKG",93,2 2,1,"PAH", 1,1,353,0) | |
1681 | 7. Verify that all six routin es are lis ted as abo ve have be en | |
1682 | "PKG",93,2 2,1,"PAH", 1,1,354,0) | |
1683 | backed out: | |
1684 | "PKG",93,2 2,1,"PAH", 1,1,355,0) | |
1685 | No bac kup messag e built. | |
1686 | "PKG",93,2 2,1,"PAH", 1,1,356,0) | |
1687 | When p rompted 'W ant KIDS t o INHIBIT LOGONs dur ing the in stall? NO/ /' | |
1688 | "PKG",93,2 2,1,"PAH", 1,1,357,0) | |
1689 | Press <Enter>. | |
1690 | "PKG",93,2 2,1,"PAH", 1,1,358,0) | |
1691 | When p rompted 'W ant to DIS ABLE Sched uled Optio ns, Menu O ptions, an d | |
1692 | "PKG",93,2 2,1,"PAH", 1,1,359,0) | |
1693 | Protoc ols? NO//' Press <En ter>. | |
1694 | "PKG",93,2 2,1,"PAH", 1,1,360,0) | |
1695 | If pro mpted 'Del ay Install (Minutes) : (0 - 60 ): 0//' re spond 0. | |
1696 | "PKG",93,2 2,1,"PAH", 1,1,361,0) | |
1697 | ||
1698 | "PKG",93,2 2,1,"PAH", 1,1,362,0) | |
1699 | 8. To cle an up the cross refe rences run BACKOUT^D VBAPOST to clean up | |
1700 | "PKG",93,2 2,1,"PAH", 1,1,363,0) | |
1701 | the cr oss refere nces. | |
1702 | "PKG",93,2 2,1,"PAH", 1,1,364,0) | |
1703 | ||
1704 | "PKG",93,2 2,1,"PAH", 1,1,365,0) | |
1705 | Post-Insta llation In structions : | |
1706 | "PKG",93,2 2,1,"PAH", 1,1,366,0) | |
1707 | ---------- ---------- ---------- - | |
1708 | "PKG",93,2 2,1,"PAH", 1,1,367,0) | |
1709 | See Techni cal Manual for cross reference /object co ntents ver ification | |
1710 | "PKG",93,2 2,1,"PAH", 1,1,368,0) | |
1711 | ||
1712 | "PKG",93,2 2,1,"PAH", 1,1,369,0) | |
1713 | Check list to Verify : | |
1714 | "PKG",93,2 2,1,"PAH", 1,1,370,0) | |
1715 | 1. It em .02, .0 3, and .04 in the 25 07 EXAM fi le. | |
1716 | "QUES","XP F1",0) | |
1717 | Y | |
1718 | "QUES","XP F1","??") | |
1719 | ^D REP^XPD H | |
1720 | "QUES","XP F1","A") | |
1721 | Shall I wr ite over y our |FLAG| File | |
1722 | "QUES","XP F1","B") | |
1723 | YES | |
1724 | "QUES","XP F1","M") | |
1725 | D XPF1^XPD IQ | |
1726 | "QUES","XP F2",0) | |
1727 | Y | |
1728 | "QUES","XP F2","??") | |
1729 | ^D DTA^XPD H | |
1730 | "QUES","XP F2","A") | |
1731 | Want my da ta |FLAG| yours | |
1732 | "QUES","XP F2","B") | |
1733 | YES | |
1734 | "QUES","XP F2","M") | |
1735 | D XPF2^XPD IQ | |
1736 | "QUES","XP I1",0) | |
1737 | YO | |
1738 | "QUES","XP I1","??") | |
1739 | ^D INHIBIT ^XPDH | |
1740 | "QUES","XP I1","A") | |
1741 | Want KIDS to INHIBIT LOGONs du ring the i nstall | |
1742 | "QUES","XP I1","B") | |
1743 | NO | |
1744 | "QUES","XP I1","M") | |
1745 | D XPI1^XPD IQ | |
1746 | "QUES","XP M1",0) | |
1747 | PO^VA(200, :EM | |
1748 | "QUES","XP M1","??") | |
1749 | ^D MG^XPDH | |
1750 | "QUES","XP M1","A") | |
1751 | Enter the Coordinato r for Mail Group '|F LAG|' | |
1752 | "QUES","XP M1","B") | |
1753 | ||
1754 | "QUES","XP M1","M") | |
1755 | D XPM1^XPD IQ | |
1756 | "QUES","XP O1",0) | |
1757 | Y | |
1758 | "QUES","XP O1","??") | |
1759 | ^D MENU^XP DH | |
1760 | "QUES","XP O1","A") | |
1761 | Want KIDS to Rebuild Menu Tree s Upon Com pletion of Install | |
1762 | "QUES","XP O1","B") | |
1763 | NO | |
1764 | "QUES","XP O1","M") | |
1765 | D XPO1^XPD IQ | |
1766 | "QUES","XP Z1",0) | |
1767 | Y | |
1768 | "QUES","XP Z1","??") | |
1769 | ^D OPT^XPD H | |
1770 | "QUES","XP Z1","A") | |
1771 | Want to DI SABLE Sche duled Opti ons, Menu Options, a nd Protoco ls | |
1772 | "QUES","XP Z1","B") | |
1773 | NO | |
1774 | "QUES","XP Z1","M") | |
1775 | D XPZ1^XPD IQ | |
1776 | "QUES","XP Z2",0) | |
1777 | Y | |
1778 | "QUES","XP Z2","??") | |
1779 | ^D RTN^XPD H | |
1780 | "QUES","XP Z2","A") | |
1781 | Want to MO VE routine s to other CPUs | |
1782 | "QUES","XP Z2","B") | |
1783 | NO | |
1784 | "QUES","XP Z2","M") | |
1785 | D XPZ2^XPD IQ | |
1786 | "RTN") | |
1787 | 4 | |
1788 | "RTN","DVB CLOGE") | |
1789 | 0^1^B23562 257 | |
1790 | "RTN","DVB CLOGE",1,0 ) | |
1791 | DVBCLOGE ; ALB/GTS-55 7/THM-SET UP C&P EXA M ;5/10/91 8:55 AM | |
1792 | "RTN","DVB CLOGE",2,0 ) | |
1793 | ;;2.7;AMI E;**202**; Dec 8, 201 7;Build 28 | |
1794 | "RTN","DVB CLOGE",3,0 ) | |
1795 | ;if $D(OU T), reques t deleted - exams mu st be comp leted | |
1796 | "RTN","DVB CLOGE",4,0 ) | |
1797 | ; | |
1798 | "RTN","DVB CLOGE",5,0 ) | |
1799 | EXMHD K OU T N DVBARQ DT,DVBADT, DVBADA | |
1800 | "RTN","DVB CLOGE",6,0 ) | |
1801 | W @FF,?(I OM-$L(HD2) \2),HD2 | |
1802 | "RTN","DVB CLOGE",7,0 ) | |
1803 | W !!,"Ple ase select the exams for ",$P( PNAM,",",2 ,99)," ",$ P(PNAM,"," ,1) | |
1804 | "RTN","DVB CLOGE",8,0 ) | |
1805 | W !,"Use ? to see a list of e xams avail able for s election." ,!! | |
1806 | "RTN","DVB CLOGE",9,0 ) | |
1807 | I $D(^DVB (396.3,REQ DA,5)),($P (^DVB(396. 3,REQDA,0) ,"^",10)=" E"&(+$P(^D VB(396.3,R EQDA,5),"^ ",1)'>0)) DO | |
1808 | "RTN","DVB CLOGE",10, 0) | |
1809 | .S TVAR(1 ,0)="0,0,0 ,1,0^NOTE: This req uest has a priority of Insuffi cient with out a link " | |
1810 | "RTN","DVB CLOGE",11, 0) | |
1811 | .S TVAR(2 ,0)="0,8,0 ,1:1,0^to a complete d request. " | |
1812 | "RTN","DVB CLOGE",12, 0) | |
1813 | .S TVAR(3 ,0)="0,0,0 ,1:2,0^Use care to s elect the proper exa m(s) to re turn as in sufficient ." | |
1814 | "RTN","DVB CLOGE",13, 0) | |
1815 | .D WR^DVB AUTL4("TVA R") | |
1816 | "RTN","DVB CLOGE",14, 0) | |
1817 | .K TVAR | |
1818 | "RTN","DVB CLOGE",15, 0) | |
1819 | I '$D(^DV B(396.3,RE QDA,5))&($ P(^DVB(396 .3,REQDA,0 ),"^",10)= "E") DO | |
1820 | "RTN","DVB CLOGE",16, 0) | |
1821 | .S TVAR(1 ,0)="0,0,0 ,1,0^NOTE: This req uest has a priority of Insuffi cient with out a link " | |
1822 | "RTN","DVB CLOGE",17, 0) | |
1823 | .S TVAR(2 ,0)="0,8,0 ,1:1,0^to a complete d request. " | |
1824 | "RTN","DVB CLOGE",18, 0) | |
1825 | .S TVAR(3 ,0)="0,0,0 ,1:2,0^Use care to s elect the proper exa m(s) to re turn as in sufficient ." | |
1826 | "RTN","DVB CLOGE",19, 0) | |
1827 | .D WR^DVB AUTL4("TVA R") | |
1828 | "RTN","DVB CLOGE",20, 0) | |
1829 | .K TVAR | |
1830 | "RTN","DVB CLOGE",21, 0) | |
1831 | ; | |
1832 | "RTN","DVB CLOGE",22, 0) | |
1833 | EXMSEL K D IC,OUT,DVB AQT I $D(D VBCLCKD) Q | |
1834 | "RTN","DVB CLOGE",23, 0) | |
1835 | S DVBARQD T=$P(^DVB( 396.3,REQD A,0),U,2) | |
1836 | "RTN","DVB CLOGE",24, 0) | |
1837 | I $D(^DVB (396.3,REQ DA,5)),(+$ P(^DVB(396 .3,REQDA,5 ),U,1)>0) DO | |
1838 | "RTN","DVB CLOGE",25, 0) | |
1839 | .S DVBAIN DA=+$P(^DV B(396.3,RE QDA,5),U,1 ) ;**Exam Scr for In suff 2507' S | |
1840 | "RTN","DVB CLOGE",26, 0) | |
1841 | .S DIC("S ")="I $D(^ DVB(396.4, ""ARQ"_DVB AINDA_""", Y))" | |
1842 | "RTN","DVB CLOGE",27, 0) | |
1843 | S:'$D(DIC ("S")) DIC ("S")="I $ P(^(0),U,5 )'=""I""" | |
1844 | "RTN","DVB CLOGE",28, 0) | |
1845 | S DIC="^D VB(396.6," | |
1846 | "RTN","DVB CLOGE",29, 0) | |
1847 | S DIC(0)= "AEQM",DIC ("A")="Sel ect EXAM: " D ^DIC | |
1848 | "RTN","DVB CLOGE",30, 0) | |
1849 | S:$D(DTOU T) OUT=1 D :$D(OUT) K VARS Q:$D( OUT) | |
1850 | "RTN","DVB CLOGE",31, 0) | |
1851 | G:X=""!(X =U) EXMDIS ;Only out of EXMSEL | |
1852 | "RTN","DVB CLOGE",32, 0) | |
1853 | I +Y>0 S EXMNM=$P(^ DVB(396.6, +Y,0),U,1) ,EXMPTR=+Y | |
1854 | "RTN","DVB CLOGE",33, 0) | |
1855 | I +Y<0 W " ???" G EXMSEL | |
1856 | "RTN","DVB CLOGE",34, 0) | |
1857 | I $D(^TMP ($J,"NEW", EXMNM)) W " Dupli cate - ign ored",!,*7 G EXMSEL | |
1858 | "RTN","DVB CLOGE",35, 0) | |
1859 | I $D(^DVB (396.4,"AP S",DFN,EXM PTR,"O"))> 0 W *7," -- already ON FILE", ! | |
1860 | "RTN","DVB CLOGE",36, 0) | |
1861 | I $D(^DVB (396.4,"AP S",DFN,EXM PTR,"O"))> 0 S DVBAQT =1 | |
1862 | "RTN","DVB CLOGE",37, 0) | |
1863 | G:$D(DVBA QT) EXMSEL | |
1864 | "RTN","DVB CLOGE",38, 0) | |
1865 | S ^TMP($J ,"NEW",EXM NM)=+Y K Y G EXMSEL | |
1866 | "RTN","DVB CLOGE",39, 0) | |
1867 | ; | |
1868 | "RTN","DVB CLOGE",40, 0) | |
1869 | EXMDIS W @ FF,!! K %, %Y,DIE,DIC G:$D(DVBC LCKD) EXMS EL | |
1870 | "RTN","DVB CLOGE",41, 0) | |
1871 | I '$D(^TM P($J,"NEW" )) W !!,*7 ,"You have not selec ted any ex ams.",!,"D o you want to try ag ain" S %=1 D YN^DICN D:%=1 KVA RS G:%=1 E XMHD I $D( DTOUT) S O UT=1 D KVA RS Q | |
1872 | "RTN","DVB CLOGE",42, 0) | |
1873 | I $D(%Y) I %Y["?" W !!,"Enter Y to go b ack and se lect exams or N to D ELETE the entire req uest",!,"a s well as any exams selected." D CONTMES ^DVBCUTL4 G EXMDIS | |
1874 | "RTN","DVB CLOGE",43, 0) | |
1875 | I $D(%) I %'=1 S OU T=1 D KVAR S Q | |
1876 | "RTN","DVB CLOGE",44, 0) | |
1877 | W !!,"You have sele cted these exams:",! ! S EXMNM= "" F JY=0: 1 S EXMNM= $O(^TMP($J ,"NEW",EXM NM)) Q:EXM NM="" W ? 5,EXMNM,! | |
1878 | "RTN","DVB CLOGE",45, 0) | |
1879 | W !,$S(JY '>1:"Is th is exam",1 :"Are thes e exams"), " correct" | |
1880 | "RTN","DVB CLOGE",46, 0) | |
1881 | S %=2 D Y N^DICN G:% =1 EXMLOG ;Only out of EXMDIS | |
1882 | "RTN","DVB CLOGE",47, 0) | |
1883 | I $D(DTOU T) S OUT=1 D KVARS Q | |
1884 | "RTN","DVB CLOGE",48, 0) | |
1885 | I $D(%Y), %Y["?" W ! ,"Enter Y to go ahea d and log the select ed exams o r N to mod ify the li st." D CON TMES^DVBCU TL4 G EXMD IS | |
1886 | "RTN","DVB CLOGE",49, 0) | |
1887 | ; | |
1888 | "RTN","DVB CLOGE",50, 0) | |
1889 | EXMOD ;dro p into - c orrect exa ms | |
1890 | "RTN","DVB CLOGE",51, 0) | |
1891 | I $D(%),% =2 W @FF,! !! | |
1892 | "RTN","DVB CLOGE",52, 0) | |
1893 | S DIC(0)= "AEQM",DIC ("A")="Ent er EXAM to delete: " | |
1894 | "RTN","DVB CLOGE",53, 0) | |
1895 | S DIC="^D VB(396.6," ,DIC("S")= "I $D(^TMP ($J,""NEW" ",$P(^(0), U,1)))" | |
1896 | "RTN","DVB CLOGE",54, 0) | |
1897 | ; | |
1898 | "RTN","DVB CLOGE",55, 0) | |
1899 | EXMOD1 K O UT D ^DIC | |
1900 | "RTN","DVB CLOGE",56, 0) | |
1901 | S:$D(DTOU T) OUT=1 D :$D(OUT) K VARS Q:$D( OUT) | |
1902 | "RTN","DVB CLOGE",57, 0) | |
1903 | G:X=""!(X =U) EXMASK ;Only out of EXMOD1 | |
1904 | "RTN","DVB CLOGE",58, 0) | |
1905 | S EXMNM=$ P(^DVB(396 .6,+Y,0),U ,1) | |
1906 | "RTN","DVB CLOGE",59, 0) | |
1907 | I +Y>0&($ D(^TMP($J, "NEW",EXMN M))) K ^TM P($J,"NEW" ,EXMNM) W " Ok ..." H 1 G EXM OD1 | |
1908 | "RTN","DVB CLOGE",60, 0) | |
1909 | G EXMOD1 | |
1910 | "RTN","DVB CLOGE",61, 0) | |
1911 | ; | |
1912 | "RTN","DVB CLOGE",62, 0) | |
1913 | EXMASK W @ FF,!!,"Wan t to add m ore exams" | |
1914 | "RTN","DVB CLOGE",63, 0) | |
1915 | S %=1 D Y N^DICN G:% =1 EXMSEL ;select mo re exams | |
1916 | "RTN","DVB CLOGE",64, 0) | |
1917 | I $D(DTOU T) S OUT=1 D KVARS Q | |
1918 | "RTN","DVB CLOGE",65, 0) | |
1919 | I $D(%Y), %Y["?" W ! !,"Enter Y to add mo re exams o r N to go on and log existing selections ." D CONTM ES^DVBCUTL 4 G EXMASK | |
1920 | "RTN","DVB CLOGE",66, 0) | |
1921 | G EXMDIS ;display e xams | |
1922 | "RTN","DVB CLOGE",67, 0) | |
1923 | ; | |
1924 | "RTN","DVB CLOGE",68, 0) | |
1925 | EXMLOG W ! ! S EXMNM= "" K DR | |
1926 | "RTN","DVB CLOGE",69, 0) | |
1927 | D STM^DVB CUTL4 | |
1928 | "RTN","DVB CLOGE",70, 0) | |
1929 | F DVBCJ=0 :0 S EXMNM =$O(^TMP($ J,"NEW",EX MNM)) Q:EX MNM="" S X=$$EXAM^D VBCUTL4 S: X=0 DVBCLC KD=1 Q:$D( DVBCLCKD) D EXMLOG1 Q:$D(OUT) | |
1930 | "RTN","DVB CLOGE",71, 0) | |
1931 | S XRTN=$T (+0) | |
1932 | "RTN","DVB CLOGE",72, 0) | |
1933 | D SPM^DVB CUTL4 | |
1934 | "RTN","DVB CLOGE",73, 0) | |
1935 | W:$D(DVBC LCKD) !!," Another user addi ng exams n ow...try a gain later ." | |
1936 | "RTN","DVB CLOGE",74, 0) | |
1937 | R:$D(DVBC LCKD) !," PRESS [R eturn] TO CONTINUE.. .",DVBCCON T:DTIME | |
1938 | "RTN","DVB CLOGE",75, 0) | |
1939 | I $D(DVBC LCKD) D RO LLBCK^DVBC UTL4 G EXM DIS | |
1940 | "RTN","DVB CLOGE",76, 0) | |
1941 | I $D(OUT) D KVARS Q | |
1942 | "RTN","DVB CLOGE",77, 0) | |
1943 | H 2 K DA S DA=REQDA | |
1944 | "RTN","DVB CLOGE",78, 0) | |
1945 | W @IOF,!, "Please en ter any re marks for this reque st:",!!! | |
1946 | "RTN","DVB CLOGE",79, 0) | |
1947 | S DR="23" ,DIE="^DVB (396.3," D ^DIE H 1 | |
1948 | "RTN","DVB CLOGE",80, 0) | |
1949 | S X=+$O(^ ORD(101,"B ","OR EVSE ND DVBA",0 ))_";ORD(1 01," ;202 | |
1950 | "RTN","DVB CLOGE",81, 0) | |
1951 | D EN^XQOR | |
1952 | "RTN","DVB CLOGE",82, 0) | |
1953 | K DIC,DIE ,DR,EXMNM, DVBCDEL,Y, X,EXMPTR D KVARS | |
1954 | "RTN","DVB CLOGE",83, 0) | |
1955 | Q | |
1956 | "RTN","DVB CLOGE",84, 0) | |
1957 | ; | |
1958 | "RTN","DVB CLOGE",85, 0) | |
1959 | EXMLOG1 ;c alled by E XMLOG | |
1960 | "RTN","DVB CLOGE",86, 0) | |
1961 | K OUT,DD, DO S (DIC, DIE)="^DVB (396.4,",D IC(0)="" | |
1962 | "RTN","DVB CLOGE",87, 0) | |
1963 | S DIC("DR ")=".02/// /^S X=REQD A;.03////^ S X=$P(^TM P($J,""NEW "",EXMNM), U,1);.04// //O" | |
1964 | "RTN","DVB CLOGE",88, 0) | |
1965 | D FILE^DI CN | |
1966 | "RTN","DVB CLOGE",89, 0) | |
1967 | I $D(Y),+ Y>0 W:$X>5 0 ! W:$X>4 0&($L(EXMN M)>30) ! W EXMNM_" - added, " | |
1968 | "RTN","DVB CLOGE",90, 0) | |
1969 | I $D(Y),+ Y<0 W *7," Exam addit ion error ! " S OUT= 1 | |
1970 | "RTN","DVB CLOGE",91, 0) | |
1971 | D INSXM^D VBCUTA1 | |
1972 | "RTN","DVB CLOGE",92, 0) | |
1973 | I $D(DTOU T) W *7,"E xam additi on error ! " S OUT=1 D ROLLBCK ^DVBCUTL4 | |
1974 | "RTN","DVB CLOGE",93, 0) | |
1975 | Q | |
1976 | "RTN","DVB CLOGE",94, 0) | |
1977 | ; | |
1978 | "RTN","DVB CLOGE",95, 0) | |
1979 | KVARS ;Kil l this rou tines vari ables | |
1980 | "RTN","DVB CLOGE",96, 0) | |
1981 | K DVBARQD T,DVBADT,D VBADA,DVBA QT,DVBAIND A | |
1982 | "RTN","DVB CLOGE",97, 0) | |
1983 | Q | |
1984 | "RTN","DVB CLOGE",98, 0) | |
1985 | ; | |
1986 | "RTN","DVB CREDT") | |
1987 | 0^2^B24221 485 | |
1988 | "RTN","DVB CREDT",1,0 ) | |
1989 | DVBCREDT ; ALB/GTS-55 7/THM-EDIT STATIC C& P INFO ; 1 1/20/90 6 :29 AM | |
1990 | "RTN","DVB CREDT",2,0 ) | |
1991 | ;;2.7;AMI E;**202**; Dec 8, 201 7;Build 28 | |
1992 | "RTN","DVB CREDT",3,0 ) | |
1993 | ; | |
1994 | "RTN","DVB CREDT",4,0 ) | |
1995 | ;**Note: Priority E is Insuf ficient | |
1996 | "RTN","DVB CREDT",5,0 ) | |
1997 | ; Priority 'E is not insufficie nt | |
1998 | "RTN","DVB CREDT",6,0 ) | |
1999 | ; | |
2000 | "RTN","DVB CREDT",7,0 ) | |
2001 | K ^TMP("D VBCEDIT",$ J) I $D(DU Z)#2=0 W ! !,*7,"Your user numb er is inva lid.",!! H 3 G EXIT | |
2002 | "RTN","DVB CREDT",8,0 ) | |
2003 | S LN="EDI T C&P STAT IC INFORMA TION" D HO ME^%ZIS S FF=IOF | |
2004 | "RTN","DVB CREDT",9,0 ) | |
2005 | G EN1 | |
2006 | "RTN","DVB CREDT",10, 0) | |
2007 | ; | |
2008 | "RTN","DVB CREDT",11, 0) | |
2009 | COMPARE I '$D(^TMP(" DVBCEDIT", $J,DA,2,I, 0)) S DVBC MOD=1 Q | |
2010 | "RTN","DVB CREDT",12, 0) | |
2011 | I ^DVB(39 6.3,DA,2,I ,0)'=^TMP( "DVBCEDIT" ,$J,DA,2,I ,0) S DVBC MOD=1 Q | |
2012 | "RTN","DVB CREDT",13, 0) | |
2013 | Q | |
2014 | "RTN","DVB CREDT",14, 0) | |
2015 | ; | |
2016 | "RTN","DVB CREDT",15, 0) | |
2017 | EN1 W @IOF ,!?(IOM-$L (LN)\2),LN ,!!! S DIC ="AE",DIC( "A")="Ente r VETERAN NAME: ",DI C="^DVB(39 6.3,",DIE= DIC,DIC(0) ="AEQM" D ^DIC G:X=" "!(X=U) EX IT S DA=+Y I DA<0 G EN1 | |
2018 | "RTN","DVB CREDT",16, 0) | |
2019 | S STAT=$P (^DVB(396. 3,DA,0),U, 18) I STAT '="N"&(STA T'="P") W !!,"The st atus of th is request is not NE W or PENDI NG, REPORT ED.",!,"It cannot, t herefore, be modifie d.",*7,!! S DVBCMOD= 1 G CON | |
2020 | "RTN","DVB CREDT",17, 0) | |
2021 | F I=0:0 S I=$O(^DVB (396.3,DA, 2,I)) Q:I= "" S ^TMP ("DVBCEDIT ",$J,DA,2, I,0)=^DVB( 396.3,DA,2 ,I,0) ;sav e lines fo r compare | |
2022 | "RTN","DVB CREDT",18, 0) | |
2023 | ; | |
2024 | "RTN","DVB CREDT",19, 0) | |
2025 | EDIT ; | |
2026 | "RTN","DVB CREDT",20, 0) | |
2027 | N DVBARQS T,SAVEDA,E NTTOUT | |
2028 | "RTN","DVB CREDT",21, 0) | |
2029 | S DVBARQS T=$P(^DVB( 396.3,DA,0 ),U,10) | |
2030 | "RTN","DVB CREDT",22, 0) | |
2031 | S SAVEDA= DA | |
2032 | "RTN","DVB CREDT",23, 0) | |
2033 | W !! S DR ="W @IOF,! !;9;10:10. 2;24;29;21 ;W !!;23" D ^DIE | |
2034 | "RTN","DVB CREDT",24, 0) | |
2035 | S X=+$O(^ ORD(101,"B ","OR EVSE ND DVBA",0 ))_";ORD(1 01," ;202 | |
2036 | "RTN","DVB CREDT",25, 0) | |
2037 | D EN^XQOR | |
2038 | "RTN","DVB CREDT",26, 0) | |
2039 | S:$D(DTOU T) ENTTOUT ="" | |
2040 | "RTN","DVB CREDT",27, 0) | |
2041 | ; | |
2042 | "RTN","DVB CREDT",28, 0) | |
2043 | ;**Priori ty E -> E | |
2044 | "RTN","DVB CREDT",29, 0) | |
2045 | I DVBARQS T="E",($P( ^DVB(396.3 ,DA,0),U,1 0)="E"&('$ D(ENTTOUT) )) DO | |
2046 | "RTN","DVB CREDT",30, 0) | |
2047 | .W ! | |
2048 | "RTN","DVB CREDT",31, 0) | |
2049 | .N UPDT25 07 | |
2050 | "RTN","DVB CREDT",32, 0) | |
2051 | .K DTOUT, DUOUT | |
2052 | "RTN","DVB CREDT",33, 0) | |
2053 | .S DIR(0) ="Y^AO",DI R("A")="Do you want to change the reques t this ins ufficient is linked to" | |
2054 | "RTN","DVB CREDT",34, 0) | |
2055 | .S DIR("? ")="Enter Yes to cha nge the li nk and No to keep th e current link.",DIR ("B")="NO" D ^DIR | |
2056 | "RTN","DVB CREDT",35, 0) | |
2057 | .S:+Y=1 U PDT2507="" | |
2058 | "RTN","DVB CREDT",36, 0) | |
2059 | .I $D(UPD T2507) DO | |
2060 | "RTN","DVB CREDT",37, 0) | |
2061 | ..K DIR,Y | |
2062 | "RTN","DVB CREDT",38, 0) | |
2063 | ..N REQDA S REQDA=S AVEDA | |
2064 | "RTN","DVB CREDT",39, 0) | |
2065 | ..S NODE5 ="" | |
2066 | "RTN","DVB CREDT",40, 0) | |
2067 | ..S:$D(^D VB(396.3,R EQDA,5)) N ODE5=^DVB( 396.3,REQD A,5) ;**Sa ve link no de | |
2068 | "RTN","DVB CREDT",41, 0) | |
2069 | ..D CLINS F^DVBCLOG2 S DA=SAVE DA D INSUF ^DVBCLOG2 ;*Update 2 507 Link i nfo | |
2070 | "RTN","DVB CREDT",42, 0) | |
2071 | ..I '$D(D VBAOUT),(' $D(DUOUT)) D INSUFXM ^DVBCUTA2 ;*Update e xam info | |
2072 | "RTN","DVB CREDT",43, 0) | |
2073 | ..I $D(DV BAOUT)!($D (DUOUT)) D RESTLINK^ DVBCUTA2 ; *Restore 2 507 link | |
2074 | "RTN","DVB CREDT",44, 0) | |
2075 | ..K NODE5 | |
2076 | "RTN","DVB CREDT",45, 0) | |
2077 | .I '$D(UP DT2507) DO ;**Exam info updat e check | |
2078 | "RTN","DVB CREDT",46, 0) | |
2079 | ..W ! | |
2080 | "RTN","DVB CREDT",47, 0) | |
2081 | ..N REQDA S REQDA=S AVEDA | |
2082 | "RTN","DVB CREDT",48, 0) | |
2083 | ..S NODE5 =^DVB(396. 3,REQDA,5) ;**Save t he link in fo node | |
2084 | "RTN","DVB CREDT",49, 0) | |
2085 | ..D INSUF XM^DVBCUTA 2 ;**Updat e exam inf o | |
2086 | "RTN","DVB CREDT",50, 0) | |
2087 | ..K XMEDT ,NODE5 | |
2088 | "RTN","DVB CREDT",51, 0) | |
2089 | .S DA=SAV EDA | |
2090 | "RTN","DVB CREDT",52, 0) | |
2091 | ; | |
2092 | "RTN","DVB CREDT",53, 0) | |
2093 | ;**Priori ty 'E -> E | |
2094 | "RTN","DVB CREDT",54, 0) | |
2095 | I DVBARQS T'="E",($P (^DVB(396. 3,DA,0),U, 10)="E"&(' $D(ENTTOUT ))) DO | |
2096 | "RTN","DVB CREDT",55, 0) | |
2097 | .K DIR,Y | |
2098 | "RTN","DVB CREDT",56, 0) | |
2099 | .N REQDA, XMDA S REQ DA=SAVEDA | |
2100 | "RTN","DVB CREDT",57, 0) | |
2101 | .D INSUF^ DVBCLOG2 ; **Enter 25 07 insuf l ink info | |
2102 | "RTN","DVB CREDT",58, 0) | |
2103 | .I '$D(DV BAOUT) DO ;**Enter insuf info on exams | |
2104 | "RTN","DVB CREDT",59, 0) | |
2105 | ..N EXMNM ,XMSTAT | |
2106 | "RTN","DVB CREDT",60, 0) | |
2107 | ..K DTOUT | |
2108 | "RTN","DVB CREDT",61, 0) | |
2109 | ..F XMDA= 0:0 S XMDA =$O(^DVB(3 96.4,"C",R EQDA,XMDA) ) Q:(XMDA= ""!($D(DTO UT))) DO | |
2110 | "RTN","DVB CREDT",62, 0) | |
2111 | ...W @IOF | |
2112 | "RTN","DVB CREDT",63, 0) | |
2113 | ...D XMUP DT^DVBCUTA 2 ;**Exam info | |
2114 | "RTN","DVB CREDT",64, 0) | |
2115 | ..S:$D(DT OUT) DVBAO UT="" K Y, ^TMP($J,"N EW") | |
2116 | "RTN","DVB CREDT",65, 0) | |
2117 | .I $D(DVB AOUT) DO ;**Restore priority info when time out | |
2118 | "RTN","DVB CREDT",66, 0) | |
2119 | ..N MSG,R ESET,EXMCL R | |
2120 | "RTN","DVB CREDT",67, 0) | |
2121 | ..S (RESE T,MSG,EXMC LR)="" | |
2122 | "RTN","DVB CREDT",68, 0) | |
2123 | ..D RESTO RE | |
2124 | "RTN","DVB CREDT",69, 0) | |
2125 | .S DA=SAV EDA | |
2126 | "RTN","DVB CREDT",70, 0) | |
2127 | ; | |
2128 | "RTN","DVB CREDT",71, 0) | |
2129 | ;**Priori ty E -> 'E | |
2130 | "RTN","DVB CREDT",72, 0) | |
2131 | I DVBARQS T="E",($P( ^DVB(396.3 ,DA,0),U,1 0)'="E") D O | |
2132 | "RTN","DVB CREDT",73, 0) | |
2133 | .N REQDA, EXMCLR S R EQDA=SAVED A S EXMCLR ="" | |
2134 | "RTN","DVB CREDT",74, 0) | |
2135 | .D RESTOR E ;**Clear link and insuf info on exams | |
2136 | "RTN","DVB CREDT",75, 0) | |
2137 | .S DA=SAV EDA | |
2138 | "RTN","DVB CREDT",76, 0) | |
2139 | ; | |
2140 | "RTN","DVB CREDT",77, 0) | |
2141 | ;**If Tim ed out of informatio n edit in DR string | |
2142 | "RTN","DVB CREDT",78, 0) | |
2143 | I $D(ENTT OUT) DO | |
2144 | "RTN","DVB CREDT",79, 0) | |
2145 | .I DVBARQ ST'="E",($ P(^DVB(396 .3,DA,0),U ,10)="E") DO ;**cle ar insf in fo | |
2146 | "RTN","DVB CREDT",80, 0) | |
2147 | ..N REQDA ,MSG,RESET | |
2148 | "RTN","DVB CREDT",81, 0) | |
2149 | ..S REQDA =SAVEDA S (MSG,RESET )="" | |
2150 | "RTN","DVB CREDT",82, 0) | |
2151 | ..D RESTO RE | |
2152 | "RTN","DVB CREDT",83, 0) | |
2153 | S DA=SAVE DA | |
2154 | "RTN","DVB CREDT",84, 0) | |
2155 | S DIE="^D VB(396.3," | |
2156 | "RTN","DVB CREDT",85, 0) | |
2157 | I $P(^DVB (396.3,DA, 0),U,2)[DT G CONK ;n o check if entered t oday | |
2158 | "RTN","DVB CREDT",86, 0) | |
2159 | K DVBCMOD F I=0:0 S I=$O(^DVB (396.3,DA, 2,I)) Q:I= "" D COMP ARE Q:$D(D VBCMOD) | |
2160 | "RTN","DVB CREDT",87, 0) | |
2161 | I $D(DVBC MOD) S DR= "23.5///NO W;23.6//// ^S X=DUZ" D ^DIE W @ IOF,!!,*7, "Since you have modi fied the R EMARKS sec tion,",!," a new copy of the re quest will be issued to the",! ,"medical center tom orrow morn ing." | |
2162 | "RTN","DVB CREDT",88, 0) | |
2163 | ; | |
2164 | "RTN","DVB CREDT",89, 0) | |
2165 | CON I $D(D VBCMOD) W !!,"Press RETURN to continue " R ANS:DT IME G:'$T! (ANS=U) EX IT | |
2166 | "RTN","DVB CREDT",90, 0) | |
2167 | CONK K I,D VBCMOD,DIC ,DA,DIE,X, Y G EN1 | |
2168 | "RTN","DVB CREDT",91, 0) | |
2169 | ; | |
2170 | "RTN","DVB CREDT",92, 0) | |
2171 | EXIT K ^TM P("DVBCEDI T",$J) G K ILL^DVBCUT IL | |
2172 | "RTN","DVB CREDT",93, 0) | |
2173 | ; | |
2174 | "RTN","DVB CREDT",94, 0) | |
2175 | RESTORE ;* * Remove i nsufficien t info fro m 2507 | |
2176 | "RTN","DVB CREDT",95, 0) | |
2177 | K DIE,DA, DR | |
2178 | "RTN","DVB CREDT",96, 0) | |
2179 | D CLINSF^ DVBCLOG2 ; **Clear 25 07 info | |
2180 | "RTN","DVB CREDT",97, 0) | |
2181 | I $D(RESE T) DO ;** Reset Prio rity | |
2182 | "RTN","DVB CREDT",98, 0) | |
2183 | .S DA=REQ DA,DR="9// //^S X=DVB ARQST",DIE ="^DVB(396 .3," | |
2184 | "RTN","DVB CREDT",99, 0) | |
2185 | .D ^DIE K DA,DR,DIE | |
2186 | "RTN","DVB CREDT",100 ,0) | |
2187 | I $D(EXMC LR) DO ;* *Clear exa m info | |
2188 | "RTN","DVB CREDT",101 ,0) | |
2189 | .F XMDA=0 :0 S XMDA= $O(^DVB(39 6.4,"C",RE QDA,XMDA)) Q:(XMDA=" ") DO | |
2190 | "RTN","DVB CREDT",102 ,0) | |
2191 | ..K DA,DR ,DIE | |
2192 | "RTN","DVB CREDT",103 ,0) | |
2193 | ..S DA=XM DA,DR=".11 ////@;.12/ //@;80///@ ",DIE="^DV B(396.4," | |
2194 | "RTN","DVB CREDT",104 ,0) | |
2195 | ..D ^DIE | |
2196 | "RTN","DVB CREDT",105 ,0) | |
2197 | .K DA,DR, DIE | |
2198 | "RTN","DVB CREDT",106 ,0) | |
2199 | I $D(MSG) DO ;**Ou tput messa ge | |
2200 | "RTN","DVB CREDT",107 ,0) | |
2201 | .S TVAR(1 ,0)="1,3,0 ,2:1,0^Ins ufficient link info not update d!...Prior ity restor ed" | |
2202 | "RTN","DVB CREDT",108 ,0) | |
2203 | .D WR^DVB AUTL4("TVA R") | |
2204 | "RTN","DVB CREDT",109 ,0) | |
2205 | .K TVAR | |
2206 | "RTN","DVB CREDT",110 ,0) | |
2207 | .D CONTME S^DVBCUTL4 | |
2208 | "RTN","DVB CREDT",111 ,0) | |
2209 | Q | |
2210 | "RTN","DVB CREDT",112 ,0) | |
2211 | ; | |
2212 | "RTN","DVM XPOST") | |
2213 | 0^4^B26897 46 | |
2214 | "RTN","DVM XPOST",1,0 ) | |
2215 | DVMXPOST ; MASS/MKN - Post-ins tall routi ne;12/13/2 017 | |
2216 | "RTN","DVM XPOST",2,0 ) | |
2217 | ;;2.7;AMI E;**202**; December 1 3,2017;Bui ld 28 | |
2218 | "RTN","DVM XPOST",3,0 ) | |
2219 | ;VA DIREC TIVE 6402, this rout ine should not be mo dified. | |
2220 | "RTN","DVM XPOST",4,0 ) | |
2221 | ; | |
2222 | "RTN","DVM XPOST",5,0 ) | |
2223 | EN ;The ac tual post install do es nothing . The purp ose of thi s routine is | |
2224 | "RTN","DVM XPOST",6,0 ) | |
2225 | ; to prov ide a "bac k out" fun ction at t ag BACKOUT | |
2226 | "RTN","DVM XPOST",7,0 ) | |
2227 | Q | |
2228 | "RTN","DVM XPOST",8,0 ) | |
2229 | ; | |
2230 | "RTN","DVM XPOST",9,0 ) | |
2231 | BACKOUT ; | |
2232 | "RTN","DVM XPOST",10, 0) | |
2233 | N FN,FNA, IEN97,N,NA ,X | |
2234 | "RTN","DVM XPOST",11, 0) | |
2235 | S IEN97=$ O(^XPD(9.7 ,"B","DVBA *2.7*202", ""),-1),TE MP="Tempor ary backup file:" | |
2236 | "RTN","DVM XPOST",12, 0) | |
2237 | I 'IEN97 W !,"DVBA* 2.7*202 In stall not found" Q | |
2238 | "RTN","DVM XPOST",13, 0) | |
2239 | S N=0,NA= "" F S N= $O(^XPD(9. 7,IEN97,"M ES",N)) Q: N="" S X= ^XPD(9.7,I EN97,"MES" ,N,0) D | |
2240 | "RTN","DVM XPOST",14, 0) | |
2241 | .I $E(X,1 ,$L(TEMP)) =TEMP S NA =$P(X,":", 2) | |
2242 | "RTN","DVM XPOST",15, 0) | |
2243 | I NA="" W !,"Backup file name not found in instal lation fil e" Q | |
2244 | "RTN","DVM XPOST",16, 0) | |
2245 | W !,"Back up file "_ TEMP_" fou nd; restor e commenci ng..." | |
2246 | "RTN","DVM XPOST",17, 0) | |
2247 | S FN=396. 4 S FNA="F ile "_FN W !,"Restor ing data d ictionary for file # "_FN_"..." D | |
2248 | "RTN","DVM XPOST",18, 0) | |
2249 | .I '$D(@N A@(FNA)) W !,"File # "_FN_" not found in backup fil e" Q | |
2250 | "RTN","DVM XPOST",19, 0) | |
2251 | .K ^DD(FN ) M ^DD(FN )=@NA@(FNA ) | |
2252 | "RTN","DVM XPOST",20, 0) | |
2253 | I '$D(@NA @("DD-IX") ) W !,"Ind ex for new -style cro ss-referen ces not fo und in bac kup file" | |
2254 | "RTN","DVM XPOST",21, 0) | |
2255 | E K ^DD( "IX") M ^D D("IX")=@N A@("DD-IX" ) | |
2256 | "RTN","DVM XPOST",22, 0) | |
2257 | W !,"DVBA *2.7*202 B ack out fi nished!" | |
2258 | "RTN","DVM XPOST",23, 0) | |
2259 | Q | |
2260 | "RTN","DVM XPOST",24, 0) | |
2261 | ; | |
2262 | "RTN","DVM XPRE") | |
2263 | 0^3^B18104 22 | |
2264 | "RTN","DVM XPRE",1,0) | |
2265 | DVMXPRE ; MASS/MKN - Pre-insta ll routine ;12/13/201 7 | |
2266 | "RTN","DVM XPRE",2,0) | |
2267 | ;;2.7;AMI E;**202**; December 1 3,2017;Bui ld 28 | |
2268 | "RTN","DVM XPRE",3,0) | |
2269 | ;VA DIREC TIVE 6402, this rout ine should not be mo dified. | |
2270 | "RTN","DVM XPRE",4,0) | |
2271 | ; | |
2272 | "RTN","DVM XPRE",5,0) | |
2273 | ; ICR# Supported Reference s | |
2274 | "RTN","DVM XPRE",6,0) | |
2275 | ; 10103 $FMADD^XL FDT | |
2276 | "RTN","DVM XPRE",7,0) | |
2277 | ; | |
2278 | "RTN","DVM XPRE",8,0) | |
2279 | EN ;Make a copy of d ata dictio naries for the files in patch DVBA*2.7*2 02 | |
2280 | "RTN","DVM XPRE",9,0) | |
2281 | ; | |
2282 | "RTN","DVM XPRE",10,0 ) | |
2283 | N FN,NA | |
2284 | "RTN","DVM XPRE",11,0 ) | |
2285 | D MES^XPD UTL("Pre I nstall rou tine start ing. Savin g data dic tionaries. ..") | |
2286 | "RTN","DVM XPRE",12,0 ) | |
2287 | S NA=$NA( ^XTMP("DVB A_2_7_202" _$J)) K @N A S @NA@(0 )=$$FMADD^ XLFDT(DT,6 0)_U_DT | |
2288 | "RTN","DVM XPRE",13,0 ) | |
2289 | D MES^XPD UTL("This is the tem porary fil e that wou ld be used for a ""b ack out"": ") | |
2290 | "RTN","DVM XPRE",14,0 ) | |
2291 | D MES^XPD UTL("Tempo rary backu p file:"_N A) | |
2292 | "RTN","DVM XPRE",15,0 ) | |
2293 | S FN=396. 4 D MES^XP DUTL("Savi ng DD for file "_FN) M @NA@("F ile "_FN)= ^DD(FN) | |
2294 | "RTN","DVM XPRE",16,0 ) | |
2295 | D MES^XPD UTL("Savin g new-styl e cross-re ference fi le ^DD(""I X""") | |
2296 | "RTN","DVM XPRE",17,0 ) | |
2297 | M @NA@("D D-IX")=^DD ("IX") | |
2298 | "RTN","DVM XPRE",18,0 ) | |
2299 | ; | |
2300 | "RTN","DVM XPRE",19,0 ) | |
2301 | D MES^XPD UTL("Pre I nstall rou tine ended ") | |
2302 | "RTN","DVM XPRE",20,0 ) | |
2303 | Q | |
2304 | "RTN","DVM XPRE",21,0 ) | |
2305 | ; | |
2306 | "VER") | |
2307 | 8.0^22.2 | |
2308 | "^DD",396. 4,396.4,.0 2,0) | |
2309 | 2507 REQUE ST^RP396.3 'I^DVB(396 .3,^0;2^Q | |
2310 | "^DD",396. 4,396.4,.0 2,1,0) | |
2311 | ^.1^^-1 | |
2312 | "^DD",396. 4,396.4,.0 2,1,1,0) | |
2313 | 396.4^C | |
2314 | "^DD",396. 4,396.4,.0 2,1,1,1) | |
2315 | S ^DVB(396 .4,"C",$E( X,1,30),DA )="" | |
2316 | "^DD",396. 4,396.4,.0 2,1,1,2) | |
2317 | K ^DVB(396 .4,"C",$E( X,1,30),DA ) | |
2318 | "^DD",396. 4,396.4,.0 2,1,1,"%D" ,0) | |
2319 | ^.101^1^1^ 3170908^^ | |
2320 | "^DD",396. 4,396.4,.0 2,1,1,"%D" ,1,0) | |
2321 | This is a standard F M cross re ference fo r this fie ld. | |
2322 | "^DD",396. 4,396.4,.0 2,1,1,"DT" ) | |
2323 | 2930218 | |
2324 | "^DD",396. 4,396.4,.0 2,1,2,0) | |
2325 | 396.4^APS^ MUMPS | |
2326 | "^DD",396. 4,396.4,.0 2,1,2,1) | |
2327 | N A S A=^D VB(396.4,D A,0) I $P( A,U,3)]"", $P(A,U,4)] "" S ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$E(X ,1,30),0), U,1),$P(A, U,3),$P(A, U,4),DA)=" " | |
2328 | "^DD",396. 4,396.4,.0 2,1,2,2) | |
2329 | N A S A=^D VB(396.4,D A,0) I $P( A,U,3)]"", $P(A,U,4)] "" K ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$E(X ,1,30),0), U,1),$P(A, U,3),$P(A, U,4),DA) | |
2330 | "^DD",396. 4,396.4,.0 2,1,2,"%D" ,0) | |
2331 | ^^3^3^2930 510^^ | |
2332 | "^DD",396. 4,396.4,.0 2,1,2,"%D" ,1,0) | |
2333 | This cross reference contains the patien t's intern al file nu mber, the exam | |
2334 | "^DD",396. 4,396.4,.0 2,1,2,"%D" ,2,0) | |
2335 | IFN and th e exam sta tus. It i s set on t wo other f ields .03 and .04. | |
2336 | "^DD",396. 4,396.4,.0 2,1,2,"%D" ,3,0) | |
2337 | Recross re ferencing any one of these fie lds will b e acceptab le. | |
2338 | "^DD",396. 4,396.4,.0 2,1,2,"DT" ) | |
2339 | 2930422 | |
2340 | "^DD",396. 4,396.4,.0 2,1,3,0) | |
2341 | 396.4^APE^ MUMPS | |
2342 | "^DD",396. 4,396.4,.0 2,1,3,1) | |
2343 | N A,B S A= ^DVB(396.3 ,$E(X,1,30 ),0) I $P( A,U,1)]"", $P(A,U,2)] "" S B=^DV B(396.4,DA ,0) I $P(B ,U,3)]"" S ^DVB(396. 4,"APE",$P (A,U,1),$P (^DVB(396. 6,$P(B,U,3 ),0),U,1), $P(A,U,2), DA)="" | |
2344 | "^DD",396. 4,396.4,.0 2,1,3,2) | |
2345 | N A,B S A= ^DVB(396.3 ,$E(X,1,30 ),0) I $P( A,U,1)]"", $P(A,U,2)] "" S B=^DV B(396.4,DA ,0) I $P(B ,U,3)]"" K ^DVB(396. 4,"APE",$P (A,U,1),$P (^DVB(396. 6,$P(B,U,3 ),0),U,1), $P(A,U,2), DA) | |
2346 | "^DD",396. 4,396.4,.0 2,1,3,"%D" ,0) | |
2347 | ^^3^3^2930 510^ | |
2348 | "^DD",396. 4,396.4,.0 2,1,3,"%D" ,1,0) | |
2349 | This cross reference contains the patien t's IFN, t he exam na me, and th e | |
2350 | "^DD",396. 4,396.4,.0 2,1,3,"%D" ,2,0) | |
2351 | request da te. It is set on on e other fi eld .03. Recross re ferencing either | |
2352 | "^DD",396. 4,396.4,.0 2,1,3,"%D" ,3,0) | |
2353 | one of the se fields would be a cceptable. | |
2354 | "^DD",396. 4,396.4,.0 2,1,3,"DT" ) | |
2355 | 2930422 | |
2356 | "^DD",396. 4,396.4,.0 2,1,4,0) | |
2357 | 396.4^AF^M UMPS | |
2358 | "^DD",396. 4,396.4,.0 2,1,4,1) | |
2359 | N A S A=$P (^DVB(396. 4,DA,0),U, 3) I A]"" S ^DVB(396 .4,"ARQ"_X ,A,DA)="" | |
2360 | "^DD",396. 4,396.4,.0 2,1,4,2) | |
2361 | N A S A=$P (^DVB(396. 4,DA,0),U, 3) I A]"" K ^DVB(396 .4,"ARQ"_X ,A,DA) | |
2362 | "^DD",396. 4,396.4,.0 2,1,4,"%D" ,0) | |
2363 | ^.101^2^2^ 3171108^^^ ^ | |
2364 | "^DD",396. 4,396.4,.0 2,1,4,"%D" ,1,0) | |
2365 | This cross reference is used t o quickly find the c orrect exa ms that ar e | |
2366 | "^DD",396. 4,396.4,.0 2,1,4,"%D" ,2,0) | |
2367 | related to a specifi c request. | |
2368 | "^DD",396. 4,396.4,.0 2,1,4,"DT" ) | |
2369 | 2930902 | |
2370 | "^DD",396. 4,396.4,.0 2,3) | |
2371 | Enter the request th at this ex am belongs to. You will selec t the vete ran then w hich reque st. | |
2372 | "^DD",396. 4,396.4,.0 2,21,0) | |
2373 | ^^2^2^2940 721^^ | |
2374 | "^DD",396. 4,396.4,.0 2,21,1,0) | |
2375 | This field connects the given record wit h the 2507 request r ecord that | |
2376 | "^DD",396. 4,396.4,.0 2,21,2,0) | |
2377 | the exam i s on. | |
2378 | "^DD",396. 4,396.4,.0 2,23,0) | |
2379 | ^^1^1^2940 721^^ | |
2380 | "^DD",396. 4,396.4,.0 2,23,1,0) | |
2381 | A pointer to the 250 7 Request file (396. 3). | |
2382 | "^DD",396. 4,396.4,.0 2,"DT") | |
2383 | 3171003 | |
2384 | "^DD",396. 4,396.4,.0 3,0) | |
2385 | EXAM TYPE^ RP396.6'I^ DVB(396.6, ^0;3^Q | |
2386 | "^DD",396. 4,396.4,.0 3,1,0) | |
2387 | ^.1 | |
2388 | "^DD",396. 4,396.4,.0 3,1,1,0) | |
2389 | 396.4^ARQ^ MUMPS | |
2390 | "^DD",396. 4,396.4,.0 3,1,1,1) | |
2391 | N A S A=$P (^DVB(396. 4,DA,0),U, 2) I A]"" S ^DVB(396 .4,"ARQ"_A ,$E(X,1,30 ),DA)="" | |
2392 | "^DD",396. 4,396.4,.0 3,1,1,2) | |
2393 | N A S A=$P (^DVB(396. 4,DA,0),U, 2) I A]"" K ^DVB(396 .4,"ARQ"_A ,$E(X,1,30 ),DA) | |
2394 | "^DD",396. 4,396.4,.0 3,1,1,"%D" ,0) | |
2395 | ^^1^1^2930 902^ | |
2396 | "^DD",396. 4,396.4,.0 3,1,1,"%D" ,1,0) | |
2397 | This cross reference is to aid in the lo ok up on t he 2507 ex am file 39 6.4 | |
2398 | "^DD",396. 4,396.4,.0 3,1,1,"DT" ) | |
2399 | 2930902 | |
2400 | "^DD",396. 4,396.4,.0 3,1,2,0) | |
2401 | 396.4^AC^M UMPS | |
2402 | "^DD",396. 4,396.4,.0 3,1,2,1) | |
2403 | N A S A=^D VB(396.4,D A,0) I $P( A,U,2)]"", $P(A,U,4)] "" S ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$P(A ,U,2),0),U ,1),$E(X,1 ,30),$P(A, U,4),DA)=" " | |
2404 | "^DD",396. 4,396.4,.0 3,1,2,2) | |
2405 | N A S A=^D VB(396.4,D A,0) I $P( A,U,2)]"", $P(A,U,4)] "" K ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$P(A ,U,2),0),U ,1),$E(X,1 ,30),$P(A, U,4),DA) | |
2406 | "^DD",396. 4,396.4,.0 3,1,2,"%D" ,0) | |
2407 | ^^3^3^2930 510^^^^ | |
2408 | "^DD",396. 4,396.4,.0 3,1,2,"%D" ,1,0) | |
2409 | This cross reference contains the patien t's intern al file nu mber, the exam | |
2410 | "^DD",396. 4,396.4,.0 3,1,2,"%D" ,2,0) | |
2411 | IFN and th e exam sta tus. It i s set on t wo other f ields .02 and .04. | |
2412 | "^DD",396. 4,396.4,.0 3,1,2,"%D" ,3,0) | |
2413 | Recross re ferencing any one of these fie lds will b e acceptab le. | |
2414 | "^DD",396. 4,396.4,.0 3,1,2,"DT" ) | |
2415 | 2930422 | |
2416 | "^DD",396. 4,396.4,.0 3,1,3,0) | |
2417 | 396.4^AE^M UMPS | |
2418 | "^DD",396. 4,396.4,.0 3,1,3,1) | |
2419 | N A S A=$P (^DVB(396. 4,DA,0),U, 2) I A]"" S A=^DVB(3 96.3,A,0) I $P(A,U,1 )]"",$P(A, U,2)]"" S ^DVB(396.4 ,"APE",$P( A,U,1),$P( ^DVB(396.6 ,$E(X,1,30 ),0),U,1), $P(A,U,2), DA)="" | |
2420 | "^DD",396. 4,396.4,.0 3,1,3,2) | |
2421 | N A S A=$P (^DVB(396. 4,DA,0),U, 2) I A]"" S A=^DVB(3 96.3,A,0) I $P(A,U,1 )]"",$P(A, U,2)]"" K ^DVB(396.4 ,"APE",$P( A,U,1),$P( ^DVB(396.6 ,$E(X,1,30 ),0),U,1), $P(A,U,2), DA) | |
2422 | "^DD",396. 4,396.4,.0 3,1,3,"%D" ,0) | |
2423 | ^^3^3^2930 510^ | |
2424 | "^DD",396. 4,396.4,.0 3,1,3,"%D" ,1,0) | |
2425 | This cross reference contains the patien t's IFN, t he exam na me, and th e | |
2426 | "^DD",396. 4,396.4,.0 3,1,3,"%D" ,2,0) | |
2427 | request da te. It is set on on e other fi eld .03. Recross re ferencing either | |
2428 | "^DD",396. 4,396.4,.0 3,1,3,"%D" ,3,0) | |
2429 | one of the se fields would be a cceptable. | |
2430 | "^DD",396. 4,396.4,.0 3,1,3,"DT" ) | |
2431 | 2930422 | |
2432 | "^DD",396. 4,396.4,.0 3,1,4,0) | |
2433 | 396.4^F | |
2434 | "^DD",396. 4,396.4,.0 3,1,4,1) | |
2435 | S ^DVB(396 .4,"F",$E( X,1,30),DA )="" | |
2436 | "^DD",396. 4,396.4,.0 3,1,4,2) | |
2437 | K ^DVB(396 .4,"F",$E( X,1,30),DA ) | |
2438 | "^DD",396. 4,396.4,.0 3,1,4,"DT" ) | |
2439 | 2930218 | |
2440 | "^DD",396. 4,396.4,.0 3,1,5,0) | |
2441 | 396.4^AIT2 ^MUMPS | |
2442 | "^DD",396. 4,396.4,.0 3,1,5,1) | |
2443 | S:+$P(^DVB (396.4,DA, 0),U,11)>0 ^DVB(396. 4,"AIT",$P (^(0),U,11 ),$E(X,1,3 0),DA)="" | |
2444 | "^DD",396. 4,396.4,.0 3,1,5,2) | |
2445 | I +$P(^DVB (396.4,DA, 0),U,11)>0 K ^DVB(39 6.4,"AIT", $P(^(0),U, 11),$E(X,1 ,30),DA) | |
2446 | "^DD",396. 4,396.4,.0 3,1,5,"%D" ,0) | |
2447 | ^.101^2^2^ 3171108^^^ ^ | |
2448 | "^DD",396. 4,396.4,.0 3,1,5,"%D" ,1,0) | |
2449 | This cross reference is on the Insuffici ent Reason and Exam Type field s. | |
2450 | "^DD",396. 4,396.4,.0 3,1,5,"%D" ,2,0) | |
2451 | It is used by the th e Detailed Insuffici ent Exam R eport. | |
2452 | "^DD",396. 4,396.4,.0 3,1,5,"DT" ) | |
2453 | 2941116 | |
2454 | "^DD",396. 4,396.4,.0 3,3) | |
2455 | Enter the name of th e exam for this requ est. | |
2456 | "^DD",396. 4,396.4,.0 3,4) | |
2457 | ||
2458 | "^DD",396. 4,396.4,.0 3,21,0) | |
2459 | ^^1^1^2940 722^^ | |
2460 | "^DD",396. 4,396.4,.0 3,21,1,0) | |
2461 | Contains t he name of the exam. | |
2462 | "^DD",396. 4,396.4,.0 3,23,0) | |
2463 | ^^1^1^2940 722^^ | |
2464 | "^DD",396. 4,396.4,.0 3,23,1,0) | |
2465 | This field is a poin ter to the 2507 Exam File (396 .6). | |
2466 | "^DD",396. 4,396.4,.0 3,"DT") | |
2467 | 3171003 | |
2468 | "^DD",396. 4,396.4,.0 4,0) | |
2469 | STATUS^S^O :OPEN;C:CO MPLETED;X: CANCELED B Y MAS;RX:C ANCELED BY RO;T:TRAN SFERRED OU T;^0;4^Q | |
2470 | "^DD",396. 4,396.4,.0 4,1,0) | |
2471 | ^.1^^-1 | |
2472 | "^DD",396. 4,396.4,.0 4,1,1,0) | |
2473 | 396.4^AD^M UMPS | |
2474 | "^DD",396. 4,396.4,.0 4,1,1,1) | |
2475 | N A S A=^D VB(396.4,D A,0) I $P( A,U,2)]"", $P(A,U,3)] "" S ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$P(A ,U,2),0),U ,1),$P(A,U ,3),$E(X,1 ,30),DA)=" " | |
2476 | "^DD",396. 4,396.4,.0 4,1,1,2) | |
2477 | N A S A=^D VB(396.4,D A,0) I $P( A,U,2)]"", $P(A,U,3)] "" K ^DVB( 396.4,"APS ",$P(^DVB( 396.3,$P(A ,U,2),0),U ,1),$P(A,U ,3),$E(X,1 ,30),DA) | |
2478 | "^DD",396. 4,396.4,.0 4,1,1,"%D" ,0) | |
2479 | ^.101^3^3^ 3171108^^^ ^ | |
2480 | "^DD",396. 4,396.4,.0 4,1,1,"%D" ,1,0) | |
2481 | This cross reference contains the patien t's intern al file nu mber, the exam | |
2482 | "^DD",396. 4,396.4,.0 4,1,1,"%D" ,2,0) | |
2483 | IFN and th e exam sta tus. It i s set on t wo other f ields .02 and .03. | |
2484 | "^DD",396. 4,396.4,.0 4,1,1,"%D" ,3,0) | |
2485 | Recross re ferencing any one of these fie lds will b e acceptab le. | |
2486 | "^DD",396. 4,396.4,.0 4,1,1,"DT" ) | |
2487 | 2930422 | |
2488 | "^DD",396. 4,396.4,.0 4,3) | |
2489 | This is th e status o f the exam in AMIE. | |
2490 | "^DD",396. 4,396.4,.0 4,21,0) | |
2491 | ^.001^2^2^ 3040910^^ | |
2492 | "^DD",396. 4,396.4,.0 4,21,1,0) | |
2493 | The value of the sta tus of the exam reco rd. (Open , Closed, Transferre d or | |
2494 | "^DD",396. 4,396.4,.0 4,21,2,0) | |
2495 | Cancelled) | |
2496 | "^DD",396. 4,396.4,.0 4,21,3,0) | |
2497 | ||
2498 | "^DD",396. 4,396.4,.0 4,21,4,0) | |
2499 | This field is used a s part of the implem entation o f a Nation ally Contr olled | |
2500 | "^DD",396. 4,396.4,.0 4,21,5,0) | |
2501 | Procedure (AMIS 290) . Per VHA Directive 10-93-142 , the info rmation | |
2502 | "^DD",396. 4,396.4,.0 4,21,6,0) | |
2503 | contained in this fi eld is not to be cha nged as th e results of local ( site) | |
2504 | "^DD",396. 4,396.4,.0 4,21,7,0) | |
2505 | modificati ons. | |
2506 | "^DD",396. 4,396.4,.0 4,23,0) | |
2507 | ^.001^2^2^ 3040910^^ | |
2508 | "^DD",396. 4,396.4,.0 4,23,1,0) | |
2509 | This field is a set of codes. It contro ls what AM IE functio ns can be | |
2510 | "^DD",396. 4,396.4,.0 4,23,2,0) | |
2511 | performed on the exa m record. | |
2512 | "^DD",396. 4,396.4,.0 4,"DT") | |
2513 | 3171003 | |
2514 | $END KID D VBA*2.7*20 2 |
Araxis Merge (but not the data content of this report) is Copyright © 1993-2016 Araxis Ltd (www.araxis.com). All rights reserved.