var angebotNr,angebotNrAktuel,berechnet, stck, textPre, textFrmted,txtFrmtd,texy, BodenIndex,BodenIndex2, bdFIndex, textGleichNein="", dcTprIndex=1;
var Da, Di, R, h1, h2, h3, r,  s, euroWert, valueInDm,dmWert,zaehler=0;
var pageH, pageHs=0;
var myApplety;

var sachbHilfe,bodenformHilfe,inOrOutHilfe,kantenHilfe,werkstoffH,attestH,probH,fertigCodeH,warmH,oberflaechH,waehrungH,einsatzH;

var  docToPrint = new Array() ;

function test(){
    var dar="a 23.56 asdf    256.634534";
    var a=new Array();
    document.Angebot.aus.value="";
    //document.Angebot.aus.value=setPrecision(23.2345, 4);
    a=dar.split(" ");
    for(var i=0; i<=a.length-1;i++){
        document.Angebot.aus.value+=parseFloat(a[i])+" ";
    }
};

function SetCookie(name, value, expire, path, domain, secure){
    //expires = new Date(2003,0,11,1,0,0);
    document.cookie = name + "="+escape (value) +
    ((expire) ? ";  expires=" + expire.toGMTString  : "") +
    ((path) ? "; path=" +path :  "")+
    ((domain) ? "; domain="+domain : "")+
    ((secure) ? "; secure" : "");
}

function save_es(jo_file, filedata){
    netscape.security.PrivilegeManager.enablePrivilege("UniversalFileAccess");
    var jo_writer = new java.io.FileWriter(jo_file);
    jo_writer.write(filedata, 0, filedata.length);
    jo_writer.close();
    netscape.security.PrivilegeManager.disablePrivilege("UniversalFileAccess");

}

function read_es(jo_file){

    var stryg=new Array();
    var chr, i__, integerValue,stringVar;

    netscape.security.PrivilegeManager.enablePrivilege("UniversalFileAccess");
    var jo_reader = new java.io.FileInputStream(jo_file);
    //jo_reader.read(filedata, 0, filedata.length);

    for (var i=0;i<17;i++){ //16 bit angamba no zakan'ity
        stryg[i]=jo_reader.read();
        i__=i;
        if(stryg[i]==42) break;
    };

    jo_reader.close();
    netscape.security.PrivilegeManager.disablePrivilege("UniversalFileAccess");
    stryg.pop();//asoriko tao ny mariky ny faran'ilay array dia ny * izany
    for(var i=0;i<i__;i++){//mihena ray ny isan'ny array eto
        stryg[i]=String.fromCharCode(stryg[i]); //ahoana ary ilay function char e???
    };

    stringVar=stryg.join("");
    integerValue=parseFloat(stringVar);
    //document.Angebot.data.value=integerValue;
    return integerValue;
}

function nrAngebot(){


    angebotNrAktuel=read_es("nummer10")+1;
    return angebotNrAktuel
}

function nrAngebotVerzoegert(){
    if(angebotNrAktuel<20000){ //ity ny isa lehibe indrindra azo aseho
        document.Angebot.Angebotsnummer.value=angebotNrAktuel;
        save_es("nummer10", document.Angebot.Angebotsnummer.value);
    }else{
        alert ("Bitte kontaktieren Sie die Firma Promoter oHG und lassen Sie Ihr Programm erneut frei schalten.\n (0271 - 2383262)\n Danke!");
        zaehler=0;
        document.appi.stop();
        document.open();
        document.write("Bitte kontaktieren Sie die Firma Promoter oHG und lassen Sie Ihr Programm erneut frei schalten.\n (0271 - 2383262)\n Danke!");
        document.close();
        this.close();

    }

}

function setHeadText(){
    document.Angebot.anrede.value="\r\r"+"Wir danken für Ihre Anfrage und bieten Ihnen freibleibend zu unseren Verkaufs- und Lieferbedingungen an:";
}

function setPrecision(numberToRound,nachKomma){
    var indexOfp, numberToRoundh;
    numberToRoundh=numberToRound.toString();
    if(numberToRoundh.indexOf(".") ==-1){

        return  numberToRound;
    }else{

        for (var i=0; i<numberToRoundh.length+1; i++){
            if(numberToRoundh.charAt(i) == "."){
                indexOfp=i;
            }
        }

        //return parseFloat(numberToRoundh.substring(0,(indexOfp+nachKomma)));
        return parseInt(numberToRoundh.substring(0,(indexOfp+nachKomma))); //tsy mila nachkomma stellen ilay olona


    }
}

function sachbAusgabe(sachbHilfe){



    switch(sachbHilfe){

        case 0:
            alert("Bitte wählen Sie einen Sachbearbeiter");

            break;

        case 1:
            return "Herr Gläser" +"\n"+
            "Tel: 0271 / 7097 - 37" +"\n"+
            "E-mail: gerd.glaeser@weisstaler.de";
            break;

        case 2:
            return "Frau Schwunk-Hebel" +"\n"+
            "Tel: 0271 / 7097 - 25" +"\n"+
            "E-mail: juliane.schwunk.hebel@weisstaler.de";
            break;

        case 3:
            return "Herr Latsch" +"\n"+
            "Tel: 0271 / 7097 - 46"+"\n"+
            "E-mail: christoph.latsch@weisstaler.de";
            break;

        case 4:
            return "Frau Laux" +"\n"+
            "Tel: 0271 / 7097 - 16"+"\n"+
            "E-mail: tanja.laux@weisstaler.de";
            break;

        case 5:
            return "Frau Schmelzer" +"\n"+
            "Tel: 0271 / 7097 - 27"+"\n"+
            "E-mail:katharina.schmelzer@weisstaler.de";
            break;

        case 6:
            return "Herr Beyer" + "\n"+
            "Tel: 0271 / 7097 - 15"+"\n"+
            "E-mail: rolf.beyer@weisstaler.de";
            break;

        case 7:
            return "Frau Ahlborn" + "\n"+
            "Tel: 0271 / 7097 - 11"+"\n"+
            "E-mail:martina.ahlborn@weisstaler.de";
            break;
    }


}



function berechne(){
    bdFIndex = document.Angebot.Bodenform.selectedIndex;
    return kalkuliere(bdFIndex);
}

var bdFrm;
function selectValueOfh(bdFrm){

    var alphaPrmtr;
    alphaPrmtr=document.Angebot.dickemm.value;
    alphaPrmtr=Math.floor(parseFloat(alphaPrmtr.toString()));

    if ((alphaPrmtr>=3)&&(alphaPrmtr<=30)){

        if(bdFrm==1){

            if((alphaPrmtr>=3)&&(alphaPrmtr<=5)){
                return 20;
            };
            if((alphaPrmtr>=6)&&(alphaPrmtr<=7)){
                return 25;
            };
            if((alphaPrmtr>=8)&&(alphaPrmtr<=10)){
                return 35;
            };
            if((alphaPrmtr>=11)&&(alphaPrmtr<=12)){
                return 45;
            };
            if((alphaPrmtr>=13)&&(alphaPrmtr<=14)){
                return 50;
            };
            if((alphaPrmtr>=15)&&(alphaPrmtr<=17)){
                return 60;
            };
            if((alphaPrmtr>=18)&&(alphaPrmtr<=20)){
                return 70;
            };
            if((alphaPrmtr>=21)&&(alphaPrmtr<=23)){
                return 80;
            };
            if((alphaPrmtr>=24)&&(alphaPrmtr<=25)){
                return 90;
            };
            if((alphaPrmtr>=26)&&(alphaPrmtr<=28)){
                return 100;
            };
            if((alphaPrmtr>=29)&&(alphaPrmtr<=30)){
                return 110;
            };

        }
        if(bdFrm==2){

            if((alphaPrmtr>=3)&&(alphaPrmtr<=6)){
                return 20;
            };
            if((alphaPrmtr>=7)&&(alphaPrmtr<=8)){
                return 25;
            };
            if((alphaPrmtr>=9)&&(alphaPrmtr<=10)){
                return 30;
            };
            if((alphaPrmtr>=11)&&(alphaPrmtr<=13)){
                return 40;
            };
            if((alphaPrmtr>=14)&&(alphaPrmtr<=15)){
                return 45;
            };
            if((alphaPrmtr>=16)&&(alphaPrmtr<=18)){
                return 55;
            };
            if((alphaPrmtr>=19)&&(alphaPrmtr<=20)){
                return 60;
            };
            if((alphaPrmtr>=21)&&(alphaPrmtr<=23)){
                return 70;
            };
            if((alphaPrmtr>=24)&&(alphaPrmtr<=25)){
                return 75;
            };
            if((alphaPrmtr>=26)&&(alphaPrmtr<=28)){
                return 85;
            };
            if((alphaPrmtr>=29)&&(alphaPrmtr<=30)){
                return 90;
            };

        }
    }else {
        alert("Wert ausserhalb der erlaubten Werte");
        return 0
        }

}

function gewoelbteSelected(){
    if(document.Angebot.Bodenform.selectedIndex==8){
        document.Angebot.radiusScheibe.focus();
    }
}
function copyValueForOutput(){
    var sss;
    sss=document.Angebot.radiusScheibe.value;
    if (!document.Angebot.radiusScheibe.value.match(/\w/)) {
    //leeranweisung;
    }else{
        document.Angebot.Ausgabefeld.value="Radius = "+sss;
    }

}

function kalkuliere(BodenIndex){

    var a,b;
    a=document.Angebot.durchmessermm.value;
    b=document.Angebot.dickemm.value;

    if ( (a!="") && (b!="") ){

        switch(BodenIndex){
            case 0:
                alert("Bitte eine Bodenform wählen!!!\n"+"           Danke");
                break;
            //Klöpperboden DIN 28011
            case 1:


                h2 = setPrecision((h2=((0.1935*Da) - (0.455*s))),4);
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "r  = "+ setPrecision((0.1*Da),4) +  " mm\n"+
                "h  = "+ (h1=selectValueOfh(1)) + " mm\n"+
                //"h  = "+ setPrecision((h1=(3.5*s)),4) + " mm\n"+

                "Hi = "+ setPrecision((h1+h2),4) + " mm";


                break;

            //Korbbogenboden DIN 28013
            case 2:

                h2 = setPrecision((h2=((0.255*Da) - (0.635*s))),4);
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision(((0.8 * Da)),4) + " mm\n"+
                "r  = "+ setPrecision((0.154*Da),4) + " mm\n"+
                "h  = "+ (h1=selectValueOfh(2)) + " mm\n"+
                //"h  = "+ setPrecision((h1=(3*s)),4) + " mm\n"+

                "Hi = "+ setPrecision((h1+h2),4) +" mm";


                break;

            //Normalgewölbter Boden
            case 3:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "r  = "+ "je nach Größe"+ " mm\n"+
                "      " + "(15 - 50 mm, auf Wunsch auch > 50 mm)" + " mm\n"+
                //"h  = "+ setPrecision((3,5*s),4) + " mm\n"+
                "h  = "+(h1=selectValueOfh(2)) + " mm\n"+
                "h2 = "+ (h2="Wölbungshöhe") + " mm\n"+
                "Hi = "+ setPrecision((h1+"+ "+h2),4) + " mm";
                break;

            //Flachgewölbter Boden
            case 4:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((1.3*Da),4) + " mm\n"+
                "r  = "+ "je nach Größe"+ " mm\n"+
                "      " + "(15 - 50 mm, auf Wunsch auch > 50 mm)" + " mm\n"+
                "h  = "+(h1=selectValueOfh(2)) + " mm\n"+
                //"h  = "+ setPrecision((3,5*s),4) + " mm\n"+
                "h2 = "+ (h2="Wölbungshöhe") + " mm\n"+
                "Hi = "+ setPrecision((h1+"+ "+h2),4) + " mm";
                break;

            //Halbkugelboden
            case 5:
                //"h2 = "+ R + " mm\n"+
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ (R=setPrecision((0.5* (Di= Da - (2*s))),4)) + " mm\n"+
                "h  = "+ "nach Angabe möglich" + " mm\n"+
                "Hi = "+ setPrecision((h1+R),4) + " mm"; //h2=R
                break;

            //Gewölbte Scheibe Form R = Da
            case 6:
                "h2 = "+ setPrecision((0.134*Da),4) + " mm";
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "Hi = "+ setPrecision((0.134*Da),4) + " mm"; // ANONATANIO INDRAY ALOHA
                break;

            //Gewölbte Scheibe Form R = 0,8 x Da
            case 7:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((0.8 * Da),4) +" mm\n"+
                "Hi = "+ setPrecision((0.176*Da),4) +" mm"; //novaiko Hi ny h2
                break;

            //Gewölbte Scheibe  ****Radius freiangabe****
            case 8:
                return ""
                break;

            //Flacher Boden
            case 9:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "h = "+ setPrecision((3.5 * s),4) +" mm\n"+
                "r  = "+ "15 - 50 mm - auf Wunsch auch > 50 mm" +" mm\n"+
                "Hi = "+ setPrecision((h1+h2),4) +" mm";
                break;

            //Tellerboden
            case 10:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da +" mm\n"+
                "Hi = "+ setPrecision((0.134*Da),4)+ " mm"; //novaiko Hi ny h2
                break;

            //Diffuseurboden
            case 11:
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da +" mm\n"+
                "r  = "+"max. 100 mm "+ " mm\n"+
                "h  = "+ setPrecision((3.5*s),4) + " mm"; //novaiko h ny h1
                break;

            //Konus
            case 12:
                return "h3 = "+ "h1 + h2" + " mm";

                break;

            //Sonderpressteile
            case 13:
                return "Sonderpressteile";

                break;

            //Elliptischer Boden
            case 14:
                h2 = setPrecision((0.25* (Di=(Da-(2*s)))),4);
                return a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((0.9* (Di=(Da-(2*s)))),4) + "\n"+
                "r  = "+ setPrecision((0.17*Di),4) + "\n"+
                "h1 = "+ "gem. Angaben" + "\n"+

                "Hi = "+ "h1 + h2 " + "\n";  //novaiko Hi ny h3
                break;
            /////////////////////////////////
            default:
                return "";
        }
    }

//  stck=document.Angebot.stueckzahl.value
}

