0

我的数据库已经满了

(def fixtures [
  [:db/add 0 :system/group :all]

  {
  :product/name "Donut Keurig"
  :product/category "snack"
  :product/brand "Grocery&GourmetFood"
  :product/height "2.1"
  :product/width "3.2"
  :product/notes "The Original Donut Shop Keurig Single-Serve K-Cup Pods, Regular Medium Roast Coffee"
  }

  {
  :product/name "Ferrero Rocher Hazelnut Chocolates"
  :product/category "Candy"
  :product/brand "Candy&Chocolate"
  :product/height "3.4"
  :product/width "2"
  :product/notes "A tempting combination of smooth chocolaty cream surroiunding a whole hazelnut within a delciate, crisp wafer all enveloped in milk chocolate and finely chopped hazelnuts"
  }
  ])

(def conn (d/transact! conn u/fixtures))

但告诉我这个错误：

未捕获的错误：断言失败：（conn？conn）在 Function.datascript.core.transact_BANG_.cljs$core$IFn$_invoke$arity$3

此外，我想像这样显示数据库的结果：

(defmulti read om/dispatch)

(defmethod read :product/name
  [{:keys [state query]} _ _]
  {:value (d/q '[:find [(pull ?e ?selector) ...]
                 :in $ ?selector
                 :where [?e :product/name]]
            (d/db state) query)})

(defui product-view
  static om/IQuery
  (query [this] [{:product/name [:db/id :product/name]}])
  Object
    (render [this]
      (let [{:keys [product/name] :as entity}
            (get-in (om/props this) [:product/name ""])]
        (dom/tr nil
          (dom/td nil name)))))

(defui products-view
  static om/IQuery
  (query [this] [{:product/name [:db/id :product/name]}])
  Object
    (render [this]
      (dom/table #js {:className "table table-bordered"}
        (dom/thead nil
          (dom/tr #js {:className "row-garden"}
            (dom/th nil "Product Name")
            (dom/th nil "Category")
            (dom/th nil "Brand")
            (dom/th nil "Height")
            (dom/th nil "Width")
            (dom/th nil "Notes")))
        (dom/tbody
          (let [{:keys [product/name] :as entity}
            (get-in (om/props this) [:product/name ""])]
            (println conn)
             (dom/tr nil
              (dom/td nil name)))))))

(om/add-root!
  reconciler
  products-view
  (gdom/getElement "table-products"))

但不起作用:(

谢谢！

4

2 回答 2

1

DataScript 的作者在这里。

首先，交易！返回交易报告，而不是连接。它改变conn作为参数传入的内容：

(def conn (d/create-conn schema))
...
(d/transact! conn u/fixtures)

其次，您不能在查询中使用动态绑定的拉取模式。使用普通的拉取 API：

(let [db     (d/db state)
      datoms (d/datoms db :aevt :product/name)
      eids   (map :e datoms)]
  (d/pull-many db query eids))

不幸的是，我无法帮助您完成 Om.Next 部分。如果有任何错误，我不会知道。

希望能帮助到你。

于 2017-03-19T09:41:36.380 回答
0

看起来您没有正确初始化 Datascript 连接。请参阅此问题中的 DataScript 示例解决方案。您的代码应遵循此模型：

(ns clj.core
  (:require [tupelo.core :as t] 
            [datascript.core :as d]
            [clojure.set :as set] ))
(t/refer-tupelo)

(def data
  [ {:type :x :local/id 1,   :obs/A "11",    :obs/value 2.0,    :obs/color "yellow"}
    {:type :x :local/id 2,   :obs/A "12",    :obs/value 4.0,    :obs/color "blue"}
    {:type :x :local/id 3,   :obs/A "13",    :obs/value 3.0,    :obs/color "green"}
    {:type :x :local/id 3,   :obs/A "15",    :obs/value 7.0,    :obs/color "red"} 

    {:type :y :local/id 2,   :obs/A "11",    :obs/value 7.0,    :obs/shape "square"}
    {:type :y :local/id 2,   :obs/A "13",    :obs/value 4.0,    :obs/shape "circle"}
    {:type :y :local/id 6,   :obs/A "15",    :obs/value 3.0,    :obs/shape "triangle"} ] )

(def conn (d/create-conn {}))
(d/transact! conn data)
 .....
于 2017-03-19T07:01:04.647 回答