var vpWinNeu1; 
// UNKLAR: eine globale Variable an dieser Stelle zu deklarieren, ist offensichtlich nicht korrekt ... !?



function fctBerechneNaCl1(vGehaltNa,vGehaltCl) { 
// v.13.12.05
 var vFkt1; 
 var vMG_Na = 22.99; 
 var vMG_Cl = 35.453; 
 if (vGehaltNa == "" || vGehaltCl == "") { 
  alert("Werte unvollständig!"); 
  return ""; 
 } 
 var vAnzMolNa = vGehaltNa / vMG_Na; 
 var vAnzMolCl = vGehaltCl / vMG_Cl; 
 if (vAnzMolNa <= vAnzMolCl) { 
   vFkt1 = vAnzMolNa * (vMG_Na + vMG_Cl); } 
  else { 
   vFkt1 = vAnzMolCl * (vMG_Na + vMG_Cl); 
 } 
 vFkt1 = Math.round(vFkt1); 
 return vFkt1; 
} 



function fctBildWechsel1(vBildN,vBildObj) { 
// v.03.12.05
 var vBildAnz = document.images.length; 
 var vi; 
 for (vi = 0; vi < vBildAnz; vi++) { 
  if (document.images[vi].name == vBildN) break; 
 } 
 document.images[vi].src = vBildObj.src; 
} 



function fctFileExtInHH1a(vDateiN) {
// VORSICHT: funktioniert NUR aus einem CHM-File heraus,
// NICHT aber bei "offenem" HTML !!!
   var vX, vY, vsl, va, vra, vURL;
   vra = /:/;
   va = location.href.search(vra);
   if (va == 2)
      vX = 14;
   else
      vX = 7;
   vsl = "\\";
   vY = location.href.lastIndexOf(vsl) + 1;
   vURL = 'file:///' + location.href.substring(vX, vY) + vDateiN;
   location.href = vURL;
   //alert(vURL);
} 

function fctFileExtInHH1b(vDateiN) {
// VORSICHT: funktioniert nur aus einem CHM-File heraus, nicht aber bei "offenem" HTML !!!
   var vFstNeu1, vX, vY, vsl, va, vra, vURL, vStr1, vPos;
   vStr1 = "file:///file://";
   vra = /:/;
   va = location.href.search(vra);
   if (va == 2)
      vX = 14;
   else
      vX = 7;
   vsl = "\\";
   vY = location.href.lastIndexOf(vsl) + 1;
   vURL = 'file:///' + location.href.substring(vX, vY) + vDateiN;
   vPos = vURL.indexOf(vStr1);
   if (vPos == -1) { 
      if (vFstNeu1 != null && !vFstNeu1.closed) { 
         //...
      } 
      else { 
         vFstNeu1 = window.open("MyLeer0.htm", "SekFst1", "dependent,menubar=no,scrollbars=no,status=no,toolbar=no,resizable");
      } 
      vFstNeu1.location.href = vURL;
      vFstNeu1.focus();
   } 
   else { 
      alert('Dieser Hyperlink funktioniert nur aus einem kompilierten Microsoft-Hilfe-System (CHM-Datei) heraus !!!');
   } 
} 



function fctHRefForFmeZFromFmeQ1(vFmeQObj,vFmeZName,vEntf,vHinzu,vLeerHTM) { 
// v.07.12.05
// TIP: 'vFmeQObj' am besten als 'this' übergeben (und aus "body_onLoad" heraus) !
// Standard-Vorgabe für 'vLeerHTM' ist '' (= keine "Leer-HTM" laden)
// VORSICHT: Fkt. setzt zwingend voraus, dass in den HTM-Dateinamen
//   bestimmte Zeichenfolgen enthalten sind !!!
// VORSICHT: falls die HTM-Dateien nicht existieren, bringt MSIE die Msg "Seite nicht gefunden!"
//   ==> und aus diesem ERROR kommt der Browser dann auch nicht mehr heraus ... !!!
 var vHRef; 
 var vHTM; 
 var vPos; 
 //alert(vFmeQObj.name + "\r\n" + vFmeZName + "\r\n" + vEntf + "\r\n" + vHinzu + "\r\n" + vLeerHTM.length); 
 if (window.parent.frames[vFmeZName] == null) return; 
 // BEACHTE: 'vFmeQObj' ist stets(!) vorhanden - auch "Frame-los" ('.name' hat dann aber die Länge 0) !
 if (vLeerHTM.length > 0) { 
  window.parent.frames[vFmeZName].location.href = vLeerHTM; 
  return; 
 } 
 vHRef = vFmeQObj.location.href; 
 //alert("vHRef = " + vHRef); 
 vPos = vHRef.lastIndexOf("/"); 
 if (vPos >= 0) vHRef = vHRef.slice(vPos + 1); 
 vHTM = vHRef; 
 vPos = vHTM.lastIndexOf("."); 
 if (vPos >= 0) vHTM = vHTM.slice(0,vPos); 
 vHTM = vHTM.slice(0,vHTM.length - vEntf.length); 
 vHTM = vHTM + vHinzu + ".htm"; 
 //alert(vHRef + "\r\n" + vHTM); 
 window.parent.frames[vFmeZName].location.href = vHTM; 
} 



