/***************************************/
/* Nom du script : calendar_fonc v1.0  */
/* Auteur: Frédéric REMISE  (Derf)     */
/* Date de création: 14/01/2003        */
/* Email : frederic.remise@wanadoo.fr  */
/***************************************/
d = window.document;

aujourdhui = new Date();
aujourdhuiJ = aujourdhui.getDate();			//Jour contractuel
aujourdhuiM = aujourdhui.getMonth();		//Mois contractuel
aujourdhuiA = aujourdhui.getFullYear();		//Année contractuellle

cejour = null;
cemois = null;
cetan = null;

firstUse = false;							//Deja une utilisation avec selection de date (o/n)
nav=false;									//Mode navigation (o/n)
navencours=false;							//Navigation en cours (o/n)
nodeVisible=false;							//Visibilité du node TABLE (0/n)

moisSelect=aujourdhuiM;						//Mois selectionné
anSelect=aujourdhuiA;						//Année selectionnée

function fDrawTable( leform, lechamp, gauche, haut )
{
	//Def. styles DIV id=ECRAN 
	with( d.getElementById('ecran').style )
	{
		position = 'absolute';
		width = '182px';
		height = '191px';
		left = ''+gauche+'px';
		top = ''+haut+'px';	
	}
	
	//Structure HTML du tableau Calendrier
	tbHTML = "<table id='tbCal' bgcolor='#ffffff'>"
	+ "<tr><td><img src='"+Chemin+"calendrier/images_cal/c_hg.gif' /></td><td colspan='7'></td><td><img src='"+Chemin+"calendrier/images_cal/c_hd.gif' /></td></tr>"
	+ "<tr><td rowspan='8'><img src='"+Chemin+"calendrier/images_cal/c_mp.gif' border='0' onClick=fCalendrier(mois-=1,true,'"+leform+"','"+lechamp+"')></a></td><td id='lemois' colspan='7'></td><td rowspan='8'><img src='"+Chemin+"calendrier/images_cal/c_ms.gif' border='0' onClick=fCalendrier(mois+=1,true,'"+leform+"','"+lechamp+"')></td></tr>"
	+ "<tr><td>L</td><td>M</td><td>M</td><td>J</td><td>V</td><td>S</td><td>D</td></tr>" 
	+ "<tr><td id='0'></td><td id='1'></td><td id='2'></td><td id='3'></td><td id='4'></td><td id='5'></td><td id='6'></td></tr>"
	+ "<tr><td id='7'></td><td id='8'></td><td id='9'></td><td id='10'></td><td id='11'></td><td id='12'></td><td id='13'></td></tr>"
	+ "<tr><td id='14'></td><td id='15'></td><td id='16'></td><td id='17'></td><td id='18'></td><td id='19'></td><td id='20'></td></tr>"
	+ "<tr><td id='21'></td><td id='22'></td><td id='23'></td><td id='24'></td><td id='25'></td><td id='26'></td><td id='27'></td></tr>"
	+ "<tr><td id='28'></td><td id='29'></td><td id='30'></td><td id='31'></td><td id='32'></td><td id='33'></td><td id='34'></td></tr>" 
	+ "<tr><td id='35'></td><td id='36'></td><td id='37'></td><td id='38'></td><td id='39'></td><td id='40'></td><td id='41'></td></tr>" 
	+ "<tr><td><img src='"+Chemin+"calendrier/images_cal/c_bg.gif' /></td><td id='lannee' colspan='7'></td><td><img src='"+Chemin+"calendrier/images_cal/c_bd.gif' border='0' onClick=fEraseTable(this,true,'"+leform+"','"+lechamp+"');></td></tr>"
	+ "</table>";
	//document.write("la var :" +tbHTML);
	
	d.getElementById('ecran').innerHTML	= tbHTML;	// Ecriture du tableau dans le DIV id=ecran
	
	eTBL = d.getElementById('tbCal');				// Element TABLE id=tbCal
	cTR = eTBL.getElementsByTagName('tr');			// Collection des TR de la TABLE
	
	cTD = new Array();								// Collection des TD ligne par ligne
	for (i = 0; i < cTR.length; i++){
		cTD[i] = cTR[i].getElementsByTagName('td');
	}
			
	//Def. style TABLE
	with(eTBL.style) {
		width = '182px';
		height = '191px';
		borderCollapse = 'collapse';
		fontFamily = 'sans-serif';
		fontSize = '12px';	
	}
	//Def. style TABLE : TR 1
	with(cTR[0].style) {
		width = '182px';
		height = '11px';
		borderSpacing = '0px';
		padding = '0px';	
	}
	//Def. style TABLE : TDs : TR_1
	with(cTD[0].item(0).style) {
		width = '21px';
		height = '11px';
		borderSpacing = '0px';
		padding = '0px';
		textAlign = 'left';
		verticalAlign = 'top';			
	}
	with(cTD[0].item(1).style) {
		width = '140px';
		height = '11px';
		borderSpacing = '0px';
		emptyCells = 'show';
		borderTopStyle = 'solid';
		borderTopWidth = '1px'
		borderColor = '#8183A2';
		padding = '0px';			
	}
	with(cTD[0].item(2).style) {
		width = '21px';
		height = '11px';
		borderSpacing = '0px';
		padding = '0px';
		textAlign = 'right';
		verticalAlign = 'top';			
	}
	
	//Def. style TABLE : TR 2
	with(cTR[1].style) {
		width = '182px';
		height = '20px';
		borderSpacing = '0px';
		padding = '0px';
		fontSize = '16px';
		fontWeight = 'bold'	
	}
	//Def. style TABLE : TDs : TR_2
	with(cTD[1].item(0).style) {
		width = '21px';
		height = '160px';
		borderSpacing = '0px';
		borderLeftStyle = 'solid';
		borderLeftWidth = '1px'
		borderColor = '#8183A2';
		padding = '0px';
		textAlign = 'center';
		verticalAlign = 'top';			
	}
	with(cTD[1].item(1).style) {
		width = '140px';
		height = '20px';
		borderSpacing = '0px';
		emptyCells = 'show';
		padding = '0px';
		textAlign = 'center';
		verticalAlign = 'middle';			
	}
	with(cTD[1].item(2).style) {
		width = '21px';
		height = '160px';
		borderSpacing = '0px';
		borderRightStyle = 'solid';
		borderRightWidth = '1px'
		borderColor = '#8183A2';
		padding = '0px';
		textAlign = 'center';
		verticalAlign = 'top';			
	}
	
	//Def. style TABLE : TR 3
	with(cTR[2].style) {
		height = '20px';
		borderSpacing = '0px';
		padding = '0px';
		fontSize = '11px';
		fontWeight = 'bold'
		textAlign = 'center';
		verticalAlign = 'middle';	
	}
	//Def. style TABLE : TDs : TR_3
	for (i=0;i<7;i++) {
		with(cTD[2].item(i).style) {
			width = '20px';
			height = '20px';
			borderSpacing = '0px';
			padding = '0px';			
		}
	}
	
	//Def. style TABLE : TR 4 --> TR 9
	for (i=3;i<9;i++) {
		with(cTR[i].style) {
			height = '20px';
			borderSpacing = '0px';
			padding = '0px';
			fontSize = '11px';
			textAlign = 'center';
			verticalAlign = 'middle';	
		}
		//Def. style TABLE : TDs : TR_4 --> TR_9
		for (j=0;j<7;j++){
			with(cTD[i].item(j).style) {
				width = '20px';
				height = '20px';
				borderSpacing = '0px';
				padding = '0px';			
			}
		}
	}
	
	//Def. style TABLE : TR 10
	with(cTR[9].style) {
		height = '20px';
		width = '182px';
		borderSpacing = '0px';
		padding = '0px';
		fontSize = '16px';
		fontWeight = 'bold'	
	}
	//Def. style TABLE : TDs : TR_10
	with(cTD[9].item(0).style) {
		width = '21px';
		height = '20px';
		borderSpacing = '0px';
		padding = '0px';
		textAlign = 'left';
		verticalAlign = 'bottom';			
	}
	with(cTD[9].item(1).style) {
		width = '140px';
		height = '20px';
		borderSpacing = '0px';
		borderBottomStyle = 'solid';
		borderBottomWidth = '1px'
		borderColor = '#8183A2';
		emptyCells = 'show';
		padding = '0px';
		textAlign = 'center';
		verticalAlign = 'middle';			
	}
	with(cTD[9].item(2).style) {
		width = '21px';
		height = '20px';
		borderSpacing = '0px';
		padding = '0px';
		textAlign = 'right';
		verticalAlign = 'bottom';			
	}
}

