 (defn senddate-validator [data-set]
   (first (b/validate data-set
                      :senddate [[v/required :message "Field is required"]
-                                [year-after? :message "Year must greater than 1900"]
-                                [year-before? :message "Year must less than 9999"]])))
+                                [date-year-after? :message "Year must greater than 1900"]
+                                [date-year-before? :message "Year must less than 9999"]])))
 
 (defn add-check-input-element [id label data-set focus bool]
   (let [check (r/atom true)

       [consolidation-input-select "Village Name" data-set focus ]
       [consolidation-input-row :subdivisionname "Sub Division Name" "text" data-set focus]
       [consolidation-input-row :tehsil "Tehsil" "text" data-set focus]
       [consolidation-input-row :year "Year" "date" data-set focus]
       [consolidation-input-row :racknumber "Rack Number" "text" data-set focus]
       [consolidation-input-row :description "Description" "text" data-set focus]
       [:div.box-footer
        [:div.col-sm-8.col-md-offset-5 
         [button-tool-bar
          [button {:bs-style "success" :on-click save-function} "Save"]
          [button {:bs-style "danger" :on-click consolidation-form-cancel } "Cancel"]]]


(defn o6register-update-template [id dmt]
  (let [update-data (r/atom {:id (int id)
                             :o6number (.-o6number dmt)
                             :subdivisionname (.-subdivisionname dmt)
                             :year (.-year dmt)
                             :misalnumber (.-misalnumber dmt)
                             :startingdate (.-startingdate dmt)
                             :endingdate (.-endingdate dmt)
                             :racknumber (.-racknumber dmt)
                             :description (.-description dmt)
                             })
        focus (r/atom nil)]
    (fn [] [o6register-template
           "O6 Register Update Form"
