// yleiset yhteiskäyttöiset java-skriptit
// VEPSIn hakupalveluiden yhteiskäyttöiset java-skriptit


//   luettelolomakkeen vaihda-toiminto
function Hae()
{
 
    // alert ("javascript Hae");

        var text;
        var i;
        var qs = "";
        var findstr2 = "";
        var pituus;
        var merkki;
//      var luettelo1 = document.forms["luettelo1"];
        var luettelo2 = document.forms["luettelo2"];
        var f1 = luettelo2.elements["${TRIPSHOW}"].name; 
        var f2 = luettelo2.elements["${SORT}"].name;
        var f3 = luettelo2.elements["${MAXPAGE}"].name;
        var currbase = luettelo2.elements["currbase"].value;
        var findstr = luettelo2.elements["findstr"].value;
        
        sort_index = luettelo2.elements["${SORT}"].selectedIndex;
        maxpage_index = luettelo2.elements["${MAXPAGE}"].selectedIndex;
        tripshow_index = luettelo2.elements["${TRIPSHOW}"].selectedIndex;
        
    //alert("sortind= " + sort_index + " maxind=" + maxpage_index + " showind= " + tripshow_index);             

        // 30.4.2008/hxl  thwn muuttaa lainausmerkin ( ' ) entiteetiksi '. Muutetaan takaisin 
        // jotta tyhjien kenttien haku onnistuu (käytössä usein haku: asiasana='')
        // muuttettu hakuehto muuttujaan findstr2
        pituus = findstr.length;
        for (i = 0 ; i <= pituus ; i++)
        {
                merkki = findstr.charAt(i);
                if (merkki == "&") {
                        osajono = findstr.substring(i, i+6);
                        if (osajono == "&apos;") {
                                findstr2 += "'";
                                i += 5;
                        }
                }
                else { 
                        findstr2 += merkki;
                }
        } 
 

    // hakehdon definet erilainen vanhoilla (kanta=veps19)
    if (currbase == "veps19")
        {       
           var url = "/thw.cgi/trip/?${BASE}="+currbase+"&${CCL}=define+merge&${FREETEXT}="+findstr2+"&";
        }
        else
        {
           var url = "/thw.cgi/trip/?${BASE}="+currbase+"&${CCL}=define+merge&${CCL}=define+thesa=vepstesa&${CCL}=define+view+saadkok=saadk,kv_saadk,sopimussarja,kv_sopimussarja&${FREETEXT}="+findstr2+"&";
        }

        text = "";

//      paluulinkki
        var formi = document.forms["luettelo3"];
        var paluulinkki = formi.elements["paluulinkki"].value;
        url = url + "${savehtml}=" + paluulinkki + "&";

//      alert (url);

//      nayttomuoto
        index1 = luettelo2.elements["${TRIPSHOW}"].selectedIndex;
        text += f1 + luettelo2.elements["${TRIPSHOW}"].options[index1].value + "&";

//      MAGPAGE
        index1 = luettelo2.elements["${MAXPAGE}"].selectedIndex;
        text += f3 + "=" + luettelo2.elements["${MAXPAGE}"].options[index1].value + "&";

//      lajittelu
        if (luettelo2.elements["maara"].value < 5000)
        {
          index1 = luettelo2.elements["${SORT}"].selectedIndex;
          text += f2 + "=" + luettelo2.elements["${SORT}"].options[index1].value;
          //alert(text);
        }
        else
        {
                alert ("Lajittelua ei voida suorittaa, koska asioita on yli 5000");
        }
        
        text += "&${COMBOT}=" + sort_index + "," + maxpage_index + "," + tripshow_index;
        
        //alert(text);

        pituus = url.length;
        for (i = 1 ; i <= pituus ; i++)
        {
                merkki = url.charAt(i);
                if (merkki == " ") 
                        qs += "+";
                else {
                  if (merkki == "&") {
                        osajono = url.substring(i, i+6);
                        osajono2 = url.substring(i, i+7);
                        if (osajono == "&auml;") {
                                qs += "ä";
                                i += 5;
                        }
                        else {
                          if (osajono == "&ouml;") {
                                qs += "ö";
                                i += 5;
                          }
                          else {
                            if (osajono == "&Auml;") {
                                qs += "Ä";
                                i += 5;
                            }
                            else {
                              if (osajono == "&Ouml;") {
                                qs += "Ö";
                                i += 5;
                              }
                              else {
                                if (osajono2 == "&aring;") {
                                  qs += "å";
                                  i += 6;
                                }
                                else {
                                  if (osajono2 == "&Aring;") {
                                    qs += "Å";
                                    i += 6;
                                  }
                                  else {
                                    qs += merkki;
                                  }
                                }
                              }
                            }
                          }
                        }
                  }
                  else { 
                        qs += merkki;
                  }
                }
        } 
                
        //alert (qs);
//      luettelo2.elements[4].value += qs + text + "#alkukohta";

        qs = qs + text + "#alkukohta";
        
       // alert ("qs: " + qs);
                
        parent.location.href = qs;
        

}


// Muuttaa urlista tulevat muuttuneeet skandit takaisin selväkielisiksi skandeiksi
function muunnaSkandeiksi(formname){
        
        var formi = document.forms[formname];
        var oletushaku = formi.elements["OLETUSHAKU"].value;
        var pituus = oletushaku.length;
        var muutettujono = "";
        var osajono = "";
        
        //alert ("muunnaSkandeiksi().. formista " + formi + " | OLETUSHAKU: " + oletushaku);
        
        for (i = 0 ; i <= pituus ; i++)
        {
                merkki = oletushaku.charAt(i);
    
            //alert ("merkki: " + merkki);
    
                if (merkki == "%") {
                        osajono = oletushaku.substring(i, i+3);
                        //alert ("osajono: " + osajono);
                        if (osajono == "%E5") {
                                muutettujono += "å";
                                i += 2;
                        }
                        else {
                            if (osajono == "%C5") {
                                    muutettujono += "Å";
                                    i += 2;
                            }
                            else {
                                if (osajono == "%E4") {
                                        muutettujono += "ä";
                                        i += 2;
                                }
                                else {
                                    if (osajono == "%C4") {
                                            muutettujono += "Ä";
                                            i += 2;
                                    }
                                    else {
                                            if (osajono == "%F6") {
                                                muutettujono += "ö";
                                                i += 2;
                                        }
                                    else {
                                                if (osajono == "%D6") {
                                                    muutettujono += "Ö";
                                                    i += 2;
                                            }
                                        else {
                                                    muutettujono += merkki;
                                                }
                                        }
                                    }
                                }
                            }
                        }
                }
                else { 
                        muutettujono += merkki;
                }
        }   // for loppu
        
        if (eval(formi.elements["KAIKKIHAKU"]))
            formi.elements["KAIKKIHAKU"].value = muutettujono;
        
        if (eval(formi.elements["FUZZHAKU"]))   
            formi.elements["FUZZHAKU"].value = muutettujono;
        
} 
        
