   center-role - role for the data center"
   [doc data-centers center-name center-role]
   (let [center (value-of doc (str "/Collection/" center-name))
-        short-name (validate-short-name center)
-        long-name (if (truncate-short-name? center) center nil)]
+        short-name (u/truncate-with-default
+                    center u/SHORTNAME_MAX (truncate-short-name? center))
+        long-name (when (truncate-short-name? center) center)]
     (if center
       ;; Check to see if we already have an entry for this data center - the role and short name
       ;; match. If so, don't create a new record.

  "Return true if ShortName is more than 85 characters and should be truncated"
  [short-name]
  (> (count short-name) u/SHORTNAME_MAX))

(defn- validate-short-name
  "Truncate ShortName if it's count is greater than 85 characters"
  [short-name]
  (u/truncate short-name u/SHORTNAME_MAX (truncate-short-name? short-name)))

(defn- parse-contact-mechanisms
  "Parse ECHO10 contact mechanisms to UMM."

                   (= (:ShortName %) center))
             data-centers)
       {:Roles [center-role]
        :ShortName short-name
        :LongName long-name}))))

(defn parse-data-centers
