Program: gdcm
Module: $RCSfile: gdcmDocEntry.cxx,v $
Language: C++
- Date: $Date: 2007/05/23 14:18:09 $
- Version: $Revision: 1.88 $
+ Date: $Date: 2007/07/24 16:17:04 $
+ Version: $Revision: 1.89 $
Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
l'Image). All rights reserved. See Doc/License.txt or
uint16_t zero = 0;
uint16_t shortLgr = (uint16_t)lgth;
+/*
if( IsVRUnknown() )
- {
+ {
// GDCM_VRUNKNOWN was stored in the Entry VR;
// deal with Entry as if TS were Implicit VR
binary_write(*fp, lgth);
}
else
+*/
+ if( IsVRUnknown() )
{
+ // if VR was not set, we set it to "UN"
+ // (FileHelper::Write has no longer to switch to ImplicitVR
+ // when undocumented VR DataElements exist!)
+ SetVR("UN");
+ vr=GetVR();
+ }
+
+ //{
binary_write(*fp, vr.str());
// See PS 3.5-2004 page 33, 36
if ( (vr == "SQ") || (vr == "OB") || (vr == "OW") || (vr == "OF")
{
binary_write(*fp, shortLgr);
}
- }
+ //}
}
else // IMPLICIT VR
{
Module: $RCSfile: gdcmFileHelper.cxx,v $
Language: C++
- Date: $Date: 2007/07/13 08:17:21 $
- Version: $Revision: 1.117 $
+ Date: $Date: 2007/07/24 16:17:04 $
+ Version: $Revision: 1.118 $
Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
l'Image). All rights reserved. See Doc/License.txt or
// Let's just *dream* about it; *never* trust a user !
// We turn to Implicit VR if at least the VR of one element is unknown.
- /// \TODO : better we put vr=UN for undocumented Shadow Groups !
-
+ // Better we let DocEntry::WriteContent to put vr=UN for undocumented Shadow Groups !
+
+/*
e = FileInternal->GetFirstEntry();
while (e != 0)
{
if (e->GetVR() == " ")
{
+
SetWriteTypeToDcmImplVR();
SetWriteFileTypeToImplicitVR();
flag = true;
SetWriteFileTypeToExplicitVR();
}
break;
+*/
+
+ SetWriteFileTypeToExplicitVR();
- SetWriteFileTypeToExplicitVR(); // to see JPRx
break;
case ACR:
case ACR_LIBIDO: