PRechnerGetObjValue = function(id) {
    var str = '';
    if (id) {
        var obj = document.getElementById(id);
        if (obj) {
            switch (obj.tagName.toUpperCase()) {
                case 'INPUT':
                    switch (obj.type.toUpperCase()) {
                        case 'CHECKBOX':
                            if (obj.checked) {
                                str += '1';
                            } else {
                                str += '0';
                            }
                            break;
                        case 'RADIO':
                            if (obj.checked) {
                                str += '1';
                            } else {
                                str += '0';
                            }
                            break;
                        default:
                            str += obj.value;
                            break;
                    }
                case 'SELECT':
                    if (obj.selectedIndex !== undefined && obj.selectedIndex >= 0 && obj.selectedIndex < obj.length) {
                        str += obj.selectedIndex;
                    }
                    break;
                default:
                    if (obj.value)
                        str += obj.value;
                    break;
            }
        }
    }
    return str;
};

PRechnerGoINet = function() {
    var lblMsg = document.getElementById('lblWaitBody');
    try {
        if (lblMsg) {
            lblMsg.innerHTML = 'Daten werden gesammelt...';
        }
        /*
        if (typeof (PRechner.initHist()) == "function") {
        PRechner.initHist();
        bln = true;
        ShowpPnWait(false);
        }
        if (!bln) {
        */
        var str = '';
        obj = PRechnerGetObjValue('Anzahl');
        var blnContinue = false;
        if (parseInt(obj).toString() === obj) {
            var jg = ''; var sx = ''; var bg = ''; var okp = ''; var omd = ''; var oha = '';
            var ofr = ''; var oun = ''; var zeb = ''; var kmb = ''; var kmd = ''; var kfr = '';
            var den = ''; var ddk = ''; var uti = ''; var udk = ''; var kti = ''; var ktd = '';
            var kiv = ''; var tg = ''; var tdk = ''; var twf = ''; var tsm = ''; var fur = '';
            var fn = ''; var ln = ''; var bd = ''; var bm = ''; var bv = ''; var mg = '';

            var anz = parseInt(obj);
            for (var x = 1; x <= anz; x++) {
                blnContinue = true;
                if (x > 1) jg += '_'; jg += PRechnerGetObjValue('txtHJg_' + x);
                obj = document.getElementById('radHMann_' + x);
                if (obj && obj.checked)
                    sx += '0';
                else
                    sx += '1';

                if (x > 1) bg += '_'; bg += PRechnerGetObjValue('txtHAb_' + x);
                okp += PRechnerGetObjValue('OKP_' + x);
                omd += PRechnerGetObjValue('OKPMdl_' + x);
                if (x > 1) oha += '_'; oha += PRechnerGetObjValue('OKPHA_' + x);
                ofr += PRechnerGetObjValue('OKPfra_' + x);
                oun += PRechnerGetObjValue('OKPunfall_' + x);
                zeb += PRechnerGetObjValue('ZEB_' + x);
                kmb += PRechnerGetObjValue('Kombi_' + x);
                kmd += PRechnerGetObjValue('KombiMdl_' + x);
                kfr += PRechnerGetObjValue('KombiFra_' + x);
                den += PRechnerGetObjValue('Dental_' + x);
                ddk += PRechnerGetObjValue('DentalDck_' + x);
                uti += PRechnerGetObjValue('UTI_' + x);
                if (x > 1) udk += '_'; udk += PRechnerGetObjValue('UTIDck_' + x);
                kti += PRechnerGetObjValue('KTI_' + x);
                if (x > 1) ktd += '_'; ktd += PRechnerGetObjValue('KTItod_' + x);
                if (x > 1) kiv += '_'; kiv += PRechnerGetObjValue('KTIiv_' + x);
                tg += PRechnerGetObjValue('TG_' + x);
                tdk += PRechnerGetObjValue('TGDck_' + x);
                if (x > 1) twf += '_'; twf += PRechnerGetObjValue('TGWait_' + x);
                if (x > 1) tsm += '_'; tsm += PRechnerGetObjValue('TGVBetrag_' + x);
                fur += PRechnerGetObjValue('FuR_' + x);
                if (x > 1) fn += '_'; fn += PRechnerGetObjValue('txtVorname_' + x);
                if (x > 1) ln += '_'; ln += PRechnerGetObjValue('txtName_' + x);
                obj = PRechnerGetObjValue('txtGebTAG_' + x) + '.' + PRechnerGetObjValue('txtGebMONAT_' + x);
                if (x > 1) bd += '_'; if (obj.length > 1) bd += obj;
                if (x > 1) bm += '_'; bm += PRechnerGetObjValue('txtBemerkungen_' + x);
                bv += PRechnerGetObjValue('chkKunde_' + x);
                if (x > 1) mg += '_'; mg += PRechnerGetObjValue('txtMNr_' + x);
            }
            if (jg.length === anz - 1) jg = ''; if (bg.length === anz - 1) bg = ''; if (oha.length === anz - 1) oha = '';
            if (udk.length === anz - 1) udk = ''; if (ktd.length === anz - 1) ktd = ''; if (kiv.length === anz - 1) kiv = '';
            if (twf.length === anz - 1) twf = ''; if (tsm.length === anz - 1) tsm = ''; if (fn.length === anz - 1) fn = '';
            if (ln.length === anz - 1) ln = ''; if (bd.length === anz - 1) bd = ''; if (bm.length === anz - 1) bm = '';
            if (mg.length === anz - 1) mg = '';

            str += 'anz=' + PRechnerGetObjValue('Anzahl') + '&';
            str += 'hlp=' + PRechnerGetObjValue('cmdHilfe') + '&';
            str += 'plz=' + PRechnerGetObjValue('txtHPLZ_1') + '&';
            str += 'kt=' + PRechnerGetObjValue('Kanton') + '&';
            str += 'rg=' + PRechnerGetObjValue('Region') + '&';
            str += 'pc=' + PRechnerGetObjValue('PLZCode') + '&';
            str += 'cur=' + PRechnerGetObjValue('CurPers') + '&';
            str += 'jg=' + jg + '&'; str += 'sx=' + sx + '&'; str += 'bg=' + bg + '&'; str += 'okp=' + okp + '&';
            str += 'omd=' + omd + '&'; str += 'oha=' + oha + '&'; str += 'ofr=' + ofr + '&'; str += 'oun=' + oun + '&';
            str += 'zeb=' + zeb + '&'; str += 'kmb=' + kmb + '&'; str += 'kmd=' + kmd + '&'; str += 'kfr=' + kfr + '&';
            str += 'den=' + den + '&'; str += 'ddk=' + ddk + '&'; str += 'uti=' + uti + '&'; str += 'udk=' + udk + '&';
            str += 'kti=' + kti + '&'; str += 'ktd=' + ktd + '&'; str += 'kiv=' + kiv + '&'; str += 'tg=' + tg + '&';
            str += 'tdk=' + tdk + '&'; str += 'twf=' + twf + '&'; str += 'tsm=' + tsm + '&'; str += 'fur=' + fur + '&';
            str += 'fn=' + fn + '&'; str += 'ln=' + ln + '&'; str += 'bd=' + bd + '&'; str += 'bm=' + bm + '&';
            str += 'bv=' + bv + '&'; str += 'mg=' + mg + '&';
            str += 'adr=' + PRechnerGetObjValue('txtAdresse_1') + '&';
            str += 'ort=' + PRechnerGetObjValue('cmbBOrt_1') + '&';
            str += 'tel=' + PRechnerGetObjValue('txtTelefon_1') + '&';
            str += 'eml=' + PRechnerGetObjValue('txtEMail_1') + '&';
            str += 'zst=';
            if (getObjValue('radEMail_1') == '1') {
                str += '1';
            } else {
                if (getObjValue('radPost_1') == '1') {
                    str += '2';
                } else {
                    str += '0';
                }
            }
            str += '&';
            str += 'c=0&';
            str += 'sad=' + PRechnerGetObjValue('CurPage');
        }

        if (lblMsg) {
            lblMsg.innerHTML = 'Versuche Umleitung...';
        }
        window.location.href = "http://www.kklh.ch/Home/tabid/98/Default.aspx#" + str;
    } catch (e) {
        if (lblMsg) {
            lblMsg.innerHTML = 'Bei der Umleitung ist ein Fehler aufgetreten!<br><br><h5>' + e + '</h5>';
        }
    }
};
