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,379**;Mar 19, 2002;Build 1
 ;; 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.379 |   1 |  205 | Apr 2025                                |
 ;;| 3.0.334 |   5 |  204 | Apr 2023                                |
 ;;| 3.0.351 |   1 |  203 | Jan 2023                                |
 ;;==================================================================
 ;
 ; 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 379 removed support for patch 379
 ;  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
 
--- Routine Detail   --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HMAGGTU4D   4069     printed  Sep 23, 2025@19:39:37                                                                                                                                                                                                    Page 2
MAGGTU4D  ;WOIFO/SG/NST/JSL/GEK/DAC/JSJ/MKN - VERSION CONTROL (CLINICAL DISPLAY); Apr 23, 2023@10:41
 +1       ;;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,379**;Mar 19, 2002;Build 1
 +2       ;; Per VA Directive 6402, this routine should not be modified.
 +3       ;; +---------------------------------------------------------------+
 +4       ;; | Property of the US Government.                                |
 +5       ;; | No permission to copy or redistribute this software is given. |
 +6       ;; | Use of unreleased versions of this software requires the user |
 +7       ;; | to execute a written test agreement with the VistA Imaging    |
 +8       ;; | Development Office of the Department of Veterans Affairs,     |
 +9       ;; | telephone (301) 734-0100.                                     |
 +10      ;; | The Food and Drug Administration classifies this software as  |
 +11      ;; | a medical device.  As such, it may not be changed in any way. |
 +12      ;; | Modifications to this software may result in an adulterated   |
 +13      ;; | medical device under 21CFR820, the use of which is considered |
 +14      ;; | to be a violation of US Federal Statutes.                     |
 +15      ;; +---------------------------------------------------------------+
 +16      ;;
 +17      ; This routine contains the version control code and data specific
 +18      ; to the Clinical Display application. DO NOT ADD ANYTHING ELSE!
 +19       QUIT 
 +20      ;
CLVERCT   ;***** VERSION CONTROL TABLE FOR THE CLINICAL DISPLAY CLIENTS
 +1       ;;==================================================================
 +2       ;;| Version |Build|Seq # | Comment                                 |
 +3       ;;|---------+-----+------------------------------------------------|
 +4       ;;| 3.0.379 |   1 |  205 | Apr 2025                                |
 +5       ;;| 3.0.334 |   5 |  204 | Apr 2023                                |
 +6       ;;| 3.0.351 |   1 |  203 | Jan 2023                                |
 +7       ;;==================================================================
 +8       ;
 +9       ; Each row of the version control table contains the version and
 +10      ; build number of a supported client. Released patches must also
 +11      ; indicate the sequential numbers.
 +12      ;
 +13      ; Sort order of the rows does not matter. However, the reversed
 +14      ; order of patch sequential numbers is recommended.
 +15      ; NOTE:
 +16      ;  Patch 379 removed support for patch 379
 +17      ;  Patch 334 removed support for patch 351
 +18      ;  Patch 351 removed support for patch 315
 +19      ;  Patch 315 removed support for patch 258
 +20      ;  Patch 290 removed support for patch 256
 +21      ;  Patch 316 removed support for patch 290 (will be released after patch 316)
 +22      ;  Patch 258 removed support for patch 234
 +23      ;  Patch 256 removed support for patch 216
 +24      ;  Patch 225 removed patches prior to patch 216
 +25      ;        - Patch 191
 +26      ;        - Patch 181
 +27      ;        - Patch 167
 +28      ;        - Patch 161
 +29      ;  Patch 234 Did not remove support for any Clients
 +30      ;
 +31      ;  Patch 216 removed support for   149 and 130
 +32      ;        - Patch  3.0.149
 +33      ;        - Patch  3.0.130
 +34      ;
 +35      ;  Patch 188 Did not remove support for any Clients
 +36      ;
 +37      ;  Patch 191 Emergency Patch did not remove support for any clients
 +38      ;
 +39      ;  Patch 181 removed support for
 +40      ;        - Patch 131
 +41      ;  Patch 167 removed support for
 +42      ;        - Patch 122
 +43      ;  Patch 149 removed support for
 +44      ;        - Patch 117
 +45      ;        - Patch 106 
 +46      ;        - Patch  94
 +47       QUIT 
 +48      ;
 +49      ;***** ADDS A CLIENT-SPECIFIC WARNING (IF NECESSARY)
 +50      ;
 +51      ; .MAGBUF       Reference to a local array that the warning text
 +52      ;               is returned to. It is appended to the RPC result
 +53      ;               array by the caller (WARNING^MAGGTU41).
 +54      ;
 +55      ;               Text must be stored at nodes with positive numbers
 +56      ;               or at the 0-node descendent from those nodes.
 +57      ;
 +58      ; CLVER         Client application version (Major.Minor.Patch.Build)
 +59      ;
 +60      ; CVRC          Version check code returned by the $$CHKVER1^MAGGTU41
 +61      ;
 +62      ; Notes
 +63      ; =====
 +64      ;
 +65      ; If the RPC result array already contains an error message that
 +66      ; will terminate the client, application, this procedure is not
 +67      ; called.
 +68      ;
WARNING(MAGBUF,CLVER,CVRC) ;
 +1        QUIT