"; switch ($_REQUEST[action]) { case "rooster": bezoek($_SERVER['REMOTE_ADDR'],$_SERVER['REMOTE_HOST'],'rooster',$_REQUEST[cid]); naar_start(); rooster($_REQUEST[cid],0,$_REQUEST[ft]); break; case rooster_club: bezoek($_SERVER['REMOTE_ADDR'],$_SERVER['REMOTE_HOST'],'club',$_REQUEST[cid]); naar_start(); rooster_club($_REQUEST[cid]); //naar_start(); break; default: bezoek($_SERVER['REMOTE_ADDR'],$_SERVER['REMOTE_HOST'],'lijst','0'); lijst_competities(); lijst_clubs(); lijst_leiders(); disclaimer(); break; } //echo ""; function naar_start(){ echo "

Naar het overzicht van alle competities

"; } function lijst_competities(){ global $db; echo "

Overzicht van de competities

\n"; //actueel seizoen $sql = "SELECT fvalue FROM tblsystem where fkey = 'curr_year'"; $seizoen = $db->get_var($sql); //klasses waarvoor in actueel seizoen een competitie plaatsvindt $sql = "select c.cid, k.klasse from tblklasse as k inner join tblcompetities c on k.kid = c.klasse where c.fk_seizoen = $seizoen and k.active = 'Y' order by k.volgorde"; if($results = $db->get_results($sql)){ echo "

"; foreach($results as $r){ echo "\n"; //$competitie = $r->cid; //cid&ft=0\">Stand //cid&ft=1\">Gedetailleerd } echo "
cid&ft=0\">$r->klasse

\n"; } } function disclaimer(){ echo "

Deze lijst wordt bijgehouden door de competitieleiders van de clubs. Klik hier voor het volledig overzicht

"; } function rooster($cid, $club=0, $ft){ //21-8-2005 17:26 extra argument ft voor tonen fulltext uit mambo global $db; //naam van de competitie //21-8-2005 17:23 link naar fulltext van artikels toegevoegd //5-9-2006 22:14 todo : verwijzing naar Mambo weghalen // aantal rondes ophalen ( = aantal ploegen - 1) // nodig voor bouwen van X keer een link naar de ronde /* versie 2005 $sql = "SELECT k.klasse, k.mambo, mc.fulltext FROM tblseizoenen s inner join tblsystem sys on sys.fvalue = s.sid inner join tblcompetities c on c.fk_seizoen = s.sid inner join tblklasse k on c.klasse = k.kid inner join mos_content mc on mc.id = k.fk_artikel_id where sys.fkey = 'curr_year' and c.cid = $cid"; */ $sql = "SELECT k.klasse, c.tekst FROM tblseizoenen s inner join tblsystem sys on sys.fvalue = s.sid inner join tblcompetities c on c.fk_seizoen = s.sid inner join tblklasse k on c.klasse = k.kid where sys.fkey = 'curr_year' and c.cid = $cid"; //echo "$sql
"; $competitie = $db->get_row($sql); echo "
$competitie->klasse
"; //echo "

Klik mambo\" target=\_blank\">hier voor het gedetailleerd overzicht.

