$value) if ($value['eid'] == $eid) return $value; return null; } function RecommendedEntry_updateIndexFile ($eid_updated, $eid, $direction) { $filename = sprintf ($_SERVER['DOCUMENT_ROOT'].'/ReData/%d.txt', $eid_updated); file_exists ($filename) || touch ($filename); $fp = @fopen ($filename, 'r+'); if ($fp) { if (flock ($fp, LOCK_EX | LOCK_NB)) { $ret = ''; $not_found = 1; while (! feof ($fp) && ($buf = fgets ($fp))) { list ($_eid, $_n0, $_n1) = preg_split ("[\t\r\n]", $buf); if ($eid == $_eid) { $not_found = 0; $direction ? $_n1++ : $_n0++; } $ret .= sprintf ("%d\t%d\t%d\n", $_eid, $_n0, $_n1); } $not_found && $ret .= sprintf ("%d\t%d\t%d\n", $eid, 1 - $direction, $direction); rewind ($fp); fwrite ($fp, $ret, strlen ($ret)); } fclose ($fp); } } function RecommendedEntry_incoming () { $eid_prev = $_COOKIE['mtrcmnd_eid']; if (isset ($eid_prev)) { if ($eid_prev != 694 && RecommendedEntry_getEntryData ($eid_prev)) { RecommendedEntry_updateIndexFile (694, $eid_prev, 0 /*incoming_from*/); RecommendedEntry_updateIndexFile ($eid_prev, 694, 1 /*outgoing_to*/); } } else { RecommendedEntry_updateIndexFile (694, 694, 0 /*incoming_from*/); } } RecommendedEntry_incoming (); function RecommendedEntry_outgoing () { setcookie ('mtrcmnd_eid', 694, time () + 2592000, '/'); } RecommendedEntry_outgoing (); function RecommendedEntry_initialize ($mode = 0) { global $RecommendedEntry_table; $RecommendedEntry_table = array (); $fp = @fopen ($_SERVER['DOCUMENT_ROOT'].'/ReData/694.txt', 'r'); if ($fp) { if (flock ($fp, LOCK_SH | LOCK_NB)) { while (! feof ($fp) && ($buf = fgets ($fp))) { list ($_eid, $_n0, $_n1) = preg_split ("[\t\r\n]", $buf); if (694 == $_eid) continue; if ($mode == 1) $RecommendedEntry_table{$_eid} = $_n0; else if ($mode == 2) $RecommendedEntry_table{$_eid} = $_n1; else $RecommendedEntry_table{$_eid} = $_n0 + $_n1; } arsort ($RecommendedEntry_table, SORT_NUMERIC); } fclose ($fp); } } function RecommendedEntry_GetEntry ($_index) { global $RecommendedEntry_table; foreach ($RecommendedEntry_table as $eid => $count) { if (--$_index) continue; $entry = RecommendedEntry_getEntryData ($eid); if ($entry) $entry['count'] = $count; return $entry; } } ?> Agricultural Population [Spanish] | Statistics | Chile | APIP - Asia-Pacific Information Platform on Food Security

HOME > Search by Economy > Chile > Statistics > Agricultural Population [Spanish]

Agricultural Population [Spanish]

This is the statistical data of census in 2002 about the population living in the urban or rural area and the distinction of sex.
This data is elaborated by the ODEPA (Office of Agricultural Studies and Policies), which belongs to the Ministry of Agriculture of Chile.

'; ?> '; /* echo '
';
print_r($head);
echo '
'; echo '['.$is_link.']'; */ //リンク先があるときのみ表示 if($is_link==1){ echo '
'."\n"; if(preg_match("/text.html/", $contype)){ echo ''."\n"; echo '
'."\n"; if(!preg_match("/Microsoft/",$head['Server']) && $head['Server']){ $data_array = getPageData($exurl); $link_title = $data_array['title']; if($link_title != ""){ echo '

'.$link_title.'

'."\n"; //$pubtexts = 1; } $link_description = $data_array['description']; if($link_description != ""){ echo '

'.$link_description.'

'."\n"; //$pubtexts = 1; } } if($pubtexts==0 && $entryflg==1){ $pubtexts=1; echo '
'."\n".$entryText."\n"; } echo '
'; }elseif(preg_match("/application.pdf/", $contype)){ echo ''."\n"; if($pubtexts==0 && $entryflg==1){ $pubtexts=1; echo '
'."\n" .$entryText."\n" .'
'; } } echo '
'."\n"; } //MTアップロードPDFがある場合 if($pdfurl!=""){ echo '
'."\n"; echo ''."\n"; } ?>
'."\n".$entryText; } ?>
'."\n"; } if($pubtexts==0 && $entryflg==1){ $pubtexts=1; echo $entryText; } ?>
Related keywords
Also browsed