+
+/**
+ * \brief Sets Entry (Dicom Element) value of an element,
+ * specified by it's tag (Group, Number)
+ * and the length, too ... inside a SQ Item
+ * If the Element is not found, it's just created !
+ * \warning we suppose, right now, the element belongs to a Public Group
+ * (NOT a shadow one)
+ * @param val string value to set
+ * @param group Group number of the searched tag.
+ * @param element Element number of the searched tag.
+ * @return true if element was found or created successfully
+ */
+
+bool gdcmSQItem::SetEntryByNumber(std::string val,guint16 group,
+ guint16 element)
+{
+ for(ListDocEntry::iterator i=docEntries.begin();i!=docEntries.end();++i)
+ {
+ if ( (*i)->GetGroup() == 0xfffe && (*i)->GetElement() == 0xe000 )
+ continue;
+
+ if ( ( group < (*i)->GetGroup() )
+ ||( group == (*i)->GetGroup() && element < (*i)->GetElement()) )
+ {
+ // instead of ReplaceOrCreateByNumber
+ // that is a method of gdcmDocument :-(
+ gdcmValEntry* Entry = (gdcmValEntry*)0;
+ TagKey key = gdcmDictEntry::TranslateToKey(group, element);
+
+ if ( ! ptagHT->count(key))
+ {
+ // we assume a Public Dictionnary *is* loaded
+ gdcmDict *PubDict = gdcmGlobal::GetDicts()->GetDefaultPubDict();
+ // if the invoked (group,elem) doesn't exist inside the Dictionary
+ // we create a VirtualDictEntry
+ gdcmDictEntry *DictEntry = PubDict->GetDictEntryByNumber(group,
+ element);
+ if (DictEntry == NULL)
+ {
+ DictEntry=gdcmGlobal::GetDicts()->NewVirtualDictEntry(group,
+ element,
+ "UN",
+ "??","??");
+ }
+ // we assume the constructor didn't fail
+ Entry = new gdcmValEntry(DictEntry);
+ /// \todo
+ /// ----
+ /// better we don't assume too much !
+ /// gdcmSQItem is now used to describe any DICOMDIR related object
+ } else {
+ gdcmDocEntry* FoundEntry = ptagHT->find(key)->second;
+ Entry = dynamic_cast<gdcmValEntry*>(FoundEntry);
+ if (!Entry)
+ dbg.Verbose(0, "gdcmSQItem::SetEntryByNumber: docEntries"
+ " contains non gdcmValEntry occurences");
+ }
+ if (Entry)
+ Entry->SetValue(val);
+ Entry->SetLength(val.length());
+ docEntries.insert(i,Entry);
+ return true;
+ }
+ if (group == (*i)->GetGroup() && element == (*i)->GetElement() )
+ {
+ if ( gdcmValEntry* Entry = dynamic_cast<gdcmValEntry*>(*i) )
+ Entry->SetValue(val);
+ (*i)->SetLength(val.length());
+ return true;
+ }
+ }
+ return false;
+}