/* 2005-06-29 AMT: Correction _addText() */
/* 2007-05-31 CRD : ajout de 2 parametres optionels a l'objet selectBox permettant la construction de la query de recherche sur plusieurs champs à valeurs differentes */
/* 2007-06-01 CRD : passage des parametre de category en encodeURIComponent()  [compatibilite IE7] */
var boxObj;
// recherche de la version de navigateur
var app=navigator.appName.substr(0,8);
var version=0;
var ind;
if (app=="Netscape") {	
	UA=navigator.userAgent;	
	ind=UA.indexOf("/");	
	if (ind>0) version=UA.substr(ind+1,1);	
	else version=0;
}
var ns6 = (version>4) ? true : false;
var ns4 = (ns6==false && version>3) ? true : false;
var ie4 = (document.all) ? true : false;
/*===== CONSTRUCTEUR Ooptions --> options de la selectionBox =====*/
function Ooptions(strOpt) {
	var oi, iC, sC, vC;
	var vTab=strOpt.split(',');
	for (oi=0; oi<vTab.length; oi++) {
		iC=vTab[oi].indexOf('=');
		if (iC>0) {
			sC=vTab[oi].substring(0,iC);
			vC=vTab[oi].substring(iC+1, vTab[oi].length);
			this[sC]=vC;
		}
	}
	if (!this.width) this.width=500;						// largeur par defaut de la boite
	if (!this.height) this.height=500;					// hauteur par defaut de la boite
	this.toString=_optToString;							// méthode qui retourne les options en chaine pour window.open
	return;
}
// ------ méthode de l'objet 'Ooptions'
// retourne toutes les propriétés sous forme de texte, directement utilisable par window.open
//  propriété=valeur, propriété=valeur,...
function _optToString() {
	var opts='';
	for (opt in this) {
		if (opts=='') 	opts= opt + '=' + this[opt];
		else 			opts += ',' + opt + '=' + this[opt];
	}
	return opts;
}
/*===== CONSTRUCTEUR Ocat: la catégorie dans la vue =====*/
function Ocat(_fCat, _dCat) {
	if (_fCat) 	this.field = _fCat;								// objet champ qui contient la valeur de la catégorie (optionnel)
	else			this.field = '';
	this.field.toString = _CatToTexte;					// renvoie la valeur texte de obj (suivant le type de l'objet)
	this.defaultValue = _dCat;								// categorie par defaut (optionnel)
	this.usedValue;													// pour le pop-up : la valeur de la categorie à utiliser
}
// ----- méthode Ocat --> récupère le texte de l'object field
function _CatToTexte() {
	if (!this) return '';
	var i=0, lst='';
	switch (this.type) {
		case 'hidden':
		case 'text':
			return this.value;
			break;
		case 'select-one':
			if (this.selectedIndex > -1) return this.options[this.selectedIndex].value;
			else return '';
		case 'select-multiple':
			for (i=0; i<this.length; i++) {
				if (this.options[i].selected==true) {
					lst=='' ? lst=this.options[i].value : lst+= ';' + this.options[i].value;
				}
			}
			return lst
			break;
		default:
			return '';
	}	
}
/*===== CONSTRUCTEUR Oview : selection de la vue à utiliser dans la boite de selection =====*/
function Oview(_dView, _sView, _fCat, _dCat) {
	this.forOpen = _dView;										// vue par defaut : openview
	this.forSearch = _sView;									// vue pour la recherche : searchview
	this.forUse;															// pour la pop-up : la vue à utiliser ( forSearch ou forOpen)
	this.singleCat = new Ocat(_fCat, _dCat)		// single categorie pour la vue
}
/*===== CONSTRUCTEUR selectBox : la fenêtre de sélection =====*/
function selectBox(wURL, wOpt, wTitle, dView, sView, fCategory, dCategory, CListN, Lobj, Tobj, Cobj, multi, Lang, CSList, CSListV) {
// CRD 31.05.07 :	ajout du param CSList  - liste des champs utilises dans la recherche exclusivement
//									ajout du param CSListV - liste des valeurs des champs CSList utilises dans la recherche exclusivement 
	if (!Tobj && !Cobj) return false;
	if (Lobj && Lobj.options && Lobj.options[0] && Lobj.options[0].text=='') Lobj.options[0] = null;
	this.URL = wURL;											// l'URL pour lancer la fenêtre (frameset)
	this.settings = new Ooptions(wOpt);		// paramètres de la fenêtre
	this.title = wTitle;												// titre de la fenêtre
	this.view = new Oview(dView, sView, fCategory, dCategory);
	this.fieldName = CListN;								// champs des documents qui contiennent la singleCat, pour construire query
	this.elements = new Array;							// tableau des élements séelectionnés
	this.elements.remove = _remove;			// supprimer une entrée du tableau et compacter
	this.multiValue = multi;									// indique si la sélection est multi valeur
	if (Lobj)	this.titleList = Lobj;							// Objet champ qui affiche les titres
	else 		this.titleList = Tobj;
	this.titleList.addText = _addText;	 			// méthode pour ajouter du texte
	this.codeList = Cobj;										// Objet champ qui contient les clés
	this.codeList.addText = _addText;			// pour ajouter du text
	this.textList = Tobj;											// Objet champ qui contient le text
	this.textList.addText = _addText;				// pour ajouter du text
	this.setFields = _setFields;						// composer les champs codeList et titleList à partir de Elements
	this.getFields = _getFields;						// lire les champs codeList et titleList pour initialiser Elements
	this.addElement = _addElement;			// ajouter une sélection dans l'objet elements	
	this.deleteElement = _deleteElement;	// supprimer une sélection dans l'objet elements
	this.sortElement=_sortElement;				// trier les elements
	this.clearAll = _clearAll;								// supprime tous les éléments 
	if (Lang!='') this.lang=Lang;							// la langue a utiliser dans la fenêtre
	this.searchFieldNames = CSList;			//Liste des noms des champs des documents sources servant de multiCat dans la query de recherche (exclusivement) 
	this.searchFieldValues = CSListV;			//Liste desvaleurs des champs CSList des documents sources servant de multiCat dans la query de recherche (exclusivement) 
	
this.getFields();
}
/* ------ Supprimer une entrée dans le tableau et compacter le tableau ------ 
		méthode pour elements */
