mirror of
https://github.com/fhem/fhem-mirror.git
synced 2025-05-04 22:19:38 +00:00
statistics: bugfix
git-svn-id: https://svn.fhem.de/fhem/trunk@8985 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
parent
b14085a87b
commit
f67762e3d5
@ -608,18 +608,18 @@ sub statistics_doStatisticTendency ($$$)
|
|||||||
@stat = split / /, "1h: - 2h: - 3h: - 6h: -";
|
@stat = split / /, "1h: - 2h: - 3h: - 6h: -";
|
||||||
statistics_Log $hash,4,"Initializing statistic of '$hiddenReadingName'.";
|
statistics_Log $hash,4,"Initializing statistic of '$hiddenReadingName'.";
|
||||||
$hash->{READINGS}{$hiddenReadingName}{VAL} = "";
|
$hash->{READINGS}{$hiddenReadingName}{VAL} = "";
|
||||||
} else {
|
}
|
||||||
|
else {
|
||||||
@stat = split / /, $dev->{READINGS}{$statReadingName}{VAL};
|
@stat = split / /, $dev->{READINGS}{$statReadingName}{VAL};
|
||||||
}
|
}
|
||||||
|
|
||||||
my $result = $value;
|
|
||||||
statistics_Log $hash, 4, "Add $value to $hiddenReadingName";
|
statistics_Log $hash, 4, "Add $value to $hiddenReadingName";
|
||||||
|
my $result = $value;
|
||||||
if (exists ($hash->{READINGS}{$hiddenReadingName}{VAL})) { $result .= " " . $hash->{READINGS}{$hiddenReadingName}{VAL}; }
|
if (exists ($hash->{READINGS}{$hiddenReadingName}{VAL})) { $result .= " " . $hash->{READINGS}{$hiddenReadingName}{VAL}; }
|
||||||
@hidden = split / /, $result; # Internal values
|
@hidden = split / /, $result; # Internal values
|
||||||
|
|
||||||
# determine decPlaces with stored values
|
# determine decPlaces with stored values
|
||||||
foreach (@hidden)
|
foreach (@hidden) {
|
||||||
{
|
|
||||||
$decPlaces = statistics_maxDecPlaces($_, $decPlaces);
|
$decPlaces = statistics_maxDecPlaces($_, $decPlaces);
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -640,9 +640,9 @@ sub statistics_doStatisticTendency ($$$)
|
|||||||
if ($singularReadings ne "") {
|
if ($singularReadings ne "") {
|
||||||
# statistics_storeSingularReadings $hashName,$singularReadings,$dev,$statReadingName,$readingName,$statType,$period,$statValue,$lastValue,$saveLast
|
# statistics_storeSingularReadings $hashName,$singularReadings,$dev,$statReadingName,$readingName,$statType,$period,$statValue,$lastValue,$saveLast
|
||||||
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","1h",$stat[1],0,0);
|
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","1h",$stat[1],0,0);
|
||||||
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","2h",$stat[1],0,0);
|
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","2h",$stat[3],0,0);
|
||||||
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","3h",$stat[1],0,0);
|
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","3h",$stat[5],0,0);
|
||||||
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","6h",$stat[1],0,0);
|
statistics_storeSingularReadings ($name,$singularReadings,$dev,$statReadingName,$readingName,"Tendency","6h",$stat[7],0,0);
|
||||||
}
|
}
|
||||||
|
|
||||||
$result = join( " ", @hidden );
|
$result = join( " ", @hidden );
|
||||||
@ -888,6 +888,8 @@ sub statistics_doStatisticDuration ($$$$)
|
|||||||
statistics_doStatisticDurationSingle $hash, $dev, $readingName, "Day", $state, ($periodSwitch >= 2 || $periodSwitch <= -2);
|
statistics_doStatisticDurationSingle $hash, $dev, $readingName, "Day", $state, ($periodSwitch >= 2 || $periodSwitch <= -2);
|
||||||
# Monthly Statistic
|
# Monthly Statistic
|
||||||
statistics_doStatisticDurationSingle $hash, $dev, $readingName, "Month", $state, ($periodSwitch >= 3 || $periodSwitch <= -3);
|
statistics_doStatisticDurationSingle $hash, $dev, $readingName, "Month", $state, ($periodSwitch >= 3 || $periodSwitch <= -3);
|
||||||
|
# Yearly Statistic
|
||||||
|
statistics_doStatisticDurationSingle $hash, $dev, $readingName, "Year", $state, ($periodSwitch == 4 || $periodSwitch == -4);
|
||||||
|
|
||||||
return ;
|
return ;
|
||||||
|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user