建立条款的地方?

时间:2018-02-09 11:11:12

标签: clojure korma sqlkorma

我希望能够为查询构建where子句。我想输入一个where数组的数组,并使用korma构建查询,如下所示:

(defn ^:private fetch-by
  "Append conditions to the query."
  [query ^clojure.lang.PersistentVector conditions]

  (for [condition conditions]
    (if (instance? clojure.lang.PersistentArrayMap condition)
      (korma/where query condition) query)))

但是,这里的for循环将复制查询对象。是否可以合并这些对象或您可以推荐的其他方法来实现所需的输出?

1 个答案:

答案 0 :(得分:1)

conditions合并到一个查询地图中的 可以使用reduce完成:

(defn ^:private fetch-by
  "Append conditions to the query."
  [query conditions]
  (->> (filter map? conditions)
       (reduce (fn [query condition]
                 (korma/where query condition))
               query)))

此处,您的初始reduce状态是您传入的query,并且reduce函数(和korma/where)负责将每个条件合并到查询映射中。

(-> (korma/select* :my-table)
    (fetch-by [{:active true}
               {:deleted false}])
    (korma/as-sql))
 => "SELECT \"my-table\".* FROM \"my-table\" WHERE (\"my-table\".\"active\" = ?) AND (\"my-table\".\"deleted\" = ?)"

然而,这与仅将具有多个条目的单个地图传递给korma/where

并没有什么不同
(-> (korma/select* :my-table)
    (korma/where {:active true
                  :deleted false})
    (korma/as-sql))

我建议只要条件的键是唯一的。