From: jpr <jpr>
Date: Tue, 3 Feb 2004 14:46:27 +0000 (+0000)
Subject: update the script for full checking of gdcmData with Write Explicit VR
X-Git-Url: https://git.creatis.insa-lyon.fr/pubgit/?a=commitdiff_plain;h=c09442985e77b66ad702a09ae39022a44cdc1cf3;p=gdcmData.git

update the script for full checking of gdcmData with Write Explicit VR
---

diff --git a/checkWrite.sh b/checkWrite.sh
index 85a32cd..d0fd685 100644
--- a/checkWrite.sh
+++ b/checkWrite.sh
@@ -4,7 +4,7 @@
 # We just write XDCM Files and AFFIM them
 # to be sure the writting was OK
 #
-# Sebastien Barre's files have no interest, since the header is
+# Sebastien Barre's files have no interest here, since the header is
 # a *very clean* ACR-NEMA
 # Our pb come from DICOM V3, with SQ, shadow groups, etc.
 
@@ -13,50 +13,62 @@
 #------------
 testWrite mr176621.dcm x;
 #gdcmParser::CheckSwap: ACR/NEMA unfound swap info (time to raise bets)
-affim filein=mr176621.dcm.XDCM 
- PrintHeader mr176621.dcm.XDCM 2 #down . 
+PrintHeader mr176621.dcm.XDCM 2 #breaks Tag with uneven length 1463107 in x(8,8) . 
+v mr176621.dcm.XDCM #breaks : white image
+xmedcon mr176621.dcm.XDCM #breaks
 
 # No Transfert Syntax
 #--------------------
 #Big Endian
+
 testWrite cr172241.dcm x;
-affim filein=cr172241.dcm.XDCM  zoom=-4
+PrintHeader cr172241.dcm;  #OK
+v cr172241.dcm;   # breaks
+xmedcon cr172241.dcm;  # OK
 PrintHeader cr172241.dcm.XDCM 2 #down apres 0028|3006 [US][LUT Data (CTX dependent)]
+v cr172241.dcm.XDCM # NOT CHECKED
+xmedcon cr172241.dcm.XDCM # NOT CHECKED
 
 testWrite cr_45031.dcm x;                                   
-affim filein=cr_45031.dcm.XDCM  DIMX=1670 DIMY=2010 nbit=16 zoom=-4
- PrintHeader  cr_45031.dcm.XDCM   #OK
+v cr_45031.dcm.XDCM #OK
+xmedcon  cr_45031.dcm.XDCM   #OK
  
 testWrite CR-MONO1-10-chest.dcm x;
-affim filein=CR-MONO1-10-chest.dcm.XDCM  DIMX=440 DIMY=440 nbit=16
 PrintHeader CR-MONO1-10-chest.dcm.XDCM 2 #OK
+xmedcon CR-MONO1-10-chest.dcm.XDCM; #OK
 
 testWrite CT-MONO2-12-lomb-an2.acr2 x;
-affim filein=CT-MONO2-12-lomb-an2.acr2.XDCM DIM=512 nbit=16
+xmedcon CT-MONO2-12-lomb-an2.acr2.XDCM; #OK
 PrintHeader CT-MONO2-12-lomb-an2.acr2.XDCM 2 # OK
 
 testWrite gdcm-MR-SIEMENS-16.acr1 x;
-affim filein=gdcm-MR-SIEMENS-16.acr1.XDCM DIMX=256 DIMY=256 nbit=16
-PrintHeader gdcm-MR-SIEMENS-16.acr1.XDCM 2 #down
+PrintHeader gdcm-MR-SIEMENS-16.acr1.XDCM 2 ;
+#down0009|0000 l:x(46e55) 290389 Of:x(180)384
+v  gdcm-MR-SIEMENS-16.acr1.XDCM; #black image
+xmedcon gdcm-MR-SIEMENS-16.acr1.XDCM; #breaks
  
 testWrite gdcm-MR-SIEMENS-16.acr2 x;
