                   [:tr
                    (when (is-admin-or-super-admin)
                      [:td [button {:bs-style "success"
-                                   :on-click  #(o4register-update(.-id mt))} "Update"]]) 
+                                   :on-click  #(o4register-update(.-id mt))} "Update"]])
                    (when (is-admin-or-super-admin)
                      [:td  [button {:bs-style "danger"
                                     :on-click #(o4register-delete(.-id mt))} "Delete"]])
+                   [:td (.-serialnumber mt)]
+                   [:td (.-o4number mt)]
                    [:td (.-subdivisionname mt)]
-                   [:td (.-khatakhatuninumber mt)]
-                   [:td (.-numberanddateoforder mt)]
-                   [:td (.-khasranumber mt)]
-                   [:td (.-area mt)]
-                   [:td (.-revenuerentofshareofplotstransferred mt)]
-                   [:td (.-nameanddescriptionofthepersonsremoved mt)]
+                   [:td (.-villagename mt)]
+                   [:td (.-racknumber mt)]
+                   [:td (.-description mt)]
                    ]))]]]
        [:div.col-sm-6.col-md-offset-5 [shared-state 0]]]]])
 

(defn o4register-update-template [id dmt]
  (let [update-data (r/atom {:id (int id)
                             :o4number (.-o4number dmt)
                             :subdivisionname (.-subdivisionname dmt)
                             :khatakhatuninumber (.-khatakhatuninumber dmt)
                             :numberanddateoforder (.-numberanddateoforder dmt)
                             :khasranumber (.-khasranumber dmt)
                             :area (.-area dmt)
                             :revenuerentofshareofplotstransferred (.-revenuerentofshareofplotstransferred dmt)
                             :nameanddescriptionofthepersonsremoved (.-nameanddescriptionofthepersonsremoved dmt)
                             :villagename (.-villagename dmt)
                             :mutationid (.-mutationid dmt)
                             })
        focus (r/atom nil)]
    (fn [] [o4register-template

                     :title [[v/required :message "Field is required"]]
                     :remarks [[v/required :message "Field is required"]]
                     :dispatcheddate [[v/required :message "Field is required"]
                                      [date-year-after? :message "Year must greater than 1900"]
                                      [date-year-before? :message "Year must less than 9999"]])))

(defn misc-receiveddate-validator [data-set]
  (first (b/validate data-set
                     :receiveddate [[v/required :message "Field is required"]
                                    [date-year-after? :message "Year must greater than 1900"]
                                    [date-year-before? :message "Year must less than 9999"]])))

(defn misc-input-element [id ttype data-set placeholder in-focus bool]
  [:input.form-control {:id id
