// img gif larg de 300 à 540 haut de 339 à 430
var liste_pt='';// pr cp
var liste_d=''; var liste_a=''; var liste_l=''; var cpt=''; var nomb_com;
// (essai affichage communes dépts limitrophes) var liste_c='';

function constr_d(c_dpt) {
	compteur(); // construction analyse stats : loc_xiti.js
	declare_dptl(); // Construction area carte gif des départements limitrophes (liste_l): loc_dXX.js
	for (i = 0; i < dptl.length ; i++) {
		var dptl_en_cours = new String(dptl[i]) ;
		var eclate_dptl = dptl_en_cours.split(";") ;
		var coord1 = eclate_dptl[0];
		var coord2 = eclate_dptl[1];
		var coord3 = eclate_dptl[2];
		var coord4 = eclate_dptl[3];
		var c_dptl = eclate_dptl[4];
		liste_l += '<area shape="rect" coords="'+coord1+','+coord2+','+coord3+','+coord4+'" href="loc_listcomd'+c_dptl+'.htm">\n';
//		liste_l += '<area shape="rect" coords="'+coord1+','+coord2+','+coord3+','+coord4+'" onclick="vasy2(\''+c_dptl+'\',\'\')">\n';
		}
	declare_dep(); // Lecture des infos du département (taille carte gif, nom et article du département : loc_dep.js)
	for (i = 0; i < depart.length ; i++) {
		var dep_en_cours = new String(depart[i]) ;
		var eclate_depart = dep_en_cours.split(";") ;
		num_dep       = eclate_depart[1] ;
		if (num_dep == c_dpt) {
			var nom_dpt = eclate_depart[0];
			var art_dpt = eclate_depart[5];
			var region  = eclate_depart[6];
			var l_gif   = eclate_depart[7];
			var h_gif   = eclate_depart[8];
			break ;
			}
		}
	declare_com(); // construction liste déroulante des communes (list_d) et area carte gif (liste_a): loc_dXX.js
	for (i = 1; i < com.length ; i++) {
		var com_en_cours = new String(com[i]) ;
		var eclate_com = com_en_cours.split(";") ;
		var insee_com = eclate_com[0] ;
		var hab   = eclate_com[1] ;
		var dens  = eclate_com[2] ;
		var x_gif = eclate_com[3] ;
		var y_gif = eclate_com[4] ;
		var img_cass = eclate_com[5] ;
		var carte_cass = eclate_com[6] ;
		var x_cass = eclate_com[7] ;
		var y_cass = eclate_com[8] ;
		var nom_com = eclate_com[9] ;
		var fich_com = eclate_com[10] ;
		var latc = eclate_com[11] ;
		var longc = eclate_com[12] ;
		var c_post = eclate_com[13] ;
		nomb_com=nom_com;
		if (nomb_com.indexOf("'") != -1) { // si présence caractère ' dans le nom de la commune (pr area)
			var nomb_com_eclat = nomb_com.split("'"); // séparation en sous-chaines, séparateur '
			nomb_com = nomb_com_eclat.join("\\'"); // ajout de 2 "\"
		}
		//liste_a += '<area shape="circle" coords="'+x_gif+','+y_gif+',3" onclick="vasy(\''+num_dep+'\',\''+insee_com+'\')" onmouseover="bul_oui(\''+nomb_com+'\')" onmouseout="bul_non()">\n';
		liste_d += '<option value="'+insee_com+';'+hab+';'+dens+';'+x_gif+';'+y_gif+';'+img_cass+';'+carte_cass+';'+x_cass+';'+y_cass+';'+fich_com+';'+latc+';'+longc+';'+c_post+'">'+nom_com;
		liste_pt += '<div id="c'+(100+i)+'" style="position:absolute; width:5px; height:5px; visibility:visible; left:'+(parseFloat(x_gif)-2)+'px; top: '+(parseFloat(y_gif)-2)+'px"><img name="i'+(100+i)+'" src="pt.gif" width="5" height="5" onclick="vasy(\''+num_dep+'\',\''+insee_com+'\')" onmouseover="bul_oui(\''+nomb_com+'\')" onmouseout="bul_non()"></div>\n';
		}
	nbcomb=0;
	declare_comb(); // construction area carte gif des enclaves : loc_dXX.js
	for (i = 1; i < nbcomb ; i++) {
		var comb_en_cours = new String(comb[i]) ;
		var eclate_comb = comb_en_cours.split(";") ;
		var dpt = eclate_comb[0] ;
		var insee_com = eclate_comb[1] ;
		var x_gif = eclate_comb[2] ;
		var y_gif = eclate_comb[3] ;
		var nom_com = eclate_comb[4] ;

		nomb_com=nom_com ;
		if (nomb_com.indexOf("'") != -1) { // si présence caractère ' dans le nom de la commune (pr area)
			var nomb_com_eclat = nomb_com.split("'"); // séparation en sous-chaines, séparateur '
			nomb_com = nomb_com_eclat.join("\\'"); // ajout de 2 "\"
		}
		liste_a += '<area shape="circle" coords="'+x_gif+','+y_gif+',3" onmouseover="bul_oui(\''+nomb_com+'\')" onmouseout="bul_non()"';
		liste_a += (dpt!=num_dep) ? ' href="loc_listcomd'+dpt+'.htm?code_insee='+insee_com+'">\n' : ' onclick="vasy(\''+dpt+'\',\''+insee_com+'\')">\n';
		}
/* (essai affichage communes dépts limitrophes)
	nbcoml=0;
	declare_coml(); // construction area carte gif des communes des dpts limitrophes : loc_dXX.js
	alert(nbcoml);
	for (i = 1; i < nbcoml ; i++) {
		var coml_en_cours = new String(coml[i]) ;
		var eclate_coml = coml_en_cours.split(";") ;
		var dpt = eclate_coml[0] ;
		var insee_com = eclate_coml[1] ;
		var x_gif = eclate_coml[2] ;
		var y_gif = eclate_coml[3] ;
		var nom_com = eclate_coml[4] ;

		nomb_com=nom_com ;
		if (nomb_com.indexOf("'") != -1) { // si présence caractère ' dans le nom de la commune (pr area)
			var nomb_com_eclat = nomb_com.split("'"); // séparation en sous-chaines, séparateur '
			nomb_com = nomb_com_eclat.join("\\'"); // ajout de 2 "\"
		}
		liste_c += '<area shape="circle" coords="'+x_gif+','+y_gif+',3" onmouseover="bul_oui(\''+dpt+' - '+nomb_com+'\')" onmouseout="bul_non()"';
		liste_c += ' onclick="vasy2(\''+dpt+'\',\''+insee_com+'\')">\n';
		}
*/
	nba_liens=0;
	autres_liens(); // mémo autres liens spécifiques au département : loc_dXX.js
// Construction page
var page='<html>\n<head>\n<title>LOCOM-FRANCE - &copy; 1999- Sylvain Chardon</title>\n';
page+='<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">\n';
page+='<link rel="stylesheet" type="text/css" href="locom.css">\n';
page+='</head>\n';
page+='<body background="papier3.jpg" bgproperties="fixed" text="#C00000" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onLoad=" bul_pos(); com_dep(0,\'\',\''+c_dpt+'\', code_insee);">\n';
page+='<center>\n';
page+='<div id="text" style="z-index:6; position:absolute; left:4px; top:80px; width:1px; height:1px;"></div>\n';
page+='<table border="0" cellpadding="5" cellspacing="0" bordercolor="maroon">\n';
page+='<tr>\n<td align="center">\n';
page+='<span class=t14>Département '+art_dpt+nom_dpt+'</span><br><span class=t12>(Région '+region+')</span><br><a href="loc_d'+c_dpt+'inf.htm">Notes sur le département</a>\n';
page+='</td>\n';
page+='<td align="center"><img src="locom.gif" border="0" width="100" height="50"><br>\n';
page+='<a class="b" href="loc_menu.htm">Sommaire</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=\'javascript: aide("loc_aided.htm");\'>Aide</a><br><a href="loc_dep.htm">Autre département</a></td>\n';
page+='<td rowspan="2" valign="top">\n'; //width="360"
page+='<form valign="top" name="f_com_dep"><span class="t12">'+(com.length-1)+' communes<\/span><br>';
page+='<select name="list_com_dep"  id="list_com_dep" size=12 onChange="com_dep(1,this.form,\''+c_dpt+'\') ;">';
page+=liste_d;
page+='</select>';
page+='<br><a href="javascript:verif_liens();" id="liens">Afficher les sites externes</a>';
page+='<br><a href="javascript:verif_cassini();" id="carte_cass" title="Ouvrir le site Geoportail de l\'IGN sur la carte de Cassini. Vous pouvez, sur ce site, superposer une carte récente sur la carte ancienne.">Afficher la carte de Cassini</a>';
// (essai affichage communes dépts limitrophes) if (liste_c != "") page+='<br><a href="javascript:verif_com_lim();" id="com_lim">Afficher communes autres dépts</a>\n';
page+='</form>';

// deb table données communes
//page+='<table border="1" cellspacing="0" cellpadding="0" width="100%">';
//page+='<tr><td><form id="f_infos" name="f_infos" onSubmit="ctrl_f_infos(); return false;">';
page+='<form id="f_infos" name="f_infos" onSubmit="ctrl_f_infos(); return false;">'; // new
page+='Commune : <span class="don" id="r_com"><\/span>';
page+='<br><a class="b" href="javascript:saisie_insee()" onmouseover="bul_oui(\'Accès commune<br>par code Insee\');" onmouseout="bul_non()">C</a>ode Insee : <span class="don" id="r_insee"><\/span>';
page+='<br>D&eacute;pt : <span class="don" id="r_dep">&nbsp;<\/span>';
page+='<br>R&eacute;gion : <span class="don" id="r_reg"><\/span>';
page+='<br>Population 1990 : <span class="don" id="r_pop"><\/span>';
page+='<br>Densité : <span id="r_dens"><\/span>';
page+='<br>Superficie <span id="r_superf"><\/span>';
page+='<br><a class="b" href="javascript:saisie_cp()" onmouseover="bul_oui(\'Repérer les communes<br>de même code postal\');" onmouseout="bul_non()">C</a><span id="t_post">ode postal<\/span> : <span class="don" id="r_post"><\/span>';
page+='<br><span id="t_km_c">C<\/span>ommunes dans un <span id="t_km_r">r<\/span>ayon de ';
page+='<select name="c_km" size=1;">';
page+='<option value=0>0';
page+='<option value=5>5';
page+='<option value=10>10';
page+='<option value=15>15';
page+='<option value=20>20';
page+='<option value=25>25';
page+='<option value=30>30';
page+='<option value=35>35';
page+='<option value=40>40';
page+='<option value=45>45';
page+='<option value=50>50';
page+='<option value=75>75';
page+='<option value=100>100';
page+='<option value=150>150';
page+='<option value=200>200';
page+='</select> km <input type="submit" value="Ok">';
page+='<center><span class="don" id="r1_km"><\/span><br><span class="don" id="r2_km"><\/span></center>';
page+='<a href="loc_listcomf1.htm">Recherche d\'une commune</a>';
page+='<br><a href="loc_ancmen.htm">Historique des communes</a><\/form>';

// deb table épingles
page+='<p><table border="0" cellpadding="2" cellspacing="0" bordercolor="maroon">'; // width="360"
page+='<tr><td width="22" height=""><a class="lien_img" href="javascript: drap_hid(1);" id="drap_img1"><img src="loc_drap11.gif" width="22" height="22" border="0"></a></td><td width="100%" id ="drap_com1">Marquer cette commune</td></tr>\n';
page+='<tr><td height=""><a  class="lien_img" href="javascript: drap_hid(2);" id="drap_img2"><img src="loc_drap21.gif" width="22" height="22" border="0"></a></td><td id ="drap_com2">Marquer cette commune</td></tr>\n';
page+='<tr><td colspan=2 id="drap_calcul" height="">&nbsp;</td></tr>\n';
page+='</table>\n';
//fin table épingles

//page+='<\/td><\/tr><\/table><span class="t2"><br></span>';
//page+='<span class="t2"><br></span>';
// fin table données communes

page+='</td></tr><tr><td colspan="2" width="540" height="430">\n'; // height="600" valign="top"
page+='<div id="cartedep" style="z-index:3; position:relative; left:0px; top:0px; width:540px; height:480px; visibility:visible"><img src="loc_dept'+c_dpt+'.gif" width='+l_gif+' height='+h_gif+' border=0 usemap="#dep2b">';
// (essai affichage communes dépts limitrophes) 
//page+='<div id="courseau" style="z-index:2; position:absolute; left:0px; top:0px; width:540px; height:430px; visibility:hidden"><img src="loc_dept'+c_dpt+'b.gif" width='+l_gif+' height='+h_gif+' border=0 usemap="#dep2c"></div>\n';
page+='<div id="c_liens" style="z-index:10; position:absolute; border-style:solid; border-width:1px; background-color:white; border-color:black; left:0px; top:0px; width:540px; height:460px; visibility:hidden;"></div>\n';
page+='<div id="c_aide" style="z-index:11; position:absolute; border-style:solid; border-width:0px; background-color:#E0E0E0; border-color:black; left:150px; top:20px; width:386px; height:435px; visibility:hidden;"></div>\n';
page+='<div id="ptlum" style="z-index:4; position:absolute; width:9px; height:9px; visibility:visible; left: 0px; top: 0px"><img src="loc_ptlum.gif" width=9 height=9 border=0></div>\n';
page+='<div id="drap1" style="z-index:8; position:absolute; width:1px; height:1px; visibility:hidden; left: -10px; top: -10px"></div>\n';
page+='<div id="drap2" style="z-index:9; position:absolute; width:1px; height:1px; visibility:hidden; left: -10px; top: -10px"></div>\n';
page+=liste_pt+'</div>\n';
page+='</td></tr></table>\n';
page+='<map name="dep2b">\n';
page+=liste_a+liste_l;
page+='</map>\n';
/* // (essai affichage communes dépts limitrophes) 
page+='<map name="dep2c">\n';
page+=liste_c;
page+='</map>\n';
*/
page+='</center>\n';
page+='<div align="center">\n';
page+='<div id="cassini" style="z-index:1; position:relative; width:100%;  visibility:visible; left:0px; top:0px"></div>\n';
page+=cpt+'</div>\n';
page+='</body>\n</html>\n';
//copyclipboard(page); // uniquement IE
document.open() ;
document.write(page) ;
document.close() ;
}

// uniquement IE
function copyclipboard(intext) { 
	window.clipboardData.setData('Text', intext); 
}