////////////////////////////////////////////////////////////////////
function repeatComputing(){

    initAllVar();

    var a,b,h, rresult;
    a=document.Angebot.durchmessermm.value;
    b=document.Angebot.dickemm.value;
    BodenIndex2=document.Angebot.Bodenform.selectedIndex;
    h=document.Angebot.handers.value;
    if ( (a!="") && (b!="") ){

        switch(BodenIndex2){
            case 0:
                alert("Bitte eine Bodenform wählen!!!\n"+"           Danke");
                break;
            //Klöpperboden DIN 28011
            case 1:


                h2 = setPrecision((h2=((0.1935*Da) - (0.455*s))),4);

                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "r  = "+ setPrecision((0.1*Da),4) +  " mm\n"+
                "h  = "+ (h1=h) + " mm\n"+
                //"h  = "+ setPrecision((h1=(3.5*s)),4) + " mm\n"+

                "Hi = "+ setPrecision((parseInt(h1)+h2),4) + " mm";
                document.Angebot.Ausgabefeld.value=rresult;

                break;

            //Korbbogenboden DIN 28013
            case 2:

                h2 = setPrecision((h2=((0.255*Da) - (0.635*s))),4);
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision(((0.8 * Da)),4) + " mm\n"+
                "r  = "+ setPrecision((0.154*Da),4) + " mm\n"+
                "h  = "+ (h1=h) + " mm\n"+
                //"h  = "+ setPrecision((h1=(3*s)),4) + " mm\n"+

                "Hi = "+ setPrecision((parseInt(h1)+h2),4) +" mm";

                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Normalgewölbter Boden
            case 3:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "r  = "+ "je nach Größe"+ " mm\n"+
                "      " + "(15 - 50 mm, auf Wunsch auch > 50 mm)" + " mm\n"+
                "h  = "+ (h1=h) + " mm\n"+
                "h2 = "+ (h2="Wölbungshöhe") + " mm\n"+
                "Hi = "+ setPrecision((parseInt(h1)+ "+ "+ h2),4) + " mm";
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Flachgewölbter Boden
            case 4:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((1.3*Da),4) + " mm\n"+
                "r  = "+ "je nach Größe"+ " mm\n"+
                "      " + "(15 - 50 mm, auf Wunsch auch > 50 mm)" + " mm\n"+
                "h  = "+ (h1=h) + " mm\n"+
                "h2 = "+ (h2="Wölbungshöhe") + " mm\n"+
                "Hi = "+ setPrecision((parseInt(h1)+"+ "+ h2),4) + " mm";
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Halbkugelboden
            case 5:
                //"h2 = "+ R + " mm\n"+
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((0.5* (Di= Da - (2*s))),4) + " mm\n"+
                "h  = "+ (h1=h) + " mm\n"+
                "Hi = "+ setPrecision((parseInt(h1)+R),4) + " mm"; //h2=R
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Gewölbte Scheibe Form R = Da
            case 6:
                "h2 = "+ setPrecision((0.134*Da),4) + " mm";
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da + " mm\n"+
                "Hi = "+ setPrecision((0.134*Da),4) + " mm"; // ANONATANIO INDRAY ALOHA
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Gewölbte Scheibe Form R = 0,8 x Da
            case 7:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((0.8 * Da),4) +" mm\n"+
                "Hi = "+ setPrecision((0.176*Da),4) +" mm"; //novaiko Hi ny h2
                document.Angebot.Ausgabefeld.value=rresult;
                break;


            //Gewölbte Scheibe
            case 8:
                rresult="";
                break;


            //Flacher Boden
            case 9:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "h = "+ (h1=h) +" mm\n"+
                "r  = "+ "15 - 50 mm - auf Wunsch auch > 50 mm" +" mm\n"+
                "Hi = "+ setPrecision((parseInt(h1)+h2),4) +" mm";
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Tellerboden
            case 10:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da +" mm\n"+
                "Hi = "+ setPrecision((0.134*Da),4)+ " mm"; //novaiko Hi ny h2
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Diffuseurboden
            case 11:
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ Da +" mm\n"+
                "r  = "+"max. 100 mm "+ " mm\n"+
                "h  = "+ h + " mm"; //novaiko h ny h1
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Konus
            case 12:

                rresult="h3 = "+ "h1 + h2" + " mm";
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Sonderpressteile
            case 13:

                rresult="Sonderpressteile";
                document.Angebot.Ausgabefeld.value=rresult;
                break;

            //Elliptischer Boden
            case 14:
                h2 = setPrecision((0.25* (Di=(Da-(2*s)))),4);
                rresult=a+" mm "+inOrOut(document.Angebot.innenaussen.selectedIndex)+ " x "+b+" mm ("+einsatzAus(document.Angebot.Einsatz.selectedIndex)+")\n"+
                "R  = "+ setPrecision((0.9* (Di=(Da-(2*s)))),4) + "\n"+
                "r  = "+ setPrecision((0.17*Di),4) + "\n"+
                "h = "+ (h1=h) + "\n"+

                "Hi = "+ (parseInt(h1) + h2)  + "\n";  //novaiko Hi ny h3
                document.Angebot.Ausgabefeld.value=rresult;
                break;
        }
    }
}
////////////////////////////////////////////////////////////////////




function initAllVar(){
    Da = document.Angebot.durchmessermm.value;
    s  = document.Angebot.dickemm.value;

}
function prepare() {

    initApplet();
    document.appi.resetP();


}

function schreibe(){
    var response="";
    initAllVar();
    //!="undefined"
    response=berechne();
    if(response!="undefined"){
        this.document.Angebot.Ausgabefeld.value=response;
    }else{
        this.document.Angebot.Ausgabefeld.value="";
    }

}

function setThisWindowName(){

    return window.name="formKalk";

}
function initApplet(){
    myApplety = window.document.appi;

}

function weiterPosition() {

    // if ((myApplety != null) && (document.Angebot.Sachbearbeiter.selectedIndex !=0)){
    if ((myApplety != null)){
        myApplety.addd();
        zaehler++;
    }


}

function textFormat(textPre){

    var formatiert="";

    textFrmted=textPre.split("\n");//textFrmted is an array
    for (var i=0; i<textFrmted.length; i++){
        formatiert += textFrmted[i]+ "<br>";
    }

    return formatiert;

}

////////////////////////////////////////////////////////
function oneLine(txtFrmtd){

    var formt="",form0="",formEnd="",ind=0;

    texy=txtFrmtd.split("<br>");//texy is an array
    if (texy.length==2){
        form0=texy[0];
        return form0+"<br>";
    }else{
        if (texy.length==3){
            form0=texy[0];
            formEnd=texy[1];
            return form0+"<br>"+formEnd+"<br>";
        }else{
            form0=texy[0];
            ind=texy.length-2;
            formEnd=texy[ind];
            for (var i=1; i<texy.length-2; i++){
                formt += texy[i]+" ";
            }
            return form0+"<br>"+formt+"<br>"+formEnd+"<br>";
        }
    }

}

//////////////////////////////////////////////////////
function bodenAusgabe(bodenformHilfe){
    switch(bodenformHilfe){
        case 1:
            return "Klöpperboden DIN 28011";
            break;
        case 2:
            return "Korbbogenboden DIN 28013";
            break;
        case 3:
            return "Normalgewölbter Boden";
            break;
        case 4:
            return "Flachgewölbter Boden";
            break;
        case 5:
            return "Halbkugelboden";
            break;
        case 6:
            return "Gewölbte Scheibe Form R = Da";
            break;
        case 7:
            return "Gewölbte Scheibe Form R = 0,8 x Da";
            break;
        case 8:
            return "Gewölbte Scheibe";
            break;
        case 9:
            return "Flacher Boden";
            break;
        case 10:
            return "Tellerboden";
            break;
        case 11:
            return "Diffuseurboden";
            break;
        case 12:
            return "Konus";
            break;
        case 13:
            return "Sonderpressteile";
            break;
        case 14:
            return "Elliptischer Boden";
            break;
        default:
            return "";
    }

};

function inOrOut(inOrOutHilfe){
    switch(inOrOutHilfe){
        case 0:
            return "Do";
            break;
        case 1:
            return "ID";
            break;
    }
};

