function Favoritos(Url,Mensaje) {
	var NuevoMensaje=new String(Mensaje)
	NuevoMensaje=NuevoMensaje.replace(/#/g,' ')
	window.external.AddFavorite(Url,NuevoMensaje);
}

function PagInicio(objInicio,Url) {
	objInicio.style.behavior='url(#default#homepage)';
	objInicio.sethomepage(Url)
}

function Navegar(Url) {
   window.location.href=Url 
}

function ColorCeldas(objCelda,Accion,Color) {
	if(Accion=="Over") {
		objCelda.style.backgroundColor=Color;
	}
	else {
		objCelda.style.backgroundColor=Color;
	}
}

function FormatoEnlaceColor(objEnlace,Accion,Color) {
	if(Accion=="Over") {
		objEnlace.style.color=Color;
	}
	else {
		objEnlace.style.color=Color;
	}
}

function FormatoEnlaceColor_C(objEnlace, Accion, Color, Subrayado) {
	if(Accion=="Over") {
		objEnlace.style.color=Color;
		if (Subrayado=="Yes") {
			objEnlace.style.textDecoration='underline';
		}		
		else  {
			objEnlace.style.textDecoration='none';
		}
	}
	else {
		objEnlace.style.color=Color;
		if (Subrayado=="Yes") {
			objEnlace.style.textDecoration='underline';
		}		
		else  {
			objEnlace.style.textDecoration='none';
		}
	}
}

function Atras() {
   history.go (-1) 
}

function PressTecla(evt,objForm,Tecla) {
	if (evt.keyCode==Tecla) {
		objForm.onsubmit();
	}
}

function LimpiarForm(objFormulario){
	objFormulario.reset()
}

function Ventana(Pagina,scroll,Id,Ancho,Alto) {		
  vdetalles="width=" + Ancho + ",height=" + Alto + ",menubar=no,scrollbars=" + scroll +",status=no,toolbar=no,resizable=no";
  window.open(Pagina,Id,vdetalles)
}

function Cerrar() {
   window.close() 
}

function ExtensionMensaje(objMensaje,objIngresoText,Tamanho){
	if (Trim(objMensaje.value)!=' ')  {
		TotalMensaje = objMensaje.value.length
		if (TotalMensaje > Tamanho ) {	
			objMensaje.value = objMensaje.value.substring(0,Tamanho)
			CRestantes = 0
		}
		else {
			CRestantes = Tamanho - TotalMensaje
		}
		
		objIngresoText.value = CRestantes
	}
	else  {
		objMensaje.value=''
		objMensaje.value.substring(0,0)
	}
}

function ListarMes(ValMes)  {
	if (ValMes == 3)  { Navegar('programacion_marzo.asp'); 	}
	if (ValMes == 4)  { Navegar('programacion_abril.asp'); }
	if (ValMes == 5)  { Navegar('programacion_mayo.asp'); }
	if (ValMes == 6)  { Navegar('programacion_junio.asp'); }
	if (ValMes == 7)  { Navegar('programacion.asp'); }
}