\n"; //$fulltext = $competitie->fulltext; //echo "$ft, $fulltext"; /* versie 2005 $sql = "SELECT pl.pid, pl.pnaam, count(wedstrijdpunten) aantal, sum(p.wedstrijdpunten) wp, sum(p.bordpunten) bp, club.cid FROM tblploegen pl inner join tblclubs club on club.cid = pl.fk_cid inner join tbldeelname d on d.fk_ploeg = pl.pid left join tblpunten p on pl.pid = p.fk_pid where d.fk_competitie = $cid group by pl.pid order by wp desc, aantal, bp desc, pnaam"; */ $sql = "SELECT pl.pid, pl.pnaam, count(wedstrijdpunten) aantal, sum(p.wedstrijdpunten) wp, sum(p.bordpunten) bp, club.cid FROM tblploegen pl inner join tblclubs club on club.cid = pl.fk_cid inner join tbldeelname d on d.fk_ploeg = pl.pid inner join tblwedstrijden w on d.fk_competitie = w.fk_cid left join tblpunten p on pl.pid = p.fk_pid and w.wid = p.fk_wid where d.fk_competitie = $cid group by pl.pid order by wp desc, aantal, bp desc, pnaam"; //echo "$sql
"; if($results = $db->get_results($sql)){ //namen en punten ophalen //13-11-2007 13:47 beker mag geen rooster zien if($_REQUEST[cid] != 32){ $hoog = 1; foreach($results as $r){ //print $r->pnaam . "
"; $namen[$hoog][pid]=$r->pid; $namen[$hoog][cid]=$r->cid; $namen[$hoog][volgorde]=$hoog; $namen[$hoog][naam]=$r->pnaam; $namen[$hoog][aantal]=$r->aantal; $namen[$hoog][wp]=$r->wp; $namen[$hoog][bp]=$r->bp; $hoog++; } $breed=$hoog - 1; //20-8-2005 was : + 1 for($i=1; $i<$hoog;$i++) { //ploegnamen in array for($j=1; $j<=$breed;$j++) { //echo "$i - $j
"; if($i == $j) { $namen[$i][$j]=".X."; }else{ $namen[$i][$j]="..."; } } } //thuisnummer, thuisresultaat, uitnummer, uitresultaat $sql = "SELECT fk_thuisploeg, r.rt, fk_uitploeg, r2.ru FROM tblwedstrijden w inner join tblresultaten r on w.fk_resultaat = r.rid inner join tblresultaten r2 on w.fk_resultaat = r2.rid where fk_cid = $cid"; if($results = $db->get_results($sql)){ foreach($results as $r){ //zoek plaats in array van dit ploegnummer //$thuis = $namen[] $size = count($namen); reset($namen); for($i = 1; $i <= $size; $i++){ if($namen[$i][pid] == $r->fk_thuisploeg){ //zoek uitploeg reset($namen); for($j = 1; $j <= $size; $j++){ if($namen[$j][pid] == $r->fk_uitploeg){ //zet thuisresultaat in de array $namen[$i][$j] = $r->rt; $namen[$j][$i] = $r->ru; } } } } } } echo "
\n"; echo "\n"; $be = 15+(80/$breed); $mi = 80/$breed; $ei = 5+(80/$breed); /* echo ""; for($j=1; $j<=$breed-1;$j++) { echo ""; } echo ""; */ echo ""; //20050820 was $j<=$breed-2 for($j=1; $j<=$breed;$j++) { echo ""; } echo "\n"; //20050820 was echo "\n"; for($i=1; $i<=$hoog-1;$i++) { if($namen[$i][cid] == $club){ echo ""; }else{ echo ""; } echo ""; echo ""; //namen echo ""; echo ""; echo ""; for($j=1; $j<=$breed;$j++) { echo ""; } echo "\n"; } echo "
wp # bp$j
Prom/Deg
" . $namen[$i][volgorde] . "" . $namen[$i][naam] . "" . $namen[$i][wp] . "" . $namen[$i][aantal] . "" . $namen[$i][bp] . "" . $namen[$i][$j] . "
\n"; /* vanaf 2006-2007 komt informatie uit de database //21-8-2005 17:27 fulltext tonen ? if($ft == 1){ echo "

$fulltext

"; } return "OK"; */ //het tekstveld met bijkomende informatie over de competitie //arr $competitie wordt gevuld bij ophalen naar comp. bovenaan de functie if($competitie->tekst){ echo "

$competitie->tekst

"; } } //13-11-2007 13:47 beker mag geen rooster zien //14-10-2006 16:19 //internal links echo"

Top 20 van beste individuele prestaties.

"; echo"

Teamoverzichten.

"; //5-9-2006 22:01 //todo : anchors voor ronden, opstelling, persoonlijk // link naar 'beste 10' (extern bestand van maken) individuele_resultaten($db, $cid); top10($db, $cid); individueel($db,$cid); }else{ echo "

Nog geen ploegen toegevoegd aan deze klasse.

"; } } function lijst_clubs(){ global $db; //todo enkel actief $sql = "select distinct c.cid, c.cnaam from tblclubs c inner join tblploegen p on c.cid = p.fk_cid inner join tbldeelname d on d.fk_ploeg = p.pid order by cnaam"; if($result = $db->get_results($sql)){ echo "

Overzicht van de clubs

\n"; echo "

"; foreach($result as $r){ echo "\n"; } echo "
cid\">$r->cnaam

\n"; } } function rooster_club($cid){ global $db; //clubnaam $sql = "SELECT cnaam FROM tblclubs where cid = $cid"; echo "

HSB-competitie : " . $db->get_var($sql) . "

