<!--
var Hidden=new Array()
function ClickMouse(e)
{
	if(IsIE())
	{
		if((Hidden[1]&&(event.button==1))||(Hidden[2]&&(event.button==2)))
		{
			alert(Hidden[0])
			return false
		}
	}
	else
	{
		if(Hidden[1]&&(e.which==1)||Hidden[2]&&(e.which==3))
		{
			alert(Hidden[0])
			return false
		}
	}
	return true
}
function HiddenSrc(Msg,IsLeft,IsRight)
{
	Hidden[0]=Msg
	Hidden[1]=IsLeft
	Hidden[2]=IsRight
	if(!IsIE())
		document.captureEvents(Event.MOUSEDOWN)
	document.onmousedown=ClickMouse
}
function BHelp(Url,Name)
{
	var w=(screen.width-350)/2,h=(screen.height-500)/2
	var Tmp
	if(IsIE())
		Tmp='<a href="javascript:WOpen(\''+Url+'\',\''+Name+'\',350,500,'+w+','+h+')"><img src="/fr/images/chartes/0/aide.gif" border="0"></a>'
	else
		Tmp='<input type="button" value="Aide" onclick="WOpen(\''+Url+'\',\''+Name+'\',350,500,'+w+','+h+')">'
	return Tmp
}
function WOpen(Path,Name,Width,Height,Left,Top)
{
	var Size=""
	if(Width)	Size+=",width="+Width
	if(Height)	Size+=",height="+Height
	if(Top)		Size+=",top="+Top
	if(Left)	Size+=",left="+Left
	var Wd=window.open(Path,Name,"toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=1,resizable=1"+Size)
	if(Wd)	Wd.focus()
}
function Cpy(Src,Dest)
{
	var Tmp=GetObject(Src)
	if(IsEmpty(Dest,""))	Set(Dest,0,Tmp)
}
function GetMedia(IDCL,Field,Path,Filter)
{
	window.open("/cgi-bin/divers.exe?IDCL="+IDCL+"&MEDIASELECT="+Path+"&FIELD="+Field+"&FILTER="+Filter,"MediaSelect","width=540,height=320,toolbar=0,location=0,directories=0,status=0,menubar=0,scrollbars=0,resizable=0,alwaysRaised=1")
}
function BackUrl()
{
	window.history.go(-1)
}
function ButtonImg(Name,Value,OnClick,PathImg,Alt)
{
	if(IsIE())
	{
		var _Alt=(Alt!=null) ? 'alt="'+Alt+'" ' : ""
		return '<img src="'+PathImg+'" '+_Alt+'onClick="'+OnClick+'" border=0>'
	}
	else
		return '<input type="button" value="'+Value+'" name="'+Name+'" onClick="'+OnClick+'">'
}
function ButtonImgForm(Name,Value,OnClick,PathImg,Alt)
{
	if(IsIE())
	{
		var _Alt=(Alt!=null) ? 'alt="'+Alt+'" ' : ""
		return '<input type="image"  src="'+PathImg+'" '+_Alt+'name="'+Name+'" onClick="'+OnClick+'" border=0>'
	}
	else
		return '<input type="submit" value="'+Value+'" name="'+Name+'" onClick="'+OnClick+'">'
}
function GetUrlData()
{
	return location.search.substr(1)
}
function IsUrlVar(Var)
{
	var Tmp=GetUrlData()
	return (Tmp.indexOf(Var+"=")>=0)
}
function GetUrlVar(Var)
{
	var Tmp=GetUrlData()
	var Index=Tmp.indexOf(Var+"=")
	if(Index<0)
		return ""
	Index+=Var.length+1
	var Index2=Tmp.indexOf("&",Index)
	if(Index2<0)
		Index2=Tmp.length
	return Tmp.substring(Index,Index2)
}

