Heating_Control_SetAllTemps geht auf inactive

[Otto]

Hallo,

ich habe einige Profile die ich mit einer Funktion an und aus schalte.
Nach einem

Code Auswählen Erweitern

{Heating_Control_SetAllTemps()} gehen alle HC auf inactive.

Code Auswählen Erweitern

define HC_AZ_Winter Heating_Control Heiz_AZ_ClimRT_tr 12345|05:30|22 67|06:00|22 12345|11:30|20 12345|16:30|22 12345|21:00|16 67|23:00|16 (heizungAnAus($we, "Winter"))
attr HC_AZ_Winter verbose 5
attr HC_AZ_Winter group Thermostat
attr HC_AZ_Winter room 01_Heizung
define HC_AZ_Uebergang Heating_Control Heiz_AZ_ClimRT_tr 12345|06:00|20 67|07:00|20 12345|08:30|17 12345|17:00|20 12345|21:00|16 67|22:00|16 (heizungAnAus($we, "Uebergang"))
attr HC_AZ_Uebergang verbose 5
attr HC_AZ_Uebergang group Thermostat
attr HC_AZ_Uebergang room 01_Heizung
define HC_AZ_Home Heating_Control Heiz_AZ_ClimRT_tr 06:00|20 08:30|17 19:00|22 22:00|16 (heizungAnAus($we, "Weg"))
attr HC_AZ_Home verbose 5
attr HC_AZ_Home group Thermostat
attr HC_AZ_Home room 01_Heizung

Code Auswählen Erweitern

sub heizungAnAus ($$) {
   my ($we, $Para) = @_;
#{Log 1, "Werte übergeben: $we, $Para"}

   my $state1 = ReadingsVal("SommerWinter", "state", "Off");
   my $state2 = ReadingsVal("Heizung", "state", "Off");
   my $state3 = ReadingsVal("HomeStatus1", "state", "Off");
   
    #{Log 1, "Werte State: $state1 $state2 $state3"}

if ( $Para eq $state1 )  { #Übergabewert gleich SommerWinter Status
   {return 1;  }  #An
} else
   # Anweisung fuer alle anderen Faelle
   {return 0; }  #Aus

}

Code Auswählen Erweitern

define SommerWinter dummy
attr SommerWinter group Zustand
attr SommerWinter room 04_Sonstige,System
attr SommerWinter webCmd Sommer:Winter:Uebergang
attr SommerWinter setList state:Sommer:Winter:Uebergang

define SommerWinterStatus1 notify SommerWinter:Sommer {fhem ("set Heizung Aus;; set Steckdose0 off") }
define SommerWinterStatus2 notify SommerWinter:Winter {fhem ("set Heizung An;; set Steckdose0 on") }
define SommerWinterStatus3 notify SommerWinter:Uebergang {fhem ("set Heizung An;; set Steckdose0 on") }

Code Auswählen Erweitern

define HeizStatus2 notify Heizung:An                          {Heating_Control_SetAllTemps()}


Weiss nicht mehr weiter

Gruß Otto

[Dietmar63]

Bastel' mal weitere Logs in die Funktion in heizungAnAus(), insbesondere kurz vor die retruns.
Dann veröffentliche mal das Protokoll.

[Otto]

Hallo,
ich kämpfe schon länger mit der Funktion und logs hatte ich auch schon einige drin. Die Funktion läuft auch sauber und die returns sind richtig.

Bei einem rereadcfg ist auch alles richtig.

Und was mir jetzt aufgefallen ist: ein {Heating_Control_SetAllTemps()} aktualisiert nur die HC ohne Funktion "heizungAnAus"
Dann ist der Fehler doch bei der Funktion, nur wo

{(heizungAnAus($we, "Winter"))} ergibt auch 1
{(ReadingsVal("Heizung", "state", "Aus") eq "An")} ergibt 1

Wie teste ich weiter?

Code Auswählen Erweitern