"; $sql = "select distinct d.fk_competitie from tblploegen p inner join tblclubs c on c.cid = p.fk_cid inner join tbldeelname d on p.pid = d.fk_ploeg inner join tblcompetities co on co.cid = d.fk_competitie inner join tblseizoenen s on s.sid = co.fk_seizoen inner join tblsystem sys on sys.fvalue = s.sid where c.cid = $cid and sys.fkey = 'curr_year' order by d.fk_competitie"; //order by p.pnaam"; //echo "$sql
"; if($result = $db->get_results($sql)){ foreach($result as $r){ rooster($r->fk_competitie, $cid, 0); } } } function lijst_leiders(){ global $db; $sql = "SELECT c.cnaam, u.name FROM tblwedstrijdleiders AS wl INNER JOIN tblclubs AS c ON wl.fk_club = c.cid INNER JOIN mos_users AS u ON wl.fk_mos_user = u.id order by c.cnaam"; if($result = $db->get_results($sql)){ echo "

Overzicht van de aangemelde clubverantwoordelijken

\n"; echo "

"; foreach($result as $r){ echo "\n"; } echo "
$r->cnaam$r->name

\n"; } } function individuele_resultaten($db, $competitie){ //-- input : klasse van een seizoen / van lopend seizoen //-- voorlopig rating uit tblspelers halen /*versie 1 $sql = "SELECT w.ronde, w.wid, w.wdatum, pl.pnaam as naam1, pl2.pnaam as naam2, w.thuisrating, w.uitrating, p.pbordnummer, concat(s.voorletters, ' ',s.tussenvoegsel, ' ', s.naam) as tnaam, substring(s.rating from 1 for 4) as rating1, concat(s2.voorletters, ' ',s2.tussenvoegsel, ' ', s2.naam) as tnaam2, substring(s2.rating from 1 for 4) as rating2, rp.resultaat_ind FROM tblpartijen as p inner join tblschakers as s on p.fk_thuisspeler = s.sid inner join tblschakers as s2 on p.fk_uitspeler = s2.sid inner join tblresultaten_partij as rp on p.fk_resultaat_ind = rp.rpid inner join tblwedstrijden as w on p.fk_wid = w.wid inner join tblploegen as pl on w.fk_thuisploeg = pl.pid inner join tblploegen as pl2 on w.fk_uitploeg = pl2.pid where w.fk_cid = $competitie order by w.ronde, w.wdatum, p.pbordnummer"; */ $sql = "SELECT w.ronde, w.wid, w.wdatum, pl.pnaam as naam1, pl2.pnaam as uitnaam, w.thuisrating, w.uitrating, w.uitslagtekst, r.resultaat, p.pbordnummer, s.voorletters, s.tussenvoegsel, s.naam, substring(s.rating2 from 1 for 4) as rating1, s2.voorletters as voorletters2, s2.tussenvoegsel as tussenvoegsel2, s2.naam as naam2, substring(s2.rating2 from 1 for 4) as rating2, rp.resultaat_ind FROM tblwedstrijden as w inner join tblploegen as pl on w.fk_thuisploeg = pl.pid inner join tblploegen as pl2 on w.fk_uitploeg = pl2.pid left join tblpartijen as p on p.fk_wid = w.wid left join tblschakers as s on p.fk_thuisspeler = s.sid left join tblschakers as s2 on p.fk_uitspeler = s2.sid left join tblresultaten_partij as rp on p.fk_resultaat_ind = rp.rpid left join tblresultaten as r on w.fk_resultaat = r.rid where w.fk_cid = $competitie order by w.ronde, w.wdatum, w.wid, p.pbordnummer"; //echo "$sql
"; if($result = $db->get_results($sql)){ echo "\n"; foreach($result as $r){ //nieuw resultaat binnen dezelfde ronde? if($r->ronde == $ronde){ //dezelfde wedstrijd? //als niet, eerst een lege rij, dan het wedstrijdresultaat en de eerste partij if($r->wid == $wedstrijd) { $result = FormatResult($r->resultaat_ind); echo "\n"; if($r->pbordnummer == 8){ echo "\n"; } }else{ //nieuwe wedstrijd //de wedstrijdresultaat //een lege rij als er individuele resultaten zijn ingevuld if($r->pbordnummer){ //echo "\n"; echo "\n"; } //dan wedstrijdresultaat echo "\n"; //echo "\n"; //13-11-2007 14:12 is er een opmerking bij de wedstrijd? if($r->uitslagtekst){ echo ""; } //en eerste bord //als een ind. resultaat bestaat if($r->pbordnummer) { $result = FormatResult($r->resultaat_ind); echo "\n"; } $wedstrijd = $r->wid; } }else{ //eerst lege rij echo "\n"; //nieuwe ronde echo "\n"; //nieuwe wedstrijd //eerst lege rij echo "\n"; //dan wedstrijdresultaat echo "\n"; //en eerste bord //als een ind. resultaat bestaat if($r->pbordnummer) { $result = FormatResult($r->resultaat_ind); echo "\n"; } $ronde = $r->ronde; $wedstrijd = $r->wid; } } echo "
$r->pbordnummer.$r->naam $r->voorletters $r->tussenvoegsel$r->rating1 - $r->naam2 $r->voorletters2 $r->tussenvoegsel2$r->rating2$result
 
 
$r->wdatum
 $r->naam1$r->thuisrating-$r->uitnaam$r->uitrating$r->resultaat
