        (h/save-request [[:no-metadata payload] tmpdir])
        (h/prepare-marcxml2mods-request tmpdir)
 
-       (let [ metadata (-> (slurp "resources/marcxml2mods-response-metadata.clj")
+       (let [ metadata (-> (slurp "resources/communication-with-marcxml2mods/response/metadata.clj")
                            read-string
                            (update-in [:headers] assoc "UUID" (.toString tmpdir)))
-             payload (slurp "resources/marcxml2mods-response-payload.json")
+             payload (slurp "resources/communication-with-marcxml2mods/response/payload.json")
              [mods_files response-dir] (-> [metadata payload]
                                            h/save-marcxml2mods-response)
              ]


        (let [loc (-> (io/file result-dir (str uuid ".xml"))
                      io/input-stream
                      xml/parse
                      zip/xml-zip
                      )]
          (let [ref (zx/xml1-> loc :datastream [(zx/attr= :ID "IMG_FULL")]
                               :datastreamVersion :contentLocation (zx/attr :REF)) 
                storage_path (slurp (io/file tmpdir "payload" "original" "storage_path"))]
            (is (= ref (str "file:" storage_path))))
          (let [ref (zx/xml1-> loc :datastream [(zx/attr= :ID "IMG_PREVIEW")] 
                               :datastreamVersion :contentLocation (zx/attr :REF)) 
                filename (slurp (io/file tmpdir "payload" "first-page" "filename"))]
            (is (=  ref (str "file:" filename)))
            )
          )
        )

        (is (.isDirectory (io/file request-workdir "export-to-storage" "request")))
   
        (let [zip-file-b64 (io/file request-workdir 
                                    (str (slurp (io/file tmpdir "request" "payload" "uuid")) ".zip" ".b64"))]
          (is (.exists zip-file-b64))
          (let [request-dir (io/file request-workdir "export-to-storage" "request")
                deserialized-metadata (s/deserialize (slurp (io/file request-dir "metadata.clj"))