-affim filein=gdcm-MR-SIEMENS-16.acr2.XDCM  DIMX=512 DIMY=512 nbit=16
-PrintHeader  gdcm-MR-SIEMENS-16.acr2.XDCM 2 # down
-
+PrintHeader  gdcm-MR-SIEMENS-16.acr2.XDCM 2;
+v gdcm-MR-SIEMENS-16.acr2.XDCM; #OK
+xmedcon gdcm-MR-SIEMENS-16.acr2.XDCM; #breaks
+ 
 testWrite MR-MONO2-12-an2.acr2 x;
-affim filein=MR-MONO2-12-an2.acr2.XDCM DIMX=256 DIMY=256 nbit=16
 PrintHeader newACR1000.nema.XDCM 2 #down
+# 0009|0000 lg :x(46e55) 290389   Off.: x(28a) 650 [Unknown] 
+xmedcon MR-MONO2-12-an2.acr2.XDCM # NOT CHECKED
 
 testWrite newACR1000.nema x;          # == gdcmMR-SIEMENS-16.acr2
-affim filein=newACR1000.nema.XDCM DIMX=512 DIMY=512 nbit=16
+PrintHeader newACR1000.nema.XDCM; #OK
+v newACR1000.nema.XDCM; #OK
+xmedcon newACR1000.nema.XDCM ; # breaks : no image found
 
 testWrite oldACR00001.ima x;          # == gdcm-MR-SIEMENS.16.acr1
-affim filein=oldACR00001.ima.XDCM DIMX=256 DIMY=256 nbit=16
- PrintHeader oldACR00001.ima.XDCM 2 # down
+PrintHeader oldACR00001.ima.XDCM # OK
+v oldACR00001.ima.XDCM; #OK
+xmedcon oldACR00001.ima.XDCM # # breaks : no image found
  
 testWrite OT-MONO2-8-a7.dcm x;
-affim filein=OT-MONO2-8-a7.dcm.XDCM  DIMX=512 DIMY=512
- PrintHeader OT-MONO2-8-a7.dcm.XDCM 2 #ok
+xmedcon OT-MONO2-8-a7.dcm.XDCM 2 #ok
  
 #No Samples Per Pixel
 #--------------------
@@ -73,36 +85,37 @@ affim filein=gdcm-ACR-LibIDO.acr.XDCM dimx=512 dimy=301
 #----------------------------------
 #MR Philips (once upon a time in Lyon-Sud)
 testWrite MR-MONO2-12-angio-an1.acr1 x;
-affim filein=MR-MONO2-12-angio-an1.acr1.XDCM dim=256 nbit=16
+v MR-MONO2-12-angio-an1.acr1.XDCM  # shitty image
+xmedcon R-MONO2-12-angio-an1.acr1.XDCM #pas mieux : warning: Incorrect PixelData length
 
 #RGB
 #---
 testWrite US.3405.1.dcm x;                    
 echo "expected  pixelType=8U SamplesPerPixel=1 PlanarConfiguration=0"
 echo "          PhotometricInterpretation=RGB"
-affim filein=US.3405.1.dcm.XDCM 
+xmedcon US.3405.1.dcm.XDCM #OK
 
 testWrite OT-PAL-8-face.dcm x;
 echo "expected  pixelType=8U SamplesPerPixel=3 PlanarConfiguration=1"
 echo "          PhotometricInterpretation=PALETTE COLOR"
-affim filein=OT-PAL-8-face.dcm.XDCM 
+xmedcon OT-PAL-8-face.dcm.XDCM; #OK
 
 testWrite 8BitsUncompressedColor.dcm x;
-affim filein=8BitsUncompressedColor.dcm.XDCM 
+xmedcon 8BitsUncompressedColor.dcm.XDCM ; #OK
 
 # Implicit VR - Little Endian
 #-----------------------------
 
 testWrite CT-MONO2-16-ankle.dcm x;
- affim filein=CT-MONO2-16-ankle.dcm.XDCM
+ xmedcon CT-MONO2-16-ankle.dcm.XDCM; #ok
  PrintHeader  CT-MONO2-16-ankle.dcm 2 #ok
 
 testWrite CT-MONO2-16-ort.dcm x;
-affim filein=CT-MONO2-16-ort.dcm.XDCM 
+xmedcon CT-MONO2-16-ort.dcm.XDCM  #OK
 PrintHeader CT-MONO2-16-ort.dcm.XDCM 2 #ok
 
 testWrite CT-MONO2-8-abdo.dcm x;