function fShowTable(leform,lechamp,objet_event) {

	var X ;	var Y ;
	
    if (navigator.appName!="Microsoft Internet Explorer") { // Si on est pas sous IE
		X=objet_event.pageX + 5;
		Y=objet_event.pageY + 10;
    }
	else { // Modif proposé par TeDeum, merci à lui
		if(document.documentElement.clientWidth>0) {
			X = event.x+document.documentElement.scrollLeft;
			Y = event.clientY+document.documentElement.scrollTop;
		}
		else {
			X = event.x+document.body.scrollLeft;
			Y = event.clientY+document.body.scrollTop;
		} 
		X=10+X;	Y=5+Y;
	}

//	var gauche = objet_event.clientX + document.body.scrollLeft;
//	var haut = objet_event.clientY + document.body.scrollTop;
	var gauche = X;
	var haut = Y;
  
	//Si le calendrier n'est pas affiché
	if (!nodeVisible) {
		// Si il y a eu précédement une selection de date
		//on insère le clone de tabNode.
		if (firstUse){			
			d.getElementById('ecran').appendChild(tabNodeCopy);
			nodeVisible = true;		//Le node est affiché donc visible
		
		// Sinon, on dessine la table et on passe au remplissage du calendrier
		} else {
			fDrawTable(leform,lechamp,gauche,haut);		//Affichage du tableau
			fCalendrier('','',leform,lechamp);		//Remplissage
		}
	}
}

