+//-----------------------------------------------------------------------------
+// Public
+
+/**
+ * \brief Simple predicate that checks whether the given argument
+ * corresponds to the Value Representation of a \ref DataEntry .
+ * @param tested value representation to check for.
+ */
+bool VR::IsVROfBinaryRepresentable(VRKey const &tested)
+{
+ if ( IsVROfStringRepresentable(tested) )
+ return false;
+
+ if ( IsVROfSequence(tested) )
+ return false;
+
+ return true;
+}
+
+/**
+ * \brief Simple predicate that checks whether the given argument
+ * corresponds to the Value Representation of a
+ * 'std::string representable' value.
+ * @param tested value representation to be checked.
+ */
+bool VR::IsVROfStringRepresentable(VRKey const &tested)
+{
+
+ return tested == "AE" ||
+ tested == "AS" ||
+ tested == "CS" ||
+ tested == "DA" ||
+ tested == "DS" ||
+ tested == "FL" ||
+ tested == "FD" ||
+ tested == "IS" ||
+ tested == "LO" ||
+ tested == "LT" ||
+ tested == "PN" ||
+ tested == "SH" ||
+ tested == "SL" ||
+ tested == "SS" ||
+ tested == "ST" ||
+ tested == "TM" ||
+ tested == "UI" ||
+ tested == "UL" ||
+ tested == "US" ||
+ tested == "UT";
+
+ // Should be quicker
+ // --> will *never* work : any rotten value would be considered as OK !
+/*
+ return tested != "OB" &&
+ tested != "OW" &&
+ tested != "OF" &&
+ tested != "AT" && // Attribute Tag ?!? contain no printable character
+ tested != "UN" && // UN is an actual VR !
+ tested != "SQ" ;
+*/
+}
+/// \brief returns the length of a elementary elem whose VR is passed
+unsigned short VR::GetAtomicElementLength(VRKey const &tested)
+{
+ // Unsigned & signed short
+ if( tested == "US" || tested == "SS" )
+ return 2;
+ // Unsigned & signed long
+ if( tested == "UL" || tested == "SL" )
+ return 4;
+ // Float
+ if( tested == "FL" )
+ return 4;
+ // Double
+ if( tested == "FD" )
+ return 8;
+ // Word string
+ if( tested == "OW" )
+ return 2;
+ // Float string
+ if( tested == "OF" )
+ return 4;
+ return 1;
+}
+
+// VS6 need a single implementation in the dll
+#if defined(_MSC_VER) && (_MSC_VER == 1200)
+/// \brief checks is a supposed-to-be VR is a 'legal' one.
+bool VR::IsValidVR(VRKey const &key)
+{
+ return vr.find(key) != vr.end();