+
+/**
+ * \brief adds a new Visit at the beginning of the VisitList
+ * of a partially created DICOMDIR
+ */
+DicomDirVisit *DicomDirStudy::NewVisit()
+{
+ DicomDirVisit *dd = DicomDirVisit::New();
+ Visits.push_back(dd);
+ dd->Delete();
+ return dd;
+}
+
+/**
+ * \brief Remove all visits in the study
+ */
+void DicomDirStudy::ClearVisit()
+{
+ for(ListDicomDirVisit::iterator cc = Visits.begin();
+ cc != Visits.end();
+ ++cc )
+ {
+ (*cc)->Delete();
+ }
+ Visits.clear();
+}
+
+/**
+ * \brief Get the first entry while visiting the DicomDirVisit
+ * \return The first DicomDirVisit if found, otherwhise NULL
+ */
+DicomDirVisit *DicomDirStudy::GetFirstVisit()
+{
+ ItVisit = Visits.begin();
+ if (ItVisit != Visits.end())
+ return *ItVisit;
+ return NULL;
+}
+
+/**
+ * \brief Get the next entry while visiting the DicomDirVisit
+ * \note : meaningfull only if GetFirstEntry already called
+ * \return The next DicomDirVisit if found, otherwhise NULL
+ */
+DicomDirVisit *DicomDirStudy::GetNextVisit()
+{
+ gdcmAssertMacro (ItVisit != Visits.end());
+
+ ++ItVisit;
+ if (ItVisit != Visits.end())
+ return *ItVisit;
+ return NULL;
+}
+
+/**
+ * \brief Get the last entry while visiting the DicomDirVisit
+ * \return The last DicomDirVisit if found, otherwhise NULL
+ */
+DicomDirVisit *DicomDirStudy::GetLastVisit()
+{
+ ItVisit = Visits.end();
+ if (ItVisit != Visits.begin())
+ {
+ --ItVisit;
+ return *ItVisit;
+ }
+ return NULL;
+}
+
+/**
+ * \brief Copies all the attributes from an other DocEntrySet
+ * @param set entry to copy from
+ * @remarks The contained DocEntries a not copied, only referenced
+ */
+void DicomDirStudy::Copy(DocEntrySet *set)
+{
+ // Remove all previous childs
+ ClearSerie();
+ ClearVisit();
+
+ DicomDirObject::Copy(set);
+
+ DicomDirStudy *ddEntry = dynamic_cast<DicomDirStudy *>(set);
+ if( ddEntry )
+ {
+ Series = ddEntry->Series;
+ for(ItSerie = Series.begin();ItSerie != Series.end();++ItSerie)
+ (*ItSerie)->Register();
+
+ Visits = ddEntry->Visits;
+ for(ItVisit = Visits.begin();ItVisit != Visits.end();++ItVisit)
+ (*ItVisit)->Register();
+ }
+}
+