diff --git a/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue.patch b/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue.patch
index 3c57fe6ddf..9cb581381f 100644
--- a/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue.patch
+++ b/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue.patch
@@ -227,6 +227,28 @@
    append s "jQuery('#separate_CHANNEL\_$chn\_$prn').val(this.value / 100);\">"
  
    append s "<input id=$elemId type=\"text\" size=\"5\" class=\"hidden\" value=$value name=$param>"
+@@ -406,10 +419,18 @@
+   set select ""
+   foreach val [lsort -real [array names optionValues]] {
+ 
+-     if {$val == $value} {
+-      set select "selected=\"selected\""
++     if {[string is double -strict $value]} {
++       if {[expr abs($val - $value)] < 1e-15} {
++         set select "selected=\"selected\""
++       } else {
++         set select ""
++       }
+      } else {
+-      set select ""
++       if {$val == $value} {
++         set select "selected=\"selected\""
++       } else {
++         set select ""
++       }
+      }
+ 
+      append s "<option class=\"[extractParamFromTranslationKey $optionValues($val)]\" value=$val $select>$optionValues($val)</option>"
 --- occu/WebUI/www/config/easymodes/hm-cc-vg-1_master.tcl.orig
 +++ occu/WebUI/www/config/easymodes/hm-cc-vg-1_master.tcl
 @@ -24,7 +24,12 @@
diff --git a/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue/occu/WebUI/www/config/easymodes/etc/uiElements.tcl b/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
index cabbe46e39..fc757820c6 100755
--- a/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
+++ b/buildroot-external/patches/occu/0119-WebUI-Fix-ProofAndSetValue/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
@@ -419,10 +419,18 @@ proc getOptionBox {param options value chn prn {extraparam ""}} {
   set select ""
   foreach val [lsort -real [array names optionValues]] {
 
-     if {$val == $value} {
-      set select "selected=\"selected\""
+     if {[string is double -strict $value]} {
+       if {[expr abs($val - $value)] < 1e-15} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      } else {
-      set select ""
+       if {$val == $value} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      }
 
      append s "<option class=\"[extractParamFromTranslationKey $optionValues($val)]\" value=$val $select>$optionValues($val)</option>"
diff --git a/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl b/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
index 145f60192e..4ea51db2f4 100755
--- a/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
+++ b/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl
@@ -419,10 +419,18 @@ proc getOptionBox {param options value chn prn {extraparam ""}} {
   set select ""
   foreach val [lsort -real [array names optionValues]] {
 
-     if {$val == $value} {
-      set select "selected=\"selected\""
+     if {[string is double -strict $value]} {
+       if {[expr abs($val - $value)] < 1e-15} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      } else {
-      set select ""
+       if {$val == $value} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      }
 
      append s "<option class=\"[extractParamFromTranslationKey $optionValues($val)]\" value=$val $select>$optionValues($val)</option>"
diff --git a/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl.orig b/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl.orig
index cabbe46e39..fc757820c6 100755
--- a/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl.orig
+++ b/buildroot-external/patches/occu/0177-WebUI-Fix-EmptyHmIPWKPPIN/occu/WebUI/www/config/easymodes/etc/uiElements.tcl.orig
@@ -419,10 +419,18 @@ proc getOptionBox {param options value chn prn {extraparam ""}} {
   set select ""
   foreach val [lsort -real [array names optionValues]] {
 
-     if {$val == $value} {
-      set select "selected=\"selected\""
+     if {[string is double -strict $value]} {
+       if {[expr abs($val - $value)] < 1e-15} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      } else {
-      set select ""
+       if {$val == $value} {
+         set select "selected=\"selected\""
+       } else {
+         set select ""
+       }
      }
 
      append s "<option class=\"[extractParamFromTranslationKey $optionValues($val)]\" value=$val $select>$optionValues($val)</option>"