/*
*	deze include file bevat de volgende Javascript functies:
*	fmt_datum($datum,$flag)
*	fmt_timestamp($ts,$flag)
*	check_datum($datum)
*	prijs($prijs)
*
*	de volgende velden moeten beschikbaar zijn:
*
*/
switch (taal)
	{
	case "DE":
		fmtTextDag	= "Sonntag;Montag;Dienstag;Mitwoch;Donnerstag;Freitag;Samstag".split(";");
		fmtTextMnd	= "Januar;Februar;März;April;Mai;Juni;Juli;August;September;Oktober;November;Dezember".split(';');
		fmtTextSMnd	= "Jan;Feb;Mar;Apr;Mai;Jun;Jul;Aug;Sep;Okt;Nov;Dez".split(';');
		break;
	case "EN":
		fmtTextDag	= "Sunday;Monday;Tuesday;Wednesday;Thursday;Friday;Saturday".split(";");
		fmtTextMnd	= "January;February;March;April;May;June;July;August;September;October;November;December".split(';');
		fmtTextSMnd	= "Jan;Feb;Mar;Apr;May;Jun;Jul;Aug;Sep;Oct;Nov;Dec".split(';');
		break;
	default:
		fmtTextDag	= "zondag;maandag;dinsdag;woensdag;donderdag;vrijdag;zaterdag".split(";");
		fmtTextMnd	= "januari;februari;maart;april;mei;juni;juli;augustus;september;oktober;november;december".split(';');
		fmtTextSMnd	= "jan;feb;mrt;apr;mei;jun;jul;aug;sep;okt;nov;dec".split(';');
		break;
	}
	
function t_keus(nl, en, de)
	{
	switch (taal)
		{
		case "":
		case "NL":
			return nl;
			break;
		case "EN":
			if (en!="") return en;
			else return nl;
			break;
		case "DE":
			if (de!="") return de;
			else return nl;
			break;
		default:
			return nl;
			break;
		}
	}

function nl2br(str2br)
	{
	var x = ""+str2br;
	return x.replace(/\n\r/g,"<br>");
	}
	
function trim(value)
	{
	value = value.replace(/^\s+/,''); 
 	value = value.replace(/\s+$/,'');
	return value;
	}

function fmt_datum(datum, flag)
	{
	jr	= datum.substr(0,4);
	md	= datum.substr(5,2);
	dg	= datum.substr(8,2);
	//alert('fmt_datum jr='+jr+', maand='+md+', dag='+dg);
	i_datum = new Date();
	i_datum.setFullYear(jr,md-1,dg);
	switch (flag)
		{
		case "weekdag":
			return fmtTextDag[i_datum.getDay()];
			break;
		case "kort":
			return fmtTextDag[i_datum.getDay()].substr(0,2)+" "+dg+" "+fmtTextSMnd[md-1];
			break;
		case "mini":
			return fmtTextDag[i_datum.getDay()].substr(0,2)+" "+dg+"/"+md;
			break;
		case "duidelijk":
			return fmtTextDag[i_datum.getDay()].substr(0,2)+"&nbsp;"+dg.replace(/^0+/,'')+"&nbsp;"+fmtTextSMnd[md-1]+"&nbsp;"+jr.substr(2,2);
			break;
		case "datum":
			return dg+" "+fmtTextMnd[md-1]+" "+jr;
			break;
		case "dagmaand":
			return dg.replace(/^0+/,'')+" "+fmtTextSMnd[md-1];
			break;
		case "geenjaar":
			return fmtTextDag[i_datum.getDay()]+" "+dg+"&nbsp;"+fmtTextMnd[md-1];
			break;
		case "dm":
			return dg.replace(/^0+/,'')+"-"+md.replace(/^0+/,'');
			break;
		case "dmj":
			return dg+"-"+md+"-"+jr;
			break;
		case "wdmj":
			return fmtTextDag[i_datum.getDay()]+" "+dg+"-"+md+"-"+jr;
			break;
		case "w/dmj":
			return fmtTextDag[i_datum.getDay()]+"<br>"+dg+"-"+md+"-"+jr;
			break;
		default:
			return fmtTextDag[i_datum.getDay()]+" "+dg+" "+fmtTextMnd[md-1]+" "+jr;
			break;
		}
	};

