FHEM/fhem-mirror
2
0
Fork 0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00
Code Issues Releases Wiki Activity

77_SMAEM: contrib 3.3.0

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@19439 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
nasseeder1 2019-05-22 06:13:04 +00:00
parent 4f30e1c1c6
commit 011bae12a0
1 changed files with 7 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
fhem/contrib/DS_Starter/77_SMAEM.pm
View File

@ -331,8 +331,7 @@ sub SMAEM_DoParse ($) {
my $data = decode_base64($dataenc);
my $discycles = $hash->{HELPER}{FAULTEDCYCLES};
my $diffaccept = AttrVal($name, "diffAccept", 10);
my @row_array;
my @array;
my ($error,@row_array,@array);
Log3 ($name, 4, "SMAEM $name -> Start BlockingCall SMAEM_DoParse");
@ -343,7 +342,7 @@ sub SMAEM_DoParse ($) {
if($hash->{HELPER}{READFILEERROR}) {
my $retcode = SMAEM_getsum($hash,$smaserial);
if ($retcode) {
my $error = encode_base64($retcode,"");
$error = encode_base64($retcode,"");
Log3 ($name, 4, "SMAEM $name -> BlockingCall SMAEM_DoParse finished");
$discycles++;
return "$name|''|''|''|$error|$discycles|''";
@ -402,13 +401,13 @@ sub SMAEM_DoParse ($) {
# Zyklus verwerfen wenn Plausibilität nicht erfüllt
my $d = $bezug_wirk_count - $gridoutsum;
my $errtxt = "cycle discarded due to allowed diff GRIDOUT exceeding, diff: $d";
my $error = encode_base64($errtxt,"");
$error = encode_base64($errtxt,"");
Log3 ($name, 1, "SMAEM $name - $errtxt");
Log3 ($name, 4, "SMAEM $name -> BlockingCall SMAEM_DoParse finished");
$gridinsum = $einspeisung_wirk_count;
$gridoutsum = $bezug_wirk_count;
$discycles++;
return "$name|''|$gridinsum|$gridoutsum|''|$discycles|''";
return "$name|''|$gridinsum|$gridoutsum|$error|$discycles|''";
}
}
}
@ -433,13 +432,13 @@ sub SMAEM_DoParse ($) {
# Zyklus verwerfen wenn Plausibilität nicht erfüllt
my $d = $einspeisung_wirk_count - $gridinsum;
my $errtxt = "cycle discarded due to allowed diff GRIDIN exceeding, diff: $d";
my $error = encode_base64($errtxt,"");
$error = encode_base64($errtxt,"");
Log3 ($name, 1, "SMAEM $name - $errtxt");
Log3 ($name, 4, "SMAEM $name -> BlockingCall SMAEM_DoParse finished");
$gridinsum = $einspeisung_wirk_count;
$gridoutsum = $bezug_wirk_count;
$discycles++;
return "$name|''|$gridinsum|$gridoutsum|''|$discycles|''";
return "$name|''|$gridinsum|$gridoutsum|$error|$discycles|''";
}
}
}
@ -450,7 +449,7 @@ sub SMAEM_DoParse ($) {
# error while writing values to file
if ($retcode) {
my $error = encode_base64($retcode,"");
$error = encode_base64($retcode,"");
Log3 ($name, 4, "SMAEM $name -> BlockingCall SMAEM_DoParse finished");
$discycles++;
return "$name|''|''|''|$error|$discycles|''";