// Luettelolomakkeen seuraavat sivulle
function Seuraavat(){
     
     var luettelo3 = document.forms["luettelo3"];
     var luettelo2 = document.forms["luettelo2"];
     var forward = luettelo3.elements["forward"].value;
     var comboindit = "";

//   muutetaan thw -> thw.cgi , joka osaa includen 16.02.06 tih
     forward = forward.replace("/thw/","/thw.cgi/");
     
     //alert("FORWARD:" + forward);

     var maara = parseInt(luettelo2.elements["maara"].value);
     var is_input = document.URL.indexOf('?');
     var ids = "";
       
    // Seuraavat linkin toiminta pitää estää, jos seuraavalle sivulle ei
    // ole enää hakutuloksia  => 
    // palastellaan forward-merkkijono $:lla
    var splitforward = forward.split("$")

    // löytyykö jostain talukon palasesta "{THWIDS}"
    // THWIDS arvosta voidaan purkaa sivun viimeisin tulostettu hakutulos
    for (var i=0; i<=splitforward.length-1; i++) {
            if (splitforward[i].indexOf("{THWIDS}")!=-1)
        {
          var pala_str = splitforward[i]; 
          var pala2_str = pala_str.substring(9, pala_str.length); // poistetaan {THWIDS}alusta
          var splitpala2 = pala2_str.split(".");
          var ids = parseInt(splitpala2[0]);
        }
    }
    
     
     //alert("maara: " + maara + ", ids: " + ids + ", is_input: " + is_input);

    // Viimeisin tulostettu hakutulos pitää olla pienempi kuin osumien määrä
    if (maara > ids){
        //alert("is_input: " + is_input);
        if (is_input != -1)
        { 
        // tehdään muuttuja ?-merkistä urlin loppuun
        var addr_str = document.URL.substring(is_input+1, document.URL.length);
        
        //alert("addr_str: " + addr_str);
            // ei mennä seuraava- sivulle jos haettu vain uusimmat (maxmaara), niin seuraavat ei toimi sivun alussa
            // tutkitaa löytyykö urlista maxmaara= määritys (-1 = ei löydy)
            if (addr_str.indexOf("maxmaara")==-1)
            {
                // lisätään urliin sorttaus yms. combojen indeksit
                // tutkitaan ensin löytyykö allaolevat elementit formilta
                if (eval(luettelo2.elements["${SORT}"]))
                    var sort_index = luettelo2.elements["${SORT}"].selectedIndex;
                if (eval(luettelo2.elements["${MAXPAGE}"]))
                        var maxpage_index = luettelo2.elements["${MAXPAGE}"].selectedIndex;
                if (eval(luettelo2.elements["${TRIPSHOW}"]))
                        var tripshow_index = luettelo2.elements["${TRIPSHOW}"].selectedIndex;

                //alert("sort_index: " + sort_index + ", maxpage_index: " + maxpage_index + ", tripshow_index: " + tripshow_index);
                
                if ((sort_index) || (maxpage_index) || (tripshow_index)) 
                        comboindit = "&${COMBOT}=" + sort_index + "," + maxpage_index + "," + tripshow_index;
                
                var strLocation = forward+comboindit+"#luettelo-alku";
                        //alert("strLocation: " + strLocation);

                        if (strLocation != "")
                        {
                                     window.location = strLocation;
                        }
                        else {}
            }
        }
    }
}    



// Luettelolomakkeen edelliset sivulle
function Edelliset(){

        var luettelo2 = document.forms["luettelo2"];
        var backward = luettelo2.elements["backward"].value;
        var comboindit = "";

    // lisätään urliin sorttaus yms. combojen indeksit
    if (eval(luettelo2.elements["${SORT}"]))
        var sort_index = luettelo2.elements["${SORT}"].selectedIndex;
    if (eval(luettelo2.elements["${MAXPAGE}"]))
            var maxpage_index = luettelo2.elements["${MAXPAGE}"].selectedIndex;
        if (eval(luettelo2.elements["${TRIPSHOW}"]))
            var tripshow_index = luettelo2.elements["${TRIPSHOW}"].selectedIndex;
        if ((sort_index) || (maxpage_index) || (tripshow_index))
            comboindit = "&${COMBOT}=" + sort_index + "," + maxpage_index + "," + tripshow_index;
         
        //var strLocation = "<tripif prevris>"+backward+"#luettelo-alku<tripif end>";
        var strLocation = backward+comboindit+"#luettelo-alku";
        if (strLocation != "")
        {
                window.location = strLocation;
        }
        else {}
}   


// uusi ohje linkkien tekeminen (2 parametria 1=tiedostonimi, 2=ankkuri)
function veohje(param1, param2){
    
    var parametrit = param1;
    var palvelin = location.hostname;    // kaivetaan palvelimen nimi
    // ohjeikkunan mitat
    var leveys = "400";
    var korkeus = "450";

    if (param1 == "Ö") {
	parametrit = "M_RU";
    }
       
    if (param2 != "")
        parametrit = parametrit + "/" + param2;
              
    //alert(parametrit);
    //var ohje_window = window.open("http://" + palvelin + "/triphome/bin/vexohje.sh/" + parametrit + "", "edus_hakem", "width=450,height=300,scrollbars");ohje_window.focus();

    var ohje_window = palvelin + "/triphome/bin/vexohje.sh/" + parametrit;
    //alert(ohje_window);
    trgWndHnd = window.open("http://" + ohje_window + "", "edus_hakem", "toolbar=yes,location=no,directories=no,menubar=no,status=yes,copyhistory=no,scrollbars=yes,resizable=yes,width=" + leveys + ",height=" + korkeus);

}   


// lajitteluvalintojen aktoivointi lomakeella

function combo_arvot(){

        var luettelo2 = document.forms["luettelo2"];    
    
    // combon indeksi talteen hidden laatikkoon
    sort_index = luettelo2.elements["${SORT}"].selectedIndex;

    
}  

function init_combo(){

    // {COMBOT} on muotoa: =" + sort_index + "," + maxpage_index + "," + tripshow_index
    // puretaan siitä combojen indeksit
    var luettelo2 = document.forms["luettelo2"];

   
        
    if (document.URL.indexOf("{COMBOT}")!=-1){
    
        var is_input = document.URL.indexOf('{COMBOT}');
        addr_str = document.URL.substring(is_input+1, document.URL.length);
        //alert(addr_str);
        
        var spliturl = addr_str.split("=");    
        var sort_index = parseInt(spliturl[1].substring(0, 1)); 
        var maxpage_index = parseInt(spliturl[1].substring(2, 3)); 
        var tripshow_index = parseInt(spliturl[1].substring(4, 5));
        
        //alert("sort_index:" + sort_index + " maxpage_index:" + maxpage_index + " tripshow_index:" + tripshow_index); 
        
        luettelo2.elements["${SORT}"].selectedIndex = sort_index;
        luettelo2.elements["${MAXPAGE}"].selectedIndex = maxpage_index;
        luettelo2.elements["${TRIPSHOW}"].selectedIndex = tripshow_index;
    
    }
    
} 

// valitun linkin tila currentiksi
function VaihdaCurrent()
{
    
    //alert("VaihdaCurrent");
    var formi = document.forms["lomake"];
    var oletuslyh = formi.elements["LYH"].value; 
        
    //alert("VaihdaCurrent:" + oletuslyh );

    var obj = document.getElementById(oletuslyh);
    var id = obj.getAttribute('id');
   
    //alert("VaihdaCurrent:" + id );
    
    obj.className = 'current'; 
      
}

// hakee hiddenkentasta paluulinkin ja parssii sen
function Paluulinkki()
{
    //alert("Paluulinkki");
    var formi = document.forms["luettelo3"];
    var linkki = formi.elements["paluulinkki"].value;
    //alert(linkki);
    var newlink = linkki.replace("%3F","?");
    //alert("Paluulinkki:" + newlink);
    if (newlink != "")
        {
            window.location = newlink;
        }
    
}



var req;
var elemid;
var strContents;

function loadExtDoc(url) {
        req = false;
    req = createXMLHttpRequest();   // tee XMLHttpRequest
    
    if(req) {
        req.onreadystatechange = processReqChange;              
            req.open("GET", url, true);
            req.send(null);
        }
}

function createXMLHttpRequest() {   
    var newreq;
    // XMLHttpRequest
    // alert(url);
    if(window.XMLHttpRequest) { // if Mozilla yms.
        //alert(url);
        try {
                        newreq = new XMLHttpRequest();
        } catch(e) {
                        newreq = false;
        }
        }
    else if(window.ActiveXObject) { // IE/Windows ActiveX versio
        try {
                newreq = new ActiveXObject("Msxml2.XMLHTTP");
        } catch(e) {
                try {
                        newreq = new ActiveXObject("Microsoft.XMLHTTP");
                } catch(e) {
                        newreq = false;
                }
        }
    }
    return newreq;  
}

function processReqChange() {
    if (req.readyState == 4) {
        // only if "OK"
        if (req.status == 200) {
            // ...jos tarvitaan käsittelyä niin tänne
            parseMsg();                                        
        } else {
            alert("Dataa ei voitu ladata:\n" + req.statusText);
        }
    }
}

function parseMsg() {
    strContents = req.responseText;
    alert(strContents);
    document.getElementById(elemid).innerHTML=strContents;
}

function loadContents_info(){      
    var file = "http://"+ window.location.hostname + "/thwfakta/yht/include/ohje.inc";
    elemid = "info";
    loadExtDoc(file);  
}