function einsatzAus(einsatzH){
    switch(einsatzH){
        case  0:
            return "Einsatz";
            break;
        case  1:
            return "NW";
            break;
        case  2:
            return "MW";
            break;

    }
};

function kantenAusgabe(kantenHilfe){
    switch (kantenHilfe){
        case 0:
            return "R" ;
            break;
        case 1:
            return "I";
            break;
        case 2:
            return "VA 30 Grad" ;
            break;
        case 3:
            return "VI 30 Grad" ;
            break;
        case 4:
            return "DV 30 Grad" ;
            break;
        case 5:
            return "2/3 DV 30 Grad" ;
            break;
        case 6:
            return "YA 30 Grad" ;
            break;
        case 7:
            return "YI 30 Grad" ;
            break;
        case 8:
            return "DY" ;
            break;
        case 9:
            return "U" ;
            break;
        case 11:
            return "DU"  ;
            break;
        case 12:
            return "Diverse" ;
            break;
    }
};

function werkstoffAusgabe(werkstoffH){
    switch(werkstoffH){
        case 0:
            return "1.0425 - P265GH / AD-W1 DIN EN 10028";
            break;
        case 1:
            return "1.0038 - S235JRG2 / AD-W1 DIN 10025";
            break;
        case 2:
            return "1.4301 / AD-W2 DIN 17440 EN 10088";
            break;
        case 3:
            return "1.4541 / AD-W2 DIN 17440 EN 10088";
            break;
        case 4:
            return "1.4571 / AD-W2 DIN 17440 EN 10088";
            break;
        case 5:
            return "1.0566 - P355NL1 / AD-W1, EN 10028 T.3, VDTÜV-BI. 354/1";
            break;
        case 6:
            return "1.0473 - P355 GH / EN 10028 Teil 2, AD-W1";
            break;
        case 7:
            return "1.0481 - P295GH / DIN EN 10028 Teil 2, AD-W1";
            break;
        case 8:
            return "1.0487 - P275NH / AD-W1, DIN EN 10028 Teil 3";
            break;
        case 9:
            return "1.0488 - P275NL1 / AD-W1, EN 10028 T.3, VDTÜV-BI. 354";
            break;
        case 10:
            return "1.0553 - S355J2G3 / AD-W1, DIN EN 10025";
            break;
        case 11:
            return "1.0562 - P355N / AD-W1, EN 10028 T.3";
            break;
        case 12:
            return "1.0565 - P355NH / AD-W1, EN 10028 T.3, SEW081, VDTÜV-BL. 354";
            break;
        case 13:
            return "1.4306 / AD-W2, DIN 17440, EN 10088, VDTÜV-BL. 411";
            break;
        case 14:
            return "1.4311 / AD-W2, DIN 17440, EN 10088";
            break;
        case 15:
            return "1.4401 / AD-W2, DIN 17440, EN 10088";
            break;
        case 16:
            return "1.4404 / AD-W2, DIN 17440, EN 10088, VDTÜV-BI. 411";
            break;
        case 17:
            return "1.4429 / AD-W2, DIN 17440, EN 10088";
            break;
        case 18:
            return "1.4435 / AD-W2, DIN 17440, EN 10088, VDTÜV-BI. 411";
            break;
        case 19:
            return "1.4439 / AD-W2, DIN 17440, EN 10088, VDTÜV-BI. 405";
            break;
        case 20:
            return "1.4462 / AD-W2, EN 10088, SEW400, VDTÜV-BI. 418";
            break;
        case 21:
            return "1.4529 / EN-10088, SEW400, VDTÜV-BI. 502";
            break;
        case 22:
            return "1.4539 / AD-W2, DIN 17440, EN 10088, SEW 400, VDTÜV-BI. 421";
            break;
        case 23:
            return "1.4828-SEW 400";
            break;
        case 24:
            return "1.4841-SEW 470";
            break;
        case 25:
            return "SA 240 304 / ASME II, SA 480";
            break;
        case 26:
            return "SA 240 304 L / ASME II, SA 480";
            break;
        case 27:
            return "SA 240 316 L / ASME II, SA 480";
            break;
        case 28:
            return "SA 240 316 Ti / ASME II, SA 480";
            break;
        case 29:
            return "SA 240 321 / ASME II, SA 480";
            break;
        case 30:
            return "SA 283 Gr. C / ASME II, SA 20";
            break;
        case 31:
            return "SA 285 Gr. C / ASME II, SA 20";
            break;
        case 32:
            return "SA 299 / ASME II, SA 20";
            break;
        case 33:
            return "SA 516 Gr. 60 / ASME II, SA 20";
            break;
        case 34:
            return "SA 516 Gr. 65 / ASME II, SA 20";
            break;
        case 35:
            return "SA 516 Gr. 70 / ASME II, SA 20";
            break;
    }

};

function attestAusgabe(attestH){
    switch(attestH){
        case 0:
            return "3.1 B";
            break;
        case 1:
            return "3.1 A TÜV";
            break;
        case 2:
            return "3.1 C";
            break;
    }

};
function probAusgabe(probH){
    switch (probH){
        case 0:
            return "nein";
            break;
        case 1:
            return "vom Blech";
            break;
        case 2:
            return "vom Fertigteil";
            break;
    }

};

function fertigCodeAus(fertigCodeH){
    switch(fertigCodeH){
        case 0:
            return "AD-Regelwerk";
            break;
        case 1:
            return "ASME-Code";
            break;
        case 2:
            return "Stoomwezen-Regels";
            break;
        case 3:
            return "Diverse";
            break;

    }

};

function warmAusgabe(warmH){
    switch(warmH){
        case 0:
            return "kaltgeformt";
            break;
        case 1:
            return "kaltgeformt gem. AD-HP 7";
            break;
        case 2:
            return "kaltgeformt, geglüht";
            break;
        case 3:
            return "warmgepreßt";
            break;
    }

};

function oberflaechAus(oberflaechH){
    switch(oberflaechH){
        case 0:
            return "nein";
            break;
        case 1:
            return "gebeizt";
            break;
        case 2:
            return "nicht gebeizt";
            break;
        case 3:
            return "gestrahlt";
            break;
    }
};

function dmInEuro(){
    //DM in EuroUmwandeln (1.95583)
    if(document.Angebot.Waehrung.selectedIndex==1){
        valueInDm=document.Angebot.Preis.value;
        if(valueInDm==""){
            euroWert="";
        }else{
            if (document.Angebot.Preis.value){
                euroWert=setPrecision((valueInDm/1.95583),3);
                return document.Angebot.Preis.value=euroWert;
            }else alert("Hier nur Zahlen zulässig");
        }
    }else{
        if (document.Angebot.Waehrung.selectedIndex==0){
            if (document.Angebot.Preis.value){
                dmWert=document.Angebot.Preis.value*1.95583;
                return document.Angebot.Preis.value=dmWert;
            }
        }
    };


};

function waehrungAus(waehrungH){
    switch(waehrungH){
        case 0:
            return "DM";
            break;
        case 1:
            return "";
            break;
        case 2:
            return "Diverse";
            break;

    }
};

function lohnarbeitAus(lohnH){
    switch(lohnH){
        case 0:
            return "";
            break;
        case 1:
            return "Lohnarbeit<br>";
            break;
        default:
            return "";
    }


};