-affim filein=CT-MONO2-8-abdo.dcm.XDCM 
+xmedcon CT-MONO2-8-abdo.dcm.XDCM #OK
 
 testWrite gdcm-MR-PHILIPS-16.dcm x;
 affim filein=gdcm-MR-PHILIPS-16.dcm.XDCM 
@@ -117,17 +130,21 @@ affim filein=multiframe1Integris.dcm.XDCM dim=1024 nbit=16 offset=31457280 zoom=
  PrintHeader CT-MONO2-8-abdo.dcm.XDCM 2
  
 testWrite multiframe2GE.dcm x;
-affim filein=multiframe2GE.dcm.XDCM dim=512
-affim filein=multiframe2GE.dcm.XDCM dim=512 offset=14417920
+v multiframe2GE.dcm.XDCM 
+#breaks xmedcon
+xmedcon multiframe2GE.dcm.XDCM 
 
 testWrite irmPhlipsNew1.dcm x; # == gdcm-MR-PHILIPS-16.dcm
-affim DIMX=256 DIMY=256 filein=irmPhlipsNew1.dcm.XDCM nbit=16
+v irmPhlipsNew1.dcm.XDCM;
+xmedcon irmPhlipsNew1.dcm.XDCM #breaks
 
 #avec imagette (icone)
 
 testWrite icone.dcm x;
 PrintHeader icone.dcm.XDCM 2;
 #PrintHeader OK; v OK; breaks xmedcom  
+v icone.dcm.XDCM
+xmedcon icone.dcm.XDCM #breaks
 
 #Palette
 
@@ -138,88 +155,90 @@ PrintHeader icone.dcm.XDCM 2;
 #Explicit VR - Little Endian
 #----------------------------
 testWrite CT-MONO2-16-brain.dcm x;
-affim filein=CT-MONO2-16-brain.dcm.XDCM  DIMX=512 DIMY=512 nbit=16 signe=o
+xmedcon CT-MONO2-16-brain.dcm.XDCM #OK
 
 testWrite gdcm-MR-PHILIPS-16-Multi-Seq.dcm x;
-affim filein=gdcm-MR-PHILIPS-16-Multi-Seq.dcm.XDCM  DIMX=128 DIMY=128 nbit=16
 PrintHeader gdcm-MR-PHILIPS-16-Multi-Seq.dcm 2
-
+v gdcm-MR-PHILIPS-16-Multi-Seq.dcm.XDCM #expected : image de *chiottes*
+xmedcon gdcm-MR-PHILIPS-16-Multi-Seq.dcm.XDCM #breaks
 
 testWrite gdcm-MR-PHILIPS-16-NonRectPix.dcm x;
-affim filein=gdcm-MR-PHILIPS-16-NonRectPix.dcm.XDCM 
+v gdcm-MR-PHILIPS-16-NonRectPix.dcm.XDCM #OK
+xmedcon gdcm-MR-PHILIPS-16-NonRectPix.dcm.XDCM #OK
 
-testWrite MR-MONO2-8-16x-heart.dcm x;
-affim filein=MR-MONO2-8-16x-heart.dcm.XDCM 
+testWrite MR-MONO2-8-16x-heart.dcm x; #multiframe
+v MR-MONO2-8-16x-heart.dcm.XDCM ; #OK
+xmedcon MR-MONO2-8-16x-heart.dcm.XDCM #OK
 
-testWrite NM-MONO2-16-13x-heart.dcm x;
-affim filein=NM-MONO2-16-13x-heart.dcm.XDCM  DIMX=64 DIMY=64 nbit=16
-affim filein=NM-MONO2-16-13x-heart.dcm.XDCM  DIMX=64 DIMY=64 nbit=16 offset=98304
+testWrite NM-MONO2-16-13x-heart.dcm x;  #multiframe
+xmedcon NM-MONO2-16-13x-heart.dcm.XDCM #OK
 
 testWrite sonataMonaco.dcm x;