function fCalendrier(pmois,nav,leform,lechamp) {
//document.write("la var :" +lechamp);
	tMois = new Array('Janvier','Fevrier','Mars','Avril','Mai','Juin','Juillet','Aout','Septembre','Octobre','Novembre','Decembre');
	dNow = new Date();			//Récupération de la date courante
	
	if (nav && !navencours){								//Si mode navigation enclenché et qu'il n'y à pas de navigation en cours
		tabNode = d.getElementById('ecran').firstChild;		//Préserver le node avec le valeurs précédentes	
		tabNodeCopy = tabNode.cloneNode(true);				//Puis le cloner
		navencours=true;									//La navigation est en cours
	}
	
	//Navigation du calendrier
	if (pmois == null || pmois == '') {
		mois = dNow.getMonth();		//Mois courant
		an = dNow.getFullYear();	//Année courante
	} else {
		if (pmois<0){
			an = dNow.getFullYear(dNow.setFullYear(an-1));
			mois = dNow.getMonth(dNow.setMonth(11));		
		} else if (pmois>11){
			an = dNow.getFullYear(dNow.setFullYear(an+1));		
			mois = dNow.getMonth(dNow.setMonth(0));
		} else {
			an = dNow.getFullYear(dNow.setFullYear(an));
			mois = dNow.getMonth(dNow.setMonth(pmois));
		}
	}	

	//Affichage des informations Mois et Année
	d.getElementById('lemois').innerHTML = tMois[mois];		//Affichage du mois
	d.getElementById('lannee').innerHTML = an;				//Affichage de l'année
	
	ijour = 1;					//Initialisation de l'index du premiser jour du mois
	dNow.setDate(ijour);		//Initialisation du jour du mois à l'index
	
	//Effacer le contenu de toutes les cellule du calendrier (de id=0 à id=41)
	for(i=0;i<42;i++) {
		d.getElementById(i).innerHTML = "";
	}
	
	//Correlation entre le 1er jour du mois, le jour de la semaine correspondant 
	//et la cellule du tableau correspondante
	switch (dNow.getDay()) {
		case 0 : id = 6; break;
		case 1 : id = 0; break;
		case 2 : id = 1; break;
		case 3 : id = 2; break;
		case 4 : id = 3; break;
		case 5 : id = 4; break;
		case 6 : id = 5; break;
	}

	//Ecriture des dates pour le mois (remplissage du tableau avec les date)
	while(mois == dNow.getMonth()) {
		if (navigator.appName=="Microsoft Internet Explorer") {
			d.getElementById(id).innerHTML = "<a  onClick=fEraseTable(this,false,'"+leform+"','"+lechamp+"'); style='cursor : hand'>" + dNow.getDate() + "</a>";
		}
		else {
			d.getElementById(id).innerHTML = "<a  onClick=fEraseTable(this,false,'"+leform+"','"+lechamp+"'); style='cursor : pointer'>" + dNow.getDate() + "</a>";
		}
	
		if (ijour == aujourdhuiJ && mois == aujourdhuiM && an == aujourdhuiA) {
			//Si le date est la date contractuelle
			with(d.getElementById(id).firstChild.style){
				width = "18px";
				backgroundColor = "#CCCCCC";
				color = "#FF0000";
				borderStyle = "solid";
				borderColor = "#FF0000";
				borderWidth = "1pt";
				textDecoration = "none";
			}
		} else if (ijour == Number(cejour) && mois == moisSelect && an == anSelect) {
			//Si le date est celle du jour dernièrement selectionné
			with(d.getElementById(id).firstChild.style){
				color = "#FF0000";
				textDecoration = "none";
			}
		} else {
			//Pour toutes les autres dates
			with(d.getElementById(id).firstChild.style){
				color = "#0000FF";
				textDecoration = "none";
			}	
		}

		ijour++;
		id++;
		dNow.setDate(ijour);		//Jour suivant
	} 
}