sub heizungAnAus ($$) {
   my ($we, $Para) = @_;
#{Log 1, "Werte übergeben: $we, $Para"}

   my $state1 = ReadingsVal("SommerWinter", "state", "Off");
   my $state2 = ReadingsVal("Heizung", "state", "Off");
   my $state3 = ReadingsVal("HomeStatus1", "state", "Off");
   
    {Log 1, "Werte State: $state1 $state2 $state3"}

if ( $Para eq $state1 )  { #Übergabewert gleich SommerWinter Status
   { Log 3,("IF AN");
   return 1;    #An
   }
} else
   # Anweisung fuer alle anderen Faelle
   { Log 3,("IF AUS");
   return 0;  #Aus
}   

}

Gruß Otto

[Dietmar63]

Kannst du den output mal zur Verfügung stellen.
Auf dem ersten Blick sehe ich auch nicht woran es liegt.

[Otto]

Hallo Dietmar,

was für ein Output willst du haben?

habe mal auf "gobal verbose 5" gestellt, aber die Ausbeute ist nicht si toll, oder?

Code Auswählen Erweitern

2014.12.05 12:40:22 4: HTTP FHEMWEB:192.168.15.202:51880 GET /fhem&room=01_Heizung&cmd=%7BheizungAnAus%28%24we%2C+%22Winter%22+%29%7D
2014.12.05 12:40:22 5: Cmd: >{heizungAnAus($we, "Winter" )}<
2014.12.05 12:40:22 1: Werte State: Winter Off Off
2014.12.05 12:40:22 3: IF AN
2014.12.05 12:40:22 4: /fhem&room=01_Heizung&cmd=%7BheizungAnAus%28%24we%2C+%22Winter%22+%29%7D / RL:1173 / text/html; charset=UTF-8 / Content-Encoding: gzip
/
2014.12.05 12:40:22 4: Connection closed for FHEMWEB:192.168.15.202:51872

2014.12.05 12:40:35 4: HTTP FHEMWEB:192.168.15.202:51876 GET /fhem&room=01_Heizung&cmd=%7BHeating_Control_SetAllTemps%28%29%7D
2014.12.05 12:40:35 5: Cmd: >{Heating_Control_SetAllTemps()}<
2014.12.05 12:40:35 5: Triggering HC_AZ_Test (1 changes)
2014.12.05 12:40:35 5: Notify loop for HC_AZ_Test inactive
2014.12.05 12:40:35 3: Heating_Control_SetAllTemps() done!

Gruß Otto

[optimizer]

Hallo zwar nicht das gleiche Thema aber ähnlich
Heating_Control_SetAllTemps bringt beim Ausschalten der Absenkzeit (lt. Wiki) folgendes (no switch in yesterday....):

Code Auswählen Erweitern

2014.12.05 16:52:53 5: [HCBuero] list of senors found: 'HCBuero'
2014.12.05 16:52:53 4: [HCBuero] 05.12.2014 13:36:00 ; aktParam: 0 ; newParam: 17
2014.12.05 16:52:53 4: [HCBuero] is not disabled
2014.12.05 16:52:53 5: [HCBuero] no switch in the yesterdays because of the devices type(FBH_Buero is not a heating).
2014.12.05 16:52:53 4: [HCBuero] Next switch 05.12.2014 19:00:00
2014.12.05 16:52:53 5: [HCBuero] removing Timer: HCBuero_Update
2014.12.05 16:52:53 5: [HCBuero] setting  Timer: HCBuero_Update 05.12.2014  19:00:00
2014.12.05 16:52:54 3: Heating_Control_Update() for HCBuero done!
2014.12.05 16:52:54 3: Heating_Control_SetAllTemps() done!

Die Temperatur wird nicht umgeschaltet, obwohl die Meldung "Heating_Control_Update() for HCBuero done!" kommt.

Eine Bitte noch an Dietmar: Könnte man neben

Code Auswählen Erweitern

set <device> (desired-temp|desiredTemerature) <temp> auch noch set ... "desired" erlauben? Damit wäre es in Verbindung mit THRESHOLD devices etwas leichter.
Gruß
Karlheinz

