//Für 3 Einträge
var S_Tag3 = new Array(); //Starttag
var S_Dat3 = new Array(); //Datum
var S_Dat3_text = new Array() //Text
var S_Dat_mark3 = new Array() //Kennung fest oder Variabel

var S_day = new Array(); //Tag Ende
var S_mon = new Array(); //Monat Ende
var S_dattext = new Array() //Text Datum
var S_text = new Array() //Text
var S_mark = new Array() //Kennung fest oder Variabel
var S_Dat_l = new Array() //Anzahl Einträge je Monat

var a_mon = new Array()
var a_mon_nr = new Array()
a_mon[1]="Januar";
a_mon[2]="Februar";
a_mon[3]="März";
a_mon[4]="April";
a_mon[5]="Mai";
a_mon[6]="Juni";
a_mon[7]="Juli";
a_mon[8]="August";
a_mon[9]="September";
a_mon[10]="Oktober";
a_mon[11]="November";
a_mon[12]="Dezember";

a_mon_nr[1]=1;
a_mon_nr[2]=2;
a_mon_nr[3]=3;
a_mon_nr[4]=4;
a_mon_nr[5]=5;
a_mon_nr[6]=6;
a_mon_nr[7]=7;
a_mon_nr[8]=8;
a_mon_nr[9]=9;
a_mon_nr[10]=10;
a_mon_nr[11]=11;
a_mon_nr[12]=12;

S_day[1]=4;
S_day[2]=25;
S_day[3]=4;
S_day[4]=11;
S_day[5]=10;
S_day[6]=15;
S_day[7]=15;
S_day[8]=21;
S_day[9]=22;
S_day[10]=24;
S_day[11]=7;
S_day[12]=22;
S_day[13]=24;
S_day[14]=25;
S_day[15]=25;
S_day[16]=28;
S_day[17]=5;
S_day[18]=5;
S_day[19]=12;
S_day[20]=15;
S_day[21]=31;
S_day[22]=6;
S_day[23]=5;
S_day[24]=6;
S_day[25]=10;
S_day[26]=14;
S_day[27]=20;
S_day[28]=26;
S_day[29]=6;
S_day[30]=9;
S_day[31]=5;
S_day[32]=9;
S_day[33]=15;
S_day[34]=20;
S_day[35]=21;
S_day[36]=25;
S_day[37]=5;
S_day[38]=10;
S_day[39]=12;
S_day[40]=15;
S_day[41]=20;
S_day[42]=22;
S_day[43]=28;
S_day[44]=29;
S_day[45]=14;
S_day[46]=1;

S_mon[1]=1;
S_mon[2]=1;
S_mon[3]=2;
S_mon[4]=2;
S_mon[5]=2;
S_mon[6]=3;
S_mon[7]=3;
S_mon[8]=3;
S_mon[9]=3;
S_mon[10]=3;
S_mon[11]=4;
S_mon[12]=4;
S_mon[13]=4;
S_mon[14]=4;
S_mon[15]=4;
S_mon[16]=4;
S_mon[17]=5;
S_mon[18]=5;
S_mon[19]=5;
S_mon[20]=5;
S_mon[21]=5;
S_mon[22]=6;
S_mon[23]=6;
S_mon[24]=6;
S_mon[25]=6;
S_mon[26]=6;
S_mon[27]=6;
S_mon[28]=6;
S_mon[29]=8;
S_mon[30]=8;
S_mon[31]=9;
S_mon[32]=9;
S_mon[33]=9;
S_mon[34]=9;
S_mon[35]=9;
S_mon[36]=9;
S_mon[37]=10;
S_mon[38]=10;
S_mon[39]=10;
S_mon[40]=10;
S_mon[41]=10;
S_mon[42]=10;
S_mon[43]=10;
S_mon[44]=10;
S_mon[45]=11;
S_mon[46]=12;

S_dattext[1]="04.01."
S_dattext[2]="25.01."
S_dattext[3]="04.02."
S_dattext[4]="11.02."
S_dattext[5]="10.02."
S_dattext[6]="15.03."
S_dattext[7]="15.03."
S_dattext[8]="21.03."
S_dattext[9]="22.03."
S_dattext[10]="24.03."
S_dattext[11]="07.04."
S_dattext[12]="22.04."
S_dattext[13]="24.04."
S_dattext[14]="25.04."
S_dattext[15]="25.04."
S_dattext[16]="28.04."
S_dattext[17]="05.05."
S_dattext[18]="05.05."
S_dattext[19]="12.05."
S_dattext[20]="15.05."
S_dattext[21]="31.05."
S_dattext[22]="06.06."
S_dattext[23]="05.06."
S_dattext[24]="06.06."
S_dattext[25]="10.06."
S_dattext[26]="14.06."
S_dattext[27]="20.06."
S_dattext[28]="26.06."
S_dattext[29]="06.08."
S_dattext[30]="09.08."
S_dattext[31]="05.09."
S_dattext[32]="09.09."
S_dattext[33]="15.09."
S_dattext[34]="20.09."
S_dattext[35]="21.09."
S_dattext[36]="25.09."
S_dattext[37]="05.10."
S_dattext[38]="10.10."
S_dattext[39]="12.10."
S_dattext[40]="15.10."
S_dattext[41]="20.10."
S_dattext[42]="22.10."
S_dattext[43]="28.10."
S_dattext[44]="29.10."
S_dattext[45]="14.11."
S_dattext[46]="01.12."


