Changeset 1806 for VWGUIRegistration/trunk/VWREGIT2.m
- Timestamp:
- May 13, 2019, 12:00:15 PM (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
VWGUIRegistration/trunk/VWREGIT2.m
r1798 r1806 1 VWREGIT2 ;Portland/WorldVista/BFP,LLC/Jim Bell, et al... - Post-Install for VWREG 2 ;;1.0;WORLD VISTA;**HOME **;;Build 2 1 VWREGIT2 ;Portland/WorldVista//Jim Bell, et al... - Post-Install for VWREG 2 ;;2.0;WORLD VISTA;**HOME **;;Build 4 3 ;***************************************************************** 4 ;* Licensed under GNU 2.0 or greater - see license.txt file * 5 ;* Program/application is for the management of input templates * 6 ;* owned by the user (DUZ). * 7 ;* REMINDER: All template fields pertain only to the Patient File* 8 ;* (#2)! * 9 ;***************************************************************** 3 10 ; 4 11 ;Continued from VWREGIT … … 16 23 PI ;Post Installation install 17 24 ;Checking for a home directory & file 18 I $O(^XMB(3.8,"B","VW REG ERROR REPORT",0)) W !?5,"Installation has already occurred" Q 25 ;I $O(^XMB(3.8,"B","VW REG ERROR REPORT",0)) W !?5,"Installation has already occurred" Q 26 D PRE 19 27 S AR=1,AR(1)="[TEMPLATES]" 20 28 S N=0 F S N=$O(^DIE(N)) Q:'+N S X=$P(^(N,0),"^") D
Note:
See TracChangeset
for help on using the changeset viewer.