diff --git a/fhem/FHEM/00_HMLAN.pm b/fhem/FHEM/00_HMLAN.pm
index 200415907..abc0c101e 100755
--- a/fhem/FHEM/00_HMLAN.pm
+++ b/fhem/FHEM/00_HMLAN.pm
@@ -170,6 +170,7 @@ sub HMLAN_Notify(@) {##########################################################
       HMLAN_Attr("set",$hash->{NAME},"logIDs",$aVal) if($aVal);
       delete $hash->{helper}{attrPend};
     }
+    HMLAN_writeAesKey($hash->{NAME});
   }
   elsif ($dev->{NAME} eq $hash->{NAME}){
     foreach (grep (m/CONNECTED$/,@{$dev->{CHANGED}})) { # connect/disconnect
diff --git a/fhem/FHEM/10_CUL_HM.pm b/fhem/FHEM/10_CUL_HM.pm
index 0e2e4bc46..d08060b26 100755
--- a/fhem/FHEM/10_CUL_HM.pm
+++ b/fhem/FHEM/10_CUL_HM.pm
@@ -2174,10 +2174,8 @@ sub CUL_HM_Parse($$) {#########################################################
       $mh{shash} = $modules{CUL_HM}{defptr}{$chId}
                              if($modules{CUL_HM}{defptr}{$chId});
       
-      push @evtEt,[$mh{shash},1,"energyTariff:" .($eUnit >> 4)         ];
-      push @evtEt,[$mh{shash},1,"energyUnit:"   .($eUnit        & 0xfe)];
-      push @evtEt,[$mh{shash},1,"powerTariff:"  .($pUnit >> 4         )];
-      push @evtEt,[$mh{shash},1,"powerSign:"    .(($pUnit >> 4) & 0xfe)];
+      push @evtEt,[$mh{shash},1,"energyTariff:" .(( $eUnit       & 0xfe)?(-1*($eUnit >> 4)):($eUnit >> 4))];
+      push @evtEt,[$mh{shash},1,"powerTariff:"  .((($pUnit >> 4) & 0xfe)?(-1*($pUnit >> 4)):($pUnit >> 4))];
       push @evtEt,[$mh{shash},1,"powerUnit:"    .(($pUnit     ) & 0xfe)];
       push @evtEt,[$mh{shash},1,"powerIEC:"     .($pIEC)               ];