Patch for Remote Management

Begonnen von spaceboy, 31 Dezember 2019, 10:51:28

Vorheriges Thema - Nächstes Thema

spaceboy

Hi,

here is a small patch for some Remote Management command result parsing

Thanks and Happy New Year

Petr


diff --git a/fhem/FHEM/10_EnOcean.pm b/fhem/FHEM/10_EnOcean.pm
index 6f0889a66..58b79ce99 100755
--- a/fhem/FHEM/10_EnOcean.pm
+++ b/fhem/FHEM/10_EnOcean.pm
@@ -12955,7 +12955,7 @@ sub EnOcean_Parse($$)
       $data = $2;
       while (length($data) > 0) {
         $data =~ m/^(..)(........)(..)(..)(..)(..)(.*)$/;
-        push @event, "3:remoteLinkTableDesc" . $direction . "$1:S2:S3-S4-$5:$6";
+        push @event, "3:remoteLinkTableDesc" . $direction . "$1:$2:$3-$4-$5:$6";
         $data = $7;
       }
       $remoteLastStatusReturnCode = '00';
@@ -13070,7 +13070,7 @@ sub EnOcean_Parse($$)
         $valueLen = hex($2) * 2;
         $data = $3;
         $data =~ m/^(.{$valueLen})(.*)$/;
-        push @event, "3:remoteDevCfg$idx:S1";
+        push @event, "3:remoteDevCfg$idx:$1";
         $data = $2;
       }
       $remoteLastStatusReturnCode = '00';
@@ -13093,7 +13093,7 @@ sub EnOcean_Parse($$)
         $valueLen = hex($2) * 2;
         $data = $3;
         $data =~ m/^(.{$valueLen})(.*)$/;
-        push @event, "3:remoteLinkCfg$direction$linkTableIdx:$idx:S1";
+        push @event, "3:remoteLinkCfg$direction$linkTableIdx:$idx:$1";
         $data = $2;
       }
       $remoteLastStatusReturnCode = '00';

klaus.schauer

Thank you for the comment. I will change the program lines.