MAGVSOPE ;WOIFO/NST,DAC - SOP Mass Enable Utility; Jan 14, 2021@07:54:05
;;3.0;IMAGING;**271**;Mar 19, 2002;Build 10
;; Per VHA Directive 2004-038, 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. |
;; +---------------------------------------------------------------+
;;
Q
; This entry point updates the DICOM UID SPECIFIC ACTION file (#2006.539) and enables
; new SOP classes
ENABLE ; Update DICOM UID SPECIFIC ACTION file (#2006.539)
N MAGN
;
S MAGN("1.2.840.10008.1.1^Verification SOP Class^0^Echo")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1^Computed Radiography Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.1^Digital X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.1.1^Digital X-Ray Image Storage - For Processing^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.2^Digital Mammography X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.2.1^Digital Mammography X-Ray Image Storage - For Processing^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.3^Digital Intra-oral X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.1.3.1^Digital Intra-oral X-Ray Image Storage - For Processing^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.2^CT Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.2.1^Enhanced CT Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.3^Ultrasound Multi-frame Image Storage (Retired)^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.3.1^Ultrasound Multi-frame Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.4^MR Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.4.1^Enhanced MR Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.4.2^MR Spectroscopy Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.4.3^Enhanced MR Color Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.5^Nuclear Medicine Image Storage (Retired)^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.6^Ultrasound Image Storage (Retired)^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.6.1^Ultrasound Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.6.2^Enhanced US Volume Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.7^Secondary Capture Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.7.1^Multi-frame Single Bit Secondary Capture Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.7.2^Multi-frame Grayscale Byte Secondary Capture Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.7.3^Multi-frame Grayscale Word Secondary Capture Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.7.4^Multi-frame True Color Secondary Capture Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.8^Standalone Overlay Storage^2^New|iconovl.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9^Standalone Curve Storage^2^New|iconcurve.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.1^Waveform Storage - Trial (Retired)^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.1.1^12-lead ECG Waveform Storage^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.1.2^General ECG Waveform Storage^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.1.3^Ambulatory ECG Waveform Storage^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.2.1^Hemodynamic Waveform Storage^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.3.1^Cardiac Electrophysiology Waveform Storage^2^New|absekg.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.4.1^Basic Voice Audio Waveform Storage^2^New|magwav.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.4.2^General Audio Waveform Storage^2^New|magwav.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.5.1^Arterial Pulse Waveform Storage^2^New|magwav.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.9.6.1^Respiratory Waveform Storage^2^New|magwav.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.10^Standalone Modality LUT Storage^2^New|iconlut.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11^Standalone VOI LUT Storage^2^New|iconlut.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11.1^Grayscale Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11.2^Color Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11.3^Pseudo-Color Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11.4^Blending Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.11.5^XA/XRF Grayscale Softcopy Presentation State Storage^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.12.1^X-Ray Angiographic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.12.1.1^Enhanced XA Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.12.2^X-Ray Radiofluoroscopic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.12.2.1^Enhanced XRF Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.12.3^X-Ray Angiographic Bi-Plane Image Storage (Retired)^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.13.1.1^X-Ray 3D Angiographic Image Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.13.1.2^X-Ray 3D Craniofacial Image Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.13.1.3^Breast Tomosynthesis Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.20^Nuclear Medicine Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66^Raw Data Storage^2^New|iconraw.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66.1^Spatial Registration Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66.2^Spatial Fiducials Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66.3^Deformable Spatial Registration Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66.4^Segmentation Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.66.5^Surface Segmentation Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.67^Real World Value Mapping Storage^2^New|icon3d.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1^VL Image Storage - Trial (Retired)^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.2^VL Multi-frame Image Storage - Trial (Retired)^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.1^VL Endoscopic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.1.1^Video Endoscopic Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.2^VL Microscopic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.2.1^Video Microscopic Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.3^VL Slide-Coordinates Microscopic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.4^VL Photographic Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.4.1^Video Photographic Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.1^Ophthalmic Photography 8 Bit Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.2^Ophthalmic Photography 16 Bit Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.3^Stereometric Relationship Storage^2^New|iconeyes.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.4^Ophthalmic Tomography Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.1^Lensometry Measurements Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.2^Autorefraction Measurements Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.3^Keratometry Measurements Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.4^Subjective Refraction Measurements Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.5^Visual Acuity Measurements^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.78.6^Spectacle Prescription Reports Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.79.1^Macular Grid Thickness and Volume Report Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.1^Text SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.2^Audio SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.3^Detail SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.4^Comprehensive SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.11^Basic Text SR Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.22^Enhanced SR Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.33^Comprehensive SR Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.40^Procedure Log Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.50^Mammography CAD SR^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.59^Key Object Selection Document^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.65^Chest CAD SR^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.67^X-Ray Radiation Dose SR Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.88.69^Colon CAD SR Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.104.1^Encapsulated PDF Storage^1^Known|magpdf.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.104.2^Encapsulated CDA Storage^2^New|iconcda.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.128^Positron Emission Tomography Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.129^Standalone PET Curve Storage^1^Known|iconcurve.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.130^Enhanced PET Image Storage^2^New|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.131^Basic Structured Display Storage^2^New|iconsr.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.1^RT Image Storage^1^Known|createIcon")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.2^RT Dose Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.3^RT Structure Set Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.4^RT Beams Treatment Record Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.5^RT Plan Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.6^RT Brachy Treatment Record Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.7^RT Treatment Summary Record Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.8^RT Ion Plan Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.481.9^RT Ion Beams Treatment Record Storage^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.34.1^RT Beams Delivery Instruction Storage (Supplement 74 Frozen Draft)^2^New|iconrt.JPG")=""
S MAGN("1.2.840.10008.5.1.4.38.1^Hanging Protocol Storage^2^New|iconpstate.JPG")=""
S MAGN("1.2.840.10008.5.1.4.1.1.77.1.6^VL Whole Slide Microscopic Image Storage^2^New|createIcon")=""
D ENABLE^MAGVSPE2(.MAGN) ; P271 Enable New SOP Classes
Q
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HMAGVSOPE 12079 printed Oct 16, 2024@18:11:08 Page 2
MAGVSOPE ;WOIFO/NST,DAC - SOP Mass Enable Utility; Jan 14, 2021@07:54:05
+1 ;;3.0;IMAGING;**271**;Mar 19, 2002;Build 10
+2 ;; Per VHA Directive 2004-038, 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 QUIT
+18 ; This entry point updates the DICOM UID SPECIFIC ACTION file (#2006.539) and enables
+19 ; new SOP classes
ENABLE ; Update DICOM UID SPECIFIC ACTION file (#2006.539)
+1 NEW MAGN
+2 ;
+3 SET MAGN("1.2.840.10008.1.1^Verification SOP Class^0^Echo")=""
+4 SET MAGN("1.2.840.10008.5.1.4.1.1.1^Computed Radiography Image Storage^1^Known|createIcon")=""
+5 SET MAGN("1.2.840.10008.5.1.4.1.1.1.1^Digital X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
+6 SET MAGN("1.2.840.10008.5.1.4.1.1.1.1.1^Digital X-Ray Image Storage - For Processing^1^Known|createIcon")=""
+7 SET MAGN("1.2.840.10008.5.1.4.1.1.1.2^Digital Mammography X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
+8 SET MAGN("1.2.840.10008.5.1.4.1.1.1.2.1^Digital Mammography X-Ray Image Storage - For Processing^1^Known|createIcon")=""
+9 SET MAGN("1.2.840.10008.5.1.4.1.1.1.3^Digital Intra-oral X-Ray Image Storage - For Presentation^1^Known|createIcon")=""
+10 SET MAGN("1.2.840.10008.5.1.4.1.1.1.3.1^Digital Intra-oral X-Ray Image Storage - For Processing^1^Known|createIcon")=""
+11 SET MAGN("1.2.840.10008.5.1.4.1.1.2^CT Image Storage^1^Known|createIcon")=""
+12 SET MAGN("1.2.840.10008.5.1.4.1.1.2.1^Enhanced CT Image Storage^2^New|createIcon")=""
+13 SET MAGN("1.2.840.10008.5.1.4.1.1.3^Ultrasound Multi-frame Image Storage (Retired)^1^Known|createIcon")=""
+14 SET MAGN("1.2.840.10008.5.1.4.1.1.3.1^Ultrasound Multi-frame Image Storage^1^Known|createIcon")=""
+15 SET MAGN("1.2.840.10008.5.1.4.1.1.4^MR Image Storage^1^Known|createIcon")=""
+16 SET MAGN("1.2.840.10008.5.1.4.1.1.4.1^Enhanced MR Image Storage^2^New|createIcon")=""
+17 SET MAGN("1.2.840.10008.5.1.4.1.1.4.2^MR Spectroscopy Storage^2^New|createIcon")=""
+18 SET MAGN("1.2.840.10008.5.1.4.1.1.4.3^Enhanced MR Color Image Storage^2^New|createIcon")=""
+19 SET MAGN("1.2.840.10008.5.1.4.1.1.5^Nuclear Medicine Image Storage (Retired)^1^Known|createIcon")=""
+20 SET MAGN("1.2.840.10008.5.1.4.1.1.6^Ultrasound Image Storage (Retired)^1^Known|createIcon")=""
+21 SET MAGN("1.2.840.10008.5.1.4.1.1.6.1^Ultrasound Image Storage^1^Known|createIcon")=""
+22 SET MAGN("1.2.840.10008.5.1.4.1.1.6.2^Enhanced US Volume Storage^2^New|icon3d.JPG")=""
+23 SET MAGN("1.2.840.10008.5.1.4.1.1.7^Secondary Capture Image Storage^1^Known|createIcon")=""
+24 SET MAGN("1.2.840.10008.5.1.4.1.1.7.1^Multi-frame Single Bit Secondary Capture Image Storage^2^New|createIcon")=""
+25 SET MAGN("1.2.840.10008.5.1.4.1.1.7.2^Multi-frame Grayscale Byte Secondary Capture Image Storage^1^Known|createIcon")=""
+26 SET MAGN("1.2.840.10008.5.1.4.1.1.7.3^Multi-frame Grayscale Word Secondary Capture Image Storage^1^Known|createIcon")=""
+27 SET MAGN("1.2.840.10008.5.1.4.1.1.7.4^Multi-frame True Color Secondary Capture Image Storage^1^Known|createIcon")=""
+28 SET MAGN("1.2.840.10008.5.1.4.1.1.8^Standalone Overlay Storage^2^New|iconovl.JPG")=""
+29 SET MAGN("1.2.840.10008.5.1.4.1.1.9^Standalone Curve Storage^2^New|iconcurve.JPG")=""
+30 SET MAGN("1.2.840.10008.5.1.4.1.1.9.1^Waveform Storage - Trial (Retired)^2^New|absekg.JPG")=""
+31 SET MAGN("1.2.840.10008.5.1.4.1.1.9.1.1^12-lead ECG Waveform Storage^2^New|absekg.JPG")=""
+32 SET MAGN("1.2.840.10008.5.1.4.1.1.9.1.2^General ECG Waveform Storage^2^New|absekg.JPG")=""
+33 SET MAGN("1.2.840.10008.5.1.4.1.1.9.1.3^Ambulatory ECG Waveform Storage^2^New|absekg.JPG")=""
+34 SET MAGN("1.2.840.10008.5.1.4.1.1.9.2.1^Hemodynamic Waveform Storage^2^New|absekg.JPG")=""
+35 SET MAGN("1.2.840.10008.5.1.4.1.1.9.3.1^Cardiac Electrophysiology Waveform Storage^2^New|absekg.JPG")=""
+36 SET MAGN("1.2.840.10008.5.1.4.1.1.9.4.1^Basic Voice Audio Waveform Storage^2^New|magwav.JPG")=""
+37 SET MAGN("1.2.840.10008.5.1.4.1.1.9.4.2^General Audio Waveform Storage^2^New|magwav.JPG")=""
+38 SET MAGN("1.2.840.10008.5.1.4.1.1.9.5.1^Arterial Pulse Waveform Storage^2^New|magwav.JPG")=""
+39 SET MAGN("1.2.840.10008.5.1.4.1.1.9.6.1^Respiratory Waveform Storage^2^New|magwav.JPG")=""
+40 SET MAGN("1.2.840.10008.5.1.4.1.1.10^Standalone Modality LUT Storage^2^New|iconlut.JPG")=""
+41 SET MAGN("1.2.840.10008.5.1.4.1.1.11^Standalone VOI LUT Storage^2^New|iconlut.JPG")=""
+42 SET MAGN("1.2.840.10008.5.1.4.1.1.11.1^Grayscale Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
+43 SET MAGN("1.2.840.10008.5.1.4.1.1.11.2^Color Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
+44 SET MAGN("1.2.840.10008.5.1.4.1.1.11.3^Pseudo-Color Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
+45 SET MAGN("1.2.840.10008.5.1.4.1.1.11.4^Blending Softcopy Presentation State Storage SOP Class^2^New|iconpstate.JPG")=""
+46 SET MAGN("1.2.840.10008.5.1.4.1.1.11.5^XA/XRF Grayscale Softcopy Presentation State Storage^2^New|iconpstate.JPG")=""
+47 SET MAGN("1.2.840.10008.5.1.4.1.1.12.1^X-Ray Angiographic Image Storage^1^Known|createIcon")=""
+48 SET MAGN("1.2.840.10008.5.1.4.1.1.12.1.1^Enhanced XA Image Storage^2^New|createIcon")=""
+49 SET MAGN("1.2.840.10008.5.1.4.1.1.12.2^X-Ray Radiofluoroscopic Image Storage^1^Known|createIcon")=""
+50 SET MAGN("1.2.840.10008.5.1.4.1.1.12.2.1^Enhanced XRF Image Storage^2^New|createIcon")=""
+51 SET MAGN("1.2.840.10008.5.1.4.1.1.12.3^X-Ray Angiographic Bi-Plane Image Storage (Retired)^2^New|createIcon")=""
+52 SET MAGN("1.2.840.10008.5.1.4.1.1.13.1.1^X-Ray 3D Angiographic Image Storage^2^New|icon3d.JPG")=""
+53 SET MAGN("1.2.840.10008.5.1.4.1.1.13.1.2^X-Ray 3D Craniofacial Image Storage^2^New|icon3d.JPG")=""
+54 SET MAGN("1.2.840.10008.5.1.4.1.1.13.1.3^Breast Tomosynthesis Image Storage^2^New|createIcon")=""
+55 SET MAGN("1.2.840.10008.5.1.4.1.1.20^Nuclear Medicine Image Storage^1^Known|createIcon")=""
+56 SET MAGN("1.2.840.10008.5.1.4.1.1.66^Raw Data Storage^2^New|iconraw.JPG")=""
+57 SET MAGN("1.2.840.10008.5.1.4.1.1.66.1^Spatial Registration Storage^2^New|icon3d.JPG")=""
+58 SET MAGN("1.2.840.10008.5.1.4.1.1.66.2^Spatial Fiducials Storage^2^New|icon3d.JPG")=""
+59 SET MAGN("1.2.840.10008.5.1.4.1.1.66.3^Deformable Spatial Registration Storage^2^New|icon3d.JPG")=""
+60 SET MAGN("1.2.840.10008.5.1.4.1.1.66.4^Segmentation Storage^2^New|icon3d.JPG")=""
+61 SET MAGN("1.2.840.10008.5.1.4.1.1.66.5^Surface Segmentation Storage^2^New|icon3d.JPG")=""
+62 SET MAGN("1.2.840.10008.5.1.4.1.1.67^Real World Value Mapping Storage^2^New|icon3d.JPG")=""
+63 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1^VL Image Storage - Trial (Retired)^1^Known|createIcon")=""
+64 SET MAGN("1.2.840.10008.5.1.4.1.1.77.2^VL Multi-frame Image Storage - Trial (Retired)^1^Known|createIcon")=""
+65 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.1^VL Endoscopic Image Storage^1^Known|createIcon")=""
+66 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.1.1^Video Endoscopic Image Storage^2^New|createIcon")=""
+67 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.2^VL Microscopic Image Storage^1^Known|createIcon")=""
+68 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.2.1^Video Microscopic Image Storage^2^New|createIcon")=""
+69 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.3^VL Slide-Coordinates Microscopic Image Storage^1^Known|createIcon")=""
+70 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.4^VL Photographic Image Storage^1^Known|createIcon")=""
+71 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.4.1^Video Photographic Image Storage^2^New|createIcon")=""
+72 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.1^Ophthalmic Photography 8 Bit Image Storage^1^Known|createIcon")=""
+73 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.2^Ophthalmic Photography 16 Bit Image Storage^1^Known|createIcon")=""
+74 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.3^Stereometric Relationship Storage^2^New|iconeyes.JPG")=""
+75 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.5.4^Ophthalmic Tomography Image Storage^2^New|createIcon")=""
+76 SET MAGN("1.2.840.10008.5.1.4.1.1.78.1^Lensometry Measurements Storage^2^New|createIcon")=""
+77 SET MAGN("1.2.840.10008.5.1.4.1.1.78.2^Autorefraction Measurements Storage^2^New|createIcon")=""
+78 SET MAGN("1.2.840.10008.5.1.4.1.1.78.3^Keratometry Measurements Storage^2^New|createIcon")=""
+79 SET MAGN("1.2.840.10008.5.1.4.1.1.78.4^Subjective Refraction Measurements Storage^2^New|createIcon")=""
+80 SET MAGN("1.2.840.10008.5.1.4.1.1.78.5^Visual Acuity Measurements^2^New|createIcon")=""
+81 SET MAGN("1.2.840.10008.5.1.4.1.1.78.6^Spectacle Prescription Reports Storage^2^New|createIcon")=""
+82 SET MAGN("1.2.840.10008.5.1.4.1.1.79.1^Macular Grid Thickness and Volume Report Storage^2^New|createIcon")=""
+83 SET MAGN("1.2.840.10008.5.1.4.1.1.88.1^Text SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
+84 SET MAGN("1.2.840.10008.5.1.4.1.1.88.2^Audio SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
+85 SET MAGN("1.2.840.10008.5.1.4.1.1.88.3^Detail SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
+86 SET MAGN("1.2.840.10008.5.1.4.1.1.88.4^Comprehensive SR Storage - Trial (Retired)^2^New|iconsr.JPG")=""
+87 SET MAGN("1.2.840.10008.5.1.4.1.1.88.11^Basic Text SR Storage^2^New|iconsr.JPG")=""
+88 SET MAGN("1.2.840.10008.5.1.4.1.1.88.22^Enhanced SR Storage^2^New|iconsr.JPG")=""
+89 SET MAGN("1.2.840.10008.5.1.4.1.1.88.33^Comprehensive SR Storage^2^New|iconsr.JPG")=""
+90 SET MAGN("1.2.840.10008.5.1.4.1.1.88.40^Procedure Log Storage^2^New|iconsr.JPG")=""
+91 SET MAGN("1.2.840.10008.5.1.4.1.1.88.50^Mammography CAD SR^2^New|iconsr.JPG")=""
+92 SET MAGN("1.2.840.10008.5.1.4.1.1.88.59^Key Object Selection Document^2^New|iconsr.JPG")=""
+93 SET MAGN("1.2.840.10008.5.1.4.1.1.88.65^Chest CAD SR^2^New|iconsr.JPG")=""
+94 SET MAGN("1.2.840.10008.5.1.4.1.1.88.67^X-Ray Radiation Dose SR Storage^2^New|iconsr.JPG")=""
+95 SET MAGN("1.2.840.10008.5.1.4.1.1.88.69^Colon CAD SR Storage^2^New|iconsr.JPG")=""
+96 SET MAGN("1.2.840.10008.5.1.4.1.1.104.1^Encapsulated PDF Storage^1^Known|magpdf.JPG")=""
+97 SET MAGN("1.2.840.10008.5.1.4.1.1.104.2^Encapsulated CDA Storage^2^New|iconcda.JPG")=""
+98 SET MAGN("1.2.840.10008.5.1.4.1.1.128^Positron Emission Tomography Image Storage^1^Known|createIcon")=""
+99 SET MAGN("1.2.840.10008.5.1.4.1.1.129^Standalone PET Curve Storage^1^Known|iconcurve.JPG")=""
+100 SET MAGN("1.2.840.10008.5.1.4.1.1.130^Enhanced PET Image Storage^2^New|createIcon")=""
+101 SET MAGN("1.2.840.10008.5.1.4.1.1.131^Basic Structured Display Storage^2^New|iconsr.JPG")=""
+102 SET MAGN("1.2.840.10008.5.1.4.1.1.481.1^RT Image Storage^1^Known|createIcon")=""
+103 SET MAGN("1.2.840.10008.5.1.4.1.1.481.2^RT Dose Storage^2^New|iconrt.JPG")=""
+104 SET MAGN("1.2.840.10008.5.1.4.1.1.481.3^RT Structure Set Storage^2^New|iconrt.JPG")=""
+105 SET MAGN("1.2.840.10008.5.1.4.1.1.481.4^RT Beams Treatment Record Storage^2^New|iconrt.JPG")=""
+106 SET MAGN("1.2.840.10008.5.1.4.1.1.481.5^RT Plan Storage^2^New|iconrt.JPG")=""
+107 SET MAGN("1.2.840.10008.5.1.4.1.1.481.6^RT Brachy Treatment Record Storage^2^New|iconrt.JPG")=""
+108 SET MAGN("1.2.840.10008.5.1.4.1.1.481.7^RT Treatment Summary Record Storage^2^New|iconrt.JPG")=""
+109 SET MAGN("1.2.840.10008.5.1.4.1.1.481.8^RT Ion Plan Storage^2^New|iconrt.JPG")=""
+110 SET MAGN("1.2.840.10008.5.1.4.1.1.481.9^RT Ion Beams Treatment Record Storage^2^New|iconrt.JPG")=""
+111 SET MAGN("1.2.840.10008.5.1.4.34.1^RT Beams Delivery Instruction Storage (Supplement 74 Frozen Draft)^2^New|iconrt.JPG")=""
+112 SET MAGN("1.2.840.10008.5.1.4.38.1^Hanging Protocol Storage^2^New|iconpstate.JPG")=""
+113 SET MAGN("1.2.840.10008.5.1.4.1.1.77.1.6^VL Whole Slide Microscopic Image Storage^2^New|createIcon")=""
+114 ; P271 Enable New SOP Classes
DO ENABLE^MAGVSPE2(.MAGN)
+115 QUIT