$r->wdatum : $r->naam1 $r->thuisrating - $r->uitnaam $r->uitrating$r->resultaat
$r->uitslagtekst
$r->pbordnummer.$r->naam $r->voorletters $r->tussenvoegsel$r->rating1 - $r->naam2 $r->voorletters2 $r->tussenvoegsel2$r->rating2$result
 
ronde\">". $r->ronde."e ronde.
$r->wdatum
 $r->naam1$r->thuisrating-$r->uitnaam$r->uitrating$r->resultaat
$r->pbordnummer.$r->naam $r->voorletters $r->tussenvoegsel$r->rating1 - $r->naam2 $r->voorletters2 $r->tussenvoegsel2$r->rating2$result
"; } } function top10($db,$competitieid = 21){ $sql = "SELECT fk_sid, s.naam, s.voorletters, s.tussenvoegsel, c.cnaam, fk_pid, sum( pppunten ) AS punten, count( pppunten ) AS aantal FROM tblpunten_partij pp INNER JOIN tblschakers s ON pp.fk_sid = s.sid INNER JOIN tblwedstrijden w ON pp.fk_pid = w.wid INNER JOIN tblclubs c on s.cknsbnr = c.cknsbnr WHERE w.fk_cid = $competitieid AND s.sid not in(1434, 1435) GROUP BY fk_sid, s.naam, s.voorletters, s.tussenvoegsel, c.cnaam ORDER BY punten DESC, aantal ASC, s.naam desc LIMIT 20"; if($arrSchakers = $db->get_results($sql)){ //echo "
Top 20 (in absolute punten)
"; echo "
Top 20 (in absolute punten)
"; echo ""; echo ""; foreach($arrSchakers as $s){ echo ""; } echo "
NaamClubPuntenPartijen
$s->naam $s->voorletters $s->tussenvoegsel$s->cnaam$s->punten$s->aantal
"; }else{ echo "Fout bij ophalen gegevens."; } } function individueel($db,$competitieid = 21){ $sql = "SELECT pp.fk_sid, s.naam, s.voorletters, s.tussenvoegsel, pl.pnaam, sum(pp.pppunten) as punten, avg(pp.ppbord) as bord, count(pp.ppid) as partijen from tblpunten_partij pp inner join tblpartijen p on pp.fk_partij = p.pid inner join tblwedstrijden w on p.fk_wid = w.wid inner join tblschakers s on pp.fk_sid = s.sid inner join tblploegen pl on pp.fk_ploeg = pl.pid where w.fk_cid = $competitieid group by pp.fk_sid, s.naam, s.voorletters, pl.pnaam order by pl.pnaam, bord, punten desc"; if($arrSchakers = $db->get_results($sql)){ //echo "
Top 20 (in absolute punten)
"; echo "
Overzicht per team
"; echo ""; $ploeg = ""; $i = 0; foreach($arrSchakers as $s){ if($s->pnaam == $ploeg){ $i++; echo "\n"; }else{ $i = 1; //ploeggegevens en header echo "\n"; echo "\n"; $i = 1; //1ste speler echo "\n"; } $ploeg = $s->pnaam ; } echo "
$i. $s->naam $s->voorletters $s->tussenvoegsel $s->partijen $s->punten " . substr($s->bord, 0, 4) . "
$s->pnaam Partijen Punten Bord
$i. $s->naam $s->voorletters $s->tussenvoegsel $s->partijen $s->punten " . substr($s->bord, 0, 4) . "
"; }else{ echo "Fout bij ophalen gegevens."; } } function FormatResult($result) { //$result = str_replace(" ", "", $result); switch($result) { case "0,5 - 0,5": return "½ - ½"; case "0,5 - 0,5 (R)": return "   ½ - ½(R)"; case "1 - 0 (R)": return "   1 - 0(R)"; case "0 - 1 (R)": return "   0 - 1(R)"; case "0 - 0 (R)": return "   0 - 0(R)"; default: return $result; } } ?>