Home  >  Plugins  >  OldFirstMagic  >  fmlibrary
iCal Event
Wednesday, September 27, 2017 By: Superadmin
<!--#include virtual="//Setup?formid=2659&CONFIG" --><!--#include virtual="/.templates/fmlibrary/terms.inc" --><!--#if expr="$CUSTOMLANG=true"--><!--#include virtual="$FMLANGFILE" --><!--#endif--><X-FC-WHITESPACE STRIP>
<!--#set var="LINEENDFORMAT" value="CRLF"--><!--#config escapechars=";,"-->
BEGIN:VCALENDAR<X-FC-LINE-BREAK>
VERSION:2.0<X-FC-LINE-BREAK>
PRODID:-//FirstMagic//EN<X-FC-LINE-BREAK>
METHOD:PUBLISH<X-FC-LINE-BREAK>
<!--#set var="TZIDNDX" value="0"-->
<X-FC-WHITESPACE RETAIN><!--#include virtual="/plugins/ical/tzdefs.inc"--><X-FC-WHITESPACE STRIP>
<!--#set var="tznumber" expr="<X-FC-ITEM DATA[CalculatedTimeZone] NUMBER>"--><!--#set var="tzid" expr="@list($TZNUMLIST1, $tznumber)"--><!--#if expr="$tzid == ''"--><!--#set var="tzid" expr="@list($TZNUMLIST2, $tznumber)"--><!--#if expr="$tzid == ''"--><!--#set var="tzid" expr="TZ_$tznumber"--><!--#endif--><!--#endif--><!--#set var="n" value="0"--><!--#set var="found" value="0"--><!--#while expr="$found == 0 && $n < $TZIDNDX"--><!--#if expr="$TZIDS[$n] == $tznumber"--><!--#set var="found" value="1"--><!--#endif--><!--#set var="n" expr="++$n"--><!--#endwhile--><!--#if expr="$found == 0"--><!--#set var="TZIDS[$TZIDNDX]" expr="$tznumber"--><!--#set var="TZIDNDX" expr="++$TZIDNDX"--><!--#endif-->
BEGIN:VEVENT<X-FC-LINE-BREAK>
LAST-MODIFIED;VALUE=DATE-TIME:<X-FC-ITEM DATA[Date] %u%DT%H%M%SZ><X-FC-LINE-BREAK>
<!--#if expr="'<X-FC-ITEM DATA[1001] %H%M%S>' == '000000' && '<X-FC-ITEM DATA[ENDTIME] %H%M%S> == '000000'"-->
DTSTART;VALUE=DATE:<X-FC-ITEM DATA[1001] %D><X-FC-LINE-BREAK>
DTEND;VALUE=DATE:<X-FC-ITEM DATA[ENDTIME] %D><!--#else-->
DTSTART;TZID=<!--#echo var="$tzid"-->;VALUE=DATE-TIME:<X-FC-FIELD 1001 DATE, "%DT%H%M%S"><X-FC-LINE-BREAK>
DURATION:<!--#set var="DURATION" value="<X-FC-ITEM DATA[1002] NUMBER>"-->P<!--#if expr="$DURATION > 604800"--><!--#echo expr="$DURATION / 604800"--><!--#set var="DURATION" expr="$DURATION % 604800"-->W<!--#endif--><!--#if expr="$DURATION > 86400"--><!--#echo expr="$DURATION / 86400"--><!--#set var="DURATION" expr="$DURATION % 86400"-->D<!--#endif--><!--#if expr="$DURATION"-->T<!--#if expr="$DURATION > 3600"--><!--#echo expr="$DURATION / 3600"--><!--#set var="DURATION" expr="$DURATION % 3600"-->H<!--#endif--><!--#if expr="$DURATION > 60"--><!--#echo expr="$DURATION / 60"--><!--#set var="DURATION" expr="$DURATION % 60"-->M<!--#endif--><!--#if expr="$DURATION"--><!--#echo var="DURATION"-->S<!--#endif--><!--#endif--><!--#endif--><X-FC-LINE-BREAK>
CONTACT:<!--#echo expr=`$WTAUTHOR`--><X-FC-LINE-BREAK>
SUMMARY:<X-FC-ITEM DATA[Subject] ESCAPED><X-FC-LINE-BREAK><!--#if expr="<X-FC-ITEM DATA[1009] LENGTH> > 1"-->
LOCATION:<X-FC-ITEM DATA[1009] ESCAPED><X-FC-LINE-BREAK><!--#endif-->
TRANSP:TRANSPARENT<X-FC-LINE-BREAK>
UID:<X-FC-ITEM DATA[MessageID] HEX><X-FC-LINE-BREAK>
CATEGORIES:<X-FC-ITEM DATA[8021] ESCAPED><X-FC-LINE-BREAK>
DESCRIPTION:<!--#echo expr=`$WTAUTHOR`-->\n
<!--#if expr="$CONTACTSTREET"--><!--#echo expr=`$CONTACTSTREET`-->\n<!--#endif-->
<!--#if expr="$CONTACTCITY"--><!--#if expr="$USFORMAT=false"--><!--#if expr="$CONTACTPOSTCODE"--><!--#echo expr=`$CONTACTPOSTCODE`--> <!--#endif--><!--#endif--><!--#echo expr=`$CONTACTCITY`-->\n<!--#endif--><!--#if expr="$CONTACTCOUNTRY"--><!--#echo expr=`$CONTACTCOUNTRY`-->\n<!--#endif--><!--#if expr="$USFORMAT=true"--><!--#if expr="$CONTACTPOSTCODE"--><!--#echo expr=`$CONTACTPOSTCODE`-->\n<!--#endif--><!--#endif--><!--#if expr="$CONTACTPHONE"--><!--#echo expr=`$FMPHONE`-->: <!--#echo expr=`$CONTACTPHONE`-->\n<!--#endif--><!--#if expr="$CONTACTFAX"--><!--#echo expr=`$FMFAX`-->: <!--#echo expr=`$CONTACTFAX`-->\n<!--#endif--><!--#if expr="$CONTACTLINK"--><!--#echo expr=`$FMMAIL`-->: <!--#echo expr=`$CONTACTLINK`--><!--#endif-->\n<X-FC-LINE-BREAK>
URL:http://<!--#echo var="$HTTP_DOMAIN"--><X-FC-OBJURL-UP><X-FC-LINE-BREAK>
END:VEVENT<X-FC-LINE-BREAK>
<X-FC-WHITESPACE RETAIN><X-FC-WHITESPACE STRIP><!--#set var="n" value="0"--><!--#while expr="$n < $TZIDNDX"--><!--#set var="tznumber" expr="$TZIDS[$n]"--><!--#if expr="$tznumber != ''"--><!--#set var="tzdef" expr="$TZDEFS[$tznumber]"--><!--#if expr="$tzdef != ''"--><!--#set var="tzid" expr="@list($TZNUMLIST1, $tznumber)"--><!--#if expr="$tzid == ''"--><!--#set var="tzid" expr="@list($TZNUMLIST2, $tznumber)"--><!--#if expr="$tzid == ''"--><!--#set var="tzid" expr="TZ_$tznumber"--><!--#endif--><!--#endif--><!--#set var="std" value="1"-->
BEGIN:VTIMEZONE<X-FC-LINE-BREAK>
TZID:<!--#echo var="$tzid"--><X-FC-LINE-BREAK>
<!--#while expr="$tzdef != ''"--><!--#if expr="$std == 1"-->
BEGIN:STANDARD<X-FC-LINE-BREAK><!--#else-->
BEGIN:DAYLIGHT<X-FC-LINE-BREAK><!--#endif--><!--#set var="tzdata" expr="@split($tzdef, '|')"--><!--#while expr="$tzdata != ''"--><!--#set var="tzattr" expr="@split($tzdata, ',')"-->
<!--#while expr="$tzattr != ''"--><!--#echo var="$tzattr"--><X-FC-LINE-BREAK><!--#set var="tzattr" expr="@split($tzdata, ',')"--><!--#endwhile--><!--#if expr="$std == 1"-->
END:STANDARD<X-FC-LINE-BREAK><!--#set var="std" value="0"--><!--#else-->
END:DAYLIGHT<X-FC-LINE-BREAK><!--#set var="std" value="1"--><!--#endif--><!--#endwhile--><!--#endwhile-->
END:VTIMEZONE<X-FC-LINE-BREAK><!--#endif--><!--#endif--><!--#set var="n" expr="++$n"--><!--#endwhile-->
END:VCALENDAR<X-FC-WHITESPACE RETAIN>


Top of Page