/* Format maand overzicht */
var maxWeekNr = 0;
var fmtMaandOvzCompleet	= false;	// moet nog gebouwd worden
function fmt_maandoverzicht(start,eind,availData,idPref,onClick,weekNrOpt)
	{
	weekStartDag	= 5;	// 1=maandag, 5=vrijdag
	sl	= start.split("-");
	i_cur = new Date();
	i_cur.setFullYear(sl[0],sl[1]-1,sl[2]);
	el	= eind.split("-");
	i_eind = new Date();
	i_eind.setFullYear(el[0],el[1]-1,el[2]);
	weekNr=0;
	cur = 0
	jsT = "";
	vMaand	= -1;
	vStatus = "";
	while (i_cur<=i_eind)
		{
		if (vMaand!=i_cur.getMonth())
			{	// start nieuwe maand
			jsT += "¦<table><tr><td class='fmtMaandOvzMaand' colspan=7 align=center>"+fmtTextMnd[i_cur.getMonth()]+" "+i_cur.getFullYear()+"</td></tr><tr>";
			for (i=0;i<7;i++)	// begin de week op weekStartDag
				jsT+="<td class='fmtMaandOvzDagen'>"+fmtTextDag[((i+weekStartDag)%7)].substr(0,2)+"</td>";
			jsT+="</tr><tr>";
			max=i_cur.getDay();
			i_cur.setDate(i_cur.getDate()-(max-weekStartDag+7)%7);
			if (max!=weekStartDag)
				{	// filler
				for (i=0;i<((max-weekStartDag+7)%7);i++)
					{
					jsT+="<td class='fmtMaandOvzUitPeriode'>"+i_cur.getDate()+"</td>";
					i_cur.setDate(i_cur.getDate()+1);
					}
				}
			i=(max-weekStartDag+7)%7;
			vMaand = i_cur.getMonth();
			}
		//if (availData=='') alert('i='+i);
		// maand invullen voor zover nodig
		while ((i_cur<=i_eind)&&(vMaand==i_cur.getMonth()))
			{
			avType = "Vrij";
			if (availData!="") if (availData.charAt(cur)=='1') avType = "Bezet";
			if (avType!=vStatus)
				{
				x=avType;
				if (vStatus!="") avType = "Wissel";
				vStatus = x;
				}
			d=i_cur.getDay();
			if ((avType=="vrij")&&(!((d>0)&&(d<6)))) avType = "Weekend";
			jsT+="<td class='fmtMaandOvz"+avType+"'"
						+(idPref!=""?" id='"+idPref+i_cur.getMonth()+'_'+i_cur.getDate()+"'":"")
						+(onClick!=""?" onClick=\""+onClick+"\"":"")
						+">"+i_cur.getDate()
					+"</td>";
			cur++;
			i_cur.setDate(i_cur.getDate()+1);
			i++;
			if (((i)%7)==0)
				{
				weekNr++;
				jsT+=(weekNrOpt?"<td class='fmtMaandOvzWeeknr'>"+weekNr+"</td>":"")+"</tr><tr>";
				}
			}
		max = 7-(i%7);
		//if (availData=='') alert('i='+i+', max='+max);
		if (max<7)
			{
			for (i=0;i<max;i++)
				{
				jsT+="<td class='fmtMaandOvzUitPeriode'>"+i_cur.getDate()+"</td>";
				i_cur.setDate(i_cur.getDate()+1);
				}
			i_cur.setDate(i_cur.getDate()-max);
			weekNr++;
			jsT+=(weekNrOpt?"<td class='fmtMaandOvzWeeknr'>"+weekNr+"</td>":"");
			}
		jsT+="</tr></table>";
		maxWeekNr = weekNr;
		}
	return jsT;
	}



function fmt_timestamp(ts,flag)
	{
	jr	= ts.substr(0,4);
	md	= ts.substr(4,2);
	dg	= ts.substr(6,2);
	hr	= ts.substr(8,2);
	mn	= ts.substr(10,2);
	sc	= ts.substr(12,2);
	//alert('fmt_datum jr='+jr+', maand='+md+', dag='+dg);
	i_datum = new Date();
	i_datum.setFullYear(jr,md-1,dg);
	i_datum.setHours(hr);
	i_datum.setMinutes(mn);
	i_datum.setSeconds(sc);
	return i_datum.toLocaleString();
	/*
	$dg	= substr(ts,6,2);
	$md	= substr($ts,4,2);
	$jr = substr($ts,0,4);
	//$s	= substr($ts,6,2)."-".substr($ts,4,2)."-".substr($ts,0,4);
	$s	= $dg."-".$md."-".$jr;
	if ($flag == "full") return $s." ".substr($ts,8,2).":".substr($ts,10,2);
	elseif ($flag == "tijd") return substr($ts,8,2).":".substr($ts,10,2);
	elseif ($flag == "sort") return "$jr-$md-$dg ".substr($ts,8,2).":".substr($ts,10,2);
	else return $s;
	*/
	};

