liste=new Array("0","1","2","3","4a","4b","5","6","7","8","9","10","11");

function init(){
	cocher_radio(document.leForm.R_Annee,annee);
	cocher_radio(document.leForm.R_Type,type);
	selectionner(document.leForm.D_Indic,indic);
}

function cocher_radio(leRadio,laValeur)
{
for (i=0; i<leRadio.length; i++)
	{
	if (leRadio[i].value==laValeur)
		leRadio[i].checked=true;
	}
}

function selectionner(leSelect,laValeur)
{
for (i=0; i<liste.length; i++)
	{
	if (liste[i]==laValeur)
		document.leForm.D_Indic.selectedIndex=i;
	}
}


function valeur_radio(leRadio)
{
for (i=0; i<leRadio.length; i++)
	{
	if (leRadio[i].checked)
		return leRadio[i].value;
	}
}
function valeur_radio2(leRadio)
{
for (i=0; i<leRadio.length; i++)
	{
	if (leRadio[i].checked)
		{
		alert(i);
		return leRadio[i].value;
		}
	}
}

function afficher() {
if(parent.variables)
	{
//alert("affich: "+parent.variables.Annee + "   ("+valeur_radio(document.leForm.R_Annee)+")")
	parent.variables.AnneePrec=parent.variables.Annee;
	parent.variables.TypePrec=parent.variables.Type;
	parent.variables.IndicPrec=parent.variables.Indic;
	parent.variables.Annee=valeur_radio(document.leForm.R_Annee);
	parent.variables.Type=valeur_radio(document.leForm.R_Type);
	parent.variables.Indic=liste[document.leForm.D_Indic.selectedIndex]
	if ((parent.variables.Annee) && (parent.variables.Indic!="0") && (parent.variables.Type))
		{
		laPage="C"+parent.variables.Annee+"_"+parent.variables.Type+"_"+parent.variables.Indic+".htm";
		document.location=laPage;
		}
	else
		if (parent.variables.Indic=="0")
			{
			laPage="Menu_carte_"+parent.variables.Annee+"_"+parent.variables.Type+".htm";
		document.location=laPage;
			}
	}		
else
	{
	 if ((parent.variables.Annee) && (parent.variables.Indic!="0") && (parent.variables.Type))
		{
		laPage="C"+valeur_radio(document.leForm.R_Annee)+"_"+valeur_radio(document.leForm.R_Type)+"_"+liste[document.leForm.D_Indic.selectedIndex]+".htm";
		document.location=laPage;
		}
	}
}


function afficher_simple() {
if(parent.variables)
	{
	parent.variables.AnneePrec=parent.variables.Annee;
	parent.variables.TypePrec=parent.variables.Type;
	parent.variables.IndicPrec=parent.variables.Indic;
	parent.variables.Annee=valeur_radio(document.leForm.R_Annee);
	parent.variables.Type=valeur_radio(document.leForm.R_Type);
	parent.variables.Indic=liste[document.leForm.D_Indic.selectedIndex];
	}

	laPage="C"+valeur_radio(document.leForm.R_Annee)+"_"+valeur_radio(document.leForm.R_Type)+"_"+liste[document.leForm.D_Indic.selectedIndex]+".htm";
	document.location=laPage;
	
}