function saveDcToPrint(dcTprIndex){

    var doc = document.Angebot;

    docToPrint[dcTprIndex] = new Array(40);


    //docToPrint[dcTprIndex][0]=doc.Angebotsnummer.value;
    docToPrint[dcTprIndex][0]="";
    docToPrint[dcTprIndex][1]=doc.Firma.value;
    docToPrint[dcTprIndex][2]=doc.Ansprechpartner.value;
    docToPrint[dcTprIndex][3]=doc.StrasseHausnummer.value;
    docToPrint[dcTprIndex][4]=doc.PLZOrt.value;
    //
    //docToPrint[dcTprIndex][5]=sachbAusgabe(doc.Sachbearbeiter.selectedIndex);
    docToPrint[dcTprIndex][5]="";
    docToPrint[dcTprIndex][6]=dcTprIndex; //position
    docToPrint[dcTprIndex][7]=doc.stueckzahl.value;
    //
    docToPrint[dcTprIndex][8]=bodenAusgabe(doc.Bodenform.selectedIndex);
    docToPrint[dcTprIndex][9]=doc.durchmessermm.value;
    docToPrint[dcTprIndex][10]=doc.Ausgabefeld.value;
    //
    docToPrint[dcTprIndex][11]=inOrOut(doc.innenaussen.selectedIndex);
    docToPrint[dcTprIndex][12]=doc.dickemm.value;
    //
    docToPrint[dcTprIndex][13]=einsatzAus(doc.Einsatz.selectedIndex);
    //
    docToPrint[dcTprIndex][14]=kantenAusgabe(doc.Kantenform.selectedIndex);
    docToPrint[dcTprIndex][15]=doc.fallsdiverse1.value;
    //
    docToPrint[dcTprIndex][16]=werkstoffAusgabe(doc.Werkstoff.selectedIndex);
    //
    docToPrint[dcTprIndex][17]=attestAusgabe(doc.Attest.selectedIndex);
    //
    docToPrint[dcTprIndex][18]=probAusgabe(doc.Proben.selectedIndex);
    //
    docToPrint[dcTprIndex][19]=fertigCodeAus(doc.Fertigungscode.selectedIndex);
    docToPrint[dcTprIndex][20]=doc.fallsdiverse2.value;
    //
    docToPrint[dcTprIndex][21]=warmAusgabe(doc.waermebehandelt.selectedIndex);
    //
    docToPrint[dcTprIndex][22]=oberflaechAus(doc.Oberflaechenbehandlung.selectedIndex);
    //docToPrint[dcTprIndex][23]=doc.Gewichtinkg.value;
    docToPrint[dcTprIndex][23]="";
    //docToPrint[dcTprIndex][24]=doc.Preis.value;
    docToPrint[dcTprIndex][24]="";
    //
    //docToPrint[dcTprIndex][25]=waehrungAus(doc.Waehrung.selectedIndex);
    docToPrint[dcTprIndex][25]="";
    //docToPrint[dcTprIndex][26]=doc.AndereWaehrung.value;
    docToPrint[dcTprIndex][26]="";
    docToPrint[dcTprIndex][27]=doc.Eingabefeld.value;


    docToPrint[dcTprIndex][28]=doc.anrede.value; //ANREDE
    docToPrint[dcTprIndex][29]=doc.zusatz1.value;//Zusatz1
    docToPrint[dcTprIndex][30]=doc.zusatz2.value;//Zusatz2
    //
    docToPrint[dcTprIndex][31]=doc.Faxnummer.value;//FAXNUMMER
    //
    //docToPrint[dcTprIndex][32]=doc.Eingabefeld1.value;//Preisstellung
    docToPrint[dcTprIndex][32]="";//Preisstellung
    //docToPrint[dcTprIndex][33]=doc.Eingabefeld2.value;//Lieferzeit
    docToPrint[dcTprIndex][33]="";//Lieferzeit
    //docToPrint[dcTprIndex][34]=doc.Eingabefeld3.value;//Zahlungsbedingungen
    docToPrint[dcTprIndex][34]="";//Zahlungsbedingungen
    docToPrint[dcTprIndex][35]=doc.anfragenummer.value;//Anfragenummer
    docToPrint[dcTprIndex][36]=doc.datumanfrage.value;//Anfragedatum
    docToPrint[dcTprIndex][37]=lohnarbeitAus(doc.Lohn.selectedIndex);//Lohnarbeit
    docToPrint[dcTprIndex][38]=doc.radiusScheibe.value;//RadiusGewölbte
    docToPrint[dcTprIndex][39]=doc.zusatzwerkstoff.value;//zusatzwerkstoff
    docToPrint[dcTprIndex][40]=sonstAngb();//sonstige Angabe

};

function neinRaus(textGleichNein){
    if (textGleichNein.indexOf("nein") ==-1){
        return textGleichNein;
    }else
        return "";


};

function diverse1(d1){
    var div1;
    if(docToPrint[d1][15]==""){
        div1=docToPrint[d1][14];
    }else{
        div1=docToPrint[d1][15];
    }
    return div1;
};

function diverse2(d2){
    var div2;
    if(docToPrint[d2][20]==""){
        div2=docToPrint[d2][19];
    }else{
        div2=docToPrint[d2][20];
    }
    return div2;
};

function diverse3(d3){
    var div3;
    if(docToPrint[d3][26]==""){
        div3=docToPrint[d3][25];
    }else{
        div3=docToPrint[d3][26];
    }
    return div3;
};


function sautDeLigne(indeks,forfax){

    if((forfax=="no")&&((indeks%2)==0)&&(indeks==2)){
        return "";
    }
    else {
        if((forfax != "no")&&((indeks%2)==0)&&(indeks==2)){
            return "<table border=0><tr><td height=200>\&nbsp\;</td></tr></table>"
        }else {
            if ((forfax != "no") && ((indeks % 6)==0)  && (indeks ==6) ){
                pageHs=indeks+4;
                return "<tr><td><table border=0 height=170><tr><td>\&nbsp\;</td></tr></table></td></tr><tr><td></td></tr><tr><td></td></tr>";
            }else {
                if ((forfax != "no") && ((indeks % pageHs)==0) && (indeks == pageHs) ){
                    pageHs=indeks+4;
                    return "<tr><td><table border=0 height=170><tr><td>\&nbsp\;</td></tr></table></td></tr><tr><td></td></tr><tr><td></td></tr>";
                } else return "";
            }
        }
    };

}

function tableBangaSite2( faxh,page){

    if(faxh=="no" )  {
        return "";
    }else{
        if( (faxh != "no") && ((page % 2)==0)  && (page ==2) ){
            return "<tr><td><table border=0 height=170><tr><td>\&nbsp\;</td></tr></table></td></tr><tr><td></td></tr><tr><td></td></tr>";
        }else{
            if ((faxh != "no") && ((page % 6)==0)  && (page ==6) ){
                pageH=page+4;
                return "<tr><td><table border=0 height=200><tr><td>\&nbsp\;</td></tr></table></td></tr><tr><td></td></tr><tr><td></td></tr>";

            }else {
                //
                if ((faxh != "no") && ((page % pageH)==0) && (page == pageH) ){
                    pageH=page+4;
                    return "<tr><td><table border=0 height=200><tr><td>\&nbsp\;</td></tr></table></td></tr><tr><td></td></tr><tr><td></td></tr>";
                } else return "";
            }
        }
    };
}

function selectWerkstoff(index){

    if(docToPrint[index][39].match(/\w/))
        return docToPrint[index][39]
    else return docToPrint[index][16];
}

