function GetCookie (name)
{
    var arg  = name + "=";
    var alen = arg.length;
    var clen = document.cookie.length;
    var i    = 0;

    while (i < clen)
    {
        var j = i + alen;
        if (document.cookie.substring(i, j) == arg)
          return getCookieVal (j);
        i = document.cookie.indexOf(" ", i) + 1;
        if (i == 0) break;
    }
    return null;
}
//---------------------------------------------------------------------
// Function to get a cookie.
//---------------------------------------------------------------------
function getCookieVal( offset )
{
    var endstr = document.cookie.indexOf (";", offset);

    if (endstr == -1)
        endstr = document.cookie.length;
    return unescape(document.cookie.substring(offset, endstr));
}
//---------------------------------------------------------------------
// Function to set a cookie.
//---------------------------------------------------------------------
function SetCookie( name, value )
{
    var argv    = SetCookie.arguments;
    var argc    = SetCookie.arguments.length;
    var expires = (argc > 2) ? argv[2] : null;
    var path    = (argc > 3) ? argv[3] : null;
    var domain  = (argc > 4) ? argv[4] : null;
    var secure  = (argc > 5) ? argv[5] : false;

    document.cookie =
        name + "=" + escape (value) +
        ((expires == null) ? "" : ("; expires=" + expires.toGMTString())) +
        ((path == null) ? "" : ("; path=" + path)) +
        ((domain == null) ? "" : ("; domain=" + domain)) +
        ((secure == true) ? "; secure" : "");
}
//---------------------------------------------------------------------
// Function to delete a cookie. (Sets expiration date)
//    name - String object containing the cookie name
//---------------------------------------------------------------------
function DeleteCookie (name)
{
    var exp  = new Date();
    var cval = GetCookie (name);

    exp.setTime (exp.getTime() - 1);  // This cookie is history
    document.cookie = name + "=" + cval + "; expires=" + exp.toGMTString();
}
///////////////////////////////////////////////////////////////////////////////////////////////////////////



//aufrufende Seite: document.write(document.referrer)   //history.previous;
//IP-Nr.: document.write(java.net.InetAddress.getLocalHost().getHostAddress())
//BS-auflösung: document.write(screen.width + " x " + screen.height)

//Plugins:
// var num_of_plugins = navigator.plugins.length;
// for (var i=0; i < num_of_plugins; i++) {
//    var list_number=i+1;
//    document.write("<font color=red>Plug-in Nr." + list_number + "- </font>"+navigator.plugins[i].name+" <br>[Location: " + navigator.plugins[i].filename + "]<p>");
//    }

//Wegen den Unterverzeichnissen...
// Suchen, ab "Internet" oder alle "/"


pfad = window.location.href;
pfad = pfad.toUpperCase();

zahl1 = pfad.lastIndexOf("INTERNET");
     if(zahl1<0) zahl1=0;
zahl1a = pfad.lastIndexOf("10.19.16.16");
     if(zahl1a<0) zahl1a=0;
zahl1b = pfad.lastIndexOf("10.19.16.18");
     if(zahl1b<0) zahl1b=0;
zahl2 = pfad.lastIndexOf("THUERINGEN.DE");
     if(zahl2<0) zahl2=0;
     if(zahl2>25) zahl2=0;  //falls der Server mehrmals in Adresszeile steht
zahl3 = pfad.lastIndexOf("10.19.133.215/TLS");
     if(zahl3<0) zahl3=0;
//zahl4 = pfad.lastIndexOf("TLS.THLV.DE");
//zahl4 = pfad.lastIndexOf("TLS29.TLS.THLV.DE");
zahl4 = pfad.lastIndexOf("INTERNET.TLS.THLV.DE");
     if(zahl4<0) zahl4=0;
pfad = pfad.slice(zahl1+zahl1a+zahl1b+zahl2+zahl3+zahl4);
anz = pfad.split("/");
if (zahl3>0) anz.length=anz.length-1;
    if (anz.length == 5)
    pfad = "../../../";
    else if (anz.length == 4)
    pfad = "../../";
    else if (anz.length == 3)
    pfad = "../";
    else if (anz.length == 2)
    pfad = "";
    else
    pfad = "";


