Program: gdcm
Module: $RCSfile: gdcmDocument.cxx,v $
Language: C++
- Date: $Date: 2005/09/16 17:19:26 $
- Version: $Revision: 1.279 $
+ Date: $Date: 2005/09/21 09:42:19 $
+ Version: $Revision: 1.282 $
Copyright (c) CREATIS (Centre de Recherche et d'Applications en Traitement de
l'Image). All rights reserved. See Doc/License.txt or
}
/**
- * \brief Writes in a file all the Header Entries (Dicom Elements)
+ * \brief Writes in a file all the Entries (Dicom Elements)
* @param fp file pointer on an already open file (actually: Output File Stream)
* @param filetype Type of the File to be written
* (ACR-NEMA, ExplicitVR, ImplicitVR)
- * @return Always true.
*/
void Document::WriteContent(std::ofstream *fp, FileType filetype)
{
newDocEntry = ReadNextDocEntry( );
+ // FIXME :
+ // Private tag, in IMplicit VR are defaulted as a BinEntry,
+ // Very often they are only composed of Printable characters,
+ // and could be defaulted as a ValEntry.
+ // It's too late to do the Job
+ // (we should check the value, but we know it after LoadDocEntry ...)
+ // --> in next gdcm major release let's unify ValEntry and BinEntry !
+
// Uncoment this printf line to be able to 'follow' the DocEntries
// when something *very* strange happens
break;
}
- // an Item Starter found elsewhere but the first postition
+ // an Item Starter found elsewhere but the first position
// of a SeqEntry means previous entry was a Sequence
// but we didn't get it (private Sequence + Implicit VR)
// we have to backtrack.
* and the taken VR. If they are different, the header entry is
* updated with the new VR.
* @param vr Dicom Value Representation
- * @return false if the VR is incorrect of if the VR isn't referenced
+ * @return false if the VR is incorrect or if the VR isn't referenced
* otherwise, it returns true
*/
bool Document::CheckDocEntryVR(VRKey vr)
group = ReadInt16();
elem = ReadInt16();
}
- catch ( FormatError e )
+ catch ( FormatError )
{
// We reached the EOF (or an error occured) therefore
// header parsing has to be considered as finished.
if ( vr == GDCM_UNKNOWN )
{
if ( elem == 0x0000 ) // Group Length
+ {
realVR = "UL"; // must be UL
+ }
+ else if (group%2 == 1 && (elem >= 0x0010 && elem <=0x00ff ))
+ {
+ // DICOM PS 3-5 7.8.1 a) states that those
+ // (gggg-0010->00FF where gggg is odd) attributes have to be LO
+ realVR = "LO";
+ }
else
{
DictEntry *dictEntry = GetDictEntry(group,elem);
if ( Global::GetVR()->IsVROfSequence(realVR) )
newEntry = NewSeqEntry(group, elem);
else if ( Global::GetVR()->IsVROfStringRepresentable(realVR) )
- newEntry = NewValEntry(group, elem,vr);
+ newEntry = NewValEntry(group, elem, realVR);
else
- newEntry = NewBinEntry(group, elem,vr);
+ newEntry = NewBinEntry(group, elem, realVR);
if ( vr == GDCM_UNKNOWN )
{
{
FindDocEntryLength(newEntry);
}
- catch ( FormatError e )
+ catch ( FormatError )
{
// Call it quits
delete newEntry;