      (producer-str producer-brief rucksackbuch-number)
      (producer-str producer-brief))
    (ausleihe library-signature)
-   (verkauf product-number price)))
+   (verkauf item)))
 
 (defmethod entry-str :musiknoten
   [{:keys [creator title subtitles name-of-part source-publisher
            source-date genre-text description producer-brief
-           library-signature product-number price] :as item}]
+           library-signature] :as item}]
   (join
    (entry-heading-str item)
    (description-str description)
    (producer-str producer-brief)
    (ausleihe library-signature)
-   (verkauf product-number price)))
+   (verkauf item)))
 
 (defmethod entry-str :taktilesbuch
   [{:keys [creator title subtitles name-of-part source-publisher
            source-date genre-text description producer-brief
-           library-signature product-number price] :as item}]
+           library-signature] :as item}]
   (join
    (entry-heading-str item)
    (description-str description)
    (producer-str producer-brief)
    (ausleihe library-signature)
-   (verkauf product-number price)))
+   (verkauf item)))
 
 (defmethod entry-str :hörbuch
   [{:keys [genre-text description duration narrators producer-brief
-           produced-commercially? library-signature product-number price] :as item}]
+           produced-commercially? library-signature
+           product-number price price-on-request?] :as item}]
   (join
    (entry-heading-str item)
    (genre-str genre-text)

  [{:keys [creator title subtitles name-of-part source-publisher
           source-date genre-text description producer-brief
           rucksackbuch? rucksackbuch-number
           library-signature product-number price] :as item}]
  (join
   (entry-heading-str item)
   (genre-str genre-text)

   (description-str description)
   (wrap game-description)
   (ausleihe library-signature)
   (verkauf item)))

(defn- level-str [items path path-to-numbers]
  (str
