mhop/fhem
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

76_SolarForecast: minor debug info change

Browse Source 
git-svn-id: https://svn.fhem.de/fhem/trunk@30149 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
DS_Starter
2025-07-24 20:25:33 +00:00
parent e7d1453484
commit aeac196b21
2 changed files with 14 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
fhem/CHANGED
View File

@@ -1,5 +1,6 @@
# Add changes at the top of the list. Keep it in ASCII, and 80-char wide.
# Do not insert empty lines here, update check depends on it
- change: 76_SolarForecast: minor debug info change
- feature: 76_SolarForecast: Version 1.54.4
- feature: 76_SolarForecast: ctrlDebug new collectData_long
- change: 76_SolarForecast: version 1.54.2, more debug info

18
fhem/FHEM/76_SolarForecast.pm
View File

@@ -160,6 +160,7 @@ BEGIN {
# Versions History intern
my %vNotesIntern = (
"1.54.5" => "24.07.2025 isAddSwitchOnCond/isAddSwitchOffCond: change debug info ",
"1.54.4" => "22.07.2025 replace length by new sub strlength, Consumer attr new key 'aliasshort', change code of medianArray ".
"medianArray: can optional use newest 3..20 elements, avgArray: use the newest elements if num is set ".
"Debug consumerSwitching: print out info message of compare operation, remove attr graphicShowDiff ".
@@ -641,6 +642,13 @@ my %svicons = ( #
'3' => 'message_attention@red', # Standard Mitteilungs-Icon 3 - Fehler / Problem
);
my %intrptcatic = ( # Unterbrechungscharakteristik
'0' => 'simple false',
'1' => 'simple true',
'2' => 'Code return true',
'3' => 'Code return false',
);
my %hset = ( # Hash der Set-Funktion
consumerImmediatePlanning => { fn => \&_setconsumerImmediatePlanning },
consumerNewPlanning => { fn => \&_setconsumerNewPlanning },
@@ -13131,7 +13139,7 @@ sub ___switchConsumerOn {
my $isintable = isInterruptable ($hash, $c, 0, 1); # mit Ausgabe Interruptable Info im Debug
if ($debug =~ /consumerSwitching${c}/x) {
Log3 ($name, 1, qq{$name DEBUG> consumer "$c" - Interrupt Characteristic value: $isintable});
Log3 ($name, 1, qq{$name DEBUG> consumer "$c" - Interrupt Characteristic value: $isintable -> $intrptcatic{$isintable}});
}
my $isConsRcmd = isConsRcmd ($hash, $c);
@@ -23074,12 +23082,12 @@ sub isAddSwitchOnCond {
}
if ($true) {
$info = qq{The value “$condval” resulted in 'true' after exec "$swoncode" \n};
$info = qq{The return value “$true” resulted in 'true' after exec "$swoncode" \n};
$info .= "-> Check successful ";
$swon = 1;
}
else {
$info = qq{The value “$condval” resulted in 'false' after exec "$swoncode" \n};
$info = qq{The return value “$true” resulted in 'false' after exec "$swoncode" \n};
$swon = 0;
}
}
@@ -23148,12 +23156,12 @@ sub isAddSwitchOffCond {
}
if ($true) {
$info = qq{The reference value “$condval” resulted in 'true' after exec "$swoffcode" \n};
$info = qq{The return value “$true” resulted in 'true' after exec "$swoffcode" \n};
$info .= "-> Check successful ";
$swoff = 1;
}
else {
$info = qq{The reference value “$condval” resulted in 'false' after exec "$swoffcode" \n};
$info = qq{The return value “$true” resulted in 'false' after exec "$swoffcode" \n};
$swoff = 0;
}
}