function _remove(index) {
		// index = index de l'élément à supprimer dans le tableau
		var len=this.length;
		var ri=index+1;
//		this[index]=null;
		for (ri=index+1 ;ri<len; ri++) {
			this[ri-1]=this[ri];
		}
		this.length=len-1;
}
/* ------ Composer l'objet elements avec le contenu des champs titleList et codeList
		méthode de l'objet selectBox   */
function _getFields() {
	var tabTitle=splitObject(this.textList);			// initialiser les tables avec la liste des titres
	var tabCode=splitObject(this.codeList);	// table des clefs
	var i=0;
	var ind =(tabTitle.length<tabCode.length) ? tabTitle.length : tabCode.length;	// la taille max est la taille du +petit
	var reg=/^ /;
	for (i=0; i<ind; i++) {
		if (!this.elements[i]) 	this.elements[i] = new Array(2);		// ajouter un element  titre + code
		this.elements[i][0] = tabTitle[i].replace(reg,'');
		this.elements[i][1] = tabCode[i].replace(reg,'');
	}
}
/* ----- Afficher le contenu de l'objet elements dans les deux champs
		méthode de l'objet selectBox 				*/
function _setFields(idxSelect) {
	// idxSelect : index de l'option à selectionner dans un champ liste
	var len=this.elements.length;
	var title, code;
	var i=0;
	if (len==0) {
		this.codeList.addText('', this.multiValue, -1, null);
		this.textList.addText('', this.multiValue, -1, null);		
		if (this.titleList) 		this.titleList.addText('', this.multiValue, -1, null);		
	}
	for (i=0; i<len; i++) {
		title=this.elements[i][0];
		code=this.elements[i][1];
		this.codeList.addText(code, this.multiValue, i, idxSelect);
		this.textList.addText(title, this.multiValue, i, idxSelect);
		if (this.titleList) this.titleList.addText(title, this.multiValue, i, idxSelect);		
	}
}
//------------------------- ajouter un element : méthode de l'objet box
function _addElement(c1,t1) {
	// c1 --> clef de la donnée sélectionnée (Unique ID) - généralement caché au user
	// t1 --> titre pour affichage
	var title=unescape(t1);
	var code=unescape(c1)
	var ind = this.elements.length;
	if ((this.multiValue==false) && (ind>0)) ind=0
	this.elements[ind] = new Array(2);
	if (t1!='')	this.elements[ind][0]=title;						// le titre s'il est différent de 'blanc'
	else			this.elements[ind][0]=code;				// sinon ecrire le code
	if (c1!='') 	this.elements[ind][1]=code;				// le code s'il est différent de 'blanc'
	else 			this.elements[ind][1]=title;					// sinon écrire le titre
	this.setFields()															// écrire le nouvel élément dans les champs
}
// ------ ajouter un texte à un champ : méthode des objetc titleList et codeList
function _addText(sText, multi, index,selected) {
	// sText --> le texte à ajouter
	// multi --> indique si le champ accepte une liste (séparateur virgule)
	// index --> donne l'index de l'élement dans le champ (cas multi=true)
	// selected --> l'élément à selectionner (cas champ list uniquement)
	switch (this.type) {													// tester le type de l'objet (text ou list box
		case 'hidden':
		case 'text':
			if (multi) {
// les textes sont séparés par virgule (toujours), il faut convertir le texte, pour transformer les virgules en %27
				if (this.value!='' && (index>0))	this.value+=","+escape(sText);	
				else														this.value=escape(sText);
			}
			else this.value=sText;								// mono valeur : remplacer le texte
			break;
		case 'select-multiple':
		case 'select-one':
			if (multi) {
				if (index>-1) {
					if (!this.options[index])	this.options[index] = new Option();
					this.options[index].text=sText;
					// sélection de l'option
					if (selected==index)	this.options[index].selected=true;
					else 								this.options[index].selected=false;
					
				}
			}
			else {
				if (index>-1) {
					if (this.options.length==0) {
						this.options[0] = new Option();
					}
					this.options[0].text=sText;
				}
				else {
/* 2005-06-29 AMT : tester la longueur avant d'initialiser le text */
					if (this.options.length>0) this.options[0].text = sText;
				}
			}
			break;
		default:
			return '';
	}	
}
/* ----- supprimer un élément : méthode de l'objet selectBox --- 
			le champ qui recueille les titres est obligatoirement une liste */