//Fußzeile
document.write("<div style='margin-top:30px;' >");
document.write("<hr size=1 noshade>");
document.write("<a style='font-size:11px;' href='http://www.statistik.thueringen.de' target='_blank'>Copyright © Thüringer Landesamt für Statistik, Europaplatz 3, 99091 Erfurt - Postfach 90 01 63, 99104 Erfurt</a>");
document.write("<br>&nbsp;</div>");


  if (document.layers) {
  ns4 = true
  ie4 = false
  }
  else {
  ns4 = false
  ie4 = true
  }


document.write("<div id='Huepfbilder' style='position: absolute; width:100px'>");

//Monitor (kein Vollbild)
    if(top.frames.length > 0) {
    x = top.frames.length-1;
    document.write("<a href='javascript: top.location.href = top.frames[" + x + "].location' target='_top'>");
    document.write("<img class='keinDruck' src='" + pfad + "images/Voll.gif' alt='Vollbild für Datenteil' border='0'>");
    document.write("</a>&nbsp;");
    aktiv = top.location.href.toUpperCase();     // merken von aktiv
    aktiv = aktiv.split("AKTIV=")   //zerlegen in Teil 0 und 1
    aktiv1 = aktiv[1];
      if(!aktiv1) { var aktiv1 = new String(); }

      if (top.location.pathname.toUpperCase().indexOf("/KOMMUNALINFO/") >= 0) {
        if (aktiv1 == "") {
        aktiv1 = "SHO03"  }
        else {
        aktiv1 = aktiv1.substr(0,11)   }
      }
      else  {
      aktiv1 = aktiv1.substr(0,5)
      }
    SetCookie("cAktiv", aktiv1);
    }

//Monitor (Vollbild)
    if(top.frames.length <= 0) {
    aktiv_neu = "" + GetCookie("cAktiv");
    startbei = top.location.pathname.substr(1,top.location.pathname.length)
    startbei = startbei.toUpperCase()
    startbei = startbei.replace("UTE/INTERNET/", "")
    startbei = startbei.replace("UTE/INTERNET-NEU/", "")

       if (window.Projekt_KIS)  { aktiv_neu = "SHO03_KOM00" }    // variable Projekt_KIS wird in navileisten.asp belegt

       if (startbei.substr(0, 4) == "TLS/")  { startbei = startbei.substr(4, startbei.length) }
    startbei = startbei + top.location.search        //übergebene Variablen, also alles hinter ?

       if (aktiv_neu.substr(0,5) == "SHO03" )  {
         if (startbei.substr(0, 13) == "KOMMUNALINFO/")  { startbei = startbei.substr(13, startbei.length) }
         if (startbei.substr(0, 10) == "DATENBANK/")  { startbei = "../" + startbei }
       document.write("<a href='../kommunalinfo/seiteKIS.asp?aktiv=" + aktiv_neu + "&startbei=" + startbei + "' target ='_top'>");
       }
       else  {
       document.write("<a href='" + pfad +  startbei + "' target ='_top'>");
       }

    document.write("<img class='keinDruck' src='" + pfad + "images/desk_rueck.gif' alt='Zurück / Vollbild schließen' border='0'>");
    document.write("</a>&nbsp;");
    }

//Briefkasten
t_pfad = window.location.href;
t_pfad = t_pfad.toUpperCase();
    if (t_pfad.lastIndexOf("10.19.133.215/TLS")>=0) document.write("<a href='javascript: top.location.href=&quot;amt/kontakt.asp&quot;' target='_top'>");
    if (t_pfad.lastIndexOf("10.19.133.215/TLS")<0) document.write("<a href='javascript: top.location.href=&quot;" + pfad + "amt/kontakt.asp&quot;' target='_top'>");
document.write("<img class='keinDruck' src='" + pfad + "images/Brieflein.gif' alt='Kontakt' border='0'>");
document.write("</a>&nbsp;");

//Druckerbild
document.write("<a href='javascript: Drucken()'>");
document.write("<img class='keinDruck' src='" + pfad + "images/printr01.gif' alt='Drucken' border='0'>");
document.write("</a>");

document.write("</div>");

setInterval ("displayright()",500);


  if (ns4) xwidth = window.innerWidth;
  if (ie4) xwidth = document.body.clientWidth;

