           [form-input-element :remarks "Remarks" "text" data-set focus]])])))
 
 
+
 (defn update-mutation-template [doc-name data-set focus save-function]
   [:div.container
    [:div.col-md-12

                                 :subdivisionid (.-id (.-subdivision dmt))
                                 :districtid (.-id (.-district dmt))
                                 :isactive true})
              focus (r/atom nil)]
        (fn []
          [add-mutation-template
           "Mutation Update Form"
           update-data
           focus
           #(update-form-onclick update-data focus)]))
        (if (= nil (.-senddate dmt))
          (let [update-data (r/atom {:id (int id)
                                     :mutationnumber (.-mutationnumber (.-numbers dmt))
                                     :nameofthefirstparty (.-nameofthefirstparty dmt)
                                     :nameofthesecondparty (.-nameofthesecondparty dmt)
                                     :dateofinstitution (.-dateofinstitution dmt)
                                     :nameofpo (.-nameofpo dmt)
                                     :dateofdecision (.-dateofdecision dmt)
                                     :title (.-title dmt)
                                     :khasranumber (.-khasranumber (.-numbers dmt))
                                     :khatakhatuninumber (.-khasranumber (.-numbers dmt))
                                     :area (.-area dmt)
                                     :o2number (.-o2number (.-numbers dmt))
                                     :o4number (.-o4number (.-numbers dmt))
                                     :o6number (.-o6number (.-numbers dmt))
                                     :racknumber (.-racknumber (.-numbers dmt))
                                     :senddate (.-senddate dmt)
                                     :receiveddate (.-receiveddate dmt)
                                     :remarks (.-remarks dmt)
                                     :villageid (.-id (.-village dmt))
                                     :subdivisionid (.-id (.-subdivision dmt))
                                     :districtid (.-id (.-district dmt))
                                     :isactive true})
                focus (r/atom nil)]
            (fn []
              [add-mutation-template
               "Mutation Update Form"
               update-data
               focus
               #(update-form-onclick update-data focus)]))
          (let [update-data (r/atom {:id (int id)
                                     :mutationnumber (.-mutationnumber (.-numbers dmt))
                                     :nameofthefirstparty (.-nameofthefirstparty dmt)
                                     :nameofthesecondparty (.-nameofthesecondparty dmt)
                                     :dateofinstitution (.-dateofinstitution dmt)
                                     :nameofpo (.-nameofpo dmt)
                                     :dateofdecision (.-dateofdecision dmt)
                                     :title (.-title dmt)
                                     :khasranumber (.-khasranumber (.-numbers dmt))
                                     :khatakhatuninumber (.-khasranumber (.-numbers dmt))
                                     :area (.-area dmt)
                                     :o2number (.-o2number (.-numbers dmt))
                                     :o4number (.-o4number (.-numbers dmt))
                                     :o6number (.-o6number (.-numbers dmt))
                                     :racknumber (.-racknumber (.-numbers dmt))
                                     :senddate (.-senddate dmt)
                                     :receiveddate (.-receiveddate dmt)
                                     :remarks (.-remarks dmt)
                                     :villageid (.-id (.-village dmt))
                                     :subdivisionid (.-id (.-subdivision dmt))
                                     :districtid (.-id (.-district dmt))
                                     :isactive true})
                focus (r/atom nil)]
            (fn []
              [update-mutation-template
               "Mutation Update Form"
               update-data
               focus
               #(update-form-onclick update-data focus)]))))))
  
(defn click-update[id]
  (secretary/dispatch! (str "/mutations/update/" id)))


(defn mutation-update-template [id dmt]
  (do
    (if (and (not= nil (.-senddate dmt)) (not= nil (.-receiveddate dmt)))
      (let [update-data (r/atom {:id (int id)
                                 :mutationnumber (.-mutationnumber (.-numbers dmt))
                                 :nameofthefirstparty (.-nameofthefirstparty dmt)
                                 :nameofthesecondparty (.-nameofthesecondparty dmt)