function loadContents_header(){     
    var file = "http://"+ window.location.hostname + "/thwfakta/yht/include/header.inc";
    elemid = "header";
    loadExtDoc(file); 
        elemid="info";
        loadExtDoc(file);    
}

function loadHeader_info(){      
    var file = "http://"+ window.location.hostname + "/thwfakta/yht/include/header_info.inc";
    elemid = "header_info";
    loadExtDoc(file);  
}

function Test(id){
    
    alert("id:" + id);
}



function Hae_Laaja(){
// vex3100.thw hakulausekkeen rakennus    

        var lomake = document.forms["lomake"];
        var kielikoodi = "";
        
        // Ruotsinkielisten urliin mukaan kielikoodi
        if (eval(lomake.elements["kielikoodi"])){
            kielikoodi = lomake.elements["kielikoodi"].value;
        }

        //alert("skripti Hae_laaja" + kielikoodi);

        var url = "/triphome/bin/vex3000.sh?haku=laaja";
        if (kielikoodi == "ru") {
            url += "&kieli=ru&PALUUHAKU=/triphome/bin/vexhaku.sh?lyh=laaja?lomake=vex/vex3100_ru?kieli=ru&LYH=LYHlaaja";
        }else{
            url += "&PALUUHAKU=/triphome/bin/vexhaku.sh?lyh=laaja?lomake=vex/vex3100&LYH=LYHlaaja";
        }

        var hakuehto = "";
        var kanta = "";
        

//      kanta valinnan mukaan
        if (kielikoodi == "ru") {
                kanta = "veps9199r";
        }else{
                kanta = "veps8999";
        }

        //alert("skripti Hae_laaja " + kanta);

        i = lomake.elements["VPVUOSI"].selectedIndex;
        if (lomake.elements["VPVUOSI"].options[i].value == "1999*") {
               //       alert ("vp 1999");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                if (kielikoodi == "ru") {
                        kanta = "veps99r";
                }else{
                        kanta = "veps99";
                }

        }
        if (lomake.elements["VPVUOSI"].options[i].value == "1989*") {
            //  alert ("vp 1989");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                kanta = "veps8999";
        }
        if (lomake.elements["VPVUOSI"].options[i].value == "1991*") {
            //  alert ("vp 1991r");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                kanta = "veps9199r";
        }
        if (lomake.elements["VPVUOSI"].options[i].value == "199198") {
            //  alert ("vp 199198r");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                kanta = "veps91r";
        }
        if (lomake.elements["VPVUOSI"].options[i].value == "198998") {
           //  alert ("vp 1989-98");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                kanta = "veps89";
        }
        if (lomake.elements["VPVUOSI"].options[i].value == "197088") {
          //    alert ("vp 1970-88");
                lomake.elements["VPVUOSI"].options[i].value = "$";
                kanta = "veps70";
        }


        url += "&kanta=" + kanta + "&LAAJAHAKU=";

        vpvuosi = "";
//      valittiinko vp-vuosi
        if (i > 1 ) {
                vpvuosi = lomake.elements["VPVUOSI"].options[i].value;
                url += "(VPVUOSI=" + vpvuosi + ")";
        }

        //alasvetovalikkojen valinnat
        i1 = lomake.elements["kentta1"].selectedIndex;
        i2 = lomake.elements["kentta2"].selectedIndex;
        i3 = lomake.elements["kentta3"].selectedIndex;

        //tutkitaan ensimmäinen ehto
        // jos alitietuekentta
//      if (i1 == 16 || i1 == 18 ) {
//              if (lomake.elements["arvo1"].value == "' '" || lomake.elements["arvo1"].value == "''") 
//                  hakuehto += "V_TUNNUS=\$\+NOT.R\+" + lomake.elements["kentta1"].options[i1].value; 
//              else 
//                  hakuehto += "(" + escape(lomake.elements["kentta1"].options[i1].value) + ")"; 
//      } // jos normaalikentta
//      else {

        if (lomake.elements["arvo1"].value != "" && lomake.elements["arvo1"].value != "#" && lomake.elements["arvo1"].value != "$") {
                if (!lomake.elements["kentta1"].options[0].selected) {
                    hakuehto += escape(lomake.elements["kentta1"].options[i1].value);   
                    if (lomake.elements["arvo1"].value == "' '" || lomake.elements["arvo1"].value == "''") {
                        hakuehto += escape(lomake.elements["arvo1"].value);
                    } else { 
                        hakuehto += "(" + escape(lomake.elements["arvo1"].value) + ")";
                    }
                  }
        } else {
                  if (!lomake.elements["kentta1"].options[0].selected) {
                    hakuehto += escape(lomake.elements["kentta1"].options[i1].value);   
                    hakuehto += escape("$");
                  }
         }