//Positionierung der Titel
if (top.frames.length == 0)  {
  if (ns4) {
  divTitelTIM=(document.layers["TitelTIM"])? true:false;
     if (divTitelTIM) document.layers["TitelTIM"].left=xwidth-600-85;
     if (divTitelTIM) document.layers["TitelTIM"].top=2;
  }
  if (ie4) {
  divTitelTIM=(document.getElementById("TitelTIM"))? true:false;
     if (divTitelTIM) document.getElementById("TitelTIM").style.left=xwidth-600-85;
     if (divTitelTIM) document.getElementById("TitelTIM").style.top=5;
  }
}


///////////////////////////////////////////////////////////////////////////////////////////////////////////
function Drucken () {
  if (window.Lupe) {
  txt = "Bitte beachten Sie, dass die Seite eventuell nicht im A4-Format ausgedruckt werden kann.\n\n";
  txt = txt + "Sie haben folgende Möglichkeiten, die Seite für den Druck anzupassen:\n";
  txt = txt + "- Benutzen Sie die Lupe, um die Schriftgröße zu verändern\n";
  txt = txt + "- Stellen Sie bei breiten Tabellen bei der Druckerwahl 'Querformat' ein\n";
  txt = txt + "- Benutzen Sie den Menüpunkt 'Tabelle bearbeiten' (wenn vorhanden), um ";
  txt = txt + "Spalten auszublenden";
  txt = txt + "\n\nBeachten Sie bitte auch, dass Sie über den Menüpunkt 'Seite einrichten'";
  txt = txt + " die Seitenränder anpassen können. Es wird empfohlen, die Kopf- und Fußzeile";
  txt = txt + " auszublenden.";
  antwort = confirm(txt);
      if(antwort == false) {return}
  }

t_pfad = window.location.href;
t_pfad = t_pfad.toUpperCase();
  if (t_pfad.lastIndexOf("/ONLINEFBL_REITER.ASP")>=0)  {
  txt = "Bitte beachten Sie, dass diese Seite nur im A4-Querformat ausgedruckt werden kann.\n\n";
  txt = txt + "Stellen Sie dazu bei der Druckerwahl - Ausrichtung: 'Querformat' ein.\n";
  antwort = confirm(txt);
      if(antwort == false) {return}
  }

        if (window.print) {
           if (ns4) {
           document.layers["Huepfbilder"].visibility = "hide";
           divTitelTIM=(document.layers["TitelTIM"])? true:false;
              if (divTitelTIM) document.layers["TitelTIM"].visibility = "hide";
           }
           else  {
           document.getElementById("Huepfbilder").style.visibility="hidden";
           }

           if(top.frames.length > 0) {
           x = top.frames.length-1;
           top.frames[x].print(); }
           else {
           window.print();
           }

           if (ns4) {
              document.layers["Huepfbilder"].visibility = "show";
              if (divTitelTIM) document.layers["TitelTIM"].visibility = "show";
           }
           else {
           document.getElementById("Huepfbilder").style.visibility="visible";
           }
        }
        else if (document.all && navigator.appVersion.substring(22,23)==4) {
          x = top.frames.length-1;
          if(top.frames.length > 0) top.frames[x].focus();   {
          document.getElementById("Huepfbilder").style.visibility="hidden";
          divTitelTIM=(document.getElementById("TitelTIM"))? true:false;
             if (divTitelTIM) document.getElementById("TitelTIM").style.visibility="hidden";
          WebBrowser1.ExecWB(6,2);
          document.getElementById("Huepfbilder").style.visibility="visible";
          divTitelTIM=(document.getElementById("TitelTIM"))? true:false;
             if (divTitelTIM) document.getElementById("TitelTIM").style.visibility="visible";
          WebBrowser1.outerHTML = "";
          alert("Die Seite wurde gedruckt.");   }
        }
}

//////////////////////////////////////////////////////////////////////////////////////////////////////

function displayright()  {
if (ns4) xwidth=window.innerWidth;
if (ns4) ypos=window.pageYOffset;
if (ie4) xwidth=document.body.clientWidth;
if (ie4) ypos=document.body.scrollTop;

if (ns4) document.layers["Huepfbilder"].left=xwidth-78;
if (ns4) document.layers["Huepfbilder"].top=ypos+1;
   if (ie4) {
   document.getElementById("Huepfbilder").style.left=xwidth-70;
   document.getElementById("Huepfbilder").style.top=ypos+1;
   }
}
