0.0) {
if ($minval == 0.0 || $minval > $outs) $minval=$outs;
if ($maxval == 0.0 || $maxval < $outs) $maxval=$outs;
}
if ($xrange == "") {
if (isset($_GET['min']) && isset($_GET['max'])) {
$xrange=" (" . $_GET['min'] . " <= " . $reportmode . " <= " . $_GET['max'] . ")";
} else if (isset($_GET['min'])) {
$xrange=" (" . $_GET['min'] . " <= " . $reportmode . ")";
} else if (isset($_GET['max'])) {
$xrange=" (" . $reportmode . " <= " . $_GET['max'] . ")";
}
}
if (isset($_GET['min']) && isset($_GET['max'])) {
if ($thisyear != $oneyear) { //$firstyear <= 0) {
if (str_replace("," . $thisc . ",","","," . $okvaluelist . ",") != "," . $okvaluelist . ",") {
return $outs;
} else {
$othercnt+=$outs;
return "0";
}
}
if ($outs < $_GET['min'] || $outs > $_GET['max']) {
$othercnt+=$outs;
return "0";
} else if ($thisyear == $oneyear && $valuelist != "") {
$vls=explode(",",$valuelist);
if (str_replace("," . $vls[0] . ",","","," . $okvaluelist . ",") == "," . $okvaluelist . ",") {
if ($okvaluelist == "") {
$okvaluelist=$vls[0];
} else {
$prevok=$okvaluelist;
$okvaluelist=$vls[0] . "," . $prevok;
}
}
}
} else if (isset($_GET['min'])) {
if ($thisyear != $oneyear) { //$firstyear <= 0) {
if (str_replace("," . $thisc . ",","","," . $okvaluelist . ",") != "," . $okvaluelist . ",") {
return $outs;
} else {
$othercnt+=$outs;
return "0";
}
}
if ($outs < $_GET['min']) {
$othercnt+=$outs;
return "0";
} else if ($thisyear == $oneyear && $valuelist != "") {
$vls=explode(",",$valuelist);
if (str_replace("," . $vls[0] . ",","","," . $okvaluelist . ",") == "," . $okvaluelist . ",") {
if ($okvaluelist == "") {
$okvaluelist=$vls[0];
} else {
$prevok=$okvaluelist;
$okvaluelist=$vls[0] . "," . $prevok;
}
}
}
} else if (isset($_GET['max'])) {
if ($thisyear != $oneyear) { //$firstyear <= 0) {
if (str_replace("," . $thisc . ",","","," . $okvaluelist . ",") != "," . $okvaluelist . ",") {
return $outs;
} else {
$othercnt+=$outs;
// if ($thisc != "China") {
// echo "";
// exit;
// }
return "0";
}
}
if ($outs > $_GET['max']) {
$othercnt+=$outs;
return "0";
} else if ($thisyear == $oneyear && $valuelist != "") {
$vls=explode(",",$valuelist);
if (str_replace("," . $vls[0] . ",","","," . $okvaluelist . ",") == "," . $okvaluelist . ",") {
if ($okvaluelist == "") {
$okvaluelist=$vls[0];
} else {
$prevok=$okvaluelist;
$okvaluelist=$vls[0] . "," . $prevok;
}
}
}
}
return $outs;
}
function rangeget($basis) {
global $reportmode;
$cookie_name = "Worldbank_" . str_replace(" ","_",$reportmode) . "_" . $basis;
if (isset($_COOKIE[$cookie_name])) {
return $_COOKIE[$cookie_name];
}
return 0.0;
}
function rangeset($basis, $val) {
global $reportmode, $startswith;
if ($startswith == "") {
$cookie_name = "Worldbank_" . str_replace(" ","_",$reportmode) . "_" . $basis;
$cookie_value = $val;
setcookie($cookie_name, $cookie_value, time() + (86400 * 30), "/PHP/"); // 86400 = 1 day
return $val;
}
return rangeget($basis);
}
function noe($inn) {
$zeroes="";
$neg="";
$zinn=$inn;
if (substr($inn,0,1) == '-') {
$neg="-";
$zinn=substr($inn,1);
}
$ninn=explode("E",$zinn);
if (sizeof($ninn) == 2) {
$qd=explode(".",$ninn[0]);
$hm=str_replace("+","",$ninn[1]);
if (sizeof($qd) == 1) {
for ($ii=1; $ii<=abs($hm); $ii++) {
$zeroes.="0";
}
if ($hm >= 0) {
return $neg . $qd[0] . $zeroes;
} else {
return $neg . "0." . $zeroes . $qd[0];
}
} else {
if ($hm >= 0) {
for ($ii=1; $ii<=(abs($hm) - strlen($qd[1])); $ii++) {
$zeroes.="0";
}
return $neg . $qd[0] . $qd[1] . $zeroes;
} else {
for ($ii=1; $ii<=(abs($hm) - strlen($qd[0])); $ii++) {
$zeroes.="0";
}
return $neg . "0." . $zeroes . $qd[0] . $qd[1];
}
}
}
return $inn;
}
function thesmallest($y1, $y2) {
if (strpos($y2, "-") !== false) {
return min($y1, -$y2);
} else if ($y2 != "") {
return $y1; //min($y1, $y2);
}
return $y1;
}
function thebiggest($y1, $y2) {
if (strpos($y2, "-") !== false) {
return max($y1, -$y2);
} else if ($y2 != "") {
return $y1; //max($y1, $y2);
}
return $y1;
}
function andto($y1, $y2, $otheridea) {
global $xrange;
if (thebiggest($y1, $y2) != thesmallest($y1, $y2)) {
if (strpos($y2, "-") !== false) {
return thesmallest($y1, $y2) . " to " . thebiggest($y1, $y2) . $xrange;
} else {
return $y2 . " and " . $y1 . $xrange;
}
}
return str_replace("%2d","",str_replace("%2D","",str_replace("-","",str_replace($y1 . " and " . $y2,$y2 . " and " . $y1,str_replace($y1 . "%20and%20" . $y2,$y2 . "%20and%20" . $y1,$otheridea)))));
}
$minval=0.0;
$maxval=0.0;
$thisc="";
$xrange="";
$lookforis="Population, tot";
$reportmode="Population";
$reportmode2="Population";
$indicator="SP.POP.TOTL";
$cn="Pie Chart";
$idata2="";
$udiff="";
$ddiff="";
$page=1;
$valuelist="";
$okvaluelist="";
$firstyear=-1;
$oneyear=0;
$thisyear=0;
$valuedelim="";
$othercnt=0;
$pagecontent="', '', $entries[$i]))[0], '*' . $startswith) !== false || strpos('*' . $pentries[$zero], '*' . $startswith) !== false) {
if ($idelim == $lookforis) {
if (strpos($yearvs, "-") !== false) {
$prevc="," . $valuelist . ",";
$thisc=str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero]))));
if (strpos($prevc, "," . str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero])))) . ",") === false) {
$prevc=$valuelist;
$valuelist=str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero])))) . $valuedelim . $prevc;
$valuedelim=",";
//echo $valuelist;
} //else {
//echo str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero])))) . " vs " . $prevc;
//}
if ($pentries[$one] == "decimal") {
$thisyear=$pentries[6 + $one];
} else {
$thisyear=$pentries[$eight];
}
if ($firstyear < 0) {
$firstyear=$thisyear;
$oneyear=$thisyear;
} else if ($thisyear != $oneyear) {
$firstyear=0;
}
if ($poplist == "") {
for ($jy=$tso; $jy<=$tbo; $jy++) {
$poplist.=$popdelim . "[~" . $jy . "~]";
}
}
if (strpos($poplist, "~" . $thisyear . "~") !== false) {
$poplist=str_replace("[~" . $thisyear . "~", "[~" . $thisyear . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]), $poplist);
} else {
$prevc=$poplist;
$poplist=$popdelim . "[~" . $thisyear . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]) . "]" . $prevc;
}
} else {
$poplist.=$popdelim . "[~" . str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero])))) . "~," . our_str_replace("decimal","0",$pentries[$one]) . "]";
}
} else {
if (strpos($yearvs, "-") !== false) {
$prevc="," . $valuelist . ",";
$thisc=str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0])));
if (strpos($prevc, "," . str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0]))) . ",") === false) {
$prevc=$valuelist;
$valuelist=str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0]))) . $valuedelim . $prevc;
$valuedelim=",";
//echo $valuelist;
} //else {
//echo str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0]))) . " vs " . $prevc;
//}
if ($pentries[$one] == "decimal") {
$thisyear=$pentries[6 + $one];
} else {
$thisyear=$pentries[$eight];
}
if ($firstyear < 0) {
$firstyear=$thisyear;
$oneyear=$thisyear;
} else if ($thisyear != $oneyear) {
$firstyear=0;
}
if ($poplist == "") {
for ($jy=$tso; $jy<=$tbo; $jy++) {
$poplist.=$popdelim . "[~" . $jy . "~]";
}
}
if (strpos($poplist, "~" . $thisyear . "~") !== false) {
$poplist=str_replace("[~" . $thisyear . "~", "[~" . $thisyear . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]), $poplist);
} else {
$prevc=$poplist;
$poplist=$popdelim . "[~" . $thisyear . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]) . "]" . $prevc;
}
} else {
$poplist.=$popdelim . "[~" . str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0]))) . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]) . "]";
}
}
$popdelim=",%20";
} else if (strpos($yearvs, "-") === false) {
if ($idelim == $lookforis) {
$othercnt+=str_replace("decimal","0",$pentries[$one]);
} else {
$othercnt+=str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]);
}
}
}
}
$pagecontent=" 0 && !isset($_GET['justletters']) && !isset($_POST['justletters'])) {
$url.=ourfilter($poplist) . $popdelim . "[~Non-" . $startswith . "~," . noe($othercnt) . "]";
} else {
$url.=ourfilter($poplist);
}
if (strpos($yearvs, "-") !== false) $yearvs="";
$page=1;
$pagecontent="', '', $entries[$i]))[0], '*' . $startswith) !== false || strpos('*' . $pentries[$zero], '*' . $startswith) !== false) {
if ($idelim == $lookforis) {
$poplist.=$popdelim . "[~" . str_replace("%27","",str_replace(".","",str_replace("+","%20",urlencode($pentries[$zero])))) . "~," . our_str_replace("decimal","0",$pentries[$one]) . "]";
} else {
$poplist.=$popdelim . "[~" . str_replace("%27","",str_replace(".","",str_replace("+","%20",explode('"', explode($cdelim, str_replace('">', '', urlencode($entries[$i])))[$zero])[0]))) . "~," . our_str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]) . "]";
}
$popdelim=",%20";
} else {
if ($idelim == $lookforis) {
$othercnt+=str_replace("decimal","0",$pentries[$one]);
} else {
$othercnt+=str_replace("decimal","0",explode($cdelim, $pentries[$one])[0]);
}
}
}
}
$pagecontent="";
// exit;
$valuelist=$okvaluelist;
$poplist=str_replace(",0","",$poplist);
$urlextra=str_replace(",0","",$urlextra);
$url=str_replace(",0","",$url);
}
if ($othercnt > 0 && !isset($_GET['justletters']) && !isset($_POST['justletters'])) {
$urlextra.=$poplist . $popdelim . "[~Non-" . $startswith . "~," . $othercnt . "]";
$idata2="";
} else if ($poplist != "") {
$urlextra.=$poplist;
$idata2="";
}
echo "World Bank API " . $reportmode . " Data Google Chart " . $cn . " - RJM Programming - February, 2016
var url='" . explode("&data=",$url)[1] . "';
var urlextra='" . $urlextra . "';
function preiframeviaurl() {
if (document.getElementById('data').value != '') url=document.getElementById('data').value;
return true;
}
function iframeviaurl() {
if (parent.document.getElementById('maxrange')) {
parent.document.getElementById('maxrange').value='" . rangeset('max',$maxval) . "';
}
if (parent.document.getElementById('minrange')) {
parent.document.getElementById('minrange').value='" . rangeset('min',$minval) . "';
}
if (parent.document.getElementById('childiframe')) {
document.body.style.backgroundColor='lightblue';
}
if (('" . str_replace('&value=&','&value=' . str_replace('%2c','',str_replace('%2C','',$valuelist)) . '&',explode("&data=",$url)[0]) . "&data=' + url + '" . $urlextra . "').length > 750) {
document.getElementById('myiframe').style.display='block';
document.getElementById('data').value=decodeURIComponent(url);
document.getElementById('mysubmit').click();
} else if (url != '') {
document.getElementById('myiframe').style.display='block';
document.getElementById('myiframe').src='" . str_replace('&value=&','&value=' . str_replace('%2c','',str_replace('%2C','',$valuelist)) . '&',explode("&data=",$url)[0]) . "&data=' + url + '" . $urlextra . "';
}
return true;
}
function shareviaemail() {
var prefix=document.getElementById('aemail').href.split('body=');
document.getElementById('aemail').href=prefix[0] + 'body=' + encodeURIComponent(document.URL);
document.getElementById('aemail').click();
}
World Bank API " . $reportmode . " Data Google Chart " . $cn . " 📧
RJM Programming - February, 2016
Share via Email
";
?>