//       }

        //and vai or
        if (!lomake.elements["kentta1"].options[0].selected) {
          if (lomake.elements["arvo2"].value != "" || lomake.elements["arvo3"].value != "" || lomake.elements["alkupvm1"].value != "" || lomake.elements["loppupvm1"].value != "" || lomake.elements["alkupvm2"].value != "" || lomake.elements["loppupvm2"].value != "" || i2 > 0 || i3 >0) {
                i = lomake.elements["ehto12"].selectedIndex;
                hakuehto += "+" +lomake.elements["ehto12"].options[i].value + "+";
          }
        }
        
        //tutkitaan toinen ehto

        if (lomake.elements["arvo2"].value != "" && lomake.elements["arvo2"].value != "#" && lomake.elements["arvo2"].value != "$") {
                  if (!lomake.elements["kentta2"].options[0].selected) {
                    hakuehto += escape(lomake.elements["kentta2"].options[i2].value);   
                    if (lomake.elements["arvo2"].value == "' '" || lomake.elements["arvo2"].value == "''") {
                        hakuehto += escape(lomake.elements["arvo2"].value);
                    } else { 
                    hakuehto += "(" + escape(lomake.elements["arvo2"].value) + ")";
                    }            
                }
        }  else {
                  if (!lomake.elements["kentta2"].options[0].selected) {
                    hakuehto += escape(lomake.elements["kentta2"].options[i2].value);   
                    hakuehto += escape("$");
                  }
        }
        
        //and vai or
        if (!lomake.elements["kentta2"].options[0].selected) {
          if (lomake.elements["arvo3"].value != "" || lomake.elements["alkupvm1"].value != "" || lomake.elements["loppupvm1"].value != "" || lomake.elements["alkupvm2"].value != "" || lomake.elements["loppupvm2"].value != "" || i3 > 0) {
                i = lomake.elements["ehto22"].selectedIndex;
                hakuehto += "+" +lomake.elements["ehto22"].options[i].value + "+";
          }
        }


        //tutkitaan kolmas ehto

        if (lomake.elements["arvo3"].value != "" && lomake.elements["arvo3"].value != "#" && lomake.elements["arvo3"].value != "$") {
                  if (!lomake.elements["kentta3"].options[0].selected) {
                    hakuehto +=  escape(lomake.elements["kentta3"].options[i3].value);  
                    if (lomake.elements["arvo3"].value == "' '" || lomake.elements["arvo3"].value == "''") {
                        hakuehto += escape(lomake.elements["arvo3"].value);
                    } else { 
                    hakuehto += "(" + escape(lomake.elements["arvo3"].value) + ")";
                  }
                }
        }  else {
                  if (!lomake.elements["kentta3"].options[0].selected) {
                    hakuehto += escape(lomake.elements["kentta3"].options[i3].value);   
                    hakuehto += escape("$");
                  }
        }

        //and vai or
        if (!lomake.elements["kentta3"].options[0].selected) {
          if (lomake.elements["alkupvm1"].value != "" || lomake.elements["loppupvm1"].value != "" || lomake.elements["alkupvm2"].value != "" || lomake.elements["loppupvm2"].value != "") {
                i = lomake.elements["ehto32"].selectedIndex;
                hakuehto += "+" +lomake.elements["ehto32"].options[i].value + "+";
          }
        }

        //tutkitaan ekat päivämäärät
        if (lomake.elements["alkupvm1"].value != "" || lomake.elements["loppupvm1"].value !=""){
                i = lomake.elements["pvmkentta1"].selectedIndex;
        // alku ja loppupaiva annettu
                if (lomake.elements["alkupvm1"].value != "" && lomake.elements["loppupvm1"].value !=""){
                  hakuehto += "(" + lomake.elements["pvmkentta1"].options[i].value ;
                  if  (lomake.elements["pvmkentta1"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta1"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta1"].value != "PVMVP") {
                        hakuehto += " and.c (V_PVM%3E=" + lomake.elements["alkupvm1"].value +  " and V_PVM%3C=" + 
                    lomake.elements["loppupvm1"].value + "))";
          } else {
                        hakuehto += "%3E=" + lomake.elements["alkupvm1"].value + " and " + 
            lomake.elements["pvmkentta1"].options[i].value + "%3C=" + lomake.elements["loppupvm1"].value + ")";
                  }
                }

                // vain alkupaiva annettu
                if (lomake.elements["alkupvm1"].value != "" && lomake.elements["loppupvm1"].value ==""){
                   hakuehto += "(" + lomake.elements["pvmkentta1"].options[i].value;
                   if  (lomake.elements["pvmkentta1"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta1"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta1"].value != "PVMVP") {
                        hakuehto += " and.c V_PVM%3E=" + lomake.elements["alkupvm1"].value + ")";  
          } else {
                        hakuehto += "%3E=" + lomake.elements["alkupvm1"].value + ")";
                  }
                }
                // vain loppupaiva annettu
                if (lomake.elements["alkupvm1"].value == "" && lomake.elements["loppupvm1"].value !=""){
                  hakuehto += "(" + lomake.elements["pvmkentta1"].options[i].value;
                  if  (lomake.elements["pvmkentta1"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta1"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta1"].value != "PVMVP") {
                        hakuehto += " and.c V_PVM%3c=" + lomake.elements["loppupvm1"].value + ")";  
          } else {
                        hakuehto += "%3C=" + lomake.elements["loppupvm1"].value + ")";
                  }
                }
                
                //lisätään and tai or
                if (lomake.elements["alkupvm2"].value != "" || lomake.elements["loppupvm2"].value !=""){
                  i = lomake.elements["pvmehto1"].selectedIndex;
                  hakuehto += "+" + lomake.elements["pvmehto1"].options[i].value + "+";
                }
        }

        //tutkitaan tokat päivämäärät
        if (lomake.elements["alkupvm2"].value != "" || lomake.elements["loppupvm2"].value !=""){
                i = lomake.elements["pvmkentta2"].selectedIndex;
                // alku ja loppupaiva annettu
                if (lomake.elements["alkupvm2"].value != "" && lomake.elements["loppupvm2"].value !=""){
                  hakuehto += "(" + lomake.elements["pvmkentta2"].options[i].value ;
                  if  (lomake.elements["pvmkentta2"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta2"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta2"].value != "PVMVP") {
                        hakuehto += " and.c (V_PVM%3E=" + lomake.elements["alkupvm2"].value +  " and V_PVM%3C=" + 
                        lomake.elements["loppupvm2"].value + "))";
           } else {
                        hakuehto += "%3E=" + lomake.elements["alkupvm2"].value + " and " + 
            lomake.elements["pvmkentta2"].options[i].value + "%3C=" + lomake.elements["loppupvm2"].value + ")";
                  }

                }

                // vain alkupaiva annettu
                if (lomake.elements["alkupvm2"].value != "" && lomake.elements["loppupvm2"].value ==""){
                   hakuehto += "(" + lomake.elements["pvmkentta2"].options[i].value;
                   if  (lomake.elements["pvmkentta2"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta2"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta2"].value != "PVMVP") {
                        hakuehto += " and.c V_PVM%3E=" + lomake.elements["alkupvm2"].value + ")";  
           } else {
                        hakuehto += "%3E=" + lomake.elements["alkupvm2"].value + ")";
                  }
                }
                // vain loppupaiva annettu
                if (lomake.elements["alkupvm2"].value == "" && lomake.elements["loppupvm2"].value !=""){
                  hakuehto += "(" + lomake.elements["pvmkentta2"].options[i].value;
                  if  (lomake.elements["pvmkentta2"].value != "JATETTY" &&  
                        lomake.elements["pvmkentta2"].value != "ANNETTU" &&
                        lomake.elements["pvmkentta2"].value != "PVMVP") {
                        hakuehto += " and.c V_PVM%3c=" + lomake.elements["loppupvm2"].value + ")";  
          } else {
                        hakuehto += "%3C=" + lomake.elements["loppupvm2"].value + ")";
                  }
                }

        }

        //hakuehto annettu ja vpvuosi annettu
        if (hakuehto != "" && vpvuosi != "") {
                hakuehto = "+AND+(" + hakuehto + ")";
        }

        //lisätään hakuehtoon kanta
        // ja ccl


        //top.frames["edus_main"].location.href = url + hakuehto;
        
        hakuehto = url + hakuehto;
        //alert("hakuehto:" + hakuehto);

        parent.location.href = hakuehto;
          
        //document.forms[0].elements["arvo"].value = url + hakuehto;
}

function Haeak_Suppea(){
// akx3050.thw hakulausekkeen rakennus    

        // kanta valinnan mukaan
        var lomake = document.forms["lomake"];
        var haku = lomake.elements["haku"].value;
        var kanta = lomake.elements["kanta"].value;
        var paluuhaku = lomake.elements["paluuhaku"].value;
        var kieli = lomake.elements["kieli"].value;
        var url = "/triphome/bin/akx3000.sh?haku=" + haku + "&kanta=" + kanta + "&paluuhaku=" + paluuhaku + "&kieli=" + kieli + "&";
        var hakuehto = "";
        
        // alert("skripti Haeak_Suppea");
        
        // loopataan lomakkeen hakuehtoon tulevat elementit läpi
        for(var i = 0, len=lomake.elements.length; i < len; i++)
    {
        if(typeof(lomake.elements[i].name) != "undefined")
        {
            if ((lomake.elements[i].type != "hidden") && (lomake.elements[i].type != "button") &&
                (lomake.elements[i].type != "reset")){
                    
                    // perataan eirakin _ER kentät erilleen
                    var kenttanimi = lomake.elements[i].name;
                    var kenttanimi_loppu = kenttanimi.substring(kenttanimi.length -3, kenttanimi.length); 
                    
                    if (kenttanimi_loppu != "_ER"){
                        if (lomake.elements[i].type == "text"){
                          if (lomake.elements[i].value != "" && lomake.elements[i].value != "#" && lomake.elements[i].value != "$"){
                                hakuehto += lomake.elements[i].name + "=";      
                                    hakuehto += escape(lomake.elements[i].value);
                                    hakuehto += "&";
                          }
                        }
                        if (lomake.elements[i].type == "select-one"){
                                if (lomake.elements[i].selectedIndex != -1){
                                    hakuehto += lomake.elements[i].name + "=";  
                                    hakuehto += escape(lomake.elements[i].value);       
                                    hakuehto += "&";
                                }  
                        }
                        if (lomake.elements[i].type == "radio"){
                            if (lomake.elements[i].checked){
                                hakuehto += lomake.elements[i].name + "=";      
                                    hakuehto += escape(lomake.elements[i].value);       
                                    hakuehto += "&";  
                            }
                        }
  
                    }
            }
        }
    }
        
        hakuehto = url + hakuehto;
        // alert("hakuehto:" + hakuehto);

        parent.location.href = hakuehto;
          
}

