diff --git a/fhem/contrib/DS_Starter/57_SSCal.pm b/fhem/contrib/DS_Starter/57_SSCal.pm
index cc6dd4836..042cd13e2 100644
--- a/fhem/contrib/DS_Starter/57_SSCal.pm
+++ b/fhem/contrib/DS_Starter/57_SSCal.pm
@@ -158,7 +158,7 @@ sub SSCal_Initialize($) {
$hash->{AttrList} = "asyncMode:1,0 ".
"calendarShowInDetail:0,1 ".
"calendarShowInRoom:0,1 ".
- "calOverviewFields:multiple-strict,Begin,End,Summary,Status,Location,Description,GPS,Calendar ".
+ "calOverviewFields:multiple-strict,Begin,End,Summary,Status,Location,Description,GPS,Calendar,Completion ".
"cutOlderDays ".
"cutLaterDays ".
"disable:1,0 ".
@@ -3171,26 +3171,28 @@ sub SSCal_calAsHtml($) {
my ($name)= @_;
my $hash = $defs{$name};
- my ($begin,$end,$summary,$location,$status,$desc,$gps,$cal);
+ my ($begin,$end,$summary,$location,$status,$desc,$gps,$cal,$completion);
my %seen;
my @cof = split(",", AttrVal($name, "calOverviewFields", "Begin,End,Summary,Status,Location"));
grep { !$seen{$_}++ } @cof;
my $out = "";
- $out .= "";
- $out .= "";
+ $out .= "";
+ $out .= "";
+ $out .= "";
$out .= "";
$out .= "";
- $out .= "| Begin | " if($seen{Begin});
- $out .= " End | " if($seen{End});
- $out .= " Summary | " if($seen{Summary});
- $out .= " Description | " if($seen{Description});
- $out .= " Status | " if($seen{Status});
- $out .= " Location | " if($seen{Location});
- $out .= " GPS | " if($seen{GPS});
- $out .= " Calendar | " if($seen{Calendar});
+ $out .= " Begin | " if($seen{Begin});
+ $out .= " End | " if($seen{End});
+ $out .= " Summary | " if($seen{Summary});
+ $out .= " Description | " if($seen{Description});
+ $out .= " Status | " if($seen{Status});
+ $out .= " Completion
(%) | " if($seen{Completion});
+ $out .= " Location | " if($seen{Location});
+ $out .= " GPS | " if($seen{GPS});
+ $out .= " Calendar | " if($seen{Calendar});
$out .= "
| |
";
$out .= "| |
";
@@ -3208,24 +3210,26 @@ sub SSCal_calAsHtml($) {
my $prestr = sprintf("%0$l.0f", $k); # Prestring erstellen
last if(!ReadingsVal($name, $prestr."_05_EventId", "")); # keine Ausgabe wenn es keine EventId mit Blocknummer 0 gibt -> kein Event/Aufage vorhanden
- $summary = ReadingsVal($name, $prestr."_01_Summary", "");
- $begin = ReadingsVal($name, $prestr."_02_Begin", "not set");
- $end = ReadingsVal($name, $prestr."_03_End", "not set");
- $desc = ReadingsVal($name, $prestr."_04_Description", "");
- $location = ReadingsVal($name, $prestr."_07_Location", "");
- $gps = ReadingsVal($name, $prestr."_08_GPS", "");
- $status = ReadingsVal($name, $prestr."_10_Status", "");
- $cal = ReadingsVal($name, $prestr."_90_calName", "");
+ $summary = ReadingsVal($name, $prestr."_01_Summary", "");
+ $begin = ReadingsVal($name, $prestr."_02_Begin", "not set");
+ $end = ReadingsVal($name, $prestr."_03_End", "not set");
+ $desc = ReadingsVal($name, $prestr."_04_Description", "");
+ $location = ReadingsVal($name, $prestr."_07_Location", "");
+ $gps = ReadingsVal($name, $prestr."_08_GPS", "");
+ $status = ReadingsVal($name, $prestr."_10_Status", "");
+ $completion = ReadingsVal($name, $prestr."_16_percentComplete", "");
+ $cal = ReadingsVal($name, $prestr."_90_calName", "");
$out .= "";
- $out .= "| $begin | " if($seen{Begin});
- $out .= " $end | " if($seen{End});
- $out .= " $summary | " if($seen{Summary});
- $out .= " $desc | " if($seen{Description});
- $out .= " $status | " if($seen{Status});
- $out .= " $location | " if($seen{Location});
- $out .= " $gps | " if($seen{GPS});
- $out .= " $cal | " if($seen{Calendar});
+ $out .= " $begin | " if($seen{Begin});
+ $out .= " $end | " if($seen{End});
+ $out .= " $summary | " if($seen{Summary});
+ $out .= " $desc | " if($seen{Description});
+ $out .= " $status | " if($seen{Status});
+ $out .= " $completion | " if($seen{Completion});
+ $out .= " $location | " if($seen{Location});
+ $out .= " $gps | " if($seen{GPS});
+ $out .= " $cal | " if($seen{Calendar});
$out .= "
";
}