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

HOME > Search by Economy > Chile > Good Practices > Development and Strengthening of Technology Transfer - Corporation of Promotion of the Productions (CORFO)[Spanish]

Development and Strengthening of Technology Transfer - Corporation of Promotion of the Productions (CORFO)[Spanish]

This is a document of CORFO(Corporation of Promotion of the Productions), published  in the October 2011.
It is about the project for technological transfer. This project has some parts. The one is strengthening the ecosystem of technological transfer, another one is developing technological solutions(with R and D) based on market opputunities and challenges, and the other is connecting the national R and D sector to the international network.

'; ?> '; /* 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; } ?>
Also browsed