S_text[1]="Welt-Braille-Tag";
S_text[2]="Welt-Lepra-Tag";
S_text[3]="Weltkrebstag";
S_text[4]="Welttag der Kranken";
S_text[5]="Tag der Kinderhospizarbeit";
S_text[6]="Tag der Rückengesundheit";
S_text[7]="Weltverbrauchertag";
S_text[8]="Welt-Down-Syndrom-Tag";
S_text[9]="Welt-Wasser-Tag";
S_text[10]="Welt-Tuberkulose-Tag";
S_text[11]="Weltgesundheitstag";
S_text[12]="Internationaler Tag der Erde";
S_text[13]="Welttag des Versuchstiers";
S_text[14]="Internationaler Tag gegen Lärm";
S_text[15]="Welt-Malaria-Tag";
S_text[16]="Welttag für Sicherheit und Gesundheit am Arbeitsplatz";
S_text[17]="Welt-Asthma-Tag";
S_text[18]="Tag des Herzkranken Kindes";
S_text[19]="Internationaler CFS-Tag";
S_text[20]="Internationaler Tag der Familie";
S_text[21]="Weltnichtrauchertag";
S_text[22]="Tag der Organspende";
S_text[23]="Tag der Umwelt";
S_text[24]="Tag der Sehbehinderten";
S_text[25]="Kindersicherheitstag";
S_text[26]="Weltblutspendertag";
S_text[27]="Weltflüchtlingstag";
S_text[28]="Internationaler-Anti-Drogen-Tag";
S_text[29]="Hiroshima-Gedenktag";
S_text[30]="Nagasaki-Gedenktag";
S_text[31]="Tag des Kopfschmerzes";
S_text[32]="Tag des alkoholgeschädigten Kindes";
S_text[33]="Europäischer Prostatatag";
S_text[34]="Welt-Kinder-Tag";
S_text[35]="Welt-Alzheimer-Tag";
S_text[36]="Tag der Zahngesundheit";
S_text[37]="Tag der Epilepsie";
S_text[38]="Internationaler Tag der seelischen Gesundheit";
S_text[39]="Welt-Rheuma-Tag";
S_text[40]="Tag des weißen Stocks";
S_text[41]="Welt-Osteoporose-Tag";
S_text[42]="Welttag des Stotterns";
S_text[43]="Welt-Polio-Tag";
S_text[44]="Welt-Psoriasis-Tag";
S_text[45]="Welt-Diabetes-Tag";
S_text[46]="Welt-AIDS-Tag";


S_mark[1]="*";
S_mark[2]="*";
S_mark[3]="*";
S_mark[4]="*";
S_mark[5]="*";
S_mark[6]="*";
S_mark[7]="*";
S_mark[8]="*";
S_mark[9]="*";
S_mark[10]="*";
S_mark[11]="*";
S_mark[12]="*";
S_mark[13]="*";
S_mark[14]="*";
S_mark[15]="*";
S_mark[16]="*";
S_mark[17]="*";
S_mark[18]="*";
S_mark[19]="*";
S_mark[20]="*";
S_mark[21]="*";
S_mark[22]="*";
S_mark[23]="*";
S_mark[24]="*";
S_mark[25]="*";
S_mark[26]="*";
S_mark[27]="*";
S_mark[28]="*";
S_mark[29]="*";
S_mark[30]="*";
S_mark[31]="*";
S_mark[32]="*";
S_mark[33]="*";
S_mark[34]="*";
S_mark[35]="*";
S_mark[36]="*";
S_mark[37]="*";
S_mark[38]="*";
S_mark[39]="*";
S_mark[40]="*";
S_mark[41]="*";
S_mark[42]="*";
S_mark[43]="*";
S_mark[44]="*";
S_mark[45]="*";
S_mark[46]="*";


var l_jahr, l_mon, l_tag, mon_txt;

function lokal_datum()
{
l_jahr=f_setze_jahr();
l_mon=f_setze_monat();
l_tag=f_setze_tag();
mon_txt=a_mon[l_mon]
}
lokal_datum();