-affim filein=sonataMonaco.dcm.XDCM DIMX=256 DIMY=208 nbit=16
+xmedcon sonataMonaco.dcm.XDCM #OK
 
 #MultiFrame
 testWrite US-MONO2-8-8x-execho.dcm x;
 PrintHeader US-MONO2-8-8x-execho.dcm.XDCM  
-xmedcon US-MONO2-8-8x-execho.dcm.XDCM;
+xmedcon US-MONO2-8-8x-execho.dcm.XDCM; #OK
 
 #RGB
 
 testWrite US-RGB-8-epicard.dcm x;
 echo "expected pixelType=8U SamplesPerPixel=3 PlanarConfiguration=1"
 echo "         PhotometricInterpretation=RGB"
-affim filein=US-RGB-8-epicard.dcm.XDCM  dimx=640 dimy=480 nbit=24
+ xmedcon US-RGB-8-epicard.dcm.XDCM #OK
 
 testWrite US-RGB-8-esopecho.dcm x;
 echo "expected pixelType=8U SamplesPerPixel=3 PlanarConfiguration=0"
 echo "         PhotometricInterpretation=RGB"
-affim filein=US-RGB-8-esopecho.dcm.XDCM dimx=256 dimy=120 nbit=24
+xmedcon US-RGB-8-esopecho.dcm.XDCM #OK
 
 # Non-Hierarchical, First-Order Prediction (Process 14 [Selection Value 1])
 #--------------------------------------------------------------------------
 # (JPEG Lossless)
 
 testWrite CT-MONO2-16-chest.dcm x;
-affim filein=CT-MONO2-16-chest.dcm.XDCM dimx=512 dimy=400 nbit=16 signe=o
+xmedcon CT-MONO2-16-chest.dcm.XDCM #OK
 
 testWrite 012345.002.050.dcm x;
-affim filein=012345.002.050.dcm.XDCM dim=256 nbit=16
+xmedcon 012345.002.050.dcm.XDCM #OK
 
 testWrite gdcm-JPEG-LossLess3a.dcm x;
 PrintHeader gdcm-JPEG-LossLess3a.dcm.XDCM 2
-xmedcon gdcm-JPEG-LossLess3a.dcm.XDCM 
+xmedcon gdcm-JPEG-LossLess3a.dcm.XDCM  #OK
 
 testWrite XA-MONO2-8-12x-catheter.dcm x;
 PrintHeader XA-MONO2-8-12x-catheter.dcm.XDCM 2;
-xmedcon XA-MONO2-8-12x-catheter.dcm.XDCM;
+xmedcon XA-MONO2-8-12x-catheter.dcm.XDCM; #OK
 
 testWrite xa_integris.dcm x;
 echo "a lot of fragments expected here"
-xmedcon xa_integris.dcm.XDCM
-
+xmedcon xa_integris.dcm.XDCM #OK
 
 testWrite 16BitsJpegLosslessGrayScale.dcm x;
-affim filein=16BitsJpegLosslessGrayScale.dcm.XDCM DIMX=800 DIMY=535 nbit=16
+xmedcon 16BitsJpegLosslessGrayScale.dcm.XDCM #OK
 
 #comming from GE dlx via VTServer
+v I9000001.dcm;
 testWrite I9000001.dcm x;
 PrintHeader I9000001.dcm.XDCM 2;
-#no image found
+#black image 
 v I9000001.dcm.XDCM; 
+#no image found
 xmedcon I9000001.dcm.XDCM;
 
 #JPEG Extended (Process 2 & 4) // 16 bits
 #-----------------------------
 testWrite gdcm-JPEG-Extended.dcm x;
-xmedcon gdcm-JPEG-Extended.dcm.XDCM 
+xmedcon gdcm-JPEG-Extended.dcm.XDCM #OK
 
 testWrite jpeglossy1.dcm x;
-xmedcon jpeglossy1.dcm.XDCM
+xmedcon jpeglossy1.dcm.XDCM #OK
 
 #JPEG Baseline (Process 14)
 #--------------------------
 testWrite MR-MONO2-12-shoulder.dcm x;  
-xmedcon MR-MONO2-12-shoulder.dcm.XDCM;
+xmedcon MR-MONO2-12-shoulder.dcm.XDCM; #OK
 
 
 #fichier format ecat.
