+}
+
+/*
+ * \brief canonical Writer
+ */
+void gdcmSeqEntry::Write(FILE *fp, FileType filetype)
+{
+ guint16 seq_term_gr = 0xfffe;
+ guint16 seq_term_el = 0xe0dd;
+ guint32 seq_term_lg = 0x00000000;
+
+ guint16 item_term_gr = 0xfffe;
+ guint16 item_term_el = 0xe00d;
+
+ gdcmDocEntry::Write(fp, filetype);
+ for(ListSQItem::iterator cc = GetSQItems().begin();
+ cc != GetSQItems().end();
+ ++cc)
+ {
+ (*cc)->Write(fp, filetype);
+
+ fwrite ( &item_term_gr,(size_t)2 ,(size_t)1 ,fp);
+ fwrite ( &item_term_el,(size_t)2 ,(size_t)1 ,fp);
+ fwrite ( &seq_term_lg,(size_t)4 ,(size_t)1 ,fp);
+ }
+ //we force the writting of a Sequence Delimitaion item
+ // because we wrote the Sequence as a 'no Length' sequence
+ fwrite ( &seq_term_gr,(size_t)2 ,(size_t)1 ,fp);
+ fwrite ( &seq_term_el,(size_t)2 ,(size_t)1 ,fp);
+ fwrite ( &seq_term_lg,(size_t)4 ,(size_t)1 ,fp);
+}