+ pa = e1->GetNextPatient();
+ }
+ break;
+
+ case 4:
+ std::cout << std::endl << std::endl
+ << " = PATIENT/STUDY/SERIE/IMAGE List ============================"
+ << std::endl<< std::endl;
+
+ pa = e1->GetFirstPatient();
+ while ( pa ) { // les PATIENT de ce DICOMDIR
+ std::cout << pa->GetEntryValue(0x0010, 0x0010) << std::endl; // Patient's Name
+
+ st = pa->GetFirstStudy();
+ while ( st ) { // on degouline les STUDY de ce patient
+ std::cout << "--- "<< st->GetEntryValue(0x0008, 0x1030) << std::endl; // Study Description
+ std::cout << " Stud.ID:[" << st->GetEntryValue(0x0020, 0x0010); // Study ID
+
+ se = st->GetFirstSerie();
+ while ( se ) { // on degouline les SERIES de cette study
+ std::cout << "--- --- "<< se->GetEntryValue(0x0008, 0x103e) << std::endl; // Serie Description
+ std::cout << " Ser.nb:[" << se->GetEntryValue(0x0020, 0x0011); // Series number
+ std::cout << "] Mod.:[" << se->GetEntryValue(0x0008, 0x0060) << "]"; // Modality
+
+ im = se->GetFirstImage();
+ while ( im ) { // on degouline les Images de cette serie
+ std::cout << "--- --- --- "<< im->GetEntryValue(0x0004, 0x1500) << std::endl; // File name
+ im = se->GetNextImage();
+ }
+ se = st->GetNextSerie();
+ }
+ st = pa->GetNextStudy();
+ }
+ pa = e1->GetNextPatient();