[gelöst]readingsGroup: Timestamp formatieren

[amenomade]

Dann haben wahrscheinlich einige Geräte dieses Internal Timestamp nicht. Das kannst Du sehen, indem Du ein Log3 Befehl in der Funktion in myUtils einbaust, z.B.
Log3  "Signalstaerke_EnOcean",1, "Timestamp=$TimeStamp";

[choetzu]

Dann haben wahrscheinlich einige Geräte dieses Internal Timestamp nicht. Das kannst Du sehen, indem Du ein Log3 Befehl in der Funktion in myUtils einbaust, z.B.
Log3  "Signalstaerke_EnOcean",1, "Timestamp=$TimeStamp";

dem ist genau so. Die Internal Timestamps werden erst bei der Betätigung des EnOcean Devices gesetzt. Und wenn ich ein "shutdown restart" mache, sind alle Internal Timestamps wieder leer, bis ich sie bediene. Komisch ist nur, dass es bislang mit folgendem Code kein Problem war, denn es wurden nur die Zeilen aufgeführt, welche tatsächlich einen Wert hatten.

Code Auswählen Erweitern

TYPE=EnOcean:+TCM_ESP3_0_ReceivingQuality,+TCM_ESP3_0_RSSI,+TCM_ESP3_0_RepeatingCounter,+TCM_ESP3_0_TIME

Siehe Bild.


Kann man das auch irgendwie erreichen? mit

Code Auswählen Erweitern

TYPE=EnOcean:+TCM_ESP3_0_ReceivingQuality,+TCM_ESP3_0_RSSI,+TCM_ESP3_0_RepeatingCounter,<{WeekdayAndTimeFromTimestamp(InternalVal($DEVICE,"TCM_ESP3_0_TIME",""))}@TCM_ESP3_0_TIME>

Evtl. könnte man das InternalTimestamp ja nur formatieren (mit einem Style Attr), wenn es verfügbar ist. Aber da wüsste ich nicht wie.... mit
{ +TCM_ESP3_0_TIME => ...... } ??

[amenomade]

Code Auswählen Erweitern

sub WeekdayAndTimeFromTimestamp($){
    my ($TimeStamp) = $_[0];
    return undef if (!$TimeStamp);
    $TimeStamp =~ /^(\d+)-(\d+)-(\d+)\s(\d+:\d+):(\d+)$/;
    return "$3.$2, $4";;
}

[choetzu]

Wow, jetzt klappt alles hervorragend! Ganz herzlichen Dank! Brutal dankbar.