diff --git a/fhem/FHEM/98_vitoconnect.pm b/fhem/FHEM/98_vitoconnect.pm index 1f1e09f87..53b131258 100644 --- a/fhem/FHEM/98_vitoconnect.pm +++ b/fhem/FHEM/98_vitoconnect.pm @@ -176,11 +176,16 @@ # # 2020-11-26 Bugfix für einige "set"-Kommandos für HK2 und HK3 # +# 2020-12-21 Neue Readings "heating.power.production.current.status" => "Stromproduktion_aktueller_Status", +# "heating.power.production.current.value" => "Stromproduktion", +# "heating.sensors.power.output.status" => "Sensor_Stromproduktion_Status", +# "heating.sensors.power.output.value" => "Sensor_Stromproduktion" und +# "heating.circuits.X.operating.programs.Y.demand" => +# "HK(X+1)-Solltemperatur_Y_Anforderung" (X=0,1,2 und Y=normal,reduced,comfort) # # ToDo: timeout konfigurierbar machen # Attribute implementieren und dokumentieren -# mapping der Readings optional machen -# Mehrsprachigkeit +# Mehrsprachigkeit # Auswerten der Readings in getCode usw. # devices/0 ? Was, wenn es mehrere Devices gibt? # nach einem set Befehl Readings aktualisieren, vorher alten Timer löschen @@ -269,6 +274,8 @@ my $RequestList = { "HK1-Programmstatus", "heating.circuits.0.operating.programs.comfort.active" => "HK1-Solltemperatur_comfort_aktiv", + "heating.circuits.0.operating.programs.comfort.demand" => + "HK1-Solltemperatur_comfort_Anforderung", "heating.circuits.0.operating.programs.comfort.temperature" => "HK1-Solltemperatur_comfort", "heating.circuits.0.operating.programs.eco.active" => @@ -294,10 +301,14 @@ my $RequestList = { "heating.circuits.0.operating.programs.holiday.end" => "HK1-Urlaub_Ende", "heating.circuits.0.operating.programs.normal.active" => "HK1-Solltemperatur_aktiv", + "heating.circuits.0.operating.programs.normal.demand" => + "HK1-Solltemperatur_Anforderung", "heating.circuits.0.operating.programs.normal.temperature" => "HK1-Solltemperatur_normal", "heating.circuits.0.operating.programs.reduced.active" => "HK1-Solltemperatur_reduziert_aktiv", + "heating.circuits.0.operating.programs.reduced.demand" => + "HK1-Solltemperatur_reduziert_Anforderung", "heating.circuits.0.operating.programs.reduced.temperature" => "HK1-Solltemperatur_reduziert", "heating.circuits.0.operating.programs.summerEco.active" => @@ -350,6 +361,8 @@ my $RequestList = { "HK2-Programmstatus", "heating.circuits.1.operating.programs.comfort.active" => "HK2-Solltemperatur_comfort_aktiv", + "heating.circuits.1.operating.programs.comfort.demand" => + "HK2-Solltemperatur_comfort_Anforderung", "heating.circuits.1.operating.programs.comfort.temperature" => "HK2-Solltemperatur_comfort", "heating.circuits.1.operating.programs.eco.active" => @@ -375,10 +388,14 @@ my $RequestList = { "heating.circuits.1.operating.programs.holiday.end" => "HK2-Urlaub_Ende", "heating.circuits.1.operating.programs.normal.active" => "HK2-Solltemperatur_aktiv", + "heating.circuits.1.operating.programs.normal.demand" => + "HK2-Solltemperatur_Anforderung", "heating.circuits.1.operating.programs.normal.temperature" => "HK2-Solltemperatur_normal", "heating.circuits.1.operating.programs.reduced.active" => "HK2-Solltemperatur_reduziert_aktiv", + "heating.circuits.1.operating.programs.reduced.demand" => + "HK2-Solltemperatur_reduziert_Anforderung", "heating.circuits.1.operating.programs.reduced.temperature" => "HK2-Solltemperatur_reduziert", "heating.circuits.1.operating.programs.summerEco.active" => @@ -430,6 +447,8 @@ my $RequestList = { "HK3-Programmstatus", "heating.circuits.2.operating.programs.comfort.active" => "HK3-Solltemperatur_comfort_aktiv", + "heating.circuits.2.operating.programs.comfort.demand" => + "HK3-Solltemperatur_comfort_Anforderung", "heating.circuits.2.operating.programs.comfort.temperature" => "HK3-Solltemperatur_comfort", "heating.circuits.2.operating.programs.eco.active" => @@ -455,10 +474,14 @@ my $RequestList = { "heating.circuits.2.operating.programs.holiday.end" => "HK3-Urlaub_Ende", "heating.circuits.2.operating.programs.normal.active" => "HK3-Solltemperatur_aktiv", + "heating.circuits.2.operating.programs.normal.demand" => + "HK3-Solltemperatur_Anforderung", "heating.circuits.2.operating.programs.normal.temperature" => "HK3-Solltemperatur_normal", "heating.circuits.2.operating.programs.reduced.active" => "HK3-Solltemperatur_reduziert_aktiv", + "heating.circuits.2.operating.programs.reduced.demand" => + "HK3-Solltemperatur_reduziert_Anforderung", "heating.circuits.2.operating.programs.reduced.temperature" => "HK3-Solltemperatur_reduziert", "heating.circuits.2.operating.programs.summerEco.active" => @@ -641,6 +664,10 @@ my $RequestList = { "heating.power.consumption.total.year" => "Stromverbrauch_Total/Jahr", "heating.power.consumption.total.unit" => "Stromverbrauch_Total/Einheit", + "heating.power.production.current.status" => + "Stromproduktion_aktueller_Status", + "heating.power.production.current.value" => "Stromproduktion", + "heating.power.production.demandCoverage.current.unit" => "Stromproduktion_Bedarfsabdeckung/Einheit", "heating.power.production.demandCoverage.current.value" => @@ -690,6 +717,9 @@ my $RequestList = { "heating.sensors.pressure.supply.unit" => "Drucksensor_Vorlauf/Einheit", "heating.sensors.pressure.supply.value" => "Drucksensor_Vorlauf", + "heating.sensors.power.output.status" => "Sensor_Stromproduktion_Status", + "heating.sensors.power.output.value" => "Sensor_Stromproduktion", + "heating.sensors.temperature.outside.status" => "Aussen_Status", "heating.sensors.temperature.outside.statusWired" => "Aussen_StatusWired", "heating.sensors.temperature.outside.statusWireless" => @@ -1336,8 +1366,8 @@ sub vitoconnect_GetUpdate { } sub vitoconnect_getCode { - my ($hash) = @_; - my $name = $hash->{NAME}; + my ($hash) = @_; + my $name = $hash->{NAME}; my $isiwebpasswd = vitoconnect_ReadKeyValue( $hash, "passwd" ); my $param = { url => "$authorizeURL?client_id=$client_id" @@ -1778,7 +1808,7 @@ sub vitoconnect_action { ( my $err, my $msg ) = HttpUtils_BlockingGet($param); if ( $err ne "" || $msg ne "" ) { - Log3 $name, 1, "$name - set $name $opt @args: Fehler während der" + Log3 $name, 1, "$name - set $name $opt @args: Fehler während der " . "Befehlsausführung: $err :: $msg"; } else { Log3 $name, 3, "$name - set $name $opt @args"; }