                     :producedDate :produced_date
                     :sourceDate :source_date
                     :revisionDate :revision_date
-                    :sourcePublisher :source_publisher})))
+                    :sourcePublisher :source_publisher
+                    :process_status :state})))
 
 (defn cleanup-commercial-production
   [m]

  [{id :id}]
  (get all-files-by-id id))

(def ready-productions
  "All productions with state \"ready\""
  (filter #(= (:state %) "ready") all-productions))

(defn create-ready-productions!
  "Create all productions with state \"ready\""
  []
  (doseq [p ready-productions]
    (-> p prod/create!)))

(def archived-productions
  "All productions with state \"archived\""
  (filter #(= (:state %) "archived") all-productions))

(defn create-archived-productions!
  "Create all productions with state \"archived\""
  []
  (->> archived-productions
       (map #(assoc % :state "archived"))
       (map prod/add-default-meta-data)
       (apply jdbc/insert! db :production)))

  (println)
  (println "Importing from ABACUS")
  (println)
  (println "Ready: " (count (ready-productions all-productions)))
  (println (string/join ", " (map :id (ready-productions all-productions))))
  (println)
  (println "Archived: " (count (archived-productions all-productions)))
  (println)
  (println "Recording with no wav and a struct.html: " (count recording-productions-with-struct))
  (println (string/join ", " (map :id recording-productions-with-struct)))