[Dietmar63]

@ Otto:
so etwas bräuchte ich. verbose auf 5 setzen und die Definition einmal bestätigen:

Code Auswählen Erweitern


2014.12.06 15:21:08 5: [HeizungKueche_we] setting  Timer: HeizungKueche_we_Update 06.12.2014  19:00:00
2014.12.06 15:21:08 5: [HeizungKueche_we] removing Timer: HeizungKueche_we_Update
2014.12.06 15:21:08 4: [HeizungKueche_we] Next switch 06.12.2014 19:00:00
2014.12.06 15:21:08 4: [HeizungKueche_we] is not disabled
2014.12.06 15:21:08 4: [HeizungKueche_we] 06.12.2014 13:15:00 ; aktParam: 20.0 ; newParam: 20.0
2014.12.06 15:21:08 5: [HeizungKueche_we] list of senors found: 'HeizungKueche_we'
2014.12.06 15:21:07 5: [HeizungKueche_we] setting  Timer: HeizungKueche_we_Update 06.12.2014  15:21:08
2014.12.06 15:21:07 5: [HeizungKueche_we] removing Timer: HeizungKueche_we_Update
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 19:00|16 : so,mo,di,mi,do,fr,sa -> 19:00 -> 16
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 13:15|20 : so,mo,di,mi,do,fr,sa -> 13:15 -> 20
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 12:00|22 : so,mo,di,mi,do,fr,sa -> 12:00 -> 22
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 09:00|19 : so,mo,di,mi,do,fr,sa -> 09:00 -> 19
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 07:30|22 : so,mo,di,mi,do,fr,sa -> 07:30 -> 22
2014.12.06 15:21:07 5: [HeizungKueche_we] Switchingtime: 06:45|25 : so,mo,di,mi,do,fr,sa -> 06:45 -> 25


[Dietmar63]

@optimizer:

wie hast du das Gerät FBH_Buero definiert?
HC erkennt standardmäßig einige gängige Heizugnen: MAX, FS20 HM und EnOcean.

Threshold ist erst einmal keine Heizung, und wird deshalb zum Zeitpunkt einer Definition nicht geschaltet, zumla die dahinterliegende Heizung/Gerät immer etwas anderes sein kann.

Eine Bitte noch an Dietmar: Könnte man neben
Code: [Auswählen]

set <device> (desired-temp|desiredTemerature) <temp>

auch noch set ... "desired" erlauben? Damit wäre es in Verbindung mit THRESHOLD devices etwas leichter.
Gruß
Karlheinz

Was stellst du dir da vor? HC versteht kein desired-temp|desiredTemerature. Es kann teilweise die dahinter liegende Heizung erkennen und den passenden Befehl ausführen. Wenn eine unbekannte Heizung geschaltet werden soll, kann man den Befehl als Perlausdruck beliebig anhängen:

Code Auswählen Erweitern

define HC ...  { fhem ("set @ desired %") }
In der Ref. findest du weitere Beispielle

[optimizer]

HC habe ich bisher als einfache Möglichkeit gesehen mit einem Wochenzeitprogramm zu steuern - ohne zwingende Bindung an ein Funksystem. Ich verstehe deshalb nicht ganz, wieso Heating_Control_SetAllTemps u. HC nur bei den genannten "Heizungen" funktionieren soll - es könnte viel universeller eingesetzt werden.
Mit angepasstem set-Kommando im HC-define funktioniert das Modul ansich, aber Heating_Control_SetAllTemps mit der beschriebenen Meldung nicht.

Meine Fussbodenheizung möchte ich mit einem Relaismodul am Raspi steuern, d.h. FBH_Buero schaltet GPIO_9, bzw. ein Relais am Raspi abhängig von der Temperatur über 1wire-Sensor T_Buero. Dein HC würde das Ganze sehr gut ergänzen.

Code Auswählen Erweitern