@@ -234,11 +253,11 @@ testWrite US.1.2.dcm x;
 echo "expected : A lot of Fragments (40), nb Frames = 40 ;-)"
 echo "expected  pixelType=8U SamplesPerPixel=3 PlanarConfiguration=0"
 echo "          PhotometricInterpretation=YBR_FULL_422"
-xmedcom US.1.2.dcm.XDCM
+xmedcon US.1.2.dcm.XDCM #OK
 
 #Sequoia Acusson U11
 testWrite CLIP0001-Sequoia-U11.dcm x;
-xmedcon CLIP0001-Sequoia-U11.dcm.XDCM
+xmedcon CLIP0001-Sequoia-U11.dcm.XDCM #OK
 
 #RLE Lossless
 #-------------
@@ -247,18 +266,23 @@ echo "expected pixelType=8U SamplesPerPixel=1"
 echo "         PlanarConfiguration=0 PhotometricInterpretation=MONOCHROME2"
 echo "         nb Frames (DIMZ) : 1"
 xmedcon canadaAloka.dcm.XDCM
+
 testWrite jpeglossy1.dcm x;
+ xmecon jpeglossy1.dcm.XDCM #OK
 
 testWrite FMAG0001.dcm x; 
 echo "expected pixelType=8U SamplesPerPixel=3"
 echo "         PlanarConfiguration=1 PhotometricInterpretation=YBR_FULL"
 echo "         nb Frames (DIMZ) : 1"
-xmedcon FMAG0001.dcm.XDCM
+xmedcon FMAG0001.dcm.XDCM #OK
 
+v QMAG0001.dcm; #OK
+xmedcon QMAG0001.dcm; #original breaks xmedcon
 testWrite QMAG0001.dcm x; 
-echo "expected pixelType=8U SamplesPerPixel=3"
-echo "         PlanarConfiguration=1 PhotometricInterpretation=YBR_FULL"
-affim filein=QMAG0001.dcm.XDCM DIMX=384 DIMY=288 nbit=24;
+echo "expected pixelType=8U SamplesPerPixel=3";
+echo "         PlanarConfiguration=1 PhotometricInterpretation=YBR_FULL";
+v QMAG0001.dcm.XDCM; #OK
+xmedcon QMAG0001.dcm.XDCM; #OK
 
 testWrite US-PAL-8-10x-echo.dcm x;
 echo "expected pixelType=8U SamplesPerPixel=1 PlanarConfiguration=0"
@@ -266,51 +290,47 @@ echo "         PhotometricInterpretation=PALETTE COLOR"
 echo "         nb Frames (DIMZ): 10"
 echo "expected : Parsing 10 'single fragment' Segments"
 echo "           Reading 10 'single fragment' Segments (ouf!)"
-affim filein=US-PAL-8-10x-echo.dcm.XDCM DIMX=600 DIMY=430 nbit=24
-affim filein=US-PAL-8-10x-echo.dcm.XDCM DIMX=600 DIMY=430 nbit=24 offset=774000
-affim filein=US-PAL-8-10x-echo.dcm.XDCM DIMX=600 DIMY=430 nbit=24 offset=1548000
-affim filein=US-PAL-8-10x-echo.dcm.XDCM DIMX=600 DIMY=430 nbit=24 offset=6966000
+xmedcon US-PAL-8-10x-echo.dcm.XDCM #OK
 
 testWrite 8BitsRunLengthGrayScale.dcm x;
 echo "expected : correct Gray image"
-affim filein=8BitsRunLengthGrayScale.dcm.XDCM DIMX=800 DIMY=535
+xmedcon 8BitsRunLengthGrayScale.dcm.XDCM #OK
 
 testWrite 8BitsRunLengthColor.dcm x;
 echo "expected pixelType=8U SamplesPerPixel=1 PlanarConfiguration=2"
 echo "         PhotometricInterpretation=PALETTE COLOR"
 echo "expected correct color image"
-affim filein=8BitsRunLengthColor.dcm.XDCM DIMX=800 DIMY=535 nbit=24
+xmedcon 8BitsRunLengthColor.dcm.XDCM  #OK
 
 #RLE 16 bits --> Try to find some more images
 
 testWrite 16BitsRunLengthGrayScale.dcm x;
 echo "expected pixelType=16U SamplesPerPixel=1 PlanarConfiguration=0"
 echo "         PhotometricInterpretation=MONOCHROME2"
