Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: MAGGTU4D

MAGGTU4D.m

Go to the documentation of this file.
MAGGTU4D ;WOIFO/SG/NST/JSL/GEK/DAC/JSJ/MKN - VERSION CONTROL (CLINICAL DISPLAY); Apr 23, 2023@10:41
 ;;3.0;IMAGING;**93,94,106,117,122,131,149,138,156,161,167,181,191,188,216,234,225,256,258,316,290,315,351,334**;Mar 19, 2002;Build 51
 ;; Per VA Directive 6402, this routine should not be modified.
 ;; +---------------------------------------------------------------+
 ;; | Property of the US Government.                                |
 ;; | No permission to copy or redistribute this software is given. |
 ;; | Use of unreleased versions of this software requires the user |
 ;; | to execute a written test agreement with the VistA Imaging    |
 ;; | Development Office of the Department of Veterans Affairs,     |
 ;; | telephone (301) 734-0100.                                     |
 ;; | The Food and Drug Administration classifies this software as  |
 ;; | a medical device.  As such, it may not be changed in any way. |
 ;; | Modifications to this software may result in an adulterated   |
 ;; | medical device under 21CFR820, the use of which is considered |
 ;; | to be a violation of US Federal Statutes.                     |
 ;; +---------------------------------------------------------------+
 ;;
 ; This routine contains the version control code and data specific
 ; to the Clinical Display application. DO NOT ADD ANYTHING ELSE!
 Q
 ;
CLVERCT ;***** VERSION CONTROL TABLE FOR THE CLINICAL DISPLAY CLIENTS
 ;;==================================================================
 ;;| Version |Build|Seq # | Comment                                 |
 ;;|---------+-----+------------------------------------------------|
 ;;| 3.0.334 |   5 |  204 | Apr 2023                                |
 ;;| 3.0.351 |   1 |  203 | Jan 2023                                |
 ;;| 3.0.315 |   3 |  202 | Oct 2022                                |
 ;;| 3.0.316 |   1 |  200 | Oct 2021                                |
 ;;==================================================================
 ;
 ; Each row of the version control table contains the version and
 ; build number of a supported client. Released patches must also
 ; indicate the sequential numbers.
 ;
 ; Sort order of the rows does not matter. However, the reversed
 ; order of patch sequential numbers is recommended.
 ; NOTE:
 ;  Patch 334 removed support for patch 351
 ;  Patch 351 removed support for patch 315
 ;  Patch 315 removed support for patch 258
 ;  Patch 290 removed support for patch 256
 ;  Patch 316 removed support for patch 290 (will be released after patch 316)
 ;  Patch 258 removed support for patch 234
 ;  Patch 256 removed support for patch 216
 ;  Patch 225 removed patches prior to patch 216
 ;        - Patch 191
 ;        - Patch 181
 ;        - Patch 167
 ;        - Patch 161
 ;  Patch 234 Did not remove support for any Clients
 ;
 ;  Patch 216 removed support for   149 and 130
 ;        - Patch  3.0.149
 ;        - Patch  3.0.130
 ;
 ;  Patch 188 Did not remove support for any Clients
 ;
 ;  Patch 191 Emergency Patch did not remove support for any clients
 ;
 ;  Patch 181 removed support for
 ;        - Patch 131
 ;  Patch 167 removed support for
 ;        - Patch 122
 ;  Patch 149 removed support for
 ;        - Patch 117
 ;        - Patch 106 
 ;        - Patch  94
 Q
 ;
 ;***** ADDS A CLIENT-SPECIFIC WARNING (IF NECESSARY)
 ;
 ; .MAGBUF       Reference to a local array that the warning text
 ;               is returned to. It is appended to the RPC result
 ;               array by the caller (WARNING^MAGGTU41).
 ;
 ;               Text must be stored at nodes with positive numbers
 ;               or at the 0-node descendent from those nodes.
 ;
 ; CLVER         Client application version (Major.Minor.Patch.Build)
 ;
 ; CVRC          Version check code returned by the $$CHKVER1^MAGGTU41
 ;
 ; Notes
 ; =====
 ;
 ; If the RPC result array already contains an error message that
 ; will terminate the client, application, this procedure is not
 ; called.
 ;
WARNING(MAGBUF,CLVER,CVRC) ;
 Q