 
 (defn fieldbook-add [event]
   (secretary/dispatch! "/fieldbook/add"))
-
 (defn render-fieldbook [fieldbooks]
   [:div
    [:div {:class "box"}

          [:th "Rack NUmber"]
          [:th "Starting Year"]
          [:th "Ending Year"]
          (when (is-admin-or-super-admin) [:th " "])
          (when (is-admin-or-super-admin) [:th " "])
          ]]
        [:tbody
         (doall (for [mt o2registers]
                  ^{:key (.-id mt)} [:tr
                                     [:td (.-serialnumber mt)]
                                     [:td (.-subdivisionname mt)]
                                     [:td (.-dateofinstitution mt)]

       [:table {:class "table table-bordered table-striped dataTable"}
        [:thead
         [:tr
          (when (is-admin-or-super-admin) [:th " "])
          (when (is-admin-or-super-admin) [:th " "])
          [:th "S.No"]
          [:th "Sub Division Name"]
          [:th "Date of Institution"]
