var IndiceT,IndiceN, IndiceM, T, N, M, Edad, TipoHistologico;

function AsignacionTNM()
{
//alert (T+N+M);
if (IndiceT=="1")
	{
		T="Tx";
	}
if (IndiceT=="2")
	{
		T="T0";
	}
if (IndiceT=="3")
	{
		T="Tis";
	}
if (IndiceT=="4")
	{
		T="T1";
	}
if (IndiceT=="5")
	{
		T="T2";
	}
if (IndiceT=="6")
	{
		T="T3";
	}
if (IndiceT=="7")
	{
		T="T4";
	}
if (IndiceN=="1")
	{
		N="Nx";
	}
if (IndiceN=="2")
	{
		N="N0";
	}
if (IndiceN=="3")
	{
		N="N1";
	}
if (IndiceN=="4")
	{
		N="N2";
	}
if (IndiceN=="5")
	{
		N="N3";
	}
if (IndiceM=="1")
	{
		M="Mx";
	}
if (IndiceM=="2")
	{
		M ="M0";
	}
if (IndiceM=="3")
	{
		M ="M1";
	}
}

function cmdEstadiajeColon_onclick()
{
	AsignacionTNM();
//	alert (T);
//	alert (N);
//	alert (M);
	document.frmEstadiajeColon.txtTNM.value= T + N + M;
	EstadiajeCancerColon(T, N, M);
//	alert (EstadiajeCancerColon(T, N, M));
	document.frmEstadiajeColon.txtEtapa.value= EstadiajeCancerColon(T, N, M);
}

function EstadiajeCancerColon (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if ((T=="T1" || T=="T2") && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
		if ((T=="T3" || T=="T4") && N=="N0" && M=="M0")
	{
		return ("Etapa II");
	}	
	if ((N=="N1" || N=="N2") && M=="M0")
	{
		return ("Etapa III");
	}
	if (M=="M1")
	{
		return ("Etapa IV");
	}
//	alert (EstadiajeCancerColon("T1","N0","M0"));
}

function cmdEstadiajeEsofago_onclick()
{
	AsignacionTNM();
//	alert (T);
//	alert (N);
//	alert (M);
	document.frmEstadiajeEsofago.txtTNM.value= T + N + M;
	EstadiajeCancerEsofago(T, N, M);
//	alert (EstadiajeCancerEsofago(T, N, M));
	document.frmEstadiajeEsofago.txtEtapa.value= EstadiajeCancerEsofago(T, N, M);
}

function EstadiajeCancerEsofago (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if ((T=="T2" || T=="T3") && N=="N0" && M=="M0")
	{
		return ("Etapa IIA");
	}	
	if ((T=="T1" || T=="T2") && N=="N1" && M=="M0")
	{
		return ("Etapa IIB");
	}
	if ((T=="T3" && N=="N1" && M=="M0") || (T=="T4" && M=="M0"))
	{
		return ("Etapa III");
	}
	if (M=="M1")
	{
		return ("Etapa IV");
	}
//	alert (EstadiajeCancerEsofago("T1","N0","M0"));
}

function cmdEstadiajeEstomago_onclick()
{
	AsignacionTNM();
	document.frmEstadiajeEstomago.txtTNM.value= T + N + M;
	EstadiajeCancerEstomago(T, N, M);
	document.frmEstadiajeEstomago.txtEtapa.value= EstadiajeCancerEstomago(T, N, M);
}

function EstadiajeCancerEstomago (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa IA");
	}
	if (((T=="T1" && N=="N1") || (T=="T2" && N=="N0")) && M=="M0")
	{
		return ("Etapa IB");
	}	
	if (((T=="T1" && N=="N2") || (T=="T2" && N=="N1") || (T=="T3" && N=="N0")) && M=="M0")
	{
		return ("Etapa II");
	}
	if (((T=="T2" && N=="N2") || (T=="T3" && N=="N1") || (T=="T4" && N=="N0")) && M=="M0")
	{
		return ("Etapa IIIA");
	}
	if (T=="T3" && N=="N2" && M=="M0")
	{
		return ("Etapa IIIB");
	}
	if (((T=="T4" && N=="N1" && M=="M0") || (T=="T1" && N=="N3" && M=="M0") || (T=="T2" && N=="N3" && M=="M0") || (T=="T3" && N=="N3" && M=="M0") || (T=="T4" && N=="N2" && M=="M0") || (T=="T4" && N=="N3" && M=="M0")) || (M="M1"))
	{
		return ("Etapa IV");
	}
//	alert (EstadiajeCancerEsofago("T1","N0","M0"));
}

function cmdEstadiajeAno_onclick()
{
	AsignacionTNM();
	document.frmEstadiajeAno.txtTNM.value= T + N + M;
	EstadiajeCancerAno(T, N, M);
	document.frmEstadiajeAno.txtEtapa.value= EstadiajeCancerAno(T, N, M);
}

function EstadiajeCancerAno (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if ((T=="T2" || T=="T3") && N=="N0" && M=="M0")
	{
		return ("Etapa II");
	}	
	if ((T=="T1" && N=="N1") || (T=="T2" && N=="N1") || (T=="T3" && N=="N1") || (T=="T4" && N=="N0") && M=="M0")
	{
		return ("Etapa IIIA");
	}
	if (((T=="T4" && N=="N1") || N=="N2" || N=="N3") && (M=="M0"))
	{
		return ("Etapa IIIB");
	}
	if (M=="M1")
	{
		return ("Etapa IV");
	}
}