-affim filein=16BitsRunLengthGrayScale.dcm.XDCM  DIMX=800 DIMY=535 nbit=16
+xmedcon 16BitsRunLengthGrayScale.dcm.XDCM #OK
 
 #Were supposed to be bugged
 #--------------------------
 #(break xmedcon)
-
+ xmedcon 00191113.dcm #No images found
 testWrite 00191113.dcm x;
-#OK
-xmedcon 00191113.dcm.XDCM
-
+xmedcon 00191113.dcm.XDCM #OK
 
+xmedcon DermaColorLossLess.dcm; #breaks xmedcon : No images found
 testWrite DermaColorLossLess.dcm x;
-#breaks xmedcon
- xmedcon DermaColorLossLess.dcm.XDCM 
+xmedcon DermaColorLossLess.dcm.XDCM; #breaks xmedcon 
 #Feb 02 19:33:16 log[2619]: warning: Tag with uneven length
 #Feb 02 19:33:16 log[2619]: warning: No transfer syntax found
 #Feb 02 19:33:16 log[2619]: error: No images found
-# v : OK
-v DermaColorLossLess.dcm.XDCM
+v DermaColorLossLess.dcm.XDCM #OK
 
-#Original breaks xmedcon
+#Original breaks xmedcon, breaks v, affimdcm complian ?!
+affimdcm filein=RadBWLossLess.dcm; #OK
+v RadBWLossLess.dcm;
 xmedcon RadBWLossLess.dcm;
 testWrite RadBWLossLess.dcm x;
 #No pixel found
-v RadBWLossLess.dcm.XDCM;
+v RadBWLossLess.dcm.XDCM; #No pixel found
 xmedcon RadBWLossLess.dcm.XDCM;
 
 #Known as BUGGED !
@@ -319,40 +339,46 @@ xmedcon RadBWLossLess.dcm.XDCM;
 #Rectangular old 24 Bits image
 testWrite gdcm-RGB-LibIDORect.acr x;
 v gdcm-RGB-LibIDORect.acr.XDCM
+xmedcon gdcm-RGB-LibIDORect.acr.XDCM #breaks : large Bit Allocated (24)
 
 #MR GE GENESIS_SIGNA Palo Alto
 testWrite DicomSampleNastyGEImage.dcm x;
 echo " expected : warning uneven length (13) for 0008|103e"
-xdedcon DicomSampleNastyGEImage.dcm.XDCM
+xmedcon DicomSampleNastyGEImage.dcm.XDCM #OK
 
 #MR Philips NTSCAN Hop. Neuro Lyon
-testWrite philipsMR-lossy.ima x;
+PrintHeader philipsMR-lossy.ima #breaks PrintHeader ?!?
+testWrite philipsMR-lossy.ima x; #NOT CHECKED
 echo "WAS expected : 'Bogus Huffman table definition' on philipsMR-lossy.ima"
 echo "IS  expected : 'JERR_BAD_HUFF_TABLE sym 16 (>15') but the show goes on"
 echo "breaks xmedcon"
-affim filein=philipsMR-lossy.ima.XDCM dim=512 nbit=16
+v philipsMR-lossy.ima.XDCM;  #NOT CHECKED
+xmedcon philipsMR-lossy.ima.XDCM; #NOT CHECKED
 
 #CT Siemens Hop. Salengro Lille
 testWrite gdcm-JPEG-LossLess3a.dcm x;
 echo "expected : wrong sequence delimiter (b00c,0eb6) at end of pixels";
 echo "xmedcon says 'error: Unexpected end of file'"
-affim filein=gdcm-JPEG-LossLess3a.dcm.XDCM dim=512 nbit=16
-vtkgdcmViewer gdcm-JPEG-LossLess3a.dcm    
+vtkgdcmViewer gdcm-JPEG-LossLess3a.dcm.XDCM  #OK; needs 'R' for display   
+xmedcon gdcm-JPEG-LossLess3a.dcm.XDCM; #OK
 
 #CR Philips Thoravision Hop Cardio Lyon
