function SetAction(action) {
	document.ABMForm.accion.value = action;
	document.ABMForm.submit();
}

function FilterSelect(ArrayGral,ArraySelect,strBusq){
	var nombre;	
	var aux ;
	var result;
	var oRegExp;
	var cant_results = 0;

	if (ArrayGral.length == 0){
		return;
	}
	ArraySelect.length = 0;
	if (strBusq.value.length == 0){
		ArraySelect[ArraySelect.length]	= new Option("-- Seleccione una opción --","",null,true);
		for (var i=0;i<ArrayGral.length; i++){
			aux = ArrayGral[i];
			aux = aux.split("--**--");				
			ArraySelect[ArraySelect.length]	= new Option(aux[1],aux[0],null,null);	
		}
		return;
	}
	var exp= "oRegExp = new RegExp(/^"+strBusq.value+"/i)";
	eval(exp);				
	for (var i=0;i<ArrayGral.length; i++){
		aux = ArrayGral[i];
		aux = aux.split("--**--");		
		nombre = new String(aux[1]);
		result = oRegExp.test(nombre);				
		if (result){					
			ArraySelect[ArraySelect.length]	= new Option(nombre,aux[0],null,null);
			cant_results++; 			
		}		
	}

	//Agregado el 18-8-2004 por AR
	//if (cant_results == 1) {
	//	strBusq.value = ArraySelect[0].text;
	//}
	//Fin Agregado			

	if (ArraySelect[0] == undefined ){	
		ArraySelect[ArraySelect.length]	= new Option("-- Ninguno --","",null,true);
	}

}

function SelectHijo(strValue,CampoSelect,Array,strValueHijo)
{	
var aux;
var nombre;
var padre;

	if (Array.length == 0){
		return;
	}
	CampoSelect.length = 0;
	if (strValue.length == 0){
		CampoSelect[CampoSelect.length]	= new Option("-- Seleccione una opcion --","",null,true);				
		return;
	}
		
	CampoSelect[CampoSelect.length]	= new Option("-- Seleccione una opcion --","",null,true);
	for (var i=0;i<Array.length; i++){
		aux = Array[i];
		aux = aux.split("--**--");		
		padre = aux[1].split("--");	
					
		if (padre[0] == strValue ){	
			//alert(aux[0] == strValueHijo);		
			if(aux[0] == strValueHijo){		
			CampoSelect[CampoSelect.length]	= new Option(padre[1],aux[0],null,true);
			}else{
			CampoSelect[CampoSelect.length]	= new Option(padre[1],aux[0],null,null);					
			}
		}	
	}		
	if (CampoSelect[0] == undefined ){	
		CampoSelect[CampoSelect.length]	= new Option("-- Ninguno --","0",null,true);
	}
}

function CompletarTexBusq(ArraySelect,StrTextValue){	
	if (ArraySelect[ArraySelect.selectedIndex].text == "-- Todos --" || ArraySelect[ArraySelect.selectedIndex].text == "-- Elija un opción --"){
		StrTextValue.value = "";
		return;
	}
	StrTextValue.value = ArraySelect[ArraySelect.selectedIndex].text;
}