/*
function	fmt_telefoon($nr)
	{
	global $taal;

	$dl	= explode("-",$nr);
	$netnr	= $dl[0];
	$abbnr	= $dl[1];
	if ($abbnr == "")
		{
		$abbnr	= substr($netnr,3);
		$netnr	= substr($netnr,0,3);
		}
	if (substr($netnr,0,2) == "00")	$netnr	= "00 ".substr($netnr,2);
	elseif ((!(($taal=="NL") OR ($taal==""))) AND (substr($netnr,0,1)== "0")) $netnr = "00 31 ".substr($netnr,1);
	if ((strlen($abbnr) % 2) == 1)
		{
		$nabbnr	= substr($abbnr,0,3);
		$abbnr	= substr($abbnr,3);
		}
	while (strlen($abbnr)>0)
		{
		$nabbnr	.= " ".substr($abbnr,0,2);
		$abbnr	= substr($abbnr,2);
		}
	return $netnr." - ".$nabbnr;
	}

function fmt_indexfoto($fotodef,$provider,$accdir,$acc_id)
	{
	global $foto;

	if ($fotodef == "") $foto		= "http://www.$provider/$accdir/$acc_id/foto-1.jpg";
	elseif (substr($fotodef,0,1)=="*")
		{	// new formats
		$x = explode(";",$fotodef);
		$c_x	= count($x);

		// determine location
		$url	= substr($x[0],1);
		if ($url=="") $url = "http://www.$provider/$accdir/$acc_id/";
		elseif (is_numeric($url))
			{
			if ($url==1) $url = "http://212.204.194.177/av_fotos/$accdir/$acc_id/";
			elseif ($url==2)
				{
				$url = "http://212.204.242.208/av_fotos/$accdir/".substr($acc_id,0,1)."/$acc_id/";
				}
			elseif ($url==3)
				{
				$url = "http://212.204.252.133/av_fotos/$accdir/".substr($acc_id,0,1)."/$acc_id/";
				}
			}

		// format foto-urls
		if ($c_x>1)
			{
			if ($x[1]=="") $foto = $url."foto-1.jpg";
			else $foto = $url.$x[1];
			}
		else $foto = $url."foto-1.jpg";
		}
	else
		{	// old format
		$x	= explode(";",$fotodef);
		$foto	= $x[0];
		}
	}

function fmt_foto($fotodef,$provider,$accdir,$acc_id)
	{
	global $foto, $fullfoto, $smallfoto, $fotohoog, $fotobreed;

	$shoog	= 240;
	$sbreed	= 320;

	if ($fotodef == "")
		{	// empty, provide default
		for ($i=0;$i<4;$i++)
			{
			$foto[$i]		= "http://www.$provider/$accdir/$acc_id/foto-".($i+1).".jpg";
			$fotohoog[$i]	= $shoog;
			$fotobreed[$i]	= $sbreed;
			}
		}
	elseif (substr($fotodef,0,1)=="*")
		{	// new formats
		$x = explode(";",$fotodef);
		$c_x	= count($x);

		// determine location
		$url	= substr($x[0],1);
		if ($url=="") $url = "http://www.$provider/$accdir/$acc_id/";
		elseif (is_numeric($url))
			{
			if ($url==1) $url = "http://212.204.194.177/av_fotos/$accdir/$acc_id/";
			elseif ($url==2) $url = "http://212.204.242.208/av_fotos/$accdir/".substr($acc_id,0,1)."/$acc_id/";
			elseif ($url==3) $url = "http://212.204.252.133/av_fotos/$accdir/".substr($acc_id,0,1)."/$acc_id/";
			}

		// format foto-urls
		for ($i=0;$i<4;$i++)
			if ($i<=$c_x)
				{
				if ($x[$i+1]=="")
					{
					$tmpfoto[$i] = $url."foto-".($i+1).".jpg";
					$fotohoog[$i]=$shoog;
					$fotobreed[$i]=$sbreed;
					}
				elseif ($x[$i+1]=="v") {$tmpfoto[$i] = $url."foto-".($i+1).".jpg";$fotohoog[$i]=$sbreed;$fotobreed[$i]=$shoog;}
				else
					{
					$tmpfoto[$i] = $url.$x[$i+1];
					if (strpos($tmpfoto[$i],"¿"))
						{
						$y = explode("¿", $tmpfoto[$i]);
						$tmpfoto[$i]=$y[0];
						if ($y[1]=="v")	{$fotohoog[$i]=$sbreed;$fotobreed[$i]=$shoog;}
						else {$fotohoog[$i]=$shoog;$fotobreed[$i]=$sbreed;}
						}
					else {$fotohoog[$i]=$shoog;$fotobreed[$i]=$sbreed;}
					}
				}
			else	// provide default
				{$tmpfoto[$i] = $url."foto-".($i+1).".jpg";$fotohoog[$i]=$shoog;$fotobreed[$i]=$sbreed;}
		$foto = $tmpfoto;
		}
	else
		{	// old format
		$foto	= explode(";",$fotodef);
		for ($i=0;$i<4;$i++)
			if (strpos($foto[$i],"¿"))
				{
				$y = explode("¿", $foto[$i]);
				$foto[$i]=$y[0];
				if ($y[1]=="v")	{$fotohoog[$i]=$sbreed;$fotobreed[$i]=$shoog;}
				else {$fotohoog[$i]=$shoog;$fotobreed[$i]=$sbreed;}
				}
			else {$fotohoog[$i]=$shoog;$fotobreed[$i]=$sbreed;}
		}
	for ($i=0;$i<4;$i++)
		{
		$fullfoto[$i] = "<img src=".$foto[$i]." width=".$fotobreed[$i]." height=".$fotohoog[$i]." border=0>";
		$smallfoto[$i] = "<img src=".$foto[$i]." width=".($fotobreed[$i]/2)." height=".($fotohoog[$i]/2)." border=0>";
		}
	}

function scanstr($str)
	{
	$out	= "";
	for ($i=0 ; $i<strlen($str) ; $i++)
		{
		$c	= substr($str,$i,1);
		$x	= ord($c);
		if	(	(	($x>=ord('a'))
				AND	($x<=ord('z'))
				)
			OR	(	($x>=ord('A'))
				AND	($x<=ord('Z'))
				)
			OR	($c == ' ')
		   	)
			$out = $out.$c;
		else $out = $out."&#".$x.";";
		}
	return $out;
	}

function check_datum($datum)
	{
	global $i_datum, $e_datum, $c_datum, $debug;

	$len	=strlen($datum);
	$i=0;
	$i_datum	= "";
	$e_datum	= $datum;
	if (eregi("^[0-9]+$",$datum))
		{
		$dl[0]	= substr($datum,0,2);
		$dl[1]	= substr($datum,2,2);
		$dl[2]	= substr($datum,4,4);
		if ($debug) echo "<br>Numeric dag=$dl[0], maand=$dl[1], jaar=$dl[2]";
		}
	else
		{
		$datum	= strtolower($datum);
		$sep	= "";
		while (($i<$len) AND ($sep == ""))
			{
			$char	= substr($datum,$i,1);
			if (($char < '0') OR ($char > '9')) $sep	= $char;
			if (($sep >= "a") AND ($sep <= "z"))
				{
				$datum	= substr($datum,0,$i)." ".substr($datum,$i);
				$sep	= " ";
				}
			$i++;
			}
		if ($sep == "") return 0;
		$dl		= explode($sep, $datum);	// assume d/m/j
		if ($debug) echo "<br>Separator='$sep' dag=$dl[0], maand=$dl[1], jaar=$dl[2]";
		$c_dl	= count($dl);
		$x		= 1;
		while (($c_dl>2) AND ($x<$c_dl))
			{
			if ($dl[$x] == "")
				{
				array_splice($dl,$x,array_slice($dl,$x_1));
				$c_dl	= count($dl);
				}
			else $x++;
			}
		if ($debug) echo "<br>Na strippen lege separators dag=$dl[0], maand=$dl[1], jaar=$dl[2]";
		}
	if (eregi("^[a-z]+$",$dl[1]))
		{
		switch (substr($dl[1],0,3))
			{
			case "jan":
				$dl[1]	= 1;
				break;
			case "feb":
				$dl[1]	= 2;
				break;
			case "maa":
			case "mrt":
			case "mar":
				$dl[1]	= 3;
				break;
			case "apr":
				$dl[1]	= 4;
				break;
			case "mei":
			case "may":
				$dl[1]	= 5;
				break;
			case "jun":
				$dl[1]	= 6;
				break;
			case "jul":
				$dl[1]	= 7;
				break;
			case "aug":
				$dl[1]	= 8;
				break;
			case "sep":
				$dl[1]	= 9;
				break;
			case "okt":
			case "oct":
				$dl[1]	= 10;
				break;
			case "nov":
				$dl[1]	= 11;
				break;
			case "dec":
				$dl[1]	= 12;
				break;
			}
		if ($debug) echo "<br>alfa-maand dag=$dl[0], maand=$dl[1], jaar=$dl[2]";
		}
	if ($dl[2] == "") $dl[2]	= date("Y");
	if (($dl[2] > 10) AND ($dl[2]<=99)) $dl[2] += 1900;
	if (($dl[2] >= 0) AND ($dl[2]<=10)) $dl[2] += 2000;
	if ($debug) echo "<br>jaar default dag=$dl[0], maand=$dl[1], jaar=$dl[2]";
	if (!checkdate(($dl[1]+0),($dl[0]+0),($dl[2]+0)))	// expects m/d/j
		return 0;
	$i_datum	= date("Y-m-d",mktime(0,0,0,$dl[1],$dl[0],$dl[2]));
	$e_datum	= date("d-m-Y",mktime(0,0,0,$dl[1],$dl[0],$dl[2]));
	if ($dl[2]<1970)
		{
		$i_datum = sprintf("%04d-%02d-%02d",$dl[2],$dl[1],$dl[0]);
		$e_datum = sprintf("%02d-%02d-%04d",$dl[0],$dl[1],$dl[2]);
		}
	$c_datum	= date("z",mktime(0,0,0,$dl[1],$dl[0],$dl[2]));
	if ($dl[2] > date("Y")) $c_datum = $c_datum+365;
	if ($debug) echo "<br>eind dag=$dl[0], maand=$dl[1], jaar=$dl[2], i_datum=$idatum, e_datum=$e_datum";
	return 1;
	}

function calc_datum($datum)	// interne datum!
	{
	$dl	= explode("-",$datum);
	$c_datum	= date("z",mktime(0,0,0,$dl[1],$dl[2],$dl[0]));
	if ($dl[0] > date("Y")) $c_datum = $c_datum+365;
	return $c_datum;
	}


function bevat_zondag($begin,$eind)
	{
	global $zondagen;

	$zondagen	= 0;
	$bl	= explode("-",$begin);
	$t	= mktime(0,0,0,$bl[1],$bl[2],$bl[0]);
	$d	= 0;
	while ((date("Y-m-d",$t)<$eind) AND ($d<31))
		{
		if (date("w",$t)==0) $zondagen++;
		$d++;
		$t	= mktime(0,0,0,$bl[1],$bl[2]+$d,$bl[0]);
		}
	if ($zondagen>0) return 1;
	else return 0;
	}



function check_tijd($tijd)
	{
	global $i_tijd, $e_tijd, $debug;

	$len	=strlen($tijd);
	$i=0;
	$i_tijd	= "";
	$e_tijd	= $tijd;
	if (eregi("^[0-9]+$",$tijd))
		{
		$dl[0]	= substr($tijd,0,2);
		$dl[1]	= substr($tijd,2,2);
		if ($debug) echo "<br>Numeric uur=$dl[0], minuten=$dl[1]";
		}
	elseif (!eregi("^[0-9]*[:. -][0-9]*$",$tijd)) return 0;
	else
		{
		$tijd	= strtolower($tijd);
		$sep	= "";
		while (($i<$len) AND ($sep == ""))
			{
			$char	= substr($tijd,$i,1);
			if (($char < '0') OR ($char > '9')) $sep	= $char;
			$i++;
			}
		if ($sep == "") return 0;
		$dl	= explode($sep, $tijd);	// assume hh:mm
		if ($debug) echo "<br>Separator='$sep' uur=$dl[0], minuten=$dl[1]";
		$c_dl	= count($dl);
		$x		= 1;
		while (($c_dl>2) AND ($x<$c_dl))
			{
			if ($dl[$x] == "")
				{
				array_splice($dl,$x,array_slice($dl,$x_1));
				$c_dl	= count($dl);
				}
			else $x++;
			}
		if ($debug) echo "<br>Na strippen lege separators uur=$dl[0], minuten=$dl[1]";
		}
	$dl[0] += 0;
	$dl[1] += 0;
	if (($dl[0]<0) OR ($dl[0]>24)) return 0;
	if (($dl[1]<0) OR ($dl[2]>59)) return 0;
	if (strlen($dl[0])==1) $dl[0] = "0".$dl[0];
	if (strlen($dl[1])==1) $dl[1] = "0".$dl[1];
	$i_tijd	= "$dl[0]$dl[1]00";
	$e_tijd	= "$dl[0]:$dl[1]";
	return 1;
	}


function check_postcode($pc)
	{
	global $postcode;

	$postcode = strtoupper(ereg_replace("['|\\]","",$pc));
	if (eregi("^[0-9]{4} [a-z]{2}",$postcode))	return 1;
	elseif (eregi("^[0-9]{4}[a-z]{2}",$postcode))
		{
		$postcode = substr($postcode,0,4)." ".strtoupper(substr($postcode,4,2));
		return 1;
		}
	elseif (eregi("^[a-z]{1}-.*",$postcode)) return 1;
	}

function check_telefoon($tel)
	{
	global $o_telefoon;
	
	$tel	= strtr($tel,"oO","00");
	$tel	= eregi_replace(" ","",$tel);
	$o_telefoon	= $tel;
	$mincnt = $cnt = 10;
	if (eregi("-",$tel))
		{
		$mincnt++;
		$cnt++;
		}
	if (eregi("^\\+",$tel)) $cnt=19;
	if (eregi("^00",$tel)) $cnt=21;
	return (eregi("^[\\+0-9-]{".$mincnt.",".$cnt."}$",$tel));
	}

function check_email($email)
	{
	return (eregi("^[_a-z0-9\\.-]+@[a-z0-9\\.-]+\\.[a-z]+$",$email));
	}

function parse_datum($i_date)
	{
	global $i_datum, $e_daum, $c_datum;

	$dl	= explode("-",$i_date);
	$i_datum	= date("Y-m-d",mktime(0,0,0,$dl[1],$dl[2],$dl[0]));
	$e_datum	= date("d-m-Y",mktime(0,0,0,$dl[1],$dl[2],$dl[0]));
	$c_datum	= date("z",mktime(0,0,0,$dl[1],$dl[2],$dl[0]));
	if ($dl[0] > date("Y")) $c_datum = $c_datum+365;
	}

function prijs($prijs)
	{
	return "&euro;&nbsp;".number_format($prijs,2,",",".");
	};

function vind_vakantie($naam,$type)
	{
	global $dg, $debug, $vakantie_idatum;

	$nm	= "breed";
	if ($type!="") $nm = $type;
	$nm_van	= $nm."_van";
	$nm_tot	= $nm."_tot";

	if ($naam=="")
		{	// vindt huidige of eerstvolgende vakantie
		if ($vakantie_idatum=="")
			{
			$vandaag	= date("Y-m-d");
			$driedagenlater	= date("Y-m-d",mktime(0,0,0,date("m"),date("d")+3,date("Y")));
			}
		else
			{
			$dl	= explode("-",$vakantie_idatum);
			$vandaag	= date("Y-m-d",mktime(0,0,0,$dl[1],$dl[2],$dl[0]));
			$driedagenlater	= date("Y-m-d",mktime(0,0,0,$dl[1],$dl[2]+3,$dl[0]));
			}
		$res	= mysql_query($q="SELECT vak_kort,$nm_van,$nm_tot
										FROM vakanties
										WHERE	(	(	($nm_van<='$vandaag')
													AND	($nm_tot>='$driedagenlater')
													)
												OR	($nm_van>'$vandaag')
												)
												AND (	(kenmerk='')
													OR	(kenmerk REGEXP '$dg')
													)
										ORDER BY vrij_van LIMIT 1;");
		}
	else
		{
		$where = "(vak_lang REGEXP '$naam') OR (vak_kort REGEXP '$naam')";
		$res	= mysql_query($q="SELECT vak_kort,$nm_van,$nm_tot FROM vakanties WHERE $where ORDER BY vrij_van LIMIT 1;");
		}

	//echo $q;
	$tot	= mysql_num_rows($res);
	if ($tot>0)
		{
		list($vak,$van,$tot) = mysql_fetch_row($res);
		return "$vak;$van;$tot";
		}
	}

function setbit($val, $bit)
	{
	if (readbit($val, $bit)) return $val;
	return $val += '0x'.dechex(1<<($bit-1));
	}

function clearbit($val, $bit)
	{
	if (!readbit($val, $bit)) return $val;
	return $val^(0+('0x'.dechex(1<<($bit-1))));
	}

function readbit($val, $bit)
	{
	return ($val&(0+('0x'.dechex(1<<($bit-1)))))?'1':'0';
	}
*/