function Haeak_Eirak(){
// akx3050.thw eirak- hakulausekkeen rakennus    

        // kanta valinnan mukaan
        var lomake = document.forms["lomake_er"];
        var haku_er = lomake.elements["haku_er"].value;
        var kanta_er = lomake.elements["kanta_er"].value;
        var paluuhaku_er = lomake.elements["paluuhaku_er"].value;
        var kieli = lomake.elements["kieli_er"].value;
        var url = "/triphome/bin/akx3000.sh?haku=" + haku_er + "&kanta=" + kanta_er + "&paluuhaku=" + paluuhaku_er + "&kieli=" + kieli + "&";
        var hakuehto = "";
        
        // alert("skripti Haeak_Eirak");
        
        // loopataan lomakkeen hakuehtoon tulevat elementit läpi
        for(var i = 0, len=lomake.elements.length; i < len; i++)
    {
        if(typeof(lomake.elements[i].name) != "undefined")
        {
            if ((lomake.elements[i].type != "hidden") && (lomake.elements[i].type != "button") &&
                (lomake.elements[i].type != "reset")){
                    
                    // Mukaan vain eirakin _ER kentät
                    var kenttanimi = lomake.elements[i].name;
                    var kenttanimi_loppu = kenttanimi.substring(kenttanimi.length -3, kenttanimi.length); 

                    if (kenttanimi_loppu == "_ER"){
                        
                       // perataan kenttänimien lopusta _ER pois
                        var kenttanimip = kenttanimi.substring(0, kenttanimi.length -3); 
                        
                        if (lomake.elements[i].type == "text"){
                          if (lomake.elements[i].value != "" && lomake.elements[i].value != "#" && lomake.elements[i].value != "$"){
                                hakuehto += kenttanimip + "=";  
                                    hakuehto += escape(lomake.elements[i].value);
                                    hakuehto += "&";
                          }
                        }
                        if (lomake.elements[i].type == "select-one"){
                                if (lomake.elements[i].selectedIndex != -1){
                                    hakuehto += kenttanimip + "=";      
                                    hakuehto += escape(lomake.elements[i].value);       
                                    hakuehto += "&";
                                }  
                        }
                        if (lomake.elements[i].type == "radio"){
                            if (lomake.elements[i].checked){
                                hakuehto += kenttanimip + "=";  
                                    hakuehto += escape(lomake.elements[i].value);       
                                    hakuehto += "&";  
                            }
                        }
                    }
            }
        }
    }
        
        hakuehto = url + hakuehto;
        // alert("hakuehto:" + hakuehto);

        parent.location.href = hakuehto;
          
}

// muttaa parametrina tulevan tagin sisällön jos paluulinkki input on tyhjä
// muuttaa myös hrefin back:iksi
function changeContent(id, shtml){
   var paluulinkki_form = document.forms["luettelo3"];
   var paluulinkki = paluulinkki_form.elements["paluulinkki"].value;
   var newHref = "javascript: history.go(-1)";
   
   //alert("paluulinkki:" + paluulinkki);
      
   if (paluulinkki == ""){ 
    //alert("paluulinkki==''");
       if (document.getElementById || document.all) {
          var el = document.getElementById? document.getElementById(id): document.all[id];
          //alert("paluu_href:" + el);
          if (el && typeof el.innerHTML != "undefined"){
              el.innerHTML = shtml;
              document.getElementById(id).href = newHref;
          }
       }
   }
}

// muuttaa Seuraava linkin tyhjäksi
function clearSeuraava(id){
    
     var luettelo3 = document.forms["luettelo3"];
     var luettelo2 = document.forms["luettelo2"];
     var forward = luettelo3.elements["forward"].value;

     var maara = parseInt(luettelo2.elements["maara"].value);
     var is_input = document.URL.indexOf('?');
       
    // Seuraavat linkin toiminta pitää estää, jos seuraavalle sivulle ei
    // ole enää hakutuloksia  => 
    // palastellaan forward-merkkijono $:lla
    var splitforward = forward.split("$")
    
    //alert(splitforward);

    // löytyykö jostain talukon palasesta "{THWIDS}"
    // THWIDS arvosta voidaan purkaa sivun viimeisin tulostettu hakutulos
    for (var i=0; i<=splitforward.length-1; i++) {
            if (splitforward[i].indexOf("{THWIDS}")!=-1)
        {
          var pala_str = splitforward[i]; 
          var pala2_str = pala_str.substring(9, pala_str.length); // poistetaan {THWIDS}alusta
          var splitpala2 = pala2_str.split(".");
          var ids = parseInt(splitpala2[0]);
        }
    }
    
    // tehdään muuttuja ?-merkistä urlin loppuun
    var addr_str = document.URL.substring(is_input+1, document.URL.length);
    var maxmaara = addr_str.indexOf("maxmaara");
    
    //alert("maara:" + maara + ", ids:" + ids + ", maxmaara:" + maxmaara);
    
    // 1. Jos viimeisin tulostettu hakutulos on >= kuin osumien määrä, niin seuraavat linkkiä ei tulosteta.
    // 2. Jos haettu vain uusimmat (maxmaara), niin seuraavat linkkiä ei tulosteta.
            // (tutkitaa löytyykö urlista maxmaara= määritys (-1 = ei löydy))
    if ((maara <= ids) || (maxmaara !=-1)){
       if (document.getElementById || document.all) {
          var el = document.getElementById? document.getElementById(id): document.all[id];
          //alert("paluu_href:" + el);
          if (el && typeof el.innerHTML != "undefined"){
              // Seuraava linkki tyhjäksi
              el.innerHTML = "";
          }
       }
   }
}

