function get_data_years($minimum, $show_abs, $cbs, $regio, $nr, $oms, $geslacht, $start_lft, $end_lft, $scale, $huishoudens, $target, $rand, $indicator, $pijler, $tables, $years, $cols, $num_decimals)
{
global $dbh;
$gemjaar = 2015;
$stringtables = implode('-', $tables);
$stringyears = implode('-', $years);
$stringcols = implode('-', $cols);
if ($regio) {
$table_id = 'RAS' . $nr . 'compare_years,' . $target . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $show_abs . ',' . $num_decimals . ',' . $minimum;
} else {
$table_id = $nr . 'compare_years,' . $target . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $show_abs . ',' . $num_decimals . ',' . $minimum;
}
if ($regio) {
$graph_id = $nr . 'compare_years,' . $target . ',' . $regio . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $minimum;
} else {
$graph_id = $nr . 'compare_years,' . $target . ',' . $cbs . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $minimum;
}
if ($regio) {
$map_id = $nr . 'compare_years,' . $target . ',RAS' . $regio . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $minimum;
} else {
$map_id = $nr . 'compare_years,' . $target . ',' . $cbs . ',' . $stringtables . ',' . $stringyears . ',' . $stringcols . ',' . $geslacht . ',' . $start_lft . ',' . $end_lft . ',' . $scale . ',' . $minimum;
}
$cell_id = $nr . ',' . $stringyears;
$variable_id = $nr;
$i = 0;
foreach ($years as $value) {
if ($cbs) {
if ($geslacht != '') {
$q = $dbh->prepare("select {$cols[$i]} AS val{$i} from riz_{$tables[$i]} where cbs_cd =:cbs");
$q->bindParam(':cbs', $cbs);
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev{$i} from riz_bevolking\r\n where riz_bevolking.cbs_cd =:cbs\r\n and riz_bevolking.jaar =:jaar\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft");
$q_bev->bindParam(':cbs', $cbs);
$q_bev->bindParam(':jaar', $value);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
} else {
if (!$j) {
$j = 0;
}
$q = $dbh->prepare("select {$cols[$j]} AS val{$i} from riz_{$tables[$i]} where cbs_cd =:cbs");
$q->bindParam(':cbs', $cbs);
$j++;
$q_bev = $dbh->prepare("select {$cols[$j]} AS bev{$i} from riz_{$tables[$i]} where cbs_cd = {$cbs}");
$q_bev->bindParam(':cbs', $cbs);
$j++;
}
}
if ($regio) {
if ($geslacht != '') {
$q = $dbh->prepare("select sum({$cols[$i]}) AS val{$i} from riz_{$tables[$i]}, riz_gemeentejaar_regio\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd = {$regio}\r\n and riz_gemeentejaar_regio.jaar = {$gemjaar}");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev{$i}\r\n from riz_bevolking, riz_gemeentejaar_regio, riz_{$tables[$i]}\r\n where riz_bevolking.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_bevolking.cbs_cd = riz_{$tables[$i]}.cbs_cd\r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar\r\n and riz_bevolking.jaar =:value\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft\r\n and riz_{$tables[$i]}.{$cols[$i]} IS NOT NULL");
$q_bev->bindParam(':regio', $regio);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $value);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
} else {
if (!$j) {
$j = 0;
}
$q = $dbh->prepare("select sum({$cols[$j]}) AS val{$i} from riz_{$tables[$i]}, riz_gemeentejaar_regio\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
$j++;
$q_bev = $dbh->prepare("select sum({$cols[$j]}) AS bev{$i} from riz_{$tables[$i]}, riz_gemeentejaar_regio\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
$j++;
}
}
$q->execute();
$result = $q->fetch();
$val[$i] = $result['val' . $i];
$q_bev->execute();
$result = $q_bev->fetch();
$bev[$i] = $result['bev' . $i];
$i++;
}
$i = 0;
$max = max(array_keys($val));
foreach ($val as $value) {
if ($val[$i] > 0) {
$rel[$i] = $val[$i] / $bev[$i] * $scale;
}
$i++;
}
if ($val[0]) {
$val0_scr = duizendtallen($val[0]);
} else {
$val0_scr = '-';
}
$val1_scr = duizendtallen($val[$max]);
if ($show_abs == false) {
$val0_scr = '-';
$val1_scr = '-';
}
if ($rel[0] > 999) {
$rel0_scr = duizendtallen($rel[0]);
$rel1_scr = duizendtallen($rel[$max]);
}
if ($rel[0]) {
$rel0_scr = decimalen($rel[0], $num_decimals);
}
if ($rel[$max]) {
$rel1_scr = decimalen($rel[$max], $num_decimals);
}
if ($rel[$max] == 0 && $target == 'low') {
$rel1_scr = 0.0;
}
if (is_null($rel[$max]) && $nr != 2246 && $nr != 2245) {
$rel1_scr = '-';
$val1_scr = '-';
}
if ($val[$max] > $minimum) {
if ($target == "low") {
$index = round($rel[0] / $rel[$max] * 100, 0);
if ($rel[$max] == 0) {
$index = 500;
}
}
if ($target == "high" && $rel[0] != 0) {
$index = round($rel[$max] / $rel[0] * 100, 0);
}
}
if ($minimum == false && $val[0] == 0 && $val[$max] == 0) {
$index = 100;
}
if ($minimum == false && $val[0] > 4 && $val[$max] == 0 && $target == 'low') {
$index = 500;
}
if (!$index) {
$index = '-';
}
//TOTALEN (provincie of gelijksoortige gemeenten)
$i = 0;
$j = 0;
foreach ($years as $value) {
if ($cbs) {
$kenmerk = get_stedelijkheid($cbs);
if ($geslacht != '') {
$q = $dbh->prepare("select sum({$cols[$i]}) AS val{$i} from riz_{$tables[$i]}, riz_gemeentejaar_achtergrondkenmerken\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \r\n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\r\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:kenmerk\r\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar");
$q->bindParam(':kenmerk', $kenmerk);
$q->bindParam(':gemjaar', $gemjaar);
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev{$i}\r\n from riz_bevolking, riz_gemeentejaar_achtergrondkenmerken, riz_{$tables[$i]}\r\n where riz_bevolking.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \r\n and riz_bevolking.cbs_cd = riz_{$tables[$i]}.cbs_cd\r\n and riz_{$tables[$i]}.{$cols[$i]} IS NOT NULL\r\n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\r\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:kenmerk\r\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar\r\n and riz_bevolking.jaar =:jaar\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft");
$q_bev->bindParam(':kenmerk', $kenmerk);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $value);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
} else {
if (!$j) {
$j = 0;
}
$q = $dbh->prepare("select sum({$cols[$j]}) AS val{$i} from riz_{$tables[$i]}, riz_gemeentejaar_achtergrondkenmerken\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \r\n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\r\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:kenmerk\r\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar");
$q->bindParam(':kenmerk', $kenmerk);
$q->bindParam(':gemjaar', $gemjaar);
$j++;
$q_bev = $dbh->prepare("select sum({$cols[$j]}) AS bev{$i} from riz_{$tables[$i]}, riz_gemeentejaar_achtergrondkenmerken\r\n where riz_{$tables[$i]}.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \r\n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\r\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:kenmerk\r\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar");
$q_bev->bindParam(':kenmerk', $kenmerk);
$q_bev->bindParam(':gemjaar', $gemjaar);
$j++;
}
} else {
//provincie
if ($geslacht != '') {
$q = $dbh->prepare("select sum({$cols[$i]}) AS val{$i} from riz_{$tables[$i]}");
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev{$i} from riz_bevolking, riz_{$tables[$i]} \r\n where riz_bevolking.jaar=:jaar\r\n and riz_bevolking.cbs_cd = riz_{$tables[$i]}.cbs_cd\r\n and riz_{$tables[$i]}.{$cols[$i]} IS NOT NULL\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft");
$q_bev->bindParam(':jaar', $value);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
} else {
if (!$j) {
$j = 0;
}
$q = $dbh->prepare("select sum({$cols[$j]}) AS val{$i} from riz_{$tables[$i]}");
$j++;
$q_bev = $dbh->prepare("select sum({$cols[$j]}) AS bev{$i} from riz_{$tables[$i]}");
$j++;
}
}
$q->execute();
$result = $q->fetch();
$val_tot[$i] = $result['val' . $i];
$q_bev->execute();
$result = $q_bev->fetch();
$bev[$i] = $result['bev' . $i];
$i++;
}
$i = 0;
foreach ($val_tot as $value) {
$rel_tot[$i] = $val_tot[$i] / $bev[$i] * $scale;
$i++;
}
$val0_tot_scr = duizendtallen($val_tot[0]);
$val1_tot_scr = duizendtallen($val_tot[$max]);
if ($show_abs == false) {
$val0_tot_scr = '-';
$val1_tot_scr = '-';
}
if ($rel_tot[0] > 999) {
$rel0_tot_scr = duizendtallen($rel_tot[0]);
$rel1_tot_scr = duizendtallen($rel_tot[$max]);
} else {
$rel0_tot_scr = decimalen($rel_tot[0], $num_decimals);
$rel1_tot_scr = decimalen($rel_tot[$max], $num_decimals);
}
if ($target == "low") {
$index_tot = round($rel_tot[0] / $rel_tot[$max] * 100, 0);
}
if ($target == "high" && $rel_tot[$max] > 0) {
$index_tot = round($rel_tot[$max] / $rel_tot[0] * 100, 0);
}
if ($target == "high" && $rel_tot[0] == 0 && $rel_tot[$max] == 0) {
$index_tot = 100;
}
echo "<tr class=tabelrow><td align=left class=cell_variable_text>{$oms}<a href=# title='naar tabel' class=getTable id={$table_id}><img src=images/table.png class=barometer_image></a>";
echo " <a href=# title='naar grafiek' class=getGraph id={$graph_id}><img src=images/graph.png></a>";
echo " <a href=# title='naar kaart' class=getMap id={$map_id}><img src=images/map.png></a>";
echo "</td><td class=cell_variable_image><a href=# title='naar toelichting' class=getVariable id={$variable_id}>\r\n <img src=images/red.png class=image_toelichting></a></td>\r\n <td align=right>{$val0_scr}</td>\r\n <td align=right class=cell_toelichting_text>{$rel0_scr}</td>\r\n <td class=cell_toelichting_image><a href=# title='naar toelichting' class=getCell id={$cell_id}.0>\r\n <img src=images/red.png class=image_toelichting></a></td>\r\n <td align=right colspan=2>100</td>\r\n <td align=right>{$val1_scr}</td>\r\n <td align=right class=cell_toelichting_text>{$rel1_scr}</td>\r\n <td class=cell_toelichting_image><a href=# title='naar toelichting' class=getCell id={$cell_id}.{$max}>\r\n <img src=images/red.png class=image_toelichting></a></td>\r\n <td align=right colspan=2>{$index}</td>\r\n <td align=right>{$val0_tot_scr}</td>\r\n <td align=right class=cell_toelichting_text>{$rel0_tot_scr}</td> \r\n <td class=cell_toelichting_image><a href=# title='naar toelichting' class=getCell id={$cell_id}.0>\r\n <img src=images/red.png class=image_toelichting></a></td>\r\n <td align=right>100</td>\r\n <td align=right>{$val1_tot_scr}</td>\r\n <td align=right class=cell_toelichting_text>{$rel1_tot_scr}</td> \r\n <td class=cell_toelichting_image><a href=# title='naar toelichting' class=getCell id={$cell_id}.{$max}>\r\n <img src=images/red.png class=image_toelichting></a></td>\r\n\r\n <td align=right>{$index_tot}</td>";
echo "</tr>";
if ($index == '-') {
$index = null;
}
$q = $dbh->prepare("insert into t{$rand} (val1,val2) values (:index,:index_tot)");
$q->bindParam(':index', $index);
$q->bindParam(':index_tot', $index_tot);
$q->execute();
}
function get_data_bedrijvenregister($cbs, $oms, $regio, $cbs2, $regio2, $bev)
{
global $dbh;
$gemjaar = 2015;
//bepaal laatste jaar
$q = $dbh->prepare("select max(jaar) AS jaar from riz_rm_bedrijvenregister_jaren");
$q->execute();
$result = $q->fetch();
$jaar = $result[jaar];
$col = 'totwp';
if ($cbs) {
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar} where cbs_cd =:cbs");
$q->bindParam(':cbs', $cbs);
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev from riz_bevolking \n where riz_bevolking.cbs_cd =:cbs\n and riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':cbs', $cbs);
$q_bev->bindParam(':jaar', $jaar);
}
}
if ($regio) {
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar}, riz_gemeentejaar_regio\n where riz_rm_bedrijvenregister{$jaar}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev\n from riz_bevolking, riz_gemeentejaar_regio\n where riz_bevolking.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio\n and riz_gemeentejaar_regio.jaar =:gemjaar\n and riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':regio', $regio);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $jaar);
}
}
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
if ($bev == false) {
$totaal_scr = duizendtallen($val1);
} else {
$q_bev->execute();
$result2 = $q_bev->fetch();
$bev = $result2[bev];
$totaal_scr = decimalen($val1 / $bev * 100, 1);
}
//stedelijkheid
if ($cbs) {
$stedelijk_cd = get_stedelijkheid($cbs);
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar}, riz_gemeentejaar_achtergrondkenmerken\n where riz_rm_bedrijvenregister{$jaar}.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:stedelijk_cd\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar");
$q->bindParam(':stedelijk_cd', $stedelijk_cd);
$q->bindParam(':gemjaar', $gemjaar);
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev\n from riz_bevolking, riz_gemeentejaar_achtergrondkenmerken\n where riz_bevolking.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:stedelijk_cd\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar\n and riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':stedelijk_cd', $stedelijk_cd);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $jaar);
}
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
if ($bev == false) {
$totaal_sted_scr = duizendtallen($val1);
} else {
$q_bev->execute();
$result2 = $q_bev->fetch();
$bev = $result2[bev];
$totaal_sted_scr = decimalen($val1 / $bev * 100, 1);
}
}
if ($cbs2) {
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar} where cbs_cd =:cbs2");
$q->bindParam(':cbs2', $cbs2);
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev from riz_bevolking \n where riz_bevolking.cbs_cd =:cbs2\n and riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':cbs2', $cbs2);
$q_bev->bindParam(':jaar', $jaar);
}
}
if ($regio2) {
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar}, riz_gemeentejaar_regio\n where riz_rm_bedrijvenregister{$jaar}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio2\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio2', $regio2);
$q->bindParam(':gemjaar', $gemjaar);
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev\n from riz_bevolking, riz_gemeentejaar_regio\n where riz_bevolking.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio2\n and riz_gemeentejaar_regio.jaar =:gemjaar\n and riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':regio2', $regio2);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $jaar);
}
}
if ($cbs2 || $regio2) {
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
if ($bev == false) {
$totaal2_scr = duizendtallen($val1);
} else {
$q_bev->execute();
$result2 = $q_bev->fetch();
$bev = $result2[bev];
$totaal2_scr = decimalen($val1 / $bev * 100, 1);
}
}
$q = $dbh->prepare("select sum({$col}) AS val1 from riz_rm_bedrijvenregister{$jaar}");
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
if ($bev == true) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.totaal) AS bev from riz_bevolking \n where riz_bevolking.jaar =:jaar\n and leeftijd >= 15\n and leeftijd < 65");
$q_bev->bindParam(':jaar', $jaar);
$q_bev->execute();
$result2 = $q_bev->fetch();
$bev = $result2[bev];
$totaal_prov_scr = decimalen($val1 / $bev * 100, 1);
} else {
$totaal_prov_scr = duizendtallen($val1);
}
if ($cbs && !$cbs2 && !$regio2) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal_sted_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($cbs && ($cbs2 || $regio2)) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal2_scr}</td>\n <td align=right>{$totaal_sted_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($regio && !$cbs2 && !$regio2) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($regio && ($cbs2 || $regio2)) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal2_scr}</td>\n <td align=right>{$totaal_prov_scr}</td></tr>";
}
return $table_row;
}
echo "<td align=right>{$perc}</td>";
unset($temp_totaal);
echo "</tr>";
}
}
echo "</tbody>";
echo "<tfoot>";
//totalen
echo "<tr>";
echo "<td class=tabelfooter align=left>totaal</td>";
if ($cbsarray && !$select_eigen_regio) {
foreach ($totaal as $value) {
$totaal = duizendtallen(round($value));
echo "<td class=tabelfooter align=right>{$totaal}</td>";
echo "<td class=tabelfooter align=right>100</td>";
}
}
if ($pzh || $regio || $select_eigen_regio) {
$totaal = duizendtallen(round($totaal));
echo "<td class=tabelfooter align=right>{$totaal}</td>";
echo "<td class=tabelfooter align=right>100</td>";
}
echo "</tr>";
echo "</tfoot>";
echo "</table>";
echo "<div class=bron>Bron: {$bron}</div>";
include '../scripts/select.php';
include '../../pagefooter.php';
echo "</body>";
echo "</html>";
}
function get_data(&$notes, $cbs, $regio, $nr, $col, $jaar, $val, $geslacht, $start_lft, $end_lft, $scale, $num_decimals, $eenheid, $toelichting_id, $pdf, $field_width)
{
$gemjaar = 2015;
global $dbh;
if (!$toelichting_id) {
$toelichting_id = $nr;
}
if ($nr == 9999 && !$val) {
if ($pdf != true) {
echo "<td align=right colspan=3>-</td>";
}
if ($pdf == true) {
$data = '<td align="right" colspan="2">- </td>';
return $data;
}
} elseif ($nr == 9999 && $val && !$geslacht) {
if ($pdf != true) {
echo "<td align=right class=year>{$jaar}</td>";
echo "<td align=right class=cell_variable_text>{$val} {$eenheid}</td><td class=cell_variable_image><a href=# title='naar toelichting' class=getToelichting id={$toelichting_id}>\r\n <img src=images/red.png class=image_toelichting></a></td>";
}
if ($pdf == true) {
$notes[] = $toelichting_id;
end($notes);
$key = key($notes);
$data = '<td align="right" width="4%">' . $jaar . ' </td><td align="right" width="' . $field_width . '">' . $val . ' ' . $eenheid . '<sup>' . $key . '</sup> </td>';
return $data;
}
} elseif ($nr == 9999 && $geslacht) {
if ($cbs) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev from riz_bevolking \r\n where riz_bevolking.cbs_cd =:cbs\r\n and riz_bevolking.jaar =:jaar\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft");
$q_bev->bindParam(':cbs', $cbs);
$q_bev->bindParam(':jaar', $jaar);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
}
if ($regio) {
$q_bev = $dbh->prepare("select sum(riz_bevolking.{$geslacht}) AS bev\r\n from riz_bevolking, riz_gemeentejaar_regio\r\n where riz_bevolking.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar\r\n and riz_bevolking.jaar =:jaar\r\n and leeftijd >= :start_lft\r\n and leeftijd < :end_lft");
$q_bev->bindParam(':regio', $regio);
$q_bev->bindParam(':gemjaar', $gemjaar);
$q_bev->bindParam(':jaar', $jaar);
$q_bev->bindParam(':start_lft', $start_lft);
$q_bev->bindParam(':end_lft', $end_lft);
}
$q_bev->execute();
$result = $q_bev->fetch();
$bev = $result[bev];
$val = duizendtallen($val * $bev / $scale);
if ($pdf != true) {
echo "<td align=right class=year>{$jaar}</td>";
echo "<td align=right class=cell_variable_text>{$val} {$eenheid}</td><td class=cell_variable_image><a href=# title='naar toelichting' " . "class=getToelichting id={$toelichting_id}>\r\n <img src=images/red.png class=image_toelichting></a></td>";
}
if ($pdf == true) {
$notes[] = $toelichting_id;
end($notes);
$key = key($notes);
$data = '<td align="right" width="4%">' . $jaar . ' </td><td align="right" width="' . $field_width . '">' . $val . ' ' . $eenheid . '<sup>' . $key . '</sup> </td>';
return $data;
}
} else {
$table = 'riz_' . $nr;
$ini = parse_ini_file("../ris/ini/{$nr}.ini", TRUE);
//bepaal laatste jaar en juiste kolommen
$ini_headers = implode(',', $ini['headers']);
$headers = explode(',', $ini_headers);
$count = count($headers);
$last_col = $count - 1;
rsort($headers);
if ($col == false) {
$col = 'val' . $last_col;
}
//haal laatste jaar op
$q = $dbh->prepare("select eindjaar from riz_bestanden where nr =:nr");
$q->bindParam(':nr', $nr);
$q->execute();
$result = $q->fetch();
$peildatum = $result[eindjaar];
if ($cbs) {
$q = $dbh->prepare("select {$col} AS val1 from {$table} where cbs_cd =:cbs");
$q->bindParam(':cbs', $cbs);
}
if ($regio) {
if (strpos($col, 'sum') === false) {
$q = $dbh->prepare("select sum({$col}) AS val1 from {$table}, riz_gemeentejaar_regio\r\n where {$table}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
} else {
$q = $dbh->prepare("select {$col} AS val1 from {$table}, riz_gemeentejaar_regio\r\n where {$table}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \r\n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\r\n and riz_gemeentejaar_regio.regio_cd =:regio\r\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
}
}
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
if (is_null($val1)) {
$val1 = '-';
} elseif ($val1 > 99) {
$val1 = duizendtallen($val1);
} else {
$val1 = decimalen($val1, $num_decimals);
}
if ($pdf != true) {
echo "<td align=right class=year>{$peildatum}</td><td align=right class=cell_variable_text>{$val1} {$eenheid}</td><td class=cell_variable_image><a href=# title='naar toelichting' class=getToelichting id={$toelichting_id}>\r\n <img src=images/red.png class=image_toelichting></a></td>";
}
if ($pdf == true) {
$notes[] = $toelichting_id;
end($notes);
$key = key($notes);
$data = '<td align="right" width="4%">' . $peildatum . ' </td><td align="right" width="' . $field_width . '">' . $val1 . ' ' . $eenheid . '<sup>' . $key . '</sup> </td>';
return $data;
}
}
}
$l35_44 = $row[l35_44];
$l45_54 = $row[l45_54];
$l55_64 = $row[l55_64];
$l65 = $row[l65];
$l15_24_scr = duizendtallen($l15_24);
$l25_34_scr = duizendtallen($l25_34);
$l35_44_scr = duizendtallen($l35_44);
$l45_54_scr = duizendtallen($l45_54);
$l55_64_scr = duizendtallen($l55_64);
$l65_scr = duizendtallen($l65);
echo "<tr class=tabelrow>";
echo "<td>{$jaar}</td>";
echo "<td align=right>{$l15_24_scr}</td>";
echo "<td align=right>{$l25_34_scr}</td>";
echo "<td align=right>{$l35_44_scr}</td>";
echo "<td align=right>{$l45_54_scr}</td>";
echo "<td align=right>{$l55_64_scr}</td>";
echo "<td align=right>{$l65_scr}</td>";
$totaal = duizendtallen($l15_24 + $l25_34 + $l35_44 + $l45_54 + $l55_64 + $l65);
echo "<td align=right>{$totaal}</td>";
echo "</tr>";
}
echo "</tbody>";
echo "</table>";
echo "<div class=bron>Bron: {$bron}</div>";
include '../scripts/select.php';
include '../pagefooter.php';
?>
</body>
</html>
}
if ($num_fields > 9) {
$s = $r + 1;
if (is_null($field[$s])) {
$field_scr[$s] = '-';
} else {
$field_scr[$s] = duizendtallen($field[$s]);
}
echo "<td align=right>{$field_scr[$s]}</td>";
}
if ($num_fields > 10) {
$t = $s + 1;
if (is_null($field[$t])) {
$field_scr[$t] = '-';
} else {
$field_scr[$t] = duizendtallen($field[$t]);
}
echo "<td align=right>{$field_scr[$t]}</td>";
}
echo "</tr>";
//alleen bij nieuwe sessie data naar tijdelijke tabel sturen
if ($session == 'new') {
if (strstr($cwi, 'rpa') || strstr($cwi, 'amr')) {
if ($num_fields == 1) {
$q = $dbh->prepare("insert into t{$session_rand} (rpa,peildatum,{$insert_fields})\t\n values (:rpa,:peildatum,:fieldj)");
$q->bindParam(':rpa', $rpa);
$q->bindParam(':peildatum', $peildatum);
$q->bindParam(':fieldj', $field[$j]);
}
if ($num_fields == 2) {
$q = $dbh->prepare("insert into t{$session_rand} (rpa,peildatum,{$insert_fields})\t\n values (:rpa,:peildatum,:fieldj,:fieldk)");
}
if (strstr($_SESSION["session_agg"], 'sbi')) {
$q2 = $dbh->prepare("select sbi_oms from riz_rm_sbicodes where sbi_cd =:sbi_cd");
$q2->bindParam(':sbi_cd', $sbi_cd);
$q2->execute();
$result2 = $q2->fetch();
$sbi_oms = $result2[sbi_oms];
echo "<td align=left>{$sbi_oms}</td>";
}
//plaats geselecteerde kolommen in header
//kijk hiervoor naar array in sessie
$q2 = $dbh->prepare("select * from riz_rm_bedrijvenregister order by bedrijvenregister_cd");
$q2->execute();
$results2 = $q2->fetchAll(PDO::FETCH_ASSOC);
for ($j = 0; $j < count($results2); $j++) {
$data = $results2[$j][bedrijvenregister_db];
if (in_array('SUM(' . $data . ') AS ' . $data, $_SESSION[session_bedrijvenregister])) {
$val = $results[$i][$data];
$val = duizendtallen($val);
echo "<td ALIGN=right>{$val}</td>";
}
}
}
echo "</tr>";
}
echo "</tbody></table><br>";
echo "<div class=bron>Bron: {$bron}</div>";
echo "<br><a href=\"{$nr}.php?nr={$nr}&table={$table}&bar=false&search_string1={$search_string1}&search_string2={$search_string2}&operator={$operator}&sl0_cd={$sl0_cd}&sl1_cd={$sl1_cd}&sl2_cd={$sl2_cd}&actie={$actie}\" class=button>wijzig selectie >> </a>";
include '../../pagefooter.php';
echo "</BODY>";
echo "</HTML>";
echo "</tr></tbody>";
//totalen
echo "<tfoot><tr>";
echo "<td class=tabelfooter>totaal</td>";
//bekende jaren
$num_years = count($jaren);
for ($i = 0; $i < $num_years; $i++) {
$tot[$i] = $tot_uitstroom_mbo_niv1[$i] + $tot_uitstroom_mbo_niv2[$i] + $tot_uitstroom_mbo_niv3[$i] + $tot_uitstroom_mbo_niv4[$i] + $tot_uitstroom_hbo[$i] + $tot_uitstroom_wo[$i];
$tot_scr[$i] = duizendtallen($tot[$i]);
echo "<td class=tabelfooter align=right>{$tot_scr[$i]}</td>";
}
//toekomstige jaren
$num_future_years = count($toekomstjaren);
for ($i = 0; $i < $num_future_years; $i++) {
$tot_aanbod[$i] = $tot_uitstroom_mbo_toekomst_niv1[$i] + $tot_uitstroom_mbo_toekomst_niv2[$i] + $tot_uitstroom_mbo_toekomst_niv3[$i] + $tot_uitstroom_mbo_toekomst_niv4[$i] + $tot_uitstroom_hbo_toekomst[$i] + $tot_uitstroom_wo_toekomst[$i];
$tot_aanbod_scr[$i] = duizendtallen($tot_aanbod[$i]);
echo "<td class=tabelfooter align=right>{$tot_aanbod_scr[$i]}</td>";
}
$_SESSION["toekomstjaren"] = $toekomstjaren;
$_SESSION["tot_aanbod"] = $tot_aanbod;
echo "</tr></tfoot>";
echo "</table>";
echo "<div class=bron>Bron: CBS, DUO, Ministerie van OCW; bewerking Tympaan Instituut</div>";
include '../scripts/select.php';
echo "<br><br><br>";
echo "</div>";
echo "<div id=contentright>";
//BEGIN FORMULIER
echo "<form action={$_SERVER['PHP_SELF']} method=post>";
echo "<input type=hidden name=sbi value={$sbi}>";
echo "<input type=hidden name=rpa value={$rpa}>";
//verminder aantal geslaagden met doorstroompercentage
$doorstroom = $user_doorstroom_wo_perc * $uitstroom_wo_toekomst / 100;
$uitstroom_wo_toekomst = round($uitstroom_wo_toekomst - $doorstroom, 0);
$uitstroom_wo_toekomst_scr = duizendtallen($uitstroom_wo_toekomst);
echo "<td align=right>{$uitstroom_wo_toekomst_scr}</td>";
$tot_uitstroom_wo_toekomst[] = $uitstroom_wo_toekomst;
unset($uitstroom_wo_toekomst);
} else {
//als we geen 1e jaars hebben, trek dan trend van de laatste jaren door
$num_years = count($tot_uitstroom_wo_toekomst);
$uitstroom_wo_toekomst = $tot_uitstroom_wo_toekomst[$num_years - 1] - ($tot_uitstroom_wo_toekomst[$num_years - 2] - $tot_uitstroom_wo_toekomst[$num_years - 1]);
//doorgetrokken trend mag niet negatief zijn
if ($uitstroom_wo_toekomst < 0) {
$uitstroom_wo_toekomst = 0;
}
$uitstroom_wo_toekomst_scr = duizendtallen($uitstroom_wo_toekomst);
echo "<td align=right>{$uitstroom_wo_toekomst}</td>";
$tot_uitstroom_wo_toekomst[] = $uitstroom_wo_toekomst;
unset($uitstroom_wo_toekomst);
}
}
echo "</tr></tbody>";
//totalen
echo "<tfoot><tr>";
echo "<td class=tabelfooter>totaal</td>";
//bekende jaren
$num_years = count($jaren);
for ($i = 0; $i < $num_years; $i++) {
$tot[$i] = $tot_uitstroom_mbo_niv1[$i] + $tot_uitstroom_mbo_niv2[$i] + $tot_uitstroom_mbo_niv3[$i] + $tot_uitstroom_mbo_niv4[$i] + $tot_uitstroom_hbo[$i] + $tot_uitstroom_wo[$i];
echo "<td class=tabelfooter align=right>{$tot[$i]}</td>";
}
function get_data_abs($cbs, $nr, $oms, $regio, $cbs2, $regio2, $col, $eindjaar)
{
//global $this->dbh;
$gemjaar = 2015;
$ini = parse_ini_file("../ris/ini/{$nr}.ini", TRUE);
//bepaal laatste jaar en juiste kolommen
$ini_headers = implode(',', $ini['headers']);
$headers = explode(',', $ini_headers);
$count = count($headers);
$last_col = $count - 1;
rsort($headers);
$jaar = $headers[0];
if ($eindjaar == true) {
$q = $this->dbh->prepare("select eindjaar from riz_bestanden where nr =:nr");
$q->bindParam(':nr', $nr);
$q->execute();
$result = $q->fetch();
$jaar = $result[eindjaar];
}
if ($col) {
$col = $col;
} else {
$col = 'val' . $last_col;
}
$table = 'riz_' . $nr;
if ($cbs) {
$q = $this->dbh->prepare("select {$col} AS val1 from {$table} where cbs_cd =:cbs");
$q->bindParam(':cbs', $cbs);
}
if ($regio) {
$q = $this->dbh->prepare("select sum({$col}) AS val1 from {$table}, riz_gemeentejaar_regio\n where {$table}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio', $regio);
$q->bindParam(':gemjaar', $gemjaar);
}
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
$totaal_scr = duizendtallen($val1);
//stedelijkheid
if ($cbs) {
$stedelijk_cd = get_stedelijkheid($cbs);
$q = $this->dbh->prepare("select sum({$col}) AS val1 from {$table}, riz_gemeentejaar_achtergrondkenmerken\n where {$table}.cbs_cd = riz_gemeentejaar_achtergrondkenmerken.cbs_cd \n and riz_gemeentejaar_achtergrondkenmerken.indeling_cd = 'STEDELIJK'\n and riz_gemeentejaar_achtergrondkenmerken.achtergrondkenmerk_cd =:stedelijk_cd\n and riz_gemeentejaar_achtergrondkenmerken.jaar =:gemjaar");
$q->bindParam(':stedelijk_cd', $stedelijk_cd);
$q->bindParam(':gemjaar', $gemjaar);
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
$totaal_sted_scr = duizendtallen($val1);
}
if ($cbs2) {
$q = $this->dbh->prepare("select {$col} AS val1 from {$table} where cbs_cd =:cbs2");
$q->bindParam(':cbs2', $cbs2);
}
if ($regio2) {
$q = $this->dbh->prepare("select sum({$col}) AS val1 from {$table}, riz_gemeentejaar_regio\n where {$table}.cbs_cd = riz_gemeentejaar_regio.cbs_cd \n and riz_gemeentejaar_regio.indeling_cd = 'RAS'\n and riz_gemeentejaar_regio.regio_cd =:regio2\n and riz_gemeentejaar_regio.jaar =:gemjaar");
$q->bindParam(':regio2', $regio2);
$q->bindParam(':gemjaar', $gemjaar);
}
if ($cbs2 || $regio2) {
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
$totaal2_scr = duizendtallen($val1);
}
$q = $this->dbh->prepare("select sum({$col}) AS val1 from {$table}");
$q->execute();
$result = $q->fetch();
$val1 = $result[val1];
$totaal_prov_scr = duizendtallen($val1);
if ($cbs && !$cbs2 && !$regio2) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal_sted_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($cbs && ($cbs2 || $regio2)) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal2_scr}</td>\n <td align=right>{$totaal_sted_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($regio && !$cbs2 && !$regio2) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal_prov_scr}</td></tr>";
}
if ($regio && ($cbs2 || $regio2)) {
$table_row = "<tr class=tabelrow><td align=left>{$oms}</td><td align=right>{$jaar}</td>\n <td align=right>{$totaal_scr}</td><td align=right>{$totaal2_scr}</td>\n <td align=right>{$totaal_prov_scr}</td></tr>";
}
return $table_row;
}
$q_bev->execute();
$result_bev = $q_bev->fetch();
$bev = $result_bev[aantal];
$val_scr = decimalen($val / $bev * $factor, $num_decimals[$f]);
} else {
//er kan percentage worden uitgerekend
if (strpos($cal[$f], '/') !== false && $num_decimals[$f] > 0) {
$val_scr = decimalen($val, $num_decimals[$f]);
} elseif (strpos($cal[$f], '/') !== false && $num_decimals[$f] == 0) {
$val_scr = duizendtallen($val);
} elseif (!$reken || $reken == 'ABS' || $reken == '0') {
$val_scr = duizendtallen($val);
}
if ($totalen == 'avg') {
if ($num_decimals[$f] == 0) {
$val_scr = duizendtallen($val / $count_gem);
} else {
$val_scr = decimalen($val / $count_gem, $num_decimals[$f]);
}
}
}
if ($invisible[$f] == 'false' || !$invisible[$f]) {
echo "<td class=tabelfooter ALIGN=right width={$column_width[$f]}%>{$val_scr}</td>";
}
if ($reken == 'PERC') {
for ($f = 0; $f < $num_headers; $f++) {
if ($invisible[$f] == 'false' || !$invisible[$f]) {
echo "<td class=tabelfooter ALIGN=right width={$column_width[$f]}%>100</td>";
}
}
}
}
$cbs_bev_selected = implode(' OR riz_huishoudens.cbs_cd = ', $cbs_mon_array);
$query_bev = "select sum(riz_huishoudens.val0) AS \taantal from riz_huishoudens\r\n where riz_huishoudens.jaar = {$headers[$f]}\r\n and (riz_huishoudens.cbs_cd = {$cbs_bev_selected})";
$result_bev = mysql_query($query_bev);
$row_bev = mysql_fetch_array($result_bev, MYSQL_ASSOC);
$bev = $row_bev[aantal];
$factor = substr($reken, 2);
$val_scr = decimalen($val / $bev * $factor, $num_decimals[$f]);
} else {
//er kan percentage worden uitgerekend
if (strpos($cal[$f], '/') !== false && $num_decimals[$f] > 0) {
$val_scr = decimalen($val, $num_decimals[$f]);
} elseif (strpos($cal[$f], '/') !== false && $num_decimals[$f] == 0) {
$val_scr = duizendtallen($val);
} elseif (!$reken || $reken == 'ABS' || $reken == '0') {
$val_scr = duizendtallen($val);
}
if ($totalen == 'avg') {
$val_scr = round($val / $count_gem, 0);
}
}
if ($invisible[$f] == 'false' || !$invisible[$f]) {
echo "<td class=tabelfooter ALIGN=right width={$column_width[$f]}%>{$val_scr}</td>";
}
}
}
}
echo "</tr>";
echo "</tfoot>";
echo "</table>";
}
echo "<td class=tabelfooter align=right>{$vrouwen_totaal_scr}</td>";
echo "<td class=tabelfooter align=right>{$totaal_totaal_scr}</td>";
}
if ($jaar2 > 0) {
$mannen_totaal_eind = $result2[mannen_totaal_eind];
$vrouwen_totaal_eind = $result2[vrouwen_totaal_eind];
$totaal_totaal_eind = $result2[totaal_totaal_eind];
$verschil = $totaal_totaal_eind - $totaal_totaal;
$percent = round($verschil / ($totaal_totaal / 100), 1);
if ($action == 'download') {
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('E44', $mannen_totaal_eind)->setCellValue('F44', $vrouwen_totaal_eind)->setCellValue('G44', $totaal_totaal_eind)->setCellValue('H44', $verschil)->setCellValue('I44', $percent);
} else {
$mannen_totaal_eind_scr = duizendtallen($mannen_totaal_eind);
$vrouwen_totaal_eind_scr = duizendtallen($vrouwen_totaal_eind);
$totaal_totaal_eind_scr = duizendtallen($totaal_totaal_eind);
$verschil_scr = duizendtallen($verschil);
$percent = decimalen($percent, 1);
echo "<td class=tabelfooter align=right>{$mannen_totaal_eind_scr}</td>";
echo "<td class=tabelfooter align=right>{$vrouwen_totaal_eind_scr}</td>";
echo "<td class=tabelfooter align=right>{$totaal_totaal_eind_scr}</td>";
echo "<td class=tabelfooter align=right>{$verschil_scr}</td>";
echo "<td class=tabelfooter align=right>{$percent} %</td>";
}
}
// bronnen eventueel aanpassen
if (!$jaar2) {
$jaar2 = $jaar;
}
if (max($jaar, $jaar2) < 2016) {
$bron = "CBS";
}
}
if ($num_fields > 15) {
$y = $x + 1;
if (is_null($field[$y])) {
$field[$y] = '-';
} else {
$field[$y] = duizendtallen($field[$y]);
}
echo "<td align=right>{$field[$y]}</td>";
}
if ($num_fields > 16) {
$z = $y + 1;
if (is_null($field[$z])) {
$field[$z] = '-';
} else {
$field[$z] = duizendtallen($field[$z]);
}
echo "<td align=right>{$field[$z]}</td>";
}
echo "</tr>";
//alleen bij nieuwe sessie data naar tijdelijke tabel sturen
if ($session == 'new') {
if (strstr($cwi, 'rpa') && $num_fields == 1) {
$insert_query = "insert into t{$session_rand} (rpa,peildatum, \n\t\t\t\t{$select_fields})\tvalues ('" . $rpa . "','" . $peildatum . "',\n\t\t\t\t'" . $field[$j] . "')";
}
if (strstr($cwi, 'rpa') && $num_fields == 2) {
$insert_query = "insert into t{$session_rand} (rpa,peildatum, \n\t\t\t\t{$select_fields})\tvalues ('" . $rpa . "','" . $peildatum . "',\n\t\t\t\t'" . $field[$j] . "','" . $field[$k] . "')";
}
if (strstr($cwi, 'rpa') && $num_fields == 3) {
$insert_query = "insert into t{$session_rand} (rpa,peildatum, \n\t\t\t\t{$select_fields})\tvalues ('" . $rpa . "','" . $peildatum . "',\n\t\t\t\t'" . $field[$j] . "','" . $field[$k] . "','" . $field[$l] . "')";
}
}
if ($num_fields > 5) {
$o = $n + 1;
if (is_null($field[$o])) {
$field_scr[$o] = '-';
} else {
$field_scr[$o] = duizendtallen($field[$o]);
}
echo "<td align=right>{$field_scr[$o]}</td>";
}
if ($num_fields > 6) {
$p = $o + 1;
if (is_null($field[$p])) {
$field_scr[$p] = '-';
} else {
$field_scr[$p] = duizendtallen($field[$p]);
}
echo "<td align=right>{$field_scr[$p]}</td>";
}
echo "</tr>";
//alleen bij nieuwe sessie data naar tijdelijke tabel sturen
if ($session == 'new') {
if ($num_fields == 1) {
$q = $dbh->prepare("insert into t{$session_rand} (rpa,peildatum, {$select_fields})\t\r\n values (:rpa,:peildatum,:fieldj)");
$q->bindParam(':rpa', $rpa);
$q->bindParam(':peildatum', $peildatum);
$q->bindParam(':fieldj', $field[$j]);
}
if ($num_fields == 2) {
$q = $dbh->prepare("insert into t{$session_rand} (rpa,peildatum, {$insert_fields})\t\r\n values (:rpa,:peildatum,:fieldj,:fieldk)");
$q->bindParam(':rpa', $rpa);
$kengetal = $results[$i]["kengetal"];
$lft_cat = $results[$i]["lft_cat"];
$bev = ${'aantal' . $lft_cat};
$aantal[$i] = $bev * $kengetal;
}
if ($aantal) {
$geschikt_totaal = round(array_sum($aantal));
unset($aantal);
} else {
$geschikt_totaal = '-';
}
if ($action == 'download') {
$objPHPExcel->setActiveSheetIndex(0)->setCellValueByColumnAndRow(5, 7, $geschikt_totaal);
$objPHPExcel->getActiveSheet()->getStyleByColumnAndRow(5, 7)->applyFromArray($contentArray);
} else {
echo "<td align=right>" . duizendtallen($geschikt_totaal) . "</td>";
echo "</tr>";
echo "</tbody></table>";
}
if ($action == 'download') {
$datum = date("d-m-Y");
$tijd = date("H:i:s");
$objPHPExcel->setActiveSheetIndex(0)->setCellValue('A9', 'Bron: ' . $bron)->setCellValue('A11', 'Copyright Tympaan Instituut te Den Haag ' . $datum . ' ' . $tijd);
include '../tables/download_save.php';
} else {
echo "<div class=bron>Bron: {$bron}</div>";
include '../scripts/select.php';
include '../../pagefooter.php';
echo "</body>";
echo "</html>";
}
$aantal_2025 = round($bev_2025_15_24 * $ken_15_24 / 100 + $bev_2025_25_34 * $ken_25_34 / 100 + $bev_2025_35_44 * $ken_35_44 / 100 + $bev_2025_45_54 * $ken_45_54 / 100 + $bev_2025_55_64 * $ken_55_64 / 100 + $bev_2025_65_74 * $ken_65_74 / 100 + $bev_2025_75_99 * $ken_75_99 / 100);
$aantal_2025_tot = $aantal_2025_tot + $aantal_2025;
if ($action == 'download') {
$objPHPExcel->setActiveSheetIndex(0)->setCellValueByColumnAndRow(3, $i + 5, $aantal_2025);
$objPHPExcel->getActiveSheet()->getStyleByColumnAndRow(3, $i + 5)->applyFromArray($contentArray);
} else {
$aantal_2025 = duizendtallen($aantal_2025);
echo "<td align=right>{$aantal_2025}</td>";
}
$aantal_2030 = round($bev_2030_15_24 * $ken_15_24 / 100 + $bev_2030_25_34 * $ken_25_34 / 100 + $bev_2030_35_44 * $ken_35_44 / 100 + $bev_2030_45_54 * $ken_45_54 / 100 + $bev_2030_55_64 * $ken_55_64 / 100 + $bev_2030_65_74 * $ken_65_74 / 100 + $bev_2030_75_99 * $ken_75_99 / 100);
$aantal_2030_tot = $aantal_2030_tot + $aantal_2030;
if ($action == 'download') {
$objPHPExcel->setActiveSheetIndex(0)->setCellValueByColumnAndRow(4, $i + 5, $aantal_2030);
$objPHPExcel->getActiveSheet()->getStyleByColumnAndRow(4, $i + 5)->applyFromArray($contentArray);
} else {
$aantal_2030 = duizendtallen($aantal_2030);
echo "<td align=right>{$aantal_2030}</td>";
}
if ($action == 'download') {
if ($aantal_2010 || $aantal_2015 || $aantal_2020 || $aantal_2025 || $aantal_2030 >= 100 || -100) {
$objPHPExcel->getActiveSheet()->getStyle('B5:G18')->getNumberFormat()->setFormatCode('#,##0');
} else {
$objPHPExcel->getActiveSheet()->getStyle('B5:G18')->getNumberFormat()->setFormatCode('0.0');
}
}
}
if ($prog == 'prov') {
$bron = str_replace('ABF Research', 'provincie Zuid-Holland', $bron);
}
if ($action == 'download') {
$datum = date("d-m-Y");
