   (remove empty?
    (concat
      [(str (get-in record [:collection :_errors]))] ; Errors from translating to UMM
-     (umm/validate-xml :collection (:metadata-format record) (:metadata record))
-     (json-schema/validate-umm-json (umm-json/umm->json (:collection record)) :collection)
+     (validate-record-schemas record)
      (umm-validation/validate-collection record))))
 
 (defn- translate-and-validation-collection

  (let [{:keys [metadata-format metadata concept-id]} record]
    (umm/parse-metadata context :collection metadata-format metadata {:apply-default? true})))

(defn- get-collection-validation-errors
  "Collect the following collection validations:
   * Errors from translating from native XML to UMM-C


(comment
  ;; Translate and validate a specific collection by concept-id
  (def record (get-collection "C1214604828-SCIOPS"))
  (translate-and-validation-collection record)
  (translate-record-to-umm record)
  (:metadata-format record)
  (:metadata record))
