 (defn o2register-form-validator [data-set]
   (first (b/validate data-set
                      :serialnumber [[v/required :message "Field is required Must be number"]]
-                     :tehsil [[v/required :message "Field is required"]]
+                     :subdivisionname [[v/required :message "Field is required"]]
                      :dateofinstitution [[v/required :message "Field is required"]]
                      :sourceofreceipt [[v/required :message "Field is required"]]
                      :nameofthefirstparty [[v/required :message "Field is required"]]



(defn o6register-tags-template [data-set]
  (cond (nil? (:villageid @data-set)) [:select.form-control {:id "o6register-districts"}
                                       (for [d (get-value! :villages)]
                                         ^{:key (.-id d)} [:option {:value (.-id d)} (.-villagename d)])]
        :else [:select.form-control {:id "o6register-districts" :defaultValue (:villageid @data-set)}
               (doall (for [d (get-value! :villages)]
                        ^{:key (.-id d)} [:option {:value (.-id d)} (.-villagename d)]))]))

(defn o6register-input-select [label data-set focus]
  (let [input-focus (r/atom nil)]


(defn o6register-update-template [id dmt]
  (let [update-data (r/atom {:id (int id)
                             :o6number (.-o6number dmt)
                             :subdivisionname (.-subdivisionname dmt)
                             :year (.-year dmt)
                             :mehsilnumber (.-mehsilnumber dmt)
                             :dateoforderlevy (.-dateoforderlevy dmt)
