/************************************************
Listas dependientes por Tunait!(5/1/04)
Si quieres usar este script en tu sitio 
eres libre de hacerlo con la condición 
de que permanezcan intactas estas líneas, 
osea, los créditos.
No autorizo a publicar y ofrecer el código 
en sitios de script sin previa autorización
Si quieres publicarlo, por favor, contacta conmigo.
http://javascript.tunait.com/
tunait@yahoo.com 

Modificaciones y adecuaciones por Leonardo Castillo.
*************************************************/
function slctr(texto,valor,etiqueta){
this.texto = texto
this.valor = valor
this.etiqueta = etiqueta;
}


function slctryole(cual,donde){
//if(cual.selectedIndex != 0){
   donde.length=0;
   
   cual = eval(cual.value);
   
   if (cual) {
	   for(m=0;m<cual.length;m++){
	   	  var Etiqueta = '';
	   	  
	   	  if (cual[m].etiqueta != null)
	   	  	Etiqueta = cual[m].etiqueta;
	   	  else
	   	    Etiqueta = cual[m].texto;
	      var nuevaOpcion = new Option(Etiqueta);
	      donde.options[m] = nuevaOpcion;
	      /*if(cual[m].etiqueta != null){
	         donde.options[m].value = cual[m].etiqueta
	         }
	      else*/ if(cual[m].valor != null){
	         donde.options[m].value = cual[m].valor
	         }
	      else{
	         donde.options[m].value = cual[m].texto
	         }
	      }
		}
	//}
}