Internals:
   DEF        T_Buero:Temp1 relais_9
   NAME       FBH_Buero
   NR         55
   NTFY_ORDER 50-FBH_Buero
   STATE      active 17.0 off
   TYPE       THRESHOLD
   cmd1_gt    set relais_9 off
   cmd2_lt    set relais_9 on
   cmd_default 2
   hysteresis 0
   offset     0
   sensor     T_Buero
   sensor_reading Temp1

Attributes:
   number_format %.1f
   room       Heizung
   state_cmd1_gt off
   state_cmd2_lt on
   state_format _m _dv _sc

[Otto]

Hallo Dietmar,

jetzt stelle ich mich aber blöd an: wie bestätige ich denn die Definition.


Das kommt bei -> 67|16:40|16

Code Auswählen Erweitern

define HC_AZ_Winter Heating_Control Heiz_AZ_ClimRT_tr 12345|05:30|22 67|06:00|22 12345|11:30|20 12345|16:30|22 12345|21:00|16 67|16:40|16 (heizungAnAus($we, "Winter"))

Code Auswählen Erweitern

2014.12.06 16:40:00 4: [HC_AZ_Winter] Next switch 07.12.2014 06:00:00
2014.12.06 16:40:00 5: [HC_AZ_Winter] removing Timer: HC_AZ_Winter_Update
2014.12.06 16:40:00 5: [HC_AZ_Winter] setting  Timer: HC_AZ_Winter_Update 07.12.2014  06:00:00
2014.12.06 16:40:00 1: Werte übergeben: 1, Winter
2014.12.06 16:40:00 1: Werte State: Winter An Zuhause
2014.12.06 16:40:00 3: Log IF = AN


und das bei rereadcfg

Code Auswählen Erweitern

2014.12.06 16:44:10 5: [HC_AZ_Home] list of senors found: 'HC_AZ_Home'
2014.12.06 16:44:10 4: [HC_AZ_Home] 06.12.2014 08:30:00 ; aktParam: 0 ; newParam: 17
2014.12.06 16:44:10 4: [HC_AZ_Home] is not disabled
2014.12.06 16:44:10 5: [HC_AZ_Home] no switch in the yesterdays because of the devices type(Heiz_AZ_ClimRT_tr is not a heating).
2014.12.06 16:44:10 4: [HC_AZ_Home] Next switch 06.12.2014 19:00:00
2014.12.06 16:44:10 5: [HC_AZ_Home] removing Timer: HC_AZ_Home_Update
2014.12.06 16:44:10 5: [HC_AZ_Home] setting  Timer: HC_AZ_Home_Update 06.12.2014  19:00:00
2014.12.06 16:44:10 1: Werte übergeben: 1, Weg
2014.12.06 16:44:10 1: Werte State: Winter An Zuhause
2014.12.06 16:44:10 3: Log IF = AUS
2014.12.06 16:44:10 5: [HC_AZ_Uebergang] list of senors found: 'HC_AZ_Uebergang'
2014.12.06 16:44:10 4: [HC_AZ_Uebergang] 06.12.2014 07:00:00 ; aktParam: 0 ; newParam: 20
2014.12.06 16:44:10 4: [HC_AZ_Uebergang] is not disabled
2014.12.06 16:44:10 5: [HC_AZ_Uebergang] no switch in the yesterdays because of the devices type(Heiz_AZ_ClimRT_tr is not a heating).
2014.12.06 16:44:10 4: [HC_AZ_Uebergang] Next switch 06.12.2014 22:00:00
2014.12.06 16:44:10 5: [HC_AZ_Uebergang] removing Timer: HC_AZ_Uebergang_Update
2014.12.06 16:44:10 5: [HC_AZ_Uebergang] setting  Timer: HC_AZ_Uebergang_Update 06.12.2014  22:00:00
2014.12.06 16:44:10 1: Werte übergeben: 1, Uebergang
2014.12.06 16:44:10 1: Werte State: Winter An Zuhause
2014.12.06 16:44:10 3: Log IF = AUS
2014.12.06 16:44:10 5: [HC_AZ_Winter] list of senors found: 'HC_AZ_Winter'
2014.12.06 16:44:10 4: [HC_AZ_Winter] 06.12.2014 16:40:00 ; aktParam: 0 ; newParam: 16
2014.12.06 16:44:10 4: [HC_AZ_Winter] is not disabled
2014.12.06 16:44:10 5: [HC_AZ_Winter] no switch in the yesterdays because of the devices type(Heiz_AZ_ClimRT_tr is not a heating).
2014.12.06 16:44:10 4: [HC_AZ_Winter] Next switch 07.12.2014 06:00:00
2014.12.06 16:44:10 5: [HC_AZ_Winter] removing Timer: HC_AZ_Winter_Update
2014.12.06 16:44:10 5: [HC_AZ_Winter] setting  Timer: HC_AZ_Winter_Update 07.12.2014  06:00:00
2014.12.06 16:44:10 1: Werte übergeben: 1, Winter
2014.12.06 16:44:10 1: Werte State: Winter An Zuhause
2014.12.06 16:44:10 3: Log IF = AN


