MDPOST64.m

MDPOST64 ;HPSC/MWA - POST INSTALLATION TASKS ;Sept 20, 2018

 ;;1.0;CLINICAL PROCEDURES;**64**;Sept 20, 2018;Build 4

 ;;Per VA Directive 6402, this routine should not be modified.

 ;

 ; This routine uses the following IAs:

 ;  #10141       - MES^XPDUTL  Kernal  (supported)

 ;  #2263        - EN^XPAR     Kernal  (supported)

 ;

 Q

EN ; Update version number

 ; Update MD PARAMETERS with new build numbers for executables.  

 D EN^XPAR("SYS","MD PARAMETERS","VERSION_CPCONSOLE","1.0.64.1")

 ;

 Q

 ;

--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---MDPOST64   512     printed  Apr 09, 2024@20:48:19                                                                                                                                                                                                     Page 2

MDPOST64  ;HPSC/MWA - POST INSTALLATION TASKS ;Sept 20, 2018

 +1       ;;1.0;CLINICAL PROCEDURES;**64**;Sept 20, 2018;Build 4

 +2       ;;Per VA Directive 6402, this routine should not be modified.

 +3       ;

 +4       ; This routine uses the following IAs:

 +5       ;  #10141       - MES^XPDUTL  Kernal  (supported)

 +6       ;  #2263        - EN^XPAR     Kernal  (supported)

 +7       ;

 +8        QUIT 

EN        ; Update version number

 +1       ; Update MD PARAMETERS with new build numbers for executables.  

 +2        DO EN^XPAR("SYS","MD PARAMETERS","VERSION_CPCONSOLE","1.0.64.1")

 +3       ;

 +4        QUIT 

 +5       ;