function Hae_kvkaavio(parametri)
        {
        var formi = document.forms["kasittelyvaihekaavio"];
        var freetext = "";
        var url = "";
        var hakuehto = "";
        var kielikoodi = "";
        
        // Ruotsinkielisten urliin mukaan kielikoodi
        if (eval(formi.elements["kielikoodi"])){
            kielikoodi = formi.elements["kielikoodi"].value;
        }

        if (kielikoodi == "ru") {
            url ="/triphome/bin/vex3000.sh?kanta=veps99r&kieli=ru&PALUUHAKU=/thwfakta/vpasia/vex/vex7000_ru.shtml";
        }else{
            url ="/triphome/bin/vex3000.sh?kanta=veps99&PALUUHAKU=/thwfakta/vpasia/vex/vex7000.shtml";
        }
        
        //alert("url: " + url);
        
        if (parametri == "ve7kasitt") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((TUNNISTE=(RP+or+VLF+or+ISL+or+TKF+or+B+or+F)+not.r+V_TUNNUS=IL$+not.r+V_TUNNUS=LK))";
            }else{
                freetext ="&KAIKKIHAKU=((TUNNISTE=(HE+or+LJL+or+VJL+or+PNE+or+K+or+A)+not.r+V_TUNNUS=IL$+not.r+V_TUNNUS=LK))";
            }
        }

        if (parametri == "ve7lk") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((TUNNISTE=(RP+or+VLF+or+ISL+or+TKF+or+B+or+F+or+SRR+or+SRM)+and.r+V_TUNNUS=IL$)+or+(TUNNISTE=(LM+or+HM+or+BM+or+TBM)+and.r+V_TUNNUS=AJ)+or+(TUNNISTE=AM+and.r+V_PAATOS=Talmanskonferensen+överförde))+not.r+(V_TUNNUS=LK+and.e+V_PAATOS=$)";
            }else{
                freetext ="&KAIKKIHAKU=((TUNNISTE=(HE+or+LJL+or+VJL+or+PNE+or+K+or+A+or+VNS+or+VNT)+and.r+V_TUNNUS=IL$)+or+(TUNNISTE=(LA+or+TA+or+TAA+or+LTA)+and.r+V_TUNNUS=AJ)+or+(TUNNISTE=TPA+and.r+V_PAATOS=Puhemiesneuvosto+siirsi))+not.r+(V_TUNNUS=LK+and.e+V_PAATOS=$)";
            }
        }

        if (parametri == "ve7vk") 
                freetext ="&KAIKKIHAKU=(VALIOK=$+and+VK_VALMIS='')";

        if (parametri == "ve7pev") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=GrU+and.c+VK_VALMIS='')+or+(L_PYYNTO=GrU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=PeV+and.c+VK_VALMIS='')+or+(L_PYYNTO=PeV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7lav") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=LaU+and.c+VK_VALMIS='')+or+(L_PYYNTO=LaU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=LaV+and.c+VK_VALMIS='')+or+(L_PYYNTO=LaV+and.t+L_VALMIS=''))";
            }
        }


        if (parametri == "ve7uav") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=UtU+and.c+VK_VALMIS='')+or+(L_PYYNTO=UtU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=UaV+and.c+VK_VALMIS='')+or+(L_PYYNTO=UaV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7vav") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=FiU+and.c+VK_VALMIS='')+or+(L_PYYNTO=FiU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=VaV+and.c+VK_VALMIS='')+or+(L_PYYNTO=VaV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7hav") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=FvU+and.c+VK_VALMIS='')+or+(L_PYYNTO=FvU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=HaV+and.c+VK_VALMIS='')+or+(L_PYYNTO=HaV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7liv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=KoU+and.c+VK_VALMIS='')+or+(L_PYYNTO=KoU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=LiV+and.c+VK_VALMIS='')+or+(L_PYYNTO=LiV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7mmv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=JsU+and.c+VK_VALMIS='')+or+(L_PYYNTO=JsU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=MmV+and.c+VK_VALMIS='')+or+(L_PYYNTO=MmV+and.t+L_VALMIS=''))";
            }
        }
        if (parametri == "ve7puv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=FsU+and.c+VK_VALMIS='')+or+(L_PYYNTO=FsU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=PuV+and.c+VK_VALMIS='')+or+(L_PYYNTO=PuV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7siv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=KuU+and.c+VK_VALMIS='')+or+(L_PYYNTO=KuU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=SiV+and.c+VK_VALMIS='')+or+(L_PYYNTO=SiV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7stv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=ShU+and.c+VK_VALMIS='')+or+(L_PYYNTO=ShU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=StV+and.c+VK_VALMIS='')+or+(L_PYYNTO=StV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7tav") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=EkU+and.c+VK_VALMIS='')+or+(L_PYYNTO=EkU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=TaV+and.c+VK_VALMIS='')+or+(L_PYYNTO=TaV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7trv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=ReU+and.c+VK_VALMIS='')+or+(L_PYYNTO=ReU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=TrV+and.c+VK_VALMIS='')+or+(L_PYYNTO=TrV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7tyv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=AjU+and.c+VK_VALMIS='')+or+(L_PYYNTO=AjU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=TyV+and.c+VK_VALMIS='')+or+(L_PYYNTO=TyV+and.t+L_VALMIS=''))";

            }
        }
        if (parametri == "ve7ymv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=MiU+and.c+VK_VALMIS='')+or+(L_PYYNTO=MiU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=YmV+and.c+VK_VALMIS='')+or+(L_PYYNTO=YmV+and.t+L_VALMIS=''))";
            }
        }
        if (parametri == "ve7suv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=StoU+and.c+VK_VALMIS='')+or+(L_PYYNTO=StoU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=SuV+and.c+VK_VALMIS='')+or+(L_PYYNTO=SuV+and.t+L_VALMIS=''))";
            }
        }

        if (parametri == "ve7tuv") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((VALIOK=FrU+and.c+VK_VALMIS='')+or+(L_PYYNTO=FrU+and.t+L_VALMIS=''))";
            }else{
                freetext ="&KAIKKIHAKU=((VALIOK=TuV+and.c+VK_VALMIS='')+or+(L_PYYNTO=TuV+and.t+L_VALMIS=''))";
            }
        }


        if (parametri == "ve71k") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=(V_TUNNUS=VK+and.e+MIETINTO=$+and.r+KASITTELY=(2K$+or+3K$))+not.r+(V_TUNNUS=(1K+or+J1K)+and.e+V_KASITTELY=Avslut$)";
            }else{
                freetext ="&KAIKKIHAKU=(V_TUNNUS=VK+and.e+MIETINTO=$+and.r+KASITTELY=(2K$+or+3K$))+not.r+(V_TUNNUS=(1K+or+J1K)+and.e+V_KASITTELY=Päätt$)";
            }
        }


        if (parametri == "ve72k") {
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=(((V_TUNNUS=$1K+and.e+V_PAATOS=$)+not.r+((V_TUNNUS=1K+and.e+V_KASITTELY=Till+stora$)+not.r+(V_TUNNUS=J1K+and.e+V_PAATOS=$)))+and.r+KASITTELY=(2K$+or+3K$))+not.r+(V_TUNNUS=2K$+and.e+V_KASITTELY=Avslut$)";
            }else{
                freetext ="&KAIKKIHAKU=(((V_TUNNUS=$1K+and.e+V_PAATOS=$)+not.r+((V_TUNNUS=1K+and.e+V_KASITTELY=Suureen$)+not.r+(V_TUNNUS=J1K+and.e+V_PAATOS=$)))+and.r+KASITTELY=(2K$+or+3K$))+not.r+(V_TUNNUS=2K$+and.e+V_KASITTELY=Päätt$)";
            }
        }

        if (parametri == "ve7ak")
            if (kielikoodi == "ru") {
                freetext ="&KAIKKIHAKU=((V_TUNNUS=VK+and.e+MIETINTO=$+and.r+KASITTELY=AK$)+not.r+(V_TUNNUS=AK+and.e+V_KASITTELY=Avslut$)+not.r+(V_TUNNUS=PAL+and.e+V_KASITTELY=Avslut$)+or+(TUNNISTE=VK+and.r+V_TUNNUS=TIE)+not.r+(V_TUNNUS=TIK+and.e+V_KASITTELY=Avslut$))";
            }else{
                freetext ="&KAIKKIHAKU=((V_TUNNUS=VK+and.e+MIETINTO=$+and.r+KASITTELY=AK$)+not.r+(V_TUNNUS=AK+and.e+V_KASITTELY=Päätt$)+not.r+(V_TUNNUS=PAL+and.e+V_KASITTELY=Päätt$)+or+(TUNNISTE=VK+and.r+V_TUNNUS=TIE)+not.r+(V_TUNNUS=TIK+and.e+V_KASITTELY=Päätt$))";
            } 
        if (parametri == "ve7lopp")
                freetext ="&KAIKKIHAKU=(KOHTALO=$)";
        else           // poistetaan käsitellyt
               freetext += "+not.r+KOHTALO=$";     

        var index = formi.elements["tunnus"].selectedIndex;
        freetext += "+and+TUNNISTE=(" + formi.elements["tunnus"].value + ")+and+vpvuosi>=2003";

        hakuehto = url + freetext;
        // alert("hakuehto:" + hakuehto);
        
        //formi.elements["arvo"].value = url + freetext;
        parent.location.href = hakuehto;

}
        
//lisaaLinkki
//NN 6+, IE 5+, Opera 7+, FF 1+
function lisaaLinkki(url, otsikko) {
    
    //alert("lisaaLinkki");
    var url = url;
    var otsikko = otsikko;
   // &Ouml; -> Ö
//  alert("otsikko1:" + otsikko );

    otsikko = otsikko.replace("&Ouml;", "Ö", "gi");

//   alert("otsikko2:" + otsikko );
//   alert("url:" + url );

    if (window.sidebar) { 
        window.sidebar.addPanel(otsikko, url,"");
    }
    else if( document.all ) { 
                window.external.AddFavorite( url, otsikko);
    } else if( window.opera && window.print ) {  
            return true;  
    }
}

function tutkiMailSend() {
    
    //alert("tutkiOnkoSend");

        var formi = document.forms["lomake"];
        var kielikoodi = "";
 
        var is_input = document.URL.indexOf('?');
        var msg_su = "Asiasanaehdotuksesi lähetetty. Kiitos!";
        var msg_ru = "Tack för ditt förslag!";
       
        // Ruotsinkielisten viesti mukaan kielikoodi
        if (eval(formi.elements["kieli"])){
            kielikoodi = formi.elements["kieli"].value;
        }
        //alert("kielikoodi:" + kielikoodi);
        //alert("is_input:" + is_input);

    if (is_input != -1)
    { 
        // tehdään muuttuja ?-merkistä urlin loppuun
        var addr_str = document.URL.substring(is_input+1, document.URL.length);

        //alert("addr_str:" + addr_str);

        // tutkitaan löytyykö urlista "send" määritys (-1 = ei löydy)
        if (addr_str.indexOf("send")!=-1)
        {
            if (kielikoodi == "ru") {
                alert(msg_ru); 
            }else{
                alert(msg_su); 
            }
        }
    }
    
}

function tutkiLinkkiSend() {
    
    //alert("tutkiOnkoSend");
    
    var lomake = document.forms["lomake"];
    var kieli = lomake.elements["kieli"].value;
    if (kieli == "su") {
            var msg_ok = "Linkki lähetetty valitsemaasi osoitteeseen.\n";
            }else{
            var msg_ok = "Meddelandet har sänts.\n";
    }

    var is_input = document.URL.indexOf('?'); 
    var msg_err = "Linkin lähetys epäonnistui!\n";
    //msg = msg + "Kiitos...!";
       
    if (is_input != -1)
    { 
        // tehdään muuttuja ?-merkistä urlin loppuun
        var addr_str = document.URL.substring(is_input+1, document.URL.length);
        // tutkitaan löytyykö urlista "send=ok" määritys (-1 = ei löydy)
        if (addr_str.indexOf("send=ok")!=-1)
            alert(msg_ok);  
        if (addr_str.indexOf("send=virhe")!=-1)
            alert(msg_err);
    }
    
}