function _deleteElement() {
	var ind, i;
	switch (this.titleList.type) {
		case 'select-multiple':
		case 'select-one':
			ind=this.titleList.options.selectedIndex;			// y'a t'il des elements à supprimer ?
			if (ind>-1) {
				i=ind;
				while(i<this.titleList.length) {
					if (this.titleList.options[i].selected) {
//						this.elements.splice(i,1);
						this.elements.remove(i);
						this.titleList.options[i]=null;
					}
					else i++;
				}
				// selectionner une autre ligne dans la list box
				var len=this.elements.length;
				var idxSelect=0;
				if (ind==0 && len>0) idxSelect=0;
				else if (ind>0) {
					if (len>ind) 	idxSelect=ind;
					else 				idxSelect=len-1;
				}
				this.setFields(idxSelect);						// ré-afficher les champs
			}
			break;	
		default:
			return '';
	}
}
/* ------ Supprimer tous les éléments du tableau -----
		méthode pour elements */
function _clearAll() {
	var len=this.elements.length;
	var i=0;
	var isList = false;
	var Ltype = this.titleList.type;									// tester le type du champ titre
	if (Ltype=='select-multiple' || Ltype=='select-one') isList=true;
	for(i=0; i<len; i++) {
			this.elements.remove(0);
			if (isList) this.titleList.options[0]=null;
	}
	this.setFields();
}
/* ---------------------- trier les elements: méthode de l'objet selectBox -----
			le champ qui recueille les titres est obligatoirement une liste */
