// Procédures globales du projet
function _MI3(c,n,l){return c.substring(n-1,n+l-1);}// EXE_ExtraitChaine
function _EC(c,p,s,n){var t=new Array();if(typeof(s)!=typeof(t))t[0]=s;else t=s;if (!(n == 1)){var d=0;for(var i=0;i<p-1;i++){var m=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j];var k=c.indexOf(s,d);if((k>-1)&&((m<0)||(k<m))){m=k;l=s.length}}d=m+l
if(d==-1)return(p==1?c:"\b")}var f=-1;for(var j=0;j<t.length;j++){var k=c.indexOf(t[j],d);if((k>-1)&&((f<0)||(k<f)))f=k}if(f==-1)f=c.length;return c.substring(d,f)}else{var d = c.length;for(var i=0;i<p-1;i++){var m=-1;for(var j=0;j<t.length;j++){
var k=c.lastIndexOf(t[j],d-1);if(k>m)m=k}d=m;if (d == -1)	return (p==1?c:"\b")}var f=-1;var l=0;for(var j=0;j<t.length;j++){s=t[j];var k=c.lastIndexOf(s,d-1);if(k>f){f=k;l=s.length}}f+=l;if (f == -1)return c.substr(0, d);return c.substr(f, d - f)}}
function GLOBALPROCEDURESOFATTRATIEPARK15BROWSER_INFOWEB(VPMESSAGE){{var VLINFO=gInfo;var VLPOS=Position(gInfo,VPMESSAGE,null);VLINFO=_MI3(VLINFO,VLPOS,((VLINFO.length-VLPOS)+1));alert(_EC(VLINFO,2,clWDEncode.sEncodeCharset(unescape("\t")),0))}}
function ZoekObject(sFlash, ObjectID,sURL)
{
	eval("document."+sFlash).SetVariable(ObjectID,sURL)
}
// Syntax:
//New_Procedure ()
//
// Parameters:
//	None
// Return Value:
// 	None
//Procedure New_Procedure()
//
//
function InitFlash(sFlash, sTitle, sSlogan)
{
	eval("document."+sFlash).SetVariable("titel",sTitle)
	eval("document."+sFlash).SetVariable("slogan",sSlogan)
}
// Summary: <specify the procedure action>
// Syntax:
// New_Procedure ()
//
// Parameters:
//	None
// Return Value:
// 	None
//
// For instance:
// Indicate an example.
//
//Procedure New_Procedure()
//
//