var my_mon;
function gesund_tag(my_mon)
{
}
//ende function gesund_tag
var v_info="";
function matrix_3_termine()
{
var v_anfang;
if (l_mon==12) st=1;
if (l_mon==1) st=1;
if (l_mon==2) st=3;
if (l_mon==3) st=6;
if (l_mon==4) st=11;
if (l_mon==5) st=17;
if (l_mon==6) st=22;
if (l_mon==7) st=29;
if (l_mon==8) {v_anfang=31; st=31};
if (l_mon==9) st=31;
if (l_mon==10) st=37;
if (l_mon==11) st=46;

//alert("matrix_3_termine mon: " + l_mon + " tag: " + l_tag)
for(var i=st; i<=47;i++)
{
//alert("matrix_3_termine mon: " + l_mon + ">=" + S_mon[i] + " tag " + i + ": " + l_tag + ">=" + S_day[i])
if(l_tag<=S_day[i] && l_mon<=S_mon[i])
{
//alert("treffer")
v_anfang=8;
i=73;
}

//i=73;
}
//alert(v_anfang);
//if(l_mon==11)
v_anfang=38
if(l_mon==0)
v_anfang=47

if(l_mon==10 && l_tag>=12 && l_tag<15) v_anfang=40
if(l_mon==10 && l_tag>=15 && l_tag<20) v_anfang=41
if(l_mon==10 && l_tag>=20 && l_tag<22) v_anfang=43
if(l_mon==10 && l_tag>=22 && l_tag<28) v_anfang=45
if(l_mon==11) v_anfang=45
if(l_mon==12 && l_tag>1) v_anfang=1

//alert("matrix_3_termine mon: " + l_mon + " tag: " + l_tag + " v_anfang: " + v_anfang)
if(!v_anfang)
{
         for(var i=1; i<=72;i++)
         {
                 if(l_mon<S_mon[i])
                 {
                 v_anfang=i;
                 i=73;
                 }
         }
}

text_jahr="2010";
if(l_jahr==2008) text_jahr="2009";

if(S_dattext[v_anfang].length>6) text_jahr=text_jahr.substr(text_jahr.length-2, text_jahr.length);
v_info+="<span style='color:#CC0000'>" + S_dattext[v_anfang] + text_jahr + "</span><br />" + S_text[v_anfang] +"<br />";
k=v_anfang+1;
if(k==73) {k=1;text_jahr="2009";};
if(S_dattext[k].length>6) text_jahr=text_jahr.substr(text_jahr.length-2, text_jahr.length);
v_info+="<span style='color:#CC0000'>" + S_dattext[k] + text_jahr +"</span><br />" + S_text[k];
//alert(v_info);
}

var plan_mit_link;

function der_monat(thema_mon)
{
var l_start;

l_start=(thema_mon*10)+1

//alert("l_start: " + l_start)
return l_start;
}

var plan_Start_Tag = new Array();
var plan_Ende_Tag = new Array();
var plan_A_info = new Array();
var plan_A_Dat_info = new Array();
var plan_View_info = new Array();
var plan_View_Dat_info = new Array();

function plan_kalender()
{
var sort_temp = new Array();
plan_Ende_Tag[0]="01.01.2007";
plan_Start_Tag[0]="01.01.2007";

plan_Start_Tag[1]="01.12.2007";
plan_Ende_Tag[1]="31.01.2008";
plan_A_info[1]="Neue Termine in Kürze.";
plan_A_Dat_info[1]="2008";

//plan_Start_Tag[3]="01.12.2007";
//plan_Ende_Tag[3]="23.12.2007";
//plan_A_info[3]="Gesunde Geschenkideen";
//plan_A_Dat_info[3]="01. - 23.12. 2007";

//plan_Start_Tag[4]="12.01.2008";
//plan_Ende_Tag[4]="20.01.2008";
//plan_A_info[4]="Osteoporoseberatung";
//plan_A_Dat_info[4]="12. - 20.01. 2008";
}