+affimdcm filein=gdcm-JPEG-LossLessThoravision.dcm #OK
 testWrite gdcm-JPEG-LossLessThoravision.dcm x;
 echo "expected : 147 fragments,length : 29860 + 145*32760 + 14416"
 echo "breaks xmedcom, breaks e-film"
 echo "WAS expected : hashed image -with jLBJpeg-"
 echo "IS  expected : Seg Fault"
-affim filein=gdcm-JPEG-LossLessThoravision.dcm.XDCM DIMX=1876 DIMY=2076 nbit=16
+xmedcon gdcm-JPEG-LossLessThoravision.dcm.XDCM # NOT CHECKED
 
 #MR Picker ST. ANTHONY HOSPITAL
 testWrite MR.6799.1.dcm x;
 echo "OK; DICOM Image with NO Preamble"
-affim filein=MR.6799.1.dcm.XDCM dim=512 nbit=16
+xmedcon MR.6799.1.dcm.XDCM #OK
 
 #Segmented Palette Color LUT Data
+xmedcon gdcm-US-ALOKA-16.dcm; #breaks
+vtkgdcmViewer gdcm-US-ALOKA-16.dcm3OK
 testWrite gdcm-US-ALOKA-16.dcm x;                             
 echo "expected  pixelType=16U SamplesPerPixel=1 PlanarConfiguration=0"
 echo "          PhotometricInterpretation=PALETTE COLOR"
@@ -360,25 +386,34 @@ echo "expected : Gray image since 'Segmented xxx Palette Color LUT Data' not yet
 echo "neither e-film nor DicomWorks deals with the color"
 echo "breaks xmedcom"
 echo "breaks vtkgdcmViewer (bad result : 24 bits expected; 16 found in Pixels area)"
-vtkgdcmViewer gdcm-US-ALOKA-16.dcm
-affim dimx=640 dimy=480 filein=gdcm-US-ALOKA-16.dcm.XDCM nbit=16
+vtkgdcmViewer gdcm-US-ALOKA-16.dcm.XDCM #OK
+xmedcon gdcm-US-ALOKA-16.dcm.XDCM #breaks
+#Feb 03 13:40:19 log[26999]: error: Missing CLUT
+#Feb 03 13:40:19 log[26999]: error: No images found
 
 # bugged Siemens 'Leonardo' image
 testWrite 8078283Leonardo.dcm x;
-affim filein=8078283Leonardo.dcm.XDCM dim=512 nbit=16
+xmedcon 8078283Leonardo.dcm.XDCM #OK
 
 #CT McTwin Elscint C.H.R.U  LILLE  C.HURIEZ
-testWrite MxTwinLossLess.dcm x;
-affim filein=MxTwinLossLess.dcm.XDCM DIMX=512 DIMY=512 nbit=16
+ xmedcon MxTwinLossLess.dcm #breaks
+ v MxTwinLossLess.dcm #OK
+ testWrite MxTwinLossLess.dcm x;
+ v MxTwinLossLess.dcm.XDCM;  #OK
+ xmedcon MxTwinLossLess.dcm.XDCM #breaks
 
 # MRI image from VPRO burned CD
+v mriThruVPRO.dcm; # Tasteless SHIT
+xmedcon mriThruVPRO.dcm; # pas mieux
 testWrite mriThruVPRO.dcm x;
-affim filein=mriThruVPRO.dcm.XDCM  DIMX=256 DIMY=256 nbit=16
+v mriThruVPRO.dcm.XDCM 
 echo "expected : tasteless SHIT !"
 echo "breaks Siemens Leonardo viewer . JPEG encoding is bugged?"
 
 # gdcm made Theralys image
 # due to H table, a SeQuence is tagged with 0 length
 # when using gdcmFile::WriteDcmXXX
+xmedcon fromTheralys.dcm # Original breaks xmedcon
 testWrite fromTheralys.dcm x;
-affim filein=fromTheralys.dcm.XDCM dim=256 nbit=16
+v fromTheralys.dcm.XDCM; # OK (unsolved Length = 13 ...)
+xmedcon fromTheralys.dcm.XDCM # Breaks : no image found