und das bei {Heating_Control_SetAllTemps()}

Code Auswählen Erweitern

2014.12.06 16:45:11 3: Heating_Control_SetAllTemps() done!


Grus Otto

[Dietmar63]

@ Otto:
in die Detailansicht des HC gehen.

auf def clicksen,
und modify clicksen.

[Dietmar63]

HC habe ich bisher als einfache Möglichkeit gesehen mit einem Wochenzeitprogramm zu steuern - ohne zwingende Bindung an ein Funksystem. Ich verstehe deshalb nicht ganz, wieso Heating_Control_SetAllTemps u. HC nur bei den genannten "Heizungen" funktionieren soll - es könnte viel universeller eingesetzt werden.
Mit angepasstem set-Kommando im HC-define funktioniert das Modul ansich, aber Heating_Control_SetAllTemps mit der beschriebenen Meldung nicht.

Weil sämtliche Heizungen ein anderes Schlüsselwort zwischen Gerät und Temperatur benötigen und innerhalb von HC dieses Schlüsselwort erraten wird:

Code Auswählen Erweitern


  my %setmodifiers =
     ("FHT"     =>  "desired-temp",
      "PID20"   =>  "desired",
      "EnOcean" =>  {  "subTypeReading" => "subType", "setModifier" => "desired-temp",
                       "roomSensorControl.05"  => 1,
                       "hvac.01"               => 1 },
      "MAX"     =>  {  "subTypeReading" => "type", "setModifier" => "desiredTemperature",
                       "HeatingThermostatPlus" => 1,
                       "HeatingThermostat"     => 1,
                       "WallMountedThermostat" => 1 },
      "CUL_HM"  =>  {  "subTypeReading" => "model","setModifier" => "desired-temp",
                       "HM-CC-TC"              => 1,
                       "HM-TC-IT-WM-W-EU"      => 1,
                       "HM-CC-RT-DN"           => 1 } );
  my $dHash = $defs{$hash->{DEVICE}};                                           ###
  my $dType = $dHash->{TYPE};
  return ""   if (!defined($dType));

  my $setModifier = $setmodifiers{$dType};
     $setModifier = ""  if (!defined($setModifier));
  if (ref($setModifier)) {

      my $subTypeReading = $setmodifiers{$dType}{subTypeReading};
     
      my $model;
      if ($subTypeReading eq "type" ) {
         $model = $dHash->{type};
      } else {   
         $model = AttrVal($hash->{DEVICE}, $subTypeReading, "nF");
      }       
     
      if (defined($setmodifiers{$dType}{$model})) {
         $setModifier = $setmodifiers{$dType}{setModifier}
      } else {
         $setModifier = "";
      }
  }
  return $setModifier;


Sende mir bitte die Definition deines HC. Dann kann ich dir vielleicht helfen.

[optimizer]

