Muelltonnenkalender Notify funktioniert nicht.

Begonnen von ottifant, 25 November 2016, 11:00:47

Vorheriges Thema - Nächstes Thema

ottifant

Hallo Forum,
ich habe ein Problem mit dem Muellkalender.
Die Notifier funktionieren nicht.


Im Log sieht man, dass der Kalender funktioniert:
2016.11.22 00:00:00 3: get Muelltonnen_Kalender summary gwa_327BT2_20161122 : Biotonne

In der 99_myUtils.pm habe ich mit den Kalendertexten BT2 und Biotonne experimentiert. Beides funktioniert nicht.

Ich hoffe es kann mir jemand hier helfen . Vielen Danke im Vorraus

##############################################
# $Id: myUtilsTemplate.pm 7570 2015-01-14 18:31:44Z rudolfkoenig $
#
# Save this file as 99_myUtils.pm, and create your own functions in the new
# file. They are then available in every Perl expression.

package main;

use strict;
use warnings;
use POSIX;

sub
myUtils_Initialize($$)
{
  my ($hash) = @_;
}

# Enter you functions below _this_ line.
sub Kalenderstart ($)
{
    my ($Ereignis) = @_;
    my @Ereignisarray = split(/.*:\s/,$Ereignis);
    my $Ereignisteil1 = $Ereignisarray[1];
    my @uids=split(/;/,$Ereignisteil1);
    foreach my $uid (@uids) {
        my $Kalendertext = fhem("get Muelltonnen_Kalender summary $uid");
        if ($Kalendertext =~ /BT2/) {
            fhem("set Bio_Tonne ja");
        };
        if ($Kalendertext =~ /RM22/) {
            fhem("set Restmuell_Tonne ja");
        };
        if ($Kalendertext =~ /PTD/) {
            fhem("set Papier_Tonne ja");
        };
if ($Kalendertext =~ /SM7/) {
            fhem("set Gelbe_Tonne ja");
};
    };
}
sub Kalenderende ($) {
    my ($Ereignis) = @_;
    my @Ereignisarray = split(/.*:\s/,$Ereignis);
    my $Ereignisteil1 = $Ereignisarray[1];
    my @uids=split(/;/,$Ereignisteil1);
    foreach my $uid (@uids) {
        my $Kalendertext = fhem("get Muelltonnen_Kalender summary $uid");
        if ($Kalendertext =~ /BT2/) {
            fhem("set Bio_Tonne nein");
        };
        if ($Kalendertext =~ /RM22/) {
            fhem("set Restmuell_Tonne nein");
        };
        if ($Kalendertext =~ /PTD/) {
            fhem("set Papier_Tonne nein");
        };
if ($Kalendertext =~ /SM7/) {
            fhem("set Gelbe_Tonne nein");
        };
    };
}

1;