      [:div.form-horizontal
       [:div.box-body
        [o4register-input-int-row :serialnumber "Serial Number" "text" data-set focus ]
-       [o4-form-o4num-sel "O4 Number" :o4number (:o4mutations @storage) data-set]
+       [o4register-input-row :o4number "O4 Number" "text" data-set focus]
        [o4-form-sub-sel "Sub Division Name" :subdivisionid (:subdivisions @storage) data-set]
        [o4-form-villages-sel "Village Name" :villageid (:villages @storage) data-set]
        [o4register-input-row :racknumber "Rack Number" "text" data-set focus]

     ^{:key  d}
     [:option {:value d} d])])


(defn o2-form-o2num-sel [label id opt-data data-set]
  [:div.form-group
   [:label.col-sm-3.control-label label]
   [:div.col-sm-6 [o2num-sel-tag id opt-data data-set]]
   [:div.col-sm-3 [:div]]])

(defn o2-subdiv-sel-tag [id data data-set ]
  [:select.form-control {:id id

      [:h2.box-title doc-name]]
     [:div.form-horizontal
      [:div.box-body
       [o6register-input-row :o6number  "O6 Number" "text" data-set focus]
       [o6register-input-int-row :year "Year" "text" data-set focus]
       [o6register-input-row :misalnumber "Misal Number" "text" data-set focus]
       [o6register-input-row :startingdate "Starting Date" "date" data-set focus]
