VPRP5I ;SLC/MKB -- VPR patch 5 post install ;8/14/13 11:22
;;1.0;VIRTUAL PATIENT RECORD;**5**;Sep 01, 2011;Build 21
;
; External References DBIA#
; ------------------- -----
; XPAR 2263
;
PRE ; -- pre init
Q
;
POST ; -- post init
D PUT^XPAR("PKG","VPR VERSION",1,"1.05")
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HVPRP5I 340 printed Nov 22, 2024@17:55:31 Page 2
VPRP5I ;SLC/MKB -- VPR patch 5 post install ;8/14/13 11:22
+1 ;;1.0;VIRTUAL PATIENT RECORD;**5**;Sep 01, 2011;Build 21
+2 ;
+3 ; External References DBIA#
+4 ; ------------------- -----
+5 ; XPAR 2263
+6 ;
PRE ; -- pre init
+1 QUIT
+2 ;
POST ; -- post init
+1 DO PUT^XPAR("PKG","VPR VERSION",1,"1.05")
+2 QUIT