     ;; When repairing a production we already have a library
     ;; signature, so no need to ask the library for another one; go
     ;; directly to archiving
-;;    (transaction)
     (as-> production p
       (set-state! p "cataloged")
       (>!! queues/archive p))


(defn set-state-recorded! [production]
  (log/debugf "Setting production state of %s to recorded" (:id production))
;;  (transaction)
  (let [new-production
        (-> production
            (merge (dtb/meta-data (path/recorded-path production)))

  "Set `production` to `state`"
  [production state]
  (let [p (assoc production :state state)]
    (update! p)
    (when (:product_number p)
      ;; notify the erp of the status change