function Error(msg,url,lno)
{
	alert(msg+"\n"+lno)
}
function ViewError(Flag)
{
	if(Flag)
		window.onError=Error
	else
		window.onError=null
}
ViewError(true)
//**************************************************************************************************
<!--
function IsIE()
{
	return !(navigator.appName=="Netscape")
}
function IsMac()
{
	return navigator.platform.indexOf("Mac")==0
}
function MsgAlert(Obj,Msg,WithOutFocus)
{
	if(Msg!="")
		alert(Msg)
	if(IsObject(Obj)&&(!IsDefine(WithOutFocus)))
	{
		if(Obj.type!='hidden')
			Obj.focus()
	}
}
function IsZero(Obj,Msg)
{
	var Tmp=GetObject(Obj)
	if((Tmp==0)&&(typeof(Tmp)=="number")||(Tmp=="0"))
	{
		if(Msg!=null)
			MsgAlert(Obj,Msg)
		else
			MsgAlert(Obj,"Ce nombre ne doit pas être égal à zero")
		return true
	}
	return false
}
function IsDefine(Obj)
{
	if(typeof(Obj)=="undefined")	return false
	return Obj!=null
}
function IsObject(Obj)
{
	return (typeof(Obj)=="object")
}
function GetObject(Obj)
{
	if(IsObject(Obj))
		return Obj.value
	else
		return Obj
}
function SetObject(Obj,NewObj)
{
	if(IsObject(Obj))
		Obj.value=NewObj
	else
		Obj=NewObj
}
function IsEmpty(Obj,Msg)
{
	var Tmp=GetObject(Obj)
	if(Tmp=="")
	{	
		if(Msg!=null)
			MsgAlert(Obj,Msg)
		else
			MsgAlert(Obj,"Ce champ est obligatoire !")
		return true
	}
	return false
}
function IsString(Obj,String)
{
	var Tmp=GetObject(Obj)
	if(Tmp.indexOf(String)>=0)
		return true
	return false
}
function IsStringMin(Obj,Min,Msg)
{
	var Tmp=GetObject(Obj)
	if(Tmp.length<Min)
	{
		MsgAlert(Obj,Msg)
		return false
	}
	return true
}
function IsNumber(Obj,IsInteger,Min,Max,WithMsg)
{
	var Tmp=GetObject(Obj)
	if(typeof(Tmp)=="number")
		Tmp+=""
	var i,Cara,Pt=IsInteger
	if((Tmp=="")||(Tmp==null))	return true
	for(i=0;i<Tmp.length;i++)
	{
		Cara=Tmp.charAt(i)
		if((Cara>='0')&&(Cara<='9'))	continue
		if(((Cara=='-')||(Cara=='+'))&&(i==0))	continue
		if((Cara=='.')&&(!Pt))
		{
			Pt=true
			continue
		}
		if(IsInteger)
		{
			if(WithMsg!=null)
				MsgAlert(Obj,WithMsg)
			else
				MsgAlert(Obj,"Veuillez saisir un nombre entier")
		}
		else
		{
			if(WithMsg!=null)
				MsgAlert(Obj,WithMsg)
			else
				MsgAlert(Obj,"Veuillez saisir un nombre")
		}
		return false
	}
// Braket
	if(((typeof(Min)!="string")||(Min!=""))&&(Min!=null))
	{		
		if(eval(Tmp)<Min)
		{
			if(WithMsg!=null)
				MsgAlert(Obj,WithMsg)
			else
				MsgAlert(Obj,"Le nombre doit être supérieur ou égal à "+Min)
			return false
		}
	}
	if(((typeof(Max)!="string")||(Max!=""))&&(Max!=null))
	{
		if(eval(Tmp)>Max)
		{
			if(WithMsg!=null)
				MsgAlert(Obj,WithMsg)
			else
				MsgAlert(Obj,"Le nombre doit être inférieur ou égal à "+Max)
			return false
		}
	}
	return true
}
function IsMail(Obj)
{
	var Tmp=GetObject(Obj)
	if((Tmp=="")||(Tmp==null))	return true
	var iAro=Tmp.indexOf('@')
	var iPt=Tmp.indexOf('.',iAro)
	if((iAro<=0)||(iPt<0)||(iAro==Tmp.length-1))
	{
		MsgAlert(Obj,"Veuillez saisir une adresse email valide")
		return false
	}
	return true
}
function IsSelected(Obj)
{
	if(Obj.selectedIndex<0)
	{
		MsgAlert(Obj,"Vous devez sélectionner un enregistrement dans la combo")
		return false
	}
	return true
}
function NSEmpty(Str)
{
	if(Str=="  ")
		return ""
	return Str
}
function IsWith(Obj,TypeAlpha,IsNum,IsOthers,WithSpe,MsgError)
{
	
	var i,Cara,Tmp=GetObject(Obj)
	if((Tmp=="")||(Tmp==null))	return true
	var Msg="La saisie de ce champ doit contenir :\n"
	Tmp=NSEmpty(Tmp)
	for(i=0;i<Tmp.length;i++)
	{
		Cara=Tmp.charAt(i)
		switch(eval(TypeAlpha))
		{
			case 1:
				if(IsCaraMin(Cara)||IsCaraMaj(Cara))	continue
				break
			case 2:
				if((i==0)==(IsCaraMaj(Cara)))	continue
				break
			case 3:
				if(IsCaraMin(Cara))	continue
				break
			case 4:
				if(IsCaraMaj(Cara))	continue
				break
		}
		if((IsNum)&&(IsCaraNum(Cara)))	continue
		if((IsOthers)&&(IsCaraTou(Cara)))	continue
		if((WithSpe)&&(IsCaraSpe(WithSpe,Cara)))	continue		
		if(MsgError!=null)
			MsgAlert(Obj,MsgError)
		else
		{
			switch(eval(TypeAlpha))
			{
				case 1:
					Msg+="- des lettres minuscules et majuscules\n"
					break
				case 2:
					Msg+="- une majuscule pour la 1ère lettre\n"
					break
				case 3:
					Msg+="- des lettres minuscules\n"
					break
				case 4:
					Msg+="- des lettres majuscules\n"
					break
			}		
			if(IsNum)
				Msg+="- des chiffres\n"
			if(IsOthers)
				Msg+="- des caractères spéciaux"
			if(WithSpe)
			{
				var CS="",j
				for(j=0;j<WithSpe.length;j++)
					CS+=" "+WithSpe.charAt(j)
				Msg+="- le(s) caractère(s) --> "+CS
			}
			MsgAlert(Obj,Msg)
		}
		return false
	}
	return true
}
function IsCaraSpe(CaraSpe,Cara)
{
	var i
	for(i=0;i<CaraSpe.length;i++)
	{
		if(CaraSpe.charAt(i)==Cara)	return true
	}
	return false
}
function IsCaraTou(Cara)
{
	return (!IsCaraMin(Cara))&&(!IsCaraMaj(Cara))&&(!IsCaraNum(Cara))
}
function IsCaraMin(Cara)
{
	return (Cara>='a')&&(Cara<='z')
}
function IsCaraMaj(Cara)
{
	return (Cara>='A')&&(Cara<='Z')
}
function IsCaraNum(Cara)
{
	return (Cara>='0')&&(Cara<='9')
}
function IsTel(Obj)
{
	return IsWith(Obj,0,1,0,"(). ","Veuillez saisir un numéro de téléphone.\nEx : 00.33.4.94.78.01.54\nOu : 0033494780154")
}
function LayerWrite(Layer,Html)
{
	var Obj
	if(IsIE())
	{
		Obj=eval("document.all."+Layer)
		Obj.innerHTML=Html
	}
	else
	{
		Obj=eval("document."+Layer+".document")
		Obj.open()
		Obj.write(Html)
		Obj.close()
	}
}
function LayerView(Layer,IsVisible)
{
	var Val="'hidden'"
	if(IsVisible)
		Val="'visible'"
	SetLayer(Layer,"visibility",Val)
}
function GetLayer(Layer)
{
	if(IsIE())
		return eval("document.all."+Layer+".style")
	else
		return eval("document."+Layer)
}
function SetLayer(Layer,Var,Val)
{
	if(IsIE())
		eval("document.all."+Layer+".style."+Var+"="+Val)
	else
		eval("document."+Layer+"."+Var+"="+Val)
}
function IsNOM(Obj,ObjData,NoID)
{
	if(IsEmpty(Obj))	return false
	if(!IsWith(Obj,1,1,0,null,"Ce champ doit comporter seulement des caractères alpha-numérique"))	return false
	var Tmp=GetObject(Obj)
	TmpLow=Tmp.toLowerCase()
	var Cara=Tmp.charAt(0)
	if((Cara>='0')&&(Cara<='9'))
	{
		MsgAlert(Obj,"Ce champ ne doit pas contenir de chiffre pour le 1er caractère.")
		return false
	}
	var i,MotRes=new Array("IDCL")
	for(i=0;i<MotRes.length;i++)
	{
		if(MotRes[i].toLowerCase()==TmpLow)
		{
			MsgAlert(Obj,Tmp+" est un mot reservé !\nVeuillez saisir un autre nom.")
			return false
		}
	}
	if((TmpObj=ObjData.Get("NAME",Tmp,1))!=null)
	{
		if(TmpObj.ID!=NoID)
		{
			MsgAlert(Obj,"Le nom "+Tmp+" est déjà défini !")
			return false
		}
	}
	return true
}
function IsQuote()
{
}
function IsLabel(Obj,NoRequier)
{
	if(Obj==null)	return true
	if(!IsDefine(NoRequier))
	{
		if(IsEmpty(Obj))	return false
	}
	if(IsString(Obj,'"'))
	{
		MsgAlert(Obj,"Les guillemets ne sont pas autorisés !")
		return false
	}
	return true
}
function IsImg(Obj)
{
	var Tmp=GetObject(Obj)
	if((Tmp=="")||(Tmp==null))	return true
	if(!IsWith(Obj,1,1,0,"- ._:/"))	return false
	if(!IsString(Obj,"."))
	{
		MsgAlert(Obj,"Vous devez spécifier une extention pour le nom de l'image.\nExemple: openform.gif")
		return false
	}
	return true
}
function SetImg(Obj,ImgName)
{
	Obj.src=ImgName
}
function StringIns(Obj,Pos,Str)
{
	var Tmp=Obj
	return Tmp.substring(0,Pos)+Str+Tmp.substring(Pos,Tmp.length)
}
function Aff(Type,Val,V2,V3,V4,V5)
{
	var Tmp,Tmp2
	if(((Val=="")&&(typeof(Val)=="string"))||(Val==null))
	{
		document.write(" ")
		return
	}
	switch(Type)
	{
		case 3:
			if(Val.charAt(Val.length-1)=='/')
				Tmp=' '
			else
			{
				Tmp='<img src="'+Val+'"'
				if(V2!="")	Tmp+=' width="'+V2+'"'
				if(V3!="")	Tmp+=' height="'+V3+'"'
				Tmp+=">"
			}
			break
		case 6:
			Tmp=_Date.GetStr(Val,V2,V3,V4,V5)
			break
		case 7:
			Tmp=_Time.GetStr(Val,V2,V3,V4,V5)
			break
		case 8:
		case 9:
			Tmp2=""
			Tmp=Val
			Tmp=Replace(Val,"<","&lt;")
			Tmp=Replace(Tmp,">","&gt;")			
			var Af=Extract(Tmp,"__",1)
			Tmp=Extract(Tmp,"__",2)
			if((!IsDefine(Tmp))||(Val==" "))	Tmp=Val
			if(Af=="")	Af=Tmp
			Tmp=Replace(Tmp,'"','%22')
			if(Type==8)	Tmp="mailto:"+Tmp
			if(V2)
				Tmp2=' target="'+V2+'"'
			Tmp='<a href="'+Tmp+'"'+Tmp2+'>'+Af+'</a>'
			break
		case 13:
			Tmp=" "
			eval('document.'+Val+'.dynsrc="'+V2+'"')
			break
		case 14:
			if(Val.charAt(Val.length-1)=='/')
				Tmp=' '
			else
			{
				if(V3)
					Tmp='<a href="'+Val+'"><img src="'+V2+'" border="0"></a>'
				else
				{
					if(V2==0)	V2="infinite"
					Tmp='<bgsound src="'+Val+'" loop="'+V2+'"> '
				}
			}
			break
		case 15:
			var LH=""
			if(V2!="")
				LH=' width="'+V2+'"'
			if(V3!="")
				LH+=' height="'+V3+'"'
			Tmp='<object codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#3,0,0,0"'
			Tmp+=LH+'><param name="SRC" value="'+Val+'"><embed src="'+Val+'" pluginspage="http://www.macromedia.com/shockwave/download/" type="application/x-shockwave-flash"'+LH+'></object>'			
			break
		default:
			Tmp=Val
			Tmp=Replace(Val+"","<","&lt;")
			Tmp=Replace(Tmp,">","&gt;")
			Tmp=Replace(Tmp,"\n","<br>")
			break
	}
	document.write(Tmp)
}
function Set(Obj,Type,Val,Val2)
{
	if(Obj==null)	return
	if(!IsDefine(Val))	return
	switch(Type)
	{
		case 4 :
			if(!IsDefine(Obj.name))
				RadioSet(Obj,Val)
			else
			{
				if(IsDefine(Val2))
					Obj.selectedIndex=Val
				else
					ComboSelect(Obj,"value",Val)
			}
			break
		case 6:
			if(IsJsDateTime)
			{
				Obj.value=Val
				_Date.Is(Obj,Val2)
			}
			break
		case 7:
			if(IsJsDateTime)
			{
				Obj.value=Val
				_Time.Is(Obj)
			}
			break
		case 10 :
			Obj.checked=Val
			break
		default :
			Obj.value=Val
			break
	}
}
function RadioGet(Obj)
{
	var i
	for(i=0;i<Obj.length;i++)
		if(Obj[i].checked)	return Obj[i]
	return null
}
function RadioSet(Obj,Value)
{
	var i
	for(i=0;i<Obj.length;i++)
		Obj[i].checked=(Value==Obj[i].value)
}
function ComboSelect(Obj,Field,Value)
{
	if(Obj==null)	return -1
	var i
	for(i=0;i<Obj.length;i++)
	{
		if(eval("Obj[i]."+Field)==Value)
		{
			Obj.selectedIndex=i
			return i
		}
	}
	Obj.selectedIndex=-1
	return -1
}
function ComboMin(Obj,Min)
{
	if(Obj.length<Min)
	{
		MsgAlert(Obj,"Cette liste doit comporter au moins "+Min+" enregistrement(s)")
		return false
	}
	return true
}
function Extract(Obj,Separate,Pos)
{
	var PosS=0,PosN=0
	while(PosN<Obj.length)
	{
		PosN=Obj.indexOf(Separate,PosS)
		if(PosN<0)	PosN=Obj.length
		if((--Pos)<=0)
			return Obj.substring(PosS,PosN)
		PosS=PosN+Separate.length
	}
	return null
}
function ImgLoad(Path,ListImgName)
{
	if(!ListImgName)	return
	var i
	for(i=0;i<ListImgName.length;i++)
	{
		Name=ListImgName[i]
		ListImgName[i]=new Image()
		ListImgName[i].src=Path+Name
	}
}
var PIO=""
function MSO(ObjImgSrc,ObjImgOver,IsOver)
{
	if(!IsObject(ObjImgOver))
		return
	var Tmp=ObjImgSrc
	if(!IsObject(ObjImgSrc))
		Tmp=eval('document.'+ObjImgSrc)
	if(Tmp.Save==null)
		Tmp.Save=Tmp.src
	if(IsOver)
		Tmp.src=ObjImgOver.src
	else
		Tmp.src=Tmp.Save
}
function Repete(Str,Nbr)
{
	var i,Tmp=""
	for(i=0;i<Nbr;i++)
		Tmp+=Str
	return Tmp
}
function Complete(Obj,Size,Cara)
{
	var i,Tmp=GetObject(Obj)
	if((Tmp=="")||(Tmp==null))	return true
	for(i=0;i<=Size-Tmp.length;i++)
		Tmp+=Cara
	return Tmp
}
function Replace(Obj,Find,Str)
{
	var Ind,Pos=0,Tmp=GetObject(Obj)
	if((Tmp=="")||(Tmp==null))	return true
	while(Tmp.indexOf(Find)>=0)
		Tmp=Tmp.replace(Find,Str)
	return Tmp
}
//-->
	var IsJsFonctions=true
