// Funktion zur Erzeugung eines hübschen CHF-Formates
//
// Autor:           Roger Weber
// Erstellt am:     2. Juli 2003
// Letzte Änderung: 22. April 2005
//
// **************************************************

function FormatCHF(Eingabe) {
 if (Eingabe == Math.floor(Eingabe)) {
     return "Fr. " + Eingabe + ".00"}
     else
       if (10*Eingabe == Math.floor(10*Eingabe)) {
           return "Fr. " + Eingabe + "0"}
           else return "Fr. " + Eingabe; 
}