          (om/build occupancy-row profiles)
          (om/build measurements-row profiles)
          (om/build energy-row profiles)
-         (om/build efficiency-row profiles)]
-        ;; (om/build flats profiles)
-        ;; (om/build firepalces profiles)
-        ;; (om/build glazing profiles)
-        ;; (om/build issues profiles)
-        ;; (om/build sap-results profiles)
-        ;; (om/build documents profiles)
-        ;; (om/build co-heating profiles)
-        ;; (om/build air-tightness profiles)
-        ;; (om/build conservatories profiles)
-        ;; (om/build extensions profiles)
-        ;; (om/build heating-systems profiles)
-        ;; (om/build hot-water-systems profiles)
-        ;; (om/build storeys profiles)
-        ;; (om/build walls profiles)
-        ;; (om/build roofs profiles)
-        ;; (om/build window-types profiles)
-        ;; (om/build door-types profiles)
-        ;; (om/build floors profiles)
-        ;; (om/build roof-rooms profiles)
-        ;; (om/build low-energy-lights profiles)
-        ;; (om/build ventilation-systems profiles)
-        ;; (om/build photovoltaic-panels profiles)
-        ;; (om/build solar-thermal-panels profiles)
-        ;; (om/build wind-turbines profiles)
-        ;; (om/build small-hydro-plants profiles)
-        ;; (om/build heat-pumps profiles)
-        ;; (om/build biomass-boilers profiles)
-        ;; (om/build mCHP-systems profiles)
-        ])))
+         (om/build efficiency-row profiles)
+         (om/build flats-row profiles)
+         ;; (om/build firepalces profiles)
+         ;; (om/build glazing profiles)
+         ;; (om/build issues profiles)
+         ;; (om/build sap-results profiles)
+         ;; (om/build documents profiles)
+         ;; (om/build co-heating profiles)
+         ;; (om/build air-tightness profiles)
+         ;; (om/build conservatories profiles)
+         ;; (om/build extensions profiles)
+         ;; (om/build heating-systems profiles)
+         ;; (om/build hot-water-systems profiles)
+         ;; (om/build storeys profiles)
+         ;; (om/build walls profiles)
+         ;; (om/build roofs profiles)
+         ;; (om/build window-types profiles)
+         ;; (om/build door-types profiles)
+         ;; (om/build floors profiles)
+         ;; (om/build roof-rooms profiles)
+         ;; (om/build low-energy-lights profiles)
+         ;; (om/build ventilation-systems profiles)
+         ;; (om/build photovoltaic-panels profiles)
+         ;; (om/build solar-thermal-panels profiles)
+         ;; (om/build wind-turbines profiles)
+         ;; (om/build small-hydro-plants profiles)
+         ;; (om/build heat-pumps profiles)
+         ;; (om/build biomass-boilers profiles)
+         ;; (om/build mCHP-systems profiles)
+         ]])))
   
   )
 

    om/IRenderState
    (render-state [_ state]
      (html
       [:div.col-md-12
        (for [profile profiles]
          (let [category (get-in profile [:profile_data :category] "Intervention")
                timestamp (format-time-inst  (:timestamp profile) "yyyy-MM-dd")]

               (text-control profile_data state owner :electricity_storage_present "Electricity Storage Present")
               (text-control profile_data state owner :heat_storage_present "Heat Storage Present")])]))]))))

(defn efficiency-row [profiles owner]
  (reify
    om/IRenderState
    (render-state [_ state]
      (html
       [:div.col-md-12
        (for [profile profiles]
          (let [profile_data (:profile_data profile)]
            [:div {:class (profile-column-width)}
             (bs/panel
              "Efficiency"
              [:div
               (text-control profile_data state owner :pipe_lagging "Pipe Lagging")
               (text-control profile_data state owner :draught_proofing  "Draught Proofing")
               (text-control profile_data state owner :draught_proofing_location  "Draught Proofing Location")])]))]))))

(defn flats-row [profiles owner]
  (reify
    om/IRenderState
    (render-state [_ state]
      (html
       [:div.col-md-12
        (for [profile profiles]
          (let [profile_data (:profile_data profile)]
            [:div {:class (profile-column-width)}
             (bs/panel
              "Flats"
              [:div
               (text-control profile_data state owner :flat_floors_in_block "Floors In Block")
               (text-control profile_data state owner :flat_floor_position "Floor Position")
               (text-control profile_data state owner :flat_heat_loss_corridor "Heat Loss Corridor")
               (text-control profile_data state owner :flat_heat_loss_corridor_other "Heat Loss Corridor Other")
               (text-control profile_data state owner :flat_length_sheltered_wall "Length of Sheltered Wall (m)")
               (text-control profile_data state owner :flat_floor_heat_loss_type "Floor Heat Loss Type")])]))]))))


(defn profile-rows [profiles owner]
