print "Data %s [%s] [%s] : %s" % (val.GetKey().str(),val.GetVR().str(),
val.GetName(),val.GetString())
val=file.GetNextEntry()
print "Data %s [%s] [%s] : %s" % (val.GetKey().str(),val.GetVR().str(),
val.GetName(),val.GetString())
val=file.GetNextEntry()