doseq_let_doseq.clj

(doseq [[printer {:keys [id sub-ids]}] {(partial println "sub1") {:id :A :sub-ids [11 12 13 14]}
                                        (partial println "sub2") {:id :B :sub-ids [21 22 23 24]}}]
  (let [id-str (name id)]
    (doseq [sub-id sub-ids]
      (printer id-str sub-id))))

;;; -output-
;;; sub1 A 11
;;; sub1 A 12
;;; sub1 A 13
;;; sub1 A 14
;;; sub2 B 21
;;; sub2 B 22
;;; sub2 B 23
;;; sub2 B 24