function puraLinkki(){   
// korvattu puraLinkki2:lla !!!!!! 
    // puretaan linkki urlista
    var lomake = document.forms["lomake"];
    // otetaan koko urli talteen.. vex6500.sh käyttää tätä paluulinkkinä
    var currentURL = document.URL;

        alert(currentURL);  
  
     lomake.elements["URL"].value = currentURL;
    
    if (document.URL.indexOf("$LINKKI=")!=-1){
    
        var is_input = document.URL.indexOf('$LINKKI=');
        addr_str = document.URL.substring(is_input+8, document.URL.length);
        //alert(addr_str);
        //var spliturl = addr_str.split("=");    
        //var linkki = spliturl[1] + "=" + spliturl[2];
        //alert(linkki);
        
        // Jos ollaan lähettämässä samaa linkkiä toiseen kertaan send=ok pitää poistaa
        if (addr_str.indexOf("send")!=-1)
        {
          var addr_str_array = addr_str.split("send");
          addr_str = addr_str_array[0];
        }
        
        // Muutetaan kaikki #- esiintymät &-merkeiksi
        var muutettava = /#/g;
        addr_str = addr_str.replace(muutettava, "&");
        
        lomake.elements["LINKKI"].value = addr_str;
        document.write(addr_str);
    }
    
} 

function puraLinkki2(){    
    // puretaan linkki urlista
    var lomake = document.forms["lomake"];
    // otetaan koko urli talteen.. vex6500.sh käyttää tätä paluulinkkinä
    var currentURL = document.URL;

        //alert(currentURL);  
  
     lomake.elements["URL"].value = currentURL;
    
    
        var addr_str = lomake.elements["LINKKI"].value;
        //alert(addr_str);
        //var spliturl = addr_str.split("=");    
        //var linkki = spliturl[1] + "=" + spliturl[2];
        //alert(linkki);
        
        // Jos ollaan lähettämässä samaa linkkiä toiseen kertaan send=ok pitää poistaa
        if (addr_str.indexOf("send")!=-1)
        {
          var addr_str_array = addr_str.split("send");
          addr_str = addr_str_array[0];
        }
        
        // Muutetaan kaikki #- esiintymät &-merkeiksi
        var muutettava = /#/g;
        addr_str = addr_str.replace(muutettava, "&");

       var addr_str2 = muunnaSkandeiksi2(addr_str);
         
        lomake.elements["LINKKI"].value = addr_str2;
        document.write(addr_str2);
    
} 


//   VKFaktan ja aanestysten luettelolomakkeen vaihda-toiminto
function Hae_vk()
{

        // alert ("javascript Hae_vk");

        var text;
        var i;
        var qs = "";
        var pituus;
        var merkki;
        var luettelo2 = document.forms["luettelo2"];
        var f1 = luettelo2.elements["${TRIPSHOW}"].name; 
        var f2 = luettelo2.elements["${SORT}"].name;
        var f3 = luettelo2.elements["${MAXPAGE}"].name;
        var currbase = luettelo2.elements["currbase"].value;
        var findstr = luettelo2.elements["findstr"].value;
        
        sort_index = luettelo2.elements["${SORT}"].selectedIndex;
        maxpage_index = luettelo2.elements["${MAXPAGE}"].selectedIndex;
        tripshow_index = luettelo2.elements["${TRIPSHOW}"].selectedIndex;
        
    //alert("sortind= " + sort_index + " maxind=" + maxpage_index + " showind= " + tripshow_index);             


        
        var url = "/thw.cgi/trip/?${BASE}="+currbase+"&${CCL}=define+merge&${FREETEXT}="+findstr+"&";

        text = "";

//      paluulinkki
        var formi = document.forms["luettelo3"];
        var paluulinkki = formi.elements["paluulinkki"].value;
        url = url + "${savehtml}=" + paluulinkki + "&";

//      alert (url);

//      nayttomuoto
        var tripshow = luettelo2.elements["${TRIPSHOW}"].value;
        text += f1 + tripshow + "&";

//      MAGPAGE
        index1 = luettelo2.elements["${MAXPAGE}"].selectedIndex;
        text += f3 + "=" + luettelo2.elements["${MAXPAGE}"].options[index1].value + "&";

//      lajittelu
        if (luettelo2.elements["maara"].value < 5000)
        {
          index1 = luettelo2.elements["${SORT}"].selectedIndex;
          text += f2 + "=" + luettelo2.elements["${SORT}"].options[index1].value;
          //alert(text);
        }
        else
        {
                alert ("Lajittelua ei voida suorittaa, koska asioita on yli 5000");
        }
        
        text += "&${COMBOT}=" + sort_index + "," + maxpage_index + "," + tripshow_index;
        
        //alert(text);

        pituus = url.length;
        for (i = 1 ; i <= pituus ; i++)
        {
                merkki = url.charAt(i);
                if (merkki == " ") 
                        qs += "+";
                else {
                  if (merkki == "&") {
                        osajono = url.substring(i, i+6);
                        osajono2 = url.substring(i, i+7);
                        if (osajono == "&auml;") {
                                qs += "ä";
                                i += 5;
                        }
                        else {
                          if (osajono == "&ouml;") {
                                qs += "ö";
                                i += 5;
                          }
                          else {
                            if (osajono == "&Auml;") {
                                qs += "Ä";
                                i += 5;
                            }
                            else {
                              if (osajono == "&Ouml;") {
                                qs += "Ö";
                                i += 5;
                              }
                              else {
                                if (osajono2 == "&aring;") {
                                  qs += "å";
                                  i += 6;
                                }
                                else {
                                  if (osajono2 == "&Aring;") {
                                    qs += "Å";
                                    i += 6;
                                  }
                                  else {
                                    qs += merkki;
                                  }
                                }
                              }
                            }
                          }
                        }
                  }
                  else { 
                        qs += merkki;
                  }
                }
        } 
                
        //alert (qs);
//      luettelo2.elements[4].value += qs + text + "#alkukohta";

        qs = qs + text + "#alkukohta";
        
//     alert ("qs: " + qs);
                
        parent.location.href = qs;
        
}

// poistaa roskadatan tagista
function clearTrip(id){
    
    var lomake = document.forms["lomake"];
    var kieli = lomake.elements["kieli"].value;
    var osumaa = " osumaa" ;
    if (kieli == "ru") osumaa=" träffar";


    // Tehdään id:n mukainen tagi-objekti
    var elemObj = document.getElementById(id);
    // tagiobjectin sisältö        
    var elemStr = elemObj.innerHTML;
    
    // Poistetaan kaikki <br> esiintymät tagista
    var poistettava = /<br>/g;
    elemStr = elemStr.replace(poistettava, "");
    
    //alert("elemStr: " + elemStr);
    
    // Löytyykö pupputekstiä tagin sisällöstä
    var loyty = elemStr.indexOf("${THWURLSAVE}"); 
    
    if (loyty!=-1){
       // palastellaan merkkijono $:lla
       
       //var split = elemStr.split("$");
       var split = elemStr.split("${THWURLSAVE}");
       // ekapalaan jää osumien lukumäärä
       var ekapala = split[0];
       
       //alert("ekapala: " + ekapala);
           
       // Otetaan vielä ylimääräiset merkit pois
       var split2 = ekapala.split("&");
       var ekapala2 = split2[0];
       //alert("ekapala2: " + ekapala2);
       
        if (elemObj && typeof elemObj.innerHTML != "undefined"){
            // tagin sisältöön vain osumien lukumäärä
            elemObj.innerHTML = "";
            elemObj.innerHTML = ekapala2 + osumaa + ")";
            
        }
       
    }

}
// poistaa roskadatan tagista
function clearTrip2(id){
    
    // Tehdään id:n mukainen tagi-objekti
    var elemObj = document.getElementById(id);
    // tagiobjectin sisältö        
    var elemStr = elemObj.innerHTML;
    
    // Poistetaan kaikki <br> esiintymät tagista
    var poistettava = /<br>/g;
    elemStr = elemStr.replace(poistettava, "");
    
    //alert("elemStr: " + elemStr);
    
     elemObj.innerHTML = elemStr;
     
}