function fctPruefeFrmNaClRech1(vFrm) { 
// v.13.12.05
 var vErrNr = 0; 
 var vMsg1a = "Bitte tragen Sie zunächst den Gehalt an "; 
 var vMsg1c = " ein!"; 
 var vMsg1ges; 
 if (vFrm.txtGehaltNa.value == "") { 
  vErrNr = 2; 
 } 
 if (vFrm.txtGehaltCl.value == "") { 
  if (vErrNr > 0) { 
    vErrNr = 4; } 
   else { 
    vErrNr = 3; 
  } 
 } 
 switch (vErrNr) { 
  case 2: 
   vMsg1ges = vMsg1a + "Natrium" + vMsg1c; 
   break; 
  case 3: 
   vMsg1ges = vMsg1a + "Chlorid" + vMsg1c; 
   break; 
  case 4: 
   vMsg1ges = vMsg1a + "Natrium und Chlorid" + vMsg1c; 
   break; 
  default: 
 } 
 if (vErrNr > 0) { 
   alert(vMsg1ges); 
   return false; } 
  else { 
   vFrm.txtGehaltKS.value = fctBerechneNaCl1(vFrm.txtGehaltNa.value,vFrm.txtGehaltCl.value); 
   return true; 
 } 
} 



function fctWinNeu1a(vDateiN,vFstB,vFstH,vScroll) { 
// v.03.05.06
 var vScrBars = "scrollbars=no"; 
 if (vFstB == null) vFstB = 500; 
 if (vFstH == null) vFstH = 375; 
 if (vScroll == 1) vScrBars = "scrollbars"; 
 var vZustand = "dependent,menubar=no," + vScrBars + ",status=no,toolbar=no,resizable,width=" + vFstB + ",height=" + vFstH; 
 if (vpWinNeu1 && !vpWinNeu1.closed) { 
 // SCH...: das bereits offene Sekundärfenster wird NICHT erkannt !!!
 // - auch nicht bei Prüfung mittels 'if (vpWinNeu1 == null)' !!!
 // Muss etwa 'vpWinNeu1' in der aufrufenden HTM selbst deklariert sein ... ?!
   //alert("Sek.-Fenster ist offen"); 
   vpWinNeu1.focus(); } 
  else { 
   //alert("Sek.-Fenster nicht offen"); 
   var vpWinNeu1 = window.open(vDateiN, "WinNeu1", vZustand); 
   vpWinNeu1.focus(); 
 } 
} 



function fctWinNeu2a(vDateiN,vPfadRel,vFstTi) { 
// v.21.12.05
// VORSICHT: dieser (vereinfachte) Code setzt voraus, dass als Browser nur MSIE benutzt wird !!!
 if (vDateiN == "") return; 
 if (vPfadRel != "") vDateiN = vPfadRel + vDateiN; 
 var vFstNeu = window.open("MyLeer0.htm", "FensterAppPic", 
"dependent,menubar=no,scrollbars=no,status=no,toolbar=no,resizable,width=500,height=375"); 
 if (vFstNeu != null) { 
  with (vFstNeu.document) { 
   open(); 
   write("<html><head><title>" + vFstTi + "</title></head>"); 
   write("<body onBlur='window.close()'>"); 
   write("<p align=center><a href='javascript:window.close()'><img src=" + vDateiN + " alt='Fenster schlie&szlig;en und zur&uuml;ck' border=0></a></p>"); 
   write("</body></html>"); 
   close(); 
  } 
  fctWinResize1a(vFstNeu); 
 } 
} 



