FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-04-19 06:36:04 +00:00
Code Issues Releases Wiki Activity

47_OBIS: Removed "substr outside of string at ./FHEM/47_OBIS.pm line 791"-Error in SML-Routine

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@14235 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
Icinger 2017-05-09 19:24:14 +00:00
parent 6d403cd155
commit 0c8d9cc93c
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
fhem/FHEM/47_OBIS.pm
View File

@ -505,6 +505,8 @@ sub OBIS_Parse($$)
my $chan=$3+0 > 0 ? "_Ch$3" : "";
if (AttrVal($name,"ignoreUnknown","off") eq "off" || $L ne $channel) {
if($1==1) {
Log3($hash,4,"Set ".$L.$chan." to ".((looks_like_number($3) ? $5+0 : $5) +AttrVal($name,"offset_energy",0)));
readingsBulkUpdate($hash, $L.$chan ,(looks_like_number($3) ? $5+0 : $5) +AttrVal($name,"offset_energy",0).(AttrVal($name,"unitReadings","off") eq "off"?"":" $6"));
} elsif ($1==2) {
readingsBulkUpdate($hash, $L.$chan ,(looks_like_number($3) ? $5+0 : $5) +AttrVal($name,"offset_feed",0).(AttrVal($name,"unitReadings","off") eq "off"?"":" $6"));
@ -786,9 +788,12 @@ sub OBIS_decodeTL($){
$msgLength-=1;
}
$msgLength-=1;
my $valu=substr($msg,0,$msgLength*2);
$tmp.=$valu;
my $valu;
if (length($msg)>$msgLength*2) {
$valu=substr($msg,0,$msgLength*2);
$tmp.=$valu;
$msg=substr($msg,$msgLength*2);
}
# Log 3," Split Msg: $tmp $msg";
return $msgLength,$msgType,$valu,$msg,$tmp;
};