function ordne_plan_aktuell()
{
//alert(plan_Start_Tag.length);

var akt_jahr = g_thema_jahr;
var akt_mon = g_thema_mon;
var akt_tag = g_thema_tag;
var T_plan_Start_Tag = new Array();
var T_plan_Ende_Tag = new Array();
var T_plan_A_info = new Array();
var T_plan_A_Dat_info = new Array();
var T_plan_sort = new Array();
start=plan_Start_Tag.length;
ende=plan_Start_Tag.length+1;

if(v_term==true)
{
start=plan_Start_Tag.length;
ende=Start_Tag.length-1;
ende= start+ende;
//alert(ende)
     var k=1;
           for(var i=start; i<ende; i++)
           {
           if(Start_Tag[k])
           {
           plan_Start_Tag[i]=Start_Tag[k];
           plan_Ende_Tag[i]=Ende_Tag[k];
           plan_A_info[i]=A_info[k];
           plan_A_Dat_info[i]=A_Dat_info[k];
           //alert(k + ";" + i)
           k=k+1;
           }
           else
           {
           i=1000;
           };

           }

}

//alert(plan_Start_Tag.length);
for(var i=0; i<plan_Start_Tag.length; i++)
{
T_plan_Ende_Tag[i]=plan_Ende_Tag[i];
T_plan_Start_Tag[i]=plan_Start_Tag[i];
}

info="";
//T_Plan_Ende_Tag.sort();
for(var i=0; i<plan_Start_Tag.length; i++)
{
var ms_date_A = new Date(Number(T_plan_Start_Tag[i].substr(6,9)), Number(T_plan_Start_Tag[i].substr(3,2))-1, Number(T_plan_Start_Tag[i].substr(0,2)));
ms=ms_date_A.getTime()
T_plan_Start_Tag[i]=ms;
var ms_date = new Date(Number(T_plan_Ende_Tag[i].substr(6,9)), Number(T_plan_Ende_Tag[i].substr(3,2))-1, Number(T_plan_Ende_Tag[i].substr(0,2)));
ms=ms_date.getTime()
//alert(ms);
T_plan_Ende_Tag[i]=ms;
//info+="T_Plan_Ende_Tag[" + i + "]: " + T_Plan_Ende_Tag[i] + "  T_plan_sort[" + i + "]:" + T_plan_sort[i] + "\n";
}

T_plan_Ende_Tag.sort();
T_plan_Start_Tag.sort();
for(var i=0; i<plan_Start_Tag.length; i++)
{
    for(var k=1; k<plan_Start_Tag.length; k++)
    {
    var ms_date = new Date(Number(plan_Start_Tag[k].substr(6,9)), Number(plan_Start_Tag[k].substr(3,2))-1, Number(plan_Start_Tag[k].substr(0,2)));
    ms=ms_date.getTime()
    if(ms==T_plan_Start_Tag[i])
    {
    T_plan_sort[i]=k;
    T_plan_A_info[i]=plan_A_info[k];
    T_plan_A_Dat_info[i]=plan_A_Dat_info[k]
    //alert(ms + "," + T_Plan_Ende_Tag[i] + " k=" + k + " i=" + i)
    }
    }

//info+="T_Plan_Ende_Tag[" + i + "]: " + T_Plan_Ende_Tag[i] + "  T_plan_sort[" + i + "]:" + T_plan_sort[i] + "\n";
}
for(var i=1; i<plan_Start_Tag.length; i++)
{

plan_A_info[i]=T_plan_A_info[i]
plan_A_Dat_info[i]=T_plan_A_Dat_info[i]
//T_plan_A_info[i]=null;
//T_plan_A_Dat_info[i]=null;
}

var heute_date = new Date()
ms_heute=heute_date.getTime();
//alert(T_plan_A_info.length)
for(var i=1; i<plan_Start_Tag.length; i++)
{
//var ms_date = new Date(Number(T_Plan_Ende_Tag[k].substr(6,9)), Number(T_Plan_Ende_Tag[k].substr(3,2))-1, Number(T_Plan_Ende_Tag[k].substr(0,2)));
//ms=ms_date.getTime()
if(T_plan_Ende_Tag[i]< ms_heute)
{
T_plan_A_info[i]="";
//alert(T_Plan_Ende_Tag[i]+";" + ms_heute)
}

}
k=1;
for(var i=1; i<plan_Start_Tag.length; i++)
{
if(T_plan_A_info[i]!="")
   {
   plan_View_info[k]=T_plan_A_info[i]
   plan_View_Dat_info[k]=T_plan_A_Dat_info[i]
   info+= plan_A_Dat_info[k] + " - " + plan_A_info[k] + "\n";
   k=k+1;
   }
//info+= plan_A_Dat_info[i] + " - " + plan_A_info[i] + "\n";
}
v_term=false;
//alert("v_term: " + v_term);
//alert(info);
}

function seite_veranstaltungen()
{
var v_mit_link="";
if(plan_mit_link==true)
plan_View_info[1]="Neue Termine in Kürze."
var tab_veran="<table style='width: 100%' cellpadding='10' class='border_coll'>";

for(var i=1; i<plan_View_info.length; i++)
{
tab_veran+="<tr><td><span style='color:#CC0000'>" + plan_View_Dat_info[i] + "</span></td><td>" +  plan_View_info[i] + "</td></tr>";
}
document.write(tab_veran + "</table>");
}