	var ie=(document.all) ? true:false;
	var ns=(document.layers) ? true:false;
  var idioma=location.href.substring(location.href.indexOf("/asp")-2,location.href.indexOf("/asp"));

	function CreaOpcion(Txt,Valor,Form,Select){
		var Elements2="";
		var TxtOk ="";

		TxtOk = CambiarCaracter(Txt,"#","'");
		Elements2=eval("document.forms['"+Form+"']."+Select);

		if(ns){
			var ObjOption=new Option(TxtOk,Valor,false,true);
			Elements2.options[Elements2.options.length]=ObjOption;
		}
		if(ie){
			ObjOption=document.createElement('OPTION');
			ObjOption.value=Valor;
			ObjOption.text=TxtOk;
			Elements2.add(ObjOption, 0);
		}
	}


	function CreaSelect(nomform, cpais, cprov){
		var nuevaopcion, i, no, valorpais;
		var no = 0;
		var Elements=eval("document.forms['"+nomform+"'];");
		var opciones = eval("Elements."+cprov+".options.length;");
		
		for(i=opciones;i>=0;i--){
			eval("Elements."+cprov+".options[i] = null;");
		}
		
		valorpais = eval("Elements."+cpais+".options[Elements."+cpais+".selectedIndex].value");

		if(ns){
			for (i=Paises.length-1;i>-1;i--){
				if ((Paises[i].codpais == valorpais)){
					CreaOpcion(Paises[i].descripprovincia, Paises[i].codprovincia, nomform, cprov);
					no++;
				}
			}
		}

		if(ie){
			for (i=0;i<Paises.length;i++){
				if ((Paises[i].codpais == valorpais)){
					CreaOpcion(Paises[i].descripprovincia, Paises[i].codprovincia, nomform, cprov);
					no++;
				}
			}
		}

		if (no==0){
			if (valorpais=="0"){
				CreaOpcion(TextoSeleccionePaisoEstado(valorpais), '0', nomform, cprov);
			} else {
			  CreaOpcion(TextoSeleccionePaisoEstado(" "), 0, nomform, cprov);
			}
		} else {
			CreaOpcion(TextoSeleccionePaisoEstado(valorpais), '0', nomform, cprov);
		}

		eval("Elements."+cprov+".selectedIndex=0;");
	}
  
  function TextoSeleccionePaisoEstado(Pais) {
    if (idioma.toLowerCase()=="ca") {
      if (Pais==" ") return('Sense asignar');
      if (Pais=="0") return('                         ');
      if (Pais=="USA") return('Seleccioni un Estat');    
      return('Seleccioni una Província');
    }
    if (idioma.toLowerCase()=="en") {
      if (Pais==" ") return('Without value');
      if (Pais=="0") return('                         ');
      if (Pais=="USA") return('Select an Estate');    
      return('Select a County');
    }
    if (idioma.toLowerCase()=="es") {
      if (Pais==" ") return('Sin asignar');
      if (Pais=="0") return('                         ');
      if (Pais=="USA") return('Seleccione un Estado');    
      return('Seleccione una Provincia');
    }
    if (idioma.toLowerCase()=="fr") {
      if (Pais==" ") return('-- French --');
      if (Pais=="0") return('                         ');
      if (Pais=="USA") return('-- French --');    
      return('-- French --');
    }
  }