// Muuttaa stringin muuttuneeet skandit takaisin selväkielisiksi skandeiksi
function muunnaSkandeiksi2(str){
        
        var pituus = str.length;
        var muutettujono = "";
        var osajono = "";
        
        //alert ("muunnaSkandeiksi2().. stringi: " + str);
        
        for (i = 0 ; i <= pituus ; i++)
        {
                merkki = str.charAt(i);
    
            //alert ("merkki: " + merkki);
    
                if (merkki == "%") {
                        osajono = str.substring(i, i+3);
                        //alert ("osajono: " + osajono);
                        if (osajono == "%E5") {
                                muutettujono += "å";
                                i += 2;
                        }
                        else {
                          if (osajono == "%C5") {
                             muutettujono += "Å";
                             i += 2;
                          }
                        else {
                            if (osajono == "%E4") {
                               muutettujono += "ä";
                               i += 2;
                            }
                        else {
                          if (osajono == "%C4") {
                                muutettujono += "Ä";
                                i += 2;
                          }
                        else {
                           if (osajono == "%F6") {
                                  muutettujono += "ö";
                                  i += 2;
                           }
                        else {
                           if (osajono == "%D6") {
                                 muutettujono += "Ö";
                                 i += 2;
                           }
                        else {
                           if (osajono == "%A3") {
                                 muutettujono += ":";
                                 i += 2;
                           }
 
// tih lisasi 29.9.06
//%A3 = :, %E8 = č, %C8 = Č, %E9 = é, %C9 = É, %F4 = ô, %D4 = Ô, %E0 = ā, %E1 = á, %C0 = Ā, %C1 = Á
//%E2 = â, %C2 = Â, %EA = ę, %CA = Ę, %EE = î, %CE = Î, %FB = û, %DB = Û, %F9 = ų, %D9 = Ų,
//%FC = ü, %DC = Ü, %E7 = į, %C7 = Į, %EF = ī, %CF = Ī, %EB = ë, %CB = Ë, %FF = ˙, %C6 = Æ

                                  else {
                                    if (osajono == "%3A") {
                                       muutettujono += ":";
                                       i += 2;
                                    }
                                  
                                 else {
                                    if (osajono == "%E8") {
                                       muutettujono += "č";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C8") {
                                       muutettujono += "Č";
                                       i += 2;
                                    }

                                  else {
                                    if (osajono == "%C9") {
                                       muutettujono += "É";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%E9") {
                                       muutettujono += "é";
                                       i += 2;
                                    }

                                  else {
                                    if (osajono == "%F4") {
                                       muutettujono += "ô";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%D4") {
                                       muutettujono += "Ô";
                                       i += 2;
                                    }

                                  else {
                                    if (osajono == "%E0") {
                                       muutettujono += "ā";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C0") {
                                       muutettujono += "Ā";
                                       i += 2;
                                    }

                                  else {
                                    if (osajono == "%E1") {
                                       muutettujono += "á";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C1") {
                                       muutettujono += "Á";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%E2") {
                                       muutettujono += "â";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C2") {
                                       muutettujono += "Â";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%EA") {
                                       muutettujono += "ę";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%CA") {
                                       muutettujono += "Ę";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%EE") {
                                       muutettujono += "î";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%CE") {
                                       muutettujono += "Î";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%FB") {
                                       muutettujono += "û";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%DB") {
                                       muutettujono += "Û";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%F9") {
                                       muutettujono += "ų";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%D9") {
                                       muutettujono += "Ų";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%FC") {
                                       muutettujono += "ü";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%DC") {
                                       muutettujono += "Ü";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%E7") {
                                       muutettujono += "į";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C7") {
                                       muutettujono += "Į";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%EF") {
                                       muutettujono += "ī";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%CF") {
                                       muutettujono += "Ī";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%EB") {
                                       muutettujono += "ë";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%CB") {
                                       muutettujono += "Ë";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%FF") {
                                       muutettujono += "˙";
                                       i += 2;
                                    }
                                  else {
                                    if (osajono == "%C6") {
                                       muutettujono += "Æ";
                                       i += 2;
                                    }

                                           else {
                                                    muutettujono += merkki;
                                                }
                                }}}}}}}}}}}}}}}}}}}}}}}}}}}}}}} 

                        }}}}}}
                }
                else { 
                        muutettujono += merkki;
                }
        }   // for loppu
        
        return muutettujono;
        
} 
// poistaa roskadatan tagista
function clearTrip3(id, poistettava, korvaaja){
    
    // Tehdään id:n mukainen tagi-objekti
    var elemObj = document.getElementById(id);
    // tagiobjectin sisältö        
    var elemStr = elemObj.innerHTML;
    
    // Poistetaan kaikki 'poistettava' esiintymät tagista
    //alert("clearTrip3.. poistettava: " + poistettava);
    
    // gi- parametrin tekemä rekursio ei toimi IE:ssä => sama kutsu monta kertaa
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    elemStr = elemStr.replace(poistettava, korvaaja, "gi");
    //alert("elemStr: " + elemStr);
    
    var skandielemStr = muunnaSkandeiksi2(elemStr);
    
     elemObj.innerHTML = skandielemStr;
     
}

// poistaa roskadatan input laatikosta
function clearTrip4(id, poistettava, korvaaja){
    
    // Tehdään id:n mukainen tagi-objekti
    var elemObj = document.getElementById(id);
    // tagiobjectin sisältö        
    var elemValue = elemObj.value;
    
    // Poistetaan kaikki 'poistettava' esiintymät tagista
    //alert("clearTrip4.. elemValue: " + elemValue + ", poistettava: " + poistettava);
    
    // gi- parametrin tekemä rekursio ei toimi IE:ssä => sama kutsu monta kertaa
    elemValue = elemValue.replace(poistettava, korvaaja, "gi");
    elemValue = elemValue.replace(poistettava, korvaaja, "gi");
    elemValue = elemValue.replace(poistettava, korvaaja, "gi");
    elemValue = elemValue.replace(poistettava, korvaaja, "gi");
    elemValue = elemValue.replace(poistettava, korvaaja, "gi");
    //alert("elemStr: " + elemStr);
    
    var skandielemStr = muunnaSkandeiksi2(elemValue);
    
     elemObj.value = skandielemStr;
     
}

function do_reset(formname) {

    //alert("do_reset");
    var formi = document.forms[formname];
    
    // loopataan lomakkeen hakuehtoon tulevat elementit läpi..
        for(var i = 0, len=formi.elements.length; i < len; i++)
    {
        if (formi.elements[i].type == "text"){
            // ..ja tyhjennetään input-kentät
            formi.elements[i].value = "";
        } 
        if (formi.elements[i].type == "select-one"){
           // ..combot defaultti-tilaan
           formi.elements[i].selectedIndex = 0
        }
    }
               
} 

function addOnloadEvent(fnc){
  if ( typeof window.addEventListener != "undefined" )
    window.addEventListener( "load", fnc, false );
  else if ( typeof window.attachEvent != "undefined" ) {
    window.attachEvent( "onload", fnc );
  }
  else {
    if ( window.onload != null ) {
        
      var oldOnload = window.onload;
      window.onload = function ( e ) {
        oldOnload( e );
        window[fnc]();
      };
    }
    else
      window.onload = fnc;
  }
}
        
function mailAddresses(){
        var mail=/\bemailAddress\b/;
        var at=/\b\[at\]\b/;
        
        var spans=document.getElementsByTagName("SPAN");
        
        for (var i=0; i< spans.length; i++){
        if(mail.test(spans[i].className))

                
                if(at.test(spans[i].innerHTML))
                {
                        var linkContent=spans[i].innerHTML.replace('[at]', '&#64;');
                        spans[i].innerHTML='<a href=\"mailto:'+linkContent+'\">'+linkContent+'</a>';
                }
        }
}


function zoomWnd(pURL, pTrg, pHs, pVs)
{       
       trgWndHnd = window.open(pURL,pTrg,'toolbar=yes,location=no,directories=no,menubar=no,status=yes,copyhistory=no,scrollbars=yes,resizable=yes,width=' + pHs + ',height=' + pVs);
}