Mit %setmodifiers hast du das natürlich für den Anwender sehr komfortabel gemacht.
Mein THRESHOLD-Device verhält sich wie PID20 (genaue Definition s. auch Antwort #8), also
"THRESHOLD"   =>  "desired"

Um bei anderen Modellen nicht ständig das Programm ändern zu müssen, könnte man auch einen Parameter erlauben u. auslesen, z.B.
im Modul-define: addToDevAttrList( $name, "HC_desired" );
und dann in den hash %setmodifiers mit anhängen (push?) falls Parameter vorhanden.

[Otto]

ok, wieder was gelernt:

Code Auswählen Erweitern

2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 12345|05:30|22 : mo,di,mi,do,fr -> 05:30 -> 22
2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 67|06:00|22 : so,sa -> 06:00 -> 22
2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 12345|11:30|20 : mo,di,mi,do,fr -> 11:30 -> 20
2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 12345|16:30|22 : mo,di,mi,do,fr -> 16:30 -> 22
2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 12345|21:00|16 : mo,di,mi,do,fr -> 21:00 -> 16
2014.12.06 22:13:25 5: [HC_AZ_Winter] Switchingtime: 67|23:00|16 : so,sa -> 23:00 -> 16
2014.12.06 22:13:25 5: [HC_AZ_Winter] removing Timer: HC_AZ_Winter_Update
2014.12.06 22:13:25 5: [HC_AZ_Winter] setting  Timer: HC_AZ_Winter_Update 06.12.2014  22:13:26
2014.12.06 22:13:26 5: [HC_AZ_Winter] list of senors found: 'HC_AZ_Winter'
2014.12.06 22:13:26 4: [HC_AZ_Winter] 06.12.2014 06:00:00 ; aktParam: 22.0 ; newParam: 22.0
2014.12.06 22:13:26 4: [HC_AZ_Winter] is not disabled
2014.12.06 22:13:26 4: [HC_AZ_Winter] Next switch 06.12.2014 23:00:00
2014.12.06 22:13:26 5: [HC_AZ_Winter] removing Timer: HC_AZ_Winter_Update
2014.12.06 22:13:26 5: [HC_AZ_Winter] setting  Timer: HC_AZ_Winter_Update 06.12.2014  23:00:00



Aber lass mal ich habe eine andere Funktion von http://forum.fhem.de/index.php/topic,12523.msg80001.html#msg80001 genommen, habe die Faxen dicke. Die Funktion geht

Gruß Otto

[Dietmar63]

@ optimizer

Um bei anderen Modellen nicht ständig das Programm ändern zu müssen, könnte man auch einen Parameter erlauben u. auslesen, z.B.

das werde ich auch nicht. Dafür ist die Möglichkeit geschaffen worden den kompletten Befehl für das Gerät per fhem Befehl in {} anzugeben. Wenn du die Variante nutzt kannst du auch französische Kommandos an threshold senden:

Code Auswählen Erweitern

define HC meinGerät  ...    { fhem "@ TempératureSouhaitée %"} 

Es könnte aber sein, dass ein kleiner bug vorliegt:
Wenn die Funktion Heating_Control_SetAllTemps() aufgerufen wird darf egal ob Heizung oder nicht darf dies

Code Auswählen Erweitern

o switch in the yesterdays because of the devices type(FBH_Buero is not a heating)
nicht passieren.

[optimizer]

Also mein HC define sieht so aus:
define HCBuero Heating_Control FBH_Buero 12345|19:00|21  ... {fhem("set @ desired %") if (ReadingsVal("HCAutomatik", "state", "") eq "on")}

[Dietmar63]

@optimizer:
Dann hast du alles richtig gemacht und ich habe in... SetAllTemps() einen kleinen Bug gefunden. Funzt bei mir soweit, muss es aber auch noch für WeekdayTimer umsetzen. Ich checke dann ein. Dann solltest auch du zufrieden sein.

[Dietmar63]

Ich habe eingecheckt.
Probier mal, ob SetAllTemps jetzt so funktioniert wie du es erwartest.

[optimizer]

Hallo Dietmar,

Danke für die Änderung. Funktioniert jetzt einwandfrei 

Gruß
Karlheinz