function _sortElement() {
	var Ltype = this.titleList.type;									// tester le type du champ titre
	if (Ltype!='select-multiple' && Ltype!='select-one') return '';
	var iRight = this.elements.length;	
	var mark=1, iLeft = 0, i=0;
	var idxSelect = this.titleList.options.selectedIndex;		// mémorise l'option selectionnée
	var tmpObj;
	while (mark==1) {		
		mark=0;		
		for (i=iLeft; i<iRight-1; i++) {			
			if (this.elements[i][0].toUpperCase() > this.elements[i+1][0].toUpperCase()) {
				tmpObj = this.elements[i];				
				this.elements[i]=this.elements[i+1];				
				this.elements[i+1]=tmpObj;				
				if (idxSelect==i) idxSelect=i+1;
				else if (idxSelect==i+1)	idxSelect=i;
				mark=1;			
			}		
		}	
	}	
	this.setFields(idxSelect);
}
//--------------------- fin de definition de l'objet selectBOX
var w1;
function addLine(myBox) {	
	if (!myBox) {
		alert('L\'objet n\'existe pas');
		return false;
	}
	// placer la boite au milieu de l'écran, si les positions n'existent pas déjà
	if (ie4 || ns6) {
		if (!myBox.settings.left) myBox.settings.left=(screen.width/2) - (myBox.settings.width/2);
		if (!myBox.settings.top) myBox.settings.top=(screen.height/2) - (myBox.settings.height/2);
	}	
	if (ns4) {
		if (!myBox.settings.screenX) myBox.settings.screenX=(screen.width/2) - (myBox.settings.width/2);				if (!myBox.settings.screenY) myBox.settings.screenY=(screen.height/2) -  (myBox.settings.height/2);
	}	
	var LV = myBox.view.forSearch;								// la vue de recherche	
	if (LV=='') LV=myBox.view.forOpen;				// prendre la vue par defaut	
	if (LV=='') return;
	var CV=myBox.view.singleCat.field.toString();		// lire le champ qui determine la categorie	
	if (CV=='')  CV=myBox.view.singleCat.defaultValue;	// lire la categorie par defaut
	myBox.view.forUse=LV;										// pour donner la vue de recherche à la pop-up	
	myBox.view.singleCat.usedValue=CV;			// idem pour categorie	
	var LG= (myBox.lang) ? myBox.lang : '';
	//2007-06-01 CRD : encodage des valeurs de categorie 
	//var url=myBox.URL + '&V=' + myBox.view.forOpen + '&C=' +CV + ((LG) ? '&LG=' + LG : '') ;
	var url=myBox.URL + '&V=' + myBox.view.forOpen + '&C=' +encodeURIComponent(CV) + ((LG) ? '&LG=' + LG : '') ;
	boxObj = myBox;											// le seul objet que connaisse la pop-up
	w1=window.open(url , 'listControl',myBox.settings.toString());
	w1.focus();
}
//  ------------------------split le contenu d'un champ dans une variable table
function splitObject(fObj) {
	// fObj est un champ dont le type est variable (soit texte, soit boite de selection)
	// le contenu texte de fObj est retourné dans une tableau
	var tabElement=new Array;
	switch (fObj.type) {
		case "text":
		case "hidden":
			if (fObj.value!='') tabElement=fObj.value.split(",");		// virgule est TOUJOURS le séparateur
			for (i=0; i<tabElement.length; i++)
// dans le cas d'un texte avec séparteur, supprimer les caractères spéciaux
				tabElement[i]=unescape(tabElement[i]);			
			break;				
		case "select-multiple":
		case 'select-one':
			var ind=fObj.length;
			var i=0;
			if (ind==1 && fObj.options[0].text=='') break;
			for (i=0; i<ind; i++) {
				tabElement[i]=fObj.options[i].text;
			}
			break;
		default:
			break;
	}
	return tabElement;
}