<!--
  var baseURL = 'http://www.heinpit.de';
  var arrType     = new Array();
  var arrReport   = new Array();
  var arrLinkText = new Array();
  var arrLinkURL  = new Array();
  function addEntry(type,yyyymm,text,url) {
    arrType[arrType.length]         = type;
    arrReport[arrReport.length]     = yyyymm;
    arrLinkText[arrLinkText.length] = text;
    arrLinkURL[arrLinkURL.length]   = url;
  }
  function listSubNavigationEntries(entry2highlight) {
    populateArrays();
    var YearOfThisReport = entry2highlight.substring(0,4);
    for (var j=0; j < arrReport.length; j++) {
      var YearOfReport = arrReport[j].substring(0,4);
      if (arrType[j] == 'h' || YearOfThisReport == YearOfReport || !(parseFloat(YearOfThisReport) > 2001)) {
        switch(arrType[j]) {
          case 'h':
            if (arrReport[j] == entry2highlight) {
              document.writeln('<h3><a href="' + baseURL + arrLinkURL[j] + '" class="currentpage">' + arrLinkText[j] + '</a></h3>');
            }
            else {
              if (arrLinkURL[j] == '') {
                document.writeln('<h3>' + arrLinkText[j] + '</h3>');
              }
              else {
                document.writeln('<h3><a href="' + baseURL + arrLinkURL[j] + '">' + arrLinkText[j] + '</a></h3>');
              }
            }
            document.writeln('<ul>');
            break;
          case 'l':
            if (arrReport[j] == entry2highlight) {
              document.writeln('<li><a href="' + baseURL + arrLinkURL[j] + '" class="currentpage">' + arrLinkText[j] + '</a></li>');
            }
            else {
              document.writeln('<li><a href="' + baseURL + arrLinkURL[j] + '">' + arrLinkText[j] + '</a></li>');
            }
            document.writeln('</ul>');
            break;
          default:      
            if (arrReport[j] == entry2highlight) {
              document.writeln('<li><a href="' + baseURL + arrLinkURL[j] + '" class="currentpage">' + arrLinkText[j] + '</a></li>');
            }
            else {
              document.writeln('<li><a href="' + baseURL + arrLinkURL[j] + '">' + arrLinkText[j] + '</a></li>');
            }
          break;
        }
      }
    }
  }
  function NewWindow(PicName,PicWidth,PicHeight) {
    var MaxWidth  = 650;  // überbreite Bilder (Panoramas) bekommen kein komplettes Fenster, dafür aber Scrollbar
    var WinHeight = PicHeight+175;
    var WinWidth;
    if (PicWidth <= MaxWidth) {
      WinWidth = PicWidth+130;
    }
    else {
      WinWidth = 780;
    }
//  Find subdirectory of picture that shall be launched
    var WhereAmI = document.location.href;                                    // http://www.heinpit.de/en/monthly/200412[/][index.htm]
    if (WhereAmI.substring(WhereAmI.length-3,WhereAmI.length) != 'htm') {     // http://www.heinpit.de/en/monthly/200412 or http://www.heinpit.de/en/monthly/200412/
      if (WhereAmI.substring(WhereAmI.length-1,WhereAmI.length) == '/') {
        WhereAmI = WhereAmI + 'index.htm';
      }
      else {
        WhereAmI = WhereAmI + '/index.htm';
      }
    }                                                                         // http://www.heinpit.de/en/monthly/200412/index.htm
    var WhereAmIrelative = WhereAmI.substring(baseURL.length);                //                      /en/monthly/200412/index.htm
    var DocumentPathElements = WhereAmIrelative.split("/");                   // '' + 'en' + 'monthly' + '200412' + 'index.htm'
    var DocumentPath = 'all/';
      for (var j=2; j < (DocumentPathElements.length-1); j++) {               //             'monthly' + '200412'
        DocumentPath += DocumentPathElements[j] + '/';
      }                                                                       // /all/monthly/200412/
    var PictureURL = baseURL + '/picpage.htm?' + DocumentPath + PicName;
    var WindowSettings;
    if (PicWidth <= MaxWidth) {
      WindowSettings = 'width='+WinWidth+',height='+WinHeight+',location=no,menubar=no,resizable=yes,status=no,scrollbars=no,toolbar=no,directories=no';
    }
    else {
      WindowSettings = 'width='+WinWidth+',height='+WinHeight+',location=no,menubar=no,resizable=yes,status=no,scrollbars=yes,toolbar=no,directories=no';
    }
    var PhotoWin = open(PictureURL, 'Title', WindowSettings);
    PhotoWin.resizeTo(WinWidth,WinHeight);
    PhotoWin.focus();
  }  
//-->