function fctWinNeu3a(vDateiN,vPfadRel) { 
// v.22.01.06
// ehemals 'fctFensterSek3'
// klappt mit IE50, NN45 und NN701 !
 var vFstSek; 
 var vZustand = "dependent,menubar=no,scrollbars=no,status=no,toolbar=no,resizable,width=510,height=340"; 
// SCH...: 'scrollbars=no' interessiert NN701 nicht !!!
 if (vDateiN == "") return; 
 if (vPfadRel != "") vDateiN = vPfadRel + vDateiN; 
 switch (navigator.appName) { 
  case "Netscape": 
  // VORSICHT: wenn NN701 mit "MyLeer0.htm" (vor-)geladen wird, ist diese Datei leider auch 
  // der letztlich angezeigte Fensterinhalt, hier also ein LEERES Fenster !!!!!
   vFstSek = window.open("", "WinNeu3", vZustand); 
   break; 
  case "Microsoft Internet Explorer": 
  // VORSICHT: bei IE4 darf die zu (vorzu-)ladende URL nicht "" sein !!!
   vFstSek = window.open("MyLeer0.htm", "WinNeu3", vZustand); 
   break; 
  default: 
   vFstSek = window.open("MyLeer0.htm", "WinNeu3", vZustand); 
   break; 
 } 
// 'resizable' interessiert NN45 nicht, wenn keine Vorgabe für B x H gemacht !
// für 'scrollbars' 10-20 (NN) bzw. 20-30 (IE) Pixel mehr !
// bisher B u. H nur als pauschale Vorgabe, die aber jetzt der "Realität" angepasst wird :
 if (vFstSek != null) { 
  with (vFstSek.document) { 
  // 'vFstSek.document' ergibt hier beim 2.(!) Aufruf einen FEHLER !!!
  // ('MyLeer0.htm' wird zwar noch geladen, aber dann ist "Schluß"!)
   open(); 
   writeln("<html><head><title>Tempor&auml;res Sekund&auml;r-Fenster</title></head>"); 
   writeln("<body onBlur='window.close()'>"); 
   writeln("<p align='center'><img src='" + vDateiN + "' onClick='javascript:window.close()' title='Fenster schlie&szlig;en und zur&uuml;ck' border='0' hspace='5' vspace='5'></p>"); 
   // NN701 zeigt 'alt'-Text bei <img> nicht an, daher 'title' !!!
   writeln("</body></html>"); 
   close(); 
  } 
  vFstSek.focus(); 
  fctWinResize1b(vFstSek); 
 } 
} 



function fctWinResize1a(vFenster) { 
// v.23.12.05
// BLOED: ohne explizite Angabe der Bildgröße setzt IE60 die Maße des Fensters erst ab dem
// zweiten(!) Laden des Bildes korrekt (- oder man lädt eben sämtliche Bilder VOR ...) !!!
 if (vFenster == null) return; 
 with (vFenster) { 
  switch (navigator.appName) { 
   case "Netscape": 
    moveTo(1,1); 
    resizeTo(document.images[0].width + 35,document.images[0].height + 25); 
    break; 
   case "Microsoft Internet Explorer": 
    moveTo(1,1); 
    resizeTo(document.images[0].width + 60,document.images[0].height + 70); 
    break; 
   default: 
  } 
 } 
} 



function fctWinResize1b(vFenster) { 
// v.22.01.06
// ehemals 'fctWinResize3'
 if (vFenster == null) return; 
 with (vFenster) { 
  switch (navigator.appName) { 
   case "Netscape": 
    moveTo(5,5); 
    if (navigator.appVersion.substring(0,1) > "4") { 
      resizeTo(document.images[0].width + 50,document.images[0].height + 70); } 
      // "height+60" (statt +50), wenn Win.Close nicht als TextLink, s. ueber PIC.Click !
     else { 
      resizeTo(document.images[0].width + 40,document.images[0].height + 25); 
    } 
    break; 
   case "Microsoft Internet Explorer": 
    moveTo(5,5); 
    resizeTo(document.images[0].width + 60,document.images[0].height + 70); 
    // "height+67" (statt +60), wenn Win.Close nicht als TextLink, s. ueber PIC.Click !
    break; 
   default: 
    moveTo(5,5); 
    resizeTo(document.images[0].width + 60,document.images[0].height + 70); 
    break; 
  } 
 } 
} 



// -----------------------------------------------------------------
// © Copyright 2003-2006 Dr. Michael Lüpke, Ostfildern, Germany
// http://www.dr-luepke.de
// All rights reserved.