/*
**************************************************************
Descrição: Função checagem de campos radio
Autor: Victor Shimura Goldszmit
Exemplo de chamada: checa_radio(formulario.Radio, Quantidade)
retorna um valor booleano (True, Quando há uma radio 
selecionada,false, quando não há. 
**************************************************************
*/
function valida_radio(objInput,strMsg){
	if(ValorRadio(objInput)==null) {
		alert(strMsg);
		return(false);
	}
	return(true);
}

function ValorRadio(objInput) {
try{
	var varRetorno = null;
	var intTotal = objInput.length;
		if(isNaN(intTotal)) {
			intTotal - 1;
			if (objInput.checked) {
				varRetorno = objInput.value;
			}
		}
		for(var i=0;i< intTotal;i++) {
			if(objInput[i].checked) {
				varRetorno = objInput[i].value;
				break;
			}
		}
		return(varRetorno);
	}
	catch(e) {
	return(null);
	}
}