function fEraseTable(obj,btnfermer,leform,lechamp)
{

	if( btnfermer )
	{
		//Gestion du node Table id=tbCal si fermeture avec bouton Fermer
		//	
		//Efface le node Table														
		d.getElementById('ecran').removeChild(d.getElementById('ecran').firstChild);
		
		//Si une date a été selectionnée antérieurement 
		if(firstUse){document.write("la var :" +lechamp);	
			an = dNow.getFullYear(dNow.setFullYear(anSelect));	//Initialisation de l'année à l'année selectionnée pour la prochaine navigation
			mois = dNow.getMonth(dNow.setMonth(moisSelect));	//Initialisation du compteur de mois au mois selectionné pour la prochaine navigation
			navencours=false;				//Plus de navigation en cours
			nav=false;						//Desactivation du mode navigation
			nodeVisible = false;			//Le node est supprimé donc invisible
		}
		
	}
	else
	{
  	//Gestion du node Table id=tbCal si fermeture avec click sur une date
  	//
  	//Met en rouge la date choisie
  	obj.style.color = '#FF0000';
  	
  	//A partir de maintenant on considère qu'une première utilisation 
  	//du calendrier avec sélection de date a été faite.
  	//firstUse=true;
  	
  	//Mémorise le mois et l'année selectionnés
  	moisSelect = mois;
  	anSelect = an;
  
  	//document.write("la var :" +lechamp);
  	//Affichage de la date choisie dans le formulaire
  	cejour = obj.innerHTML;
  	cejour = (cejour<10)? "0"+cejour : cejour;
  	cemois = ((mois+1)<10) ? "0" + (mois+1) : mois+1;
  	cetan = an;
  	var leform  = "" + leform + "";
  	var lechamp = "" + lechamp + "";
  	window.document.forms[leform].elements[lechamp].value = cejour + "/" + cemois + "/" + an;
  
  	//Gestion du node Table id=tbCal
  	tabNode = d.getElementById('ecran').firstChild;									//Preserve le node Table
  	tabNodeCopy = tabNode.cloneNode(true);											//Clone le node Table
  	d.getElementById('ecran').removeChild(d.getElementById('ecran').firstChild);	//Efface le node Table
  	nav=false;						//On est plus en mode Navigation.
  	navencours=false;				//Il n'y a plus de navigation en cours.
  	nodeVisible = false;			//Le node est supprimé donc invisible
  	an = dNow.getFullYear(dNow.setFullYear(anSelect));	//Initialisation de l'année à l'année selectionnée pour la prochaine navigation
  	mois = dNow.getMonth(dNow.setMonth(moisSelect));	//Initialisation du compteur de mois au mois selectionné pour la prochaine navigation
	}
}