$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 != 650 && RecommendedEntry_getEntryData ($eid_prev)) { RecommendedEntry_updateIndexFile (650, $eid_prev, 0 /*incoming_from*/); RecommendedEntry_updateIndexFile ($eid_prev, 650, 1 /*outgoing_to*/); } } else { RecommendedEntry_updateIndexFile (650, 650, 0 /*incoming_from*/); } } RecommendedEntry_incoming (); function RecommendedEntry_outgoing () { setcookie ('mtrcmnd_eid', 650, time () + 2592000, '/'); } RecommendedEntry_outgoing (); function RecommendedEntry_initialize ($mode = 0) { global $RecommendedEntry_table; $RecommendedEntry_table = array (); $fp = @fopen ($_SERVER['DOCUMENT_ROOT'].'/ReData/650.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 (650 == $_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; } } ?> CONADI (National Corporation of Development for Indigenes)[Spanish] | Good Practices | Chile | APIP - Asia-Pacific Information Platform on Food Security

HOME > Search by Economy > Chile > Good Practices > CONADI (National Corporation of Development for Indigenes)[Spanish]

CONADI (National Corporation of Development for Indigenes)[Spanish]

This is the page of CONADI (National Corporation of Development for Indigenes), which belongs to the Ministry of Social Development of Chile, takes actions for the economical, social and cultural development of indigenes. The background of the actions and the outline of projects are shown here.

'; ?> '; /* 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"; } if($pubtexts==0 && $entryflg==1){ $pubtexts=1; echo $entryText; } ?>
Reference
url:http://www.conadi.gob.cl/index.php/atencion-ciudadana/fondo-de-desarrollo is not available link!'; } ?>
Also browsed