function cmdEstadiajeMama_onclick()
{
	AsignacionTNM();
	document.frmEstadiajeMama.txtTNM.value= T + N + M;
	EstadiajeCancerMama(T, N, M);
	document.frmEstadiajeMama.txtEtapa.value= EstadiajeCancerMama(T, N, M);
}

function EstadiajeCancerMama (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if (((T=="T0" && N=="N1") || (T=="T1" && N=="N1") || (T=="T2" && N=="N0")) && M=="M0")
	{
		return ("Etapa IIA");
	}	
	if (((T=="T2" && N=="N1") || (T=="T3" && N=="N0")) && M=="M0")
	{
		return ("Etapa IIB");
	}
	if (((T=="T0" && N=="N2") || (T=="T1" && N=="N2") || (T=="T2" && N=="N2") || (T=="T3" && N=="N1") || (T=="T3" && N=="N2")) && M=="M0")
	{
		return ("Etapa IIIA");
	}
 	if ((T=="T4" || N=="N3") && M=="M0")
	{
		return ("Etapa IIIB");
	}
	if (M=="M1")
	{
		return ("Etapa IV");
	}
}

function cmdEstadiajeSuprarrenal_onclick()
{
	AsignacionTNM();
	document.frmEstadiajeSuprarrenal.txtTNM.value= T + N + M;
	EstadiajeCancerSuprarrenal(T, N, M);
	document.frmEstadiajeSuprarrenal.txtEtapa.value= EstadiajeCancerSuprarrenal(T, N, M);
}

function EstadiajeCancerSuprarrenal (T,N,M) 
{
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if (T=="T2" && N=="N0" && M=="M0")
	{
		return ("Etapa II");
	}	
	if ((((T=="T1" || T=="T2") && N=="N1") || (T=="T3" && N=="N0")) && M=="M0")
	{
		return ("Etapa III");
	}
	if (((T=="T3" || T=="T4") && N=="N1" && M=="M0") || M=="M1")
	{
		return ("Etapa IV");
	}
 }

function cmdEstadiajePancreas_onclick()
{
	AsignacionTNM();
	document.frmEstadiajePancreas.txtTNM.value= T + N + M;
	EstadiajeCancerPancreas(T, N, M);
	document.frmEstadiajePancreas.txtEtapa.value= EstadiajeCancerPancreas(T, N, M);
}

function EstadiajeCancerPancreas (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (((T=="T1") || (T=="T2")) && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if (T=="T3" && N== "N0" && M=="M0")
	{
		return ("Etapa II");
	}	
	if (T!="T4" && N=="N1" && M=="M0")
	{
		return ("Etapa III");
	}
	if (T=="T4" && M=="M0")
	{
		return ("Etapa IVA");
	}
	if (M=="M1")
	{
		return ("Etapa IVB");
	}
}

function cmdEstadiajeTiroides_onclick()
{
	TipoHistologico=prompt("Introduzca el índice correspondiente al tipo de tumor: Diferenciado (papilar o folicular)=1, medular=2, indiferenciado=3","");
	AsignacionTNM();
	document.frmEstadiajeTiroides.txtTNM.value= T + N + M;
//	EstadiajeCancerTiroides(T, N, M);
	document.frmEstadiajeTiroides.txtEtapa.value= EstadiajeCancerTiroides(T, N, M);
}

function EstadiajeCancerTiroides (T,N,M) 
{
	if (TipoHistologico=="1")
	{
		Edad=prompt("Introduzca la edad del paciente en años","");
		if (Edad<"45")
		{
			if (M=="M0")
			{
				return ("Etapa I");
			}
			else
			{
				return ("Etapa II");
			}
		}
		else
		{
			if (T=="T1" && N== "N0" && M=="M0")
			{
				return ("Etapa I");
			}
			if ((T=="T2" || T=="T3") && N=="N0" && M=="M0")
			{
				return ("Etapa II");
			}
			if ((T=="T4" || N== "N1") && M=="M0")
			{
				return ("Etapa III");
			}
			if (M=="M1")
			{
				return ("Etapa IV");
			}
		}
	}
	if (TipoHistologico=="2")	
	{
		if (T=="T1" && N== "N0" && M=="M0")
			{
				return ("Etapa I");
			}

			if ((T=="T2" || T=="T3" || T=="T4") && N=="N0" && M=="M0")
			{
				return ("Etapa II");
			}
			if (N=="N1" && M=="M0")
			{
				return ("Etapa III");
			}
			if (M=="M1")
			{
				return ("Etapa IV");
			}
	}
	if (TipoHistologico=="3")	
	{
		return ("Etapa IV");
	}
}

function cmdEstadiajeVesicula_onclick()
{
	AsignacionTNM();
	document.frmEstadiajeVesicula.txtTNM.value= T + N + M;
	EstadiajeCancerVesicula(T, N, M);
	document.frmEstadiajeVesicula.txtEtapa.value= EstadiajeCancerVesicula(T, N, M);
}

function EstadiajeCancerVesicula (T,N,M) 
{
	if (T=="Tis" && N== "N0" && M=="M0")
	{
		return ("Etapa 0");
	}
	if (T=="T1" && N=="N0" && M=="M0")
	{
		return ("Etapa I");
	}
	if (T=="T2" && N== "N0" && M=="M0")
	{
		return ("Etapa II");
	}	
	if (((T=="T3" && N=="N0") || ((T=="T1" || T=="T2" || T=="T3") && N=="N1")) && M=="M0")
	{
		return ("Etapa III");
	}
	if (T=="T4" && M=="M0")
	{
		return ("Etapa IVA");
	}
	if (N=="N2" || M=="M1")
	{
		return ("Etapa IVB");
	}
}