function contentMain(fax){
    var result="";
    for (var i=1; i<=dcTprIndex; i++){

        result =  result +"<tr><td valign=top><font face=arial size=2>"+i+"</td><td valign=top><font face=arial size=2>"+docToPrint[i][7]+"</td><td valign=top><font face=arial size=2>"+docToPrint[i][37]+docToPrint[i][8]+"<br>"+
        ""+
        oneLine(textFormat(docToPrint[i][10]))+
        "Kantenbearbeitung: "+diverse1(i)+"<br>"+
        "Werkstoff: "+selectWerkstoff(i)+"<br>"+
        "Attest: "+docToPrint[i][17]+"   "+docToPrint[i][30]+"<br>"+
        neinRaus("Proben: "+docToPrint[i][18]+"<br>")+
        "Fertigungscode: "+diverse2(i)+"<br>"+
        //"Wärmbehandelt: "+docToPrint[i][21]+"<br>"+
        docToPrint[i][21]+"<br>"+
        neinRaus("Oberflächenbehandlung: "+docToPrint[i][22]+"    "+docToPrint[i][29]+"<br>")+
        docToPrint[i][40]+
        //"</td><td valign=top><font face=arial size=2>"+docToPrint[i][23]+" kg"+
        "</td><td valign=top><font face=arial size=2>"+docToPrint[i][24]+" "+
        diverse3(i)+"</td></tr><tr><td width=10>\&nbsp\;</td></tr>"+"<tr><td width=10>"+sautDeLigne(i,fax)+"</td></tr>"+
        "<tr><td width=10>"+ tableBangaSite2(fax,i)+"</td></tr>";
    }
    return result;
};
function contentMainCGI(fax){
    var result="";
    for (var i=1; i<=dcTprIndex; i++){

        result =  result +"\n"+i+" "+docToPrint[i][7]+"\n"+docToPrint[i][37]+docToPrint[i][8]+"\n"+
        " "+oneLine(textFormat(docToPrint[i][10])).replace(/<br>/gi,"\n")+
        "Kantenbearbeitung: "+diverse1(i)+"\n"+
        "Werkstoff: "+selectWerkstoff(i)+"\n"+
        "Attest: "+docToPrint[i][17]+"   "+docToPrint[i][30]+"\n"+
        neinRaus("Proben: "+docToPrint[i][18]+"\n")+
        "Fertigungscode: "+diverse2(i)+"\n"+
        //"Wärmbehandelt: "+docToPrint[i][21]+"<br>"+
        docToPrint[i][21]+"\n"+
        neinRaus("Oberflächenbehandlung: "+docToPrint[i][22]+" "+docToPrint[i][29]+"\n")+
        docToPrint[i][40]+
        //"</td><td valign=top><font face=arial size=2>"+docToPrint[i][23]+" kg"+
        " "+docToPrint[i][24]+" "+
        diverse3(i)+" "+sautDeLigne(i,fax)+
        " "+ tableBangaSite2(fax,i);
    }
    return result;
};

function clearFieldWeiter(){
    var doc = document.Angebot;
    doc.stueckzahl.value="";
    doc.Lohn.selectedIndex=0;
    doc.Bodenform.selectedIndex=0;
    doc.radiusScheibe.value="";
    doc.durchmessermm.value="";
    doc.Ausgabefeld.value="";
    doc.innenaussen.selectedIndex=0;
    doc.dickemm.value="";
    doc.Einsatz.selectedIndex=0;
    doc.Kantenform.selectedIndex=0;
    doc.fallsdiverse1.value="";
    doc.Werkstoff.selectedIndex=0;
    doc.Attest.selectedIndex=0;
    doc.zusatz1.value="";
    doc.Proben.selectedIndex=0;
    doc.Fertigungscode.selectedIndex=0;
    doc.fallsdiverse2.value="";
    doc.waermebehandelt.selectedIndex=0;
    doc.Oberflaechenbehandlung.selectedIndex=0;
    doc.zusatz2.value="";
    //doc.Gewichtinkg.value="";
    //doc.Preis.value="";
    //doc.Waehrung.selectedIndex=0;
    //doc.AndereWaehrung.value="";
    doc.zusatzwerkstoff.value="";
    doc.Eingabefeld.value="";

};

function dMonat(){
    var monat=Date().substring(4,7)
    switch(monat){
        case "Jan":
            return "01";
            break;
        case "Feb":
            return "02";
            break;
        case "Mar":
            return "03";
            break;
        case "Apr":
            return "04";
            break;
        case "May":
            return "05";
            break;
        case "Jun":
            return "06";
            break;
        case "Jul":
            return "07";
            break;
        case "Aug":
            return "08";
            break;
        case "Sep":
            return "09";
            break;
        case "Oct":
            return "10";
            break;
        case "Nov":
            return "11";
            break;
        case "Dec":
            return "12";
            break;

    }
};

function heute(){
    return Date().substring(8,10)+"."+dMonat()+"."+Date().match(/2\d{3}/)
};

function addDocIndex(){
    //        if(document.Angebot.Sachbearbeiter.selectedIndex == 0){
    //              alert("Bitte einen Sachbearbeiter wählen");
    //        }else{
    saveDcToPrint(dcTprIndex);
    dcTprIndex++;
    clearFieldWeiter();
//        }
};

function neuesAngebotHandler(){

    //angebotAktuel+1 sady adika // mandeha aloha ity mba tsy ho very ilay isa
    location.href="front_content.php?idcat=25";
    document.Angebot.reset();
    prepare();
    //vakiana ilay fichier
    dcTprIndex=1;
    zaehler=0;
};

function ihreAnfrage(){
    if ((docToPrint[1][35].toString()!="")&&(docToPrint[1][36].toString()!="")){
        //return "<br>"+"\&nbsp\;\&nbsp\;"+docToPrint[1][35].toString()+"<br>"+"\&nbsp\;\&nbsp\;"+
        return docToPrint[1][36].toString()+"<br>";
    }
    else return "";
};
function ihreAnfrageCGI(){
    if ((docToPrint[1][35].toString()!="")&&(docToPrint[1][36].toString()!="")){
        //return "<br>"+"\&nbsp\;\&nbsp\;"+docToPrint[1][35].toString()+"<br>"+"\&nbsp\;\&nbsp\;"+
        return docToPrint[1][36].toString()+"\n";
    }
    else return "";
};

function ueberFirma(){
    return docToPrint[1][1].toString()+"&nbsp;"+//Firma
    docToPrint[1][3].toString()+"&nbsp;"+//Str
    docToPrint[1][4].toString()+"<br>"+//PLZ
    docToPrint[1][2].toString()+"&nbsp;"+//Partner
    "Tel/Fax: "+docToPrint[1][31].toString()+"<br>"//Fax

};
function ueberFirmaCGI(){
    return docToPrint[1][1].toString()+" "+//Firma
    docToPrint[1][3].toString()+" "+//Str
    docToPrint[1][4].toString()+"\n"+//PLZ
    docToPrint[1][2].toString()+" "+//Partner
    "Tel/Fax: "+docToPrint[1][31].toString()+"\n"//Fax

};

function partny(){
    return docToPrint[1][5].substring(0,docToPrint[1][5].indexOf("Tel:"));
};
function telfy(){
    return docToPrint[1][5].substring(docToPrint[1][5].indexOf("Tel:")+4, docToPrint[1][5].indexOf("E-mail:"));
};
function emy(){
    return docToPrint[1][5].substring((docToPrint[1][5].indexOf("E-mail:")+7));
};

/*
 * Public: called by http://www.weisstaler.de/web/1/service/bodenberechnung/
 * 
 * @param novar "no" or other string value
 * 
 * @global dcTprIndex default = 1
 */
function druckvorschau(novar){
    if(novar=="no"){
        //////////////////
        //if ((document.Angebot.Sachbearbeiter.selectedIndex !=0) && (dcTprIndex ==1)){
        if ((dcTprIndex ==1)){
            saveDcToPrint(dcTprIndex);
            druckVorbereiten("no");

        }else {
            //if((document.Angebot.Sachbearbeiter.selectedIndex !=0) && (dcTprIndex !=1)){
            if((dcTprIndex !=1)){
                saveDcToPrint(dcTprIndex);
                druckVorbereiten("no");
                if(zaehler!=0){
                    //dcTprIndex++;
                    dcTprIndex=zaehler+1;
                };

            }else{
                if(document.Angebot.Sachbearbeiter.selectedIndex ==0){
                    alert ("Bitte den Sachbearbeiter wählen und den Vorgang wiederholen !");
                }else{
                    if(dcTprIndex <0)alert ("Fataler Feheler \n Wiederholen Sie den Vorgang");
                }
            }
        }
    /////////////////
    }else{
        //if ((document.Angebot.Sachbearbeiter.selectedIndex !=0) && (dcTprIndex ==1)){
        if ((dcTprIndex ==1)){
            saveDcToPrint(dcTprIndex);
            druckVorbereiten("nofax");

        }else {
            //if((document.Angebot.Sachbearbeiter.selectedIndex !=0) && (dcTprIndex !=1)){
            if((dcTprIndex !=1)){
                saveDcToPrint(dcTprIndex);
                druckVorbereiten("nofax");
                if(zaehler!=0){
                    //dcTprIndex++;
                    dcTprIndex=zaehler+1;
                };

            }else{
                if(document.Angebot.Sachbearbeiter.selectedIndex ==0){
                    alert ("Bitte den Sachbearbeiter wählen und den Vorgang wiederholen !");
                }else{
                    if(dcTprIndex <0)alert ("Fataler Feheler \n Wiederholen Sie den Vorgang");
                }
            }
        }
    }
//////////end else////////
}

function sonstAngb(){
    if (!docToPrint[dcTprIndex][27].match(/\w/) ){
        //if (docToPrint[dcTprIndex][27].substring(0,13)=="             "){

        return  "";
    }else return "sonstige Angaben:<br>"+textFormat(docToPrint[dcTprIndex][27]);
}

function preisStell () {
    if (!docToPrint[dcTprIndex][32].match(/\w/) ){
        //if (docToPrint[dcTprIndex][32].substring(0,13)=="             "){

        return  "";
    }else return "Preisstellung:<br>"+textFormat(docToPrint[dcTprIndex][32]);
}

function lieferZ(){
    if (!docToPrint[dcTprIndex][33].match(/\w/)){
        //if (docToPrint[dcTprIndex][33].substring(0,13)=="             "){

        return "" ;
    }else return "Lieferzeit:<br>"+textFormat(docToPrint[dcTprIndex][33]);
}

function zahlbedi(){
    if (!docToPrint[dcTprIndex][34].match(/\w/)){
        //if (docToPrint[dcTprIndex][34].substring(0,13)=="             "){

        return  "";
    }else return "Zahlungsbedingungen:<br>"+textFormat(docToPrint[dcTprIndex][34]) ;
}

var forfax;
var QueryCGI;

/**
 * Write form content to popup-page.
 * 
 * @param string forfax "no" or other value.
 */
function druckVorbereiten(forfax){

    var dcToPrint = window.open("","dcToPrint","menubar=yes,scrollbars=yes,directories=no,titlebar=no,toolbar=no,status=no,location=no,resizable=no,width=800,height=600");
    dcToPrint.document.open();
    dcToPrint.document.write("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Strict//EN\">");
    //QueryCGI="<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Strict//EN\">";
    QueryCGI="";
    dcToPrint.document.writeln("<html><title>Bestätigung</title><body bgcolor=#c0c0c0>");
    //QueryCGI+="<html><title>Besttätigung</title><body bgcolor=#c0c0c0>";
    //////////////////////////
    if (forfax=="no"){
        //dcToPrint.document.writeln("<center><img src=logo.gif></center><br>");

        dcToPrint.document.writeln("<center></><font face=arial size=1>");
        //QueryCGI+="<center></><font face=arial size=1>";
        dcToPrint.document.writeln(ueberFirma());
        QueryCGI+=ueberFirmaCGI();
        dcToPrint.document.writeln("</font></center>");
    //QueryCGI+="</font></center>";
    }else{
        dcToPrint.document.writeln("<center><table height=150><tr><td>\&nbsp\;</td></tr></table></center><br>");
    //QueryCGI+="<center><table height=150><tr><td>\&nbsp\;</td></tr></table></center><br>";
    }
    /////////////////////////
    dcToPrint.document.writeln("<center><table width=650 border=0 cellspacing=0 cellpadding=0>");
    //QueryCGI+="<center><table width=650 border=0 cellspacing=0 cellpadding=0>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="<tr>";
    dcToPrint.document.writeln("<td width=250 colspan=2 >&nbsp\;");
    //QueryCGI+="<td width=250 colspan=2 >&nbsp\;";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    //dcToPrint.document.writeln("<td width=250 align=center><font face=arial size=2>Angebot");
    dcToPrint.document.writeln("<td width=250 align=center><font face=arial size=2>&nbsp;");
    //QueryCGI+="<td width=250 align=center><font face=arial size=2>&nbsp;";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="<tr>";
    dcToPrint.document.writeln("<td width=250>");
    //QueryCGI+="<td width=250>";
    
    // BEGIN FORM
    dcToPrint.document.writeln("<form name=\"berechnungsForm\" method=\"post\" action=\"http://www.weisstaler.de/cgi-bin/sendMail.php\">");
    dcToPrint.document.writeln("<font face=arial size=2>");
    //QueryCGI+="<font face=arial size=2>";
    //################################################################
    dcToPrint.document.writeln(ihreAnfrage()+"<br>");
    QueryCGI+=ihreAnfrage().replace(/<br>/gi,"\n")+"\n";
    dcToPrint.document.writeln("Weisstaler GmbH Bödenpresswerke<BR>");
    //QueryCGI+="Weisstaler GmbH Bödenpresswerke<BR>";
    QueryCGI+="Weisstaler GmbH Bödenpresswerke\n";
    dcToPrint.document.writeln("Freier-Grund-Str. 122-124, D-57299 Burbach-Wahlbach <br>");
    //QueryCGI+="Freier-Grund-Str. 122-124, D-57299 Burbach-Wahlbach <br>";
    QueryCGI+="Freier-Grund-Str. 122-124, D-57299 Burbach-Wahlbach \n";
    dcToPrint.document.writeln("Tel: +49/(0)2736/4406-0 <BR>");
    //QueryCGI+="Tel: +49/(0)2736/4406-0 <BR>";
    QueryCGI+="Tel: +49/(0)2736/4406-0 \n";
    dcToPrint.document.writeln("Fax: +49/(0)2736/4406-49</font><br>");
    //QueryCGI+="Fax: +49/(0)2736/4406-49</font><br>";
    QueryCGI+="Fax: +49/(0)2736/4406-49\n";
    //################################################################
    dcToPrint.document.writeln("</font>");
    //QueryCGI+="</font>";
    //teto nisy zavatra
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("<td rowspan=2 width=200>&nbsp;</td>");
    //QueryCGI+="<td rowspan=2 width=200>&nbsp;</td>";
    dcToPrint.document.writeln("<td rowspan=1 valign=top align=center>");
    //QueryCGI+="<td rowspan=1 valign=top align=center>";
    dcToPrint.document.writeln("<table width=100% cellspacing=0 cellpadding=1>");
    //QueryCGI+="<table width=100% cellspacing=0 cellpadding=1>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="<tr>";
    dcToPrint.document.writeln("<td>");
    //QueryCGI+="<td>";
    //dcToPrint.document.writeln("<table border=1 width=100% height=100% cellspacing=0 cellpadding=0 >");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td>");
    //dcToPrint.document.writeln("<table width=100%>");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td width=40% align=right><font size=1 face=arial>Angebots-Nr.:");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=60% align=left><font size=1 face=arial>"+docToPrint[1][0].toString());
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td width=40% align=right><font size=1 face=arial>Ansprechpartner:");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=60% align=left><font size=1 face=arial>"+partny());
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td width=40% align=right><font size=1 face=arial>Durchwahl:");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=60% align=left><font size=1 face=arial>"+telfy());
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td width=40% align=right><font size=1 face=arial>E-Mail:");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=60% align=left><font size=1 face=arial>"+emy());
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");
    //dcToPrint.document.writeln("<tr>");
    //dcToPrint.document.writeln("<td width=40% align=right><font size=1 face=arial>Datum:");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=60% align=left><font size=1 face=arial>"+heute());
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");

    //dcToPrint.document.writeln("</table>");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("</tr>");
    //dcToPrint.document.writeln("</table>");
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("</table>");
    //QueryCGI+="</table>";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("<td colspan=3><font face=arial size=2>"+textFormat(docToPrint[1][28])+"</td>");
    //QueryCGI+="<td colspan=3><font face=arial size=2>"+textFormat(docToPrint[1][28])+"</td>";
    QueryCGI+=" "+textFormat(docToPrint[1][28]).replace(/<br>/gi,"")+" ";
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("</table>");
    //QueryCGI+="</table>";
    dcToPrint.document.writeln("</center>");
    //QueryCGI+="</center>";
    dcToPrint.document.writeln("<p>");
    //QueryCGI+="<p>";
    dcToPrint.document.writeln("<p>");
    //QueryCGI+="<p>";
    dcToPrint.document.writeln("<center>");
    //QueryCGI+="<center>";
    dcToPrint.document.writeln("<table width=650 border=0 cellspacing=0>");
    //QueryCGI+="<table width=650 border=0 cellspacing=0>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="<tr>";
    dcToPrint.document.writeln("<td width=10 valign=bottom><font face=arial size=2>Pos.");
    //QueryCGI+="<td width=10 valign=bottom><font face=arial size=2>Pos.";
    QueryCGI+="\nPos. ";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("<td width=10 valign=bottom><font face=arial size=2>Menge");
    //QueryCGI+="<td width=10 valign=bottom><font face=arial size=2>Menge";
    QueryCGI+=" Menge ";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("<td width=150 valign=bottom><font face=arial size=2>Beschreibung");
    //QueryCGI+="<td width=150 valign=bottom><font face=arial size=2>Beschreibung";
    QueryCGI+=" Beschreibung ";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    //dcToPrint.document.writeln("<td width=20 valign=bottom><font face=arial size=2>Stückgewicht");
    //dcToPrint.document.writeln("</td>");
    //dcToPrint.document.writeln("<td width=20 valign=bottom><font face=arial size=2>Preis/Stck.");
    //dcToPrint.document.writeln("</td>");
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";
    dcToPrint.document.writeln("<tr>");
    //QueryCGI+="<tr>";
    dcToPrint.document.writeln("<td colspan=5 valign=top height=40>");
    //QueryCGI+="<td colspan=5 valign=top height=40>";
    dcToPrint.document.writeln("<hr size=1>");
    //QueryCGI+="<hr size=1>";
    QueryCGI+="\n_____________________________________________________________________\n\n";
    dcToPrint.document.writeln("</td>");
    //QueryCGI+="</td>";
    dcToPrint.document.writeln("</tr>");
    //QueryCGI+="</tr>";

    ////////BEGIN OF DOC////////////

    dcToPrint.document.writeln(contentMain(forfax));
    QueryCGI+=contentMainCGI(forfax);
    dcToPrint.document.writeln("\f");
    QueryCGI+="\f";


    ////////END OF DOC////////////
    if((sonstAngb()) || (preisStell()) || (lieferZ()) || (zahlbedi())){
        //dcToPrint.document.writeln("<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+sonstAngb()+"</td></tr>");
        dcToPrint.document.writeln("<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+preisStell()+"</td></tr>");
        //QueryCGI+="<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+preisStell()+"</td></tr>";
        QueryCGI+=preisStell().replace(/<br>/gi,"\n");
        dcToPrint.document.writeln("<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+lieferZ()+"</td></tr>");
        //QueryCGI+="<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+lieferZ()+"</td></tr>";
        QueryCGI+=lieferZ().replace(/<br>/gi,"\n");
        ;
        dcToPrint.document.writeln("<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+zahlbedi()+"</td></tr>");
        //QueryCGI+="<tr><td></td><td colspan=3><p><br><font face=arial size=2>"+zahlbedi()+"</td></tr>";
        QueryCGI+=zahlbedi().replace(/<br>/gi,"\n");;
    };
    dcToPrint.document.writeln("<tr><td></td><td colspan=3><p><br><font face=arial size=2>Wir erwarten Ihr Angebot so schnell wie möglich.<br><br>Mit freundlichen Grüßen<br><br>"+docToPrint[1][1].toString()+"&nbsp;"+"<br><p>");
    //QueryCGI+="<tr><td></td><td colspan=3><p><br><font face=arial size=2>Wir erwarten Ihr Angebot so schnell wie möglich.<br><br>Mit freundlichen Grüßen<br><br>"+docToPrint[1][1].toString()+"&nbsp;"+"<br><p></td></tr>";
    QueryCGI+="\nWir erwarten Ihr Angebot so schnell wie möglich.\n\nMit freundlichen Grüßen\n"+docToPrint[1][1].toString()+" "+"\n";
    dcToPrint.document.writeln("<input type=\"submit\" value=\"Jetzt absenden\">&nbsp;"+
        "&nbsp;<input type=\"button\" onClick=\"javascript:self.close()\" value=\"Schließen\">"+
        "</td></tr>");

    QueryCGI=QueryCGI.replace(/<br>/gi,"\n");
    QueryCGI=QueryCGI.replace(/ß/g,"-ss-");
    QueryCGI=QueryCGI.replace(/ü/g,"-u-");
    QueryCGI=QueryCGI.replace(/Ü/g,"-U-");
    QueryCGI=QueryCGI.replace(/ö/g,"-o-");
    QueryCGI=QueryCGI.replace(/Ö/g,"-O-");
    QueryCGI=QueryCGI.replace(/ä/g,"-a-");
    QueryCGI=QueryCGI.replace(/Ä/g,"-A-");

    dcToPrint.document.writeln("<input type=hidden name=\"CGIVar\" value=\'"+QueryCGI+"\'>");
    dcToPrint.document.writeln("<input type=hidden name=\"lang\" value=\'german\'>");
    dcToPrint.document.writeln("</form>");
    // CLOSE FORM
    
    dcToPrint.document.writeln("</table>");
    dcToPrint.document.writeln("</center>");

    ////////////////////



    dcToPrint.document.writeln("</body></html>");
    dcToPrint.document.close();
    dcToPrint.focus();

}