ExtrHAL : outil d’extraction des publications HAL d’une unité, d'une équipe de recherche ou d'un auteur

univ-rennes1/ par exemple, mais est-ce vraiment nécessaire ? function cleanup_title($titre) { // présence de " et combien $nb = mb_substr_count ($titre, '"', 'UTF-8'); if ($nb%2 == 0) { return $titre; // nombre pair (ou 0) rien à faire } // on ajoute le " à la fin return $titre . '"'; } function mb_ucwords($str) { $str = mb_convert_case($str, MB_CASE_TITLE, "UTF-8"); return ($str); } function prenomCompInit($prenom) { $prenom = str_replace(" ", " ",$prenom); if (strpos(trim($prenom),"-") !== false) {//Le prénom comporte un tiret $postiret = strpos(trim($prenom),"-"); $prenomg = trim(mb_substr($prenom,0,($postiret-1),'UTF-8')); $prenomd = trim(mb_substr($prenom,($postiret+1),strlen($prenom),'UTF-8')); $autg = mb_substr($prenomg,0,1,'UTF-8'); $autd = mb_substr($prenomd,0,1,'UTF-8'); $prenom = mb_ucwords($autg).".-".mb_ucwords($autd)."."; }else{ if (strpos(trim($prenom)," ") !== false) {//plusieurs prénoms $posespace = strpos(trim($prenom)," "); $tabprenom = explode(" ", trim($prenom)); $p = 0; $prenom = ""; while (isset($tabprenom[$p])) { if ($p == 0) { $prenom .= mb_ucwords(mb_substr($tabprenom[$p], 0, 1, 'UTF-8'))."."; }else{ $prenom .= " ".mb_ucwords(mb_substr($tabprenom[$p], 0, 1, 'UTF-8'))."."; } $p++; } }else{ $prenom = mb_ucwords(mb_substr($prenom, 0, 1, 'UTF-8'))."."; } } return $prenom; } function prenomCompEntier($prenom) { $prenom = trim($prenom); if (strpos($prenom,"-") !== false) {//Le prénom comporte un tiret $postiret = strpos($prenom,"-"); $autg = substr($prenom,0,$postiret); $autd = substr($prenom,($postiret+1),strlen($prenom)); $prenom = mb_ucwords($autg)."-".mb_ucwords($autd); }else{ $prenom = mb_ucwords($prenom); } return $prenom; } function nomCompEntier($nom) { $nom = trim(mb_strtolower($nom,'UTF-8')); if (strpos($nom,"-") !== false) {//Le nom comporte un tiret $postiret = strpos($nom,"-"); $autg = substr($nom,0,$postiret); $autd = substr($nom,($postiret+1),strlen($nom)); $nom = mb_ucwords($autg)."-".mb_ucwords($autd); }else{ $nom = mb_ucwords($nom); } return $nom; } //Initialisation des variables $idhal = ""; $evhal = ""; $depotforce = ""; $depotdeb = ""; $depotfin = ""; $typidh = ""; $typcro = ""; $prefeq = ""; $sortArray = array(); $rtfArray = array(); $bibArray = array(); $gr = ""; $listedoi = ""; $listetitre = ""; $arriv = ""; $depar = ""; if (isset($_POST["soumis"])) { $team = strtoupper(htmlspecialchars($_POST["team"])); $idhal = htmlspecialchars($_POST["idhal"]); if (isset($idhal) && $idhal != "") {$team = $idhal;} //export Bibtex $Fnm2 = "./HAL/extractionHAL_".$team.".bib"; $inF2 = fopen($Fnm2,"w"); fseek($inF2, 0); $chaine2 = "\xEF\xBB\xBF"; fwrite($inF2,$chaine2); //export CSV $Fnm1 = "./HAL/extractionHAL_".$team.".csv"; $inF = fopen($Fnm1,"w"); fseek($inF, 0); $chaine = "\xEF\xBB\xBF"; fwrite($inF,$chaine); //export en RTF $Fnm = "./HAL/extractionHAL_".$team.".rtf"; require_once ("./lib/phprtflite-1.2.0/lib/PHPRtfLite.php"); PHPRtfLite::registerAutoloader(); $rtf = new PHPRtfLite(); $sect = $rtf->addSection(); $font = new PHPRtfLite_Font(9, 'Trebuchet', '#000000', '#FFFFFF'); $fontlien = new PHPRtfLite_Font(9, 'Trebuchet', '#0000FF', '#FFFFFF'); $fonth3 = new PHPRtfLite_Font(12, 'Trebuchet', '#000000', '#FFFFFF'); $fonth2 = new PHPRtfLite_Font(14, 'Trebuchet', '#000000', '#FFFFFF'); $parFormat = new PHPRtfLite_ParFormat(PHPRtfLite_ParFormat::TEXT_ALIGN_JUSTIFY); //sauvegarde URL $root = 'http'; if ( isset ($_SERVER["HTTPS"]) && $_SERVER["HTTPS"] == "on") { $root.= "s"; } $urlsauv = $root."://".$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']; $urlsauv .= "?team=".$team; $listaut = strtoupper(htmlspecialchars($_POST["listaut"])); if ($listaut == "") {$listaut = $team;} $urlsauv .= "&listaut=".$listaut; $urlsauv .= "&idhal=".$idhal; $evhal = htmlspecialchars($_POST["evhal"]); $urlsauv .= "&evhal=".$evhal; if (isset($_POST['publis'])) { $choix_publis = "-"; $liste_publis = "~"; $publis_array = $_POST['publis']; if (!empty($publis_array)) { foreach($publis_array as $selectValue){ $choix_publis .= $selectValue."-"; $liste_publis .= $selectValue."~"; } } $urlsauv .= "&publis=".$liste_publis; } if (isset($_POST['comm'])) { $choix_comm = "-"; $liste_comm = "~"; $comm_array = $_POST['comm']; if (!empty($comm_array)) { foreach($comm_array as $selectValue){ $choix_comm .= $selectValue."-"; $liste_comm .= $selectValue."~"; } } $urlsauv .= "&comm=".$liste_comm; } if (isset($_POST['ouvr'])) { $choix_ouvr = "-"; $liste_ouvr = "~"; $ouvr_array = $_POST['ouvr']; if (!empty($ouvr_array)) { foreach($ouvr_array as $selectValue){ $choix_ouvr .= $selectValue."-"; $liste_ouvr .= $selectValue."~"; } } $urlsauv .= "&ouvr=".$liste_ouvr; } if (isset($_POST['autr'])) { $choix_autr = "-"; $liste_autr = "~"; $autr_array = $_POST['autr']; if (!empty($autr_array)) { foreach($autr_array as $selectValue){ $choix_autr .= $selectValue."-"; $liste_autr .= $selectValue."~"; } } $urlsauv .= "&autr=".$liste_autr; } //Création des listes des auteurs appartenant à la collection spécifiée pour la liste include "./pvt/ExtractionHAL-auteurs.php"; $listenominit = "~"; $listenomcomp1 = "~"; $listenomcomp2 = "~"; $arriv = "~"; $depar = "~"; foreach($AUTEURS_LISTE AS $i => $valeur) { if ($AUTEURS_LISTE[$i]['collhal'] == $listaut || $AUTEURS_LISTE[$i]['colleqhal'] == $listaut) { $listenomcomp1 .= nomCompEntier($AUTEURS_LISTE[$i]['nom'])." ".prenomCompEntier($AUTEURS_LISTE[$i]['prenom'])."~"; $listenomcomp2 .= prenomCompEntier($AUTEURS_LISTE[$i]['prenom'])." ".nomCompEntier($AUTEURS_LISTE[$i]['nom'])."~"; //si prénom composé et juste les ititiales $prenom = prenomCompInit($AUTEURS_LISTE[$i]['prenom']); $listenominit .= nomCompEntier($AUTEURS_LISTE[$i]['nom'])." ".$prenom.".~"; if (isset($AUTEURS_LISTE[$i]['arriv']) && $AUTEURS_LISTE[$i]['arriv'] != "") { $arriv .= $AUTEURS_LISTE[$i]['arriv']."~"; }else{ $arriv .= "1900~"; } if (isset($AUTEURS_LISTE[$i]['depar']) && $AUTEURS_LISTE[$i]['depar'] != "") { $depar .= $AUTEURS_LISTE[$i]['depar']."~"; }else{ $moisactuel = date('n', time()); if ($moisactuel >= 10) {$idepar = date('Y', time())+1;}else{$idepar = date('Y', time());} $depar .= $idepar."~"; } } } //echo $depar; //Extraction sur un IdHAL > auteur à mettre en évidence if (isset($evhal) && $evhal != "") { $list = explode(" ", $evhal); $listenomcomp1 = "~".nomCompEntier($list[1])." ".prenomCompEntier($list[0])."~"; $listenomcomp2 = "~".prenomCompEntier($list[0])." ".nomCompEntier($list[1])."~"; //si prénom composé et juste les ititiales $prenom = prenomCompInit($list[0]); $listenominit = "~".nomCompEntier($list[1])." ".$prenom.".~"; $arriv = "~1900~"; $moisactuel = date('n', time()); if ($moisactuel >= 10) {$idepar = date('Y', time())+1;}else{$idepar = date('Y', time());} $depar = "~".$idepar."~"; } if (isset($_POST['anneedeb'])) {$anneedeb = $_POST['anneedeb'];}else{$anneedeb = date('Y', time());$anneefin = date('Y', time());} if (isset($_POST['anneefin'])) {$anneefin = $_POST['anneefin'];}else{if (isset($_POST['anneedeb'])) {$anneefin = $_POST['anneedeb'];}else{$anneefin = $anneedeb;}} // vérification sur ordre des années si différentes if ($anneefin < $anneedeb) {$anneetemp = $anneedeb; $anneedeb = $anneefin; $anneefin = $anneetemp;} $urlsauv .= "&anneedeb=".$anneedeb; $urlsauv .= "&anneefin=".$anneefin; if (isset($_POST['depotdeb'])) {$depotdeb = $_POST['depotdeb'];} if (isset($_POST['depotfin'])) {$depotfin = $_POST['depotfin'];} // si depotdeb et depotfin non définis, on force depotdeb au 01/01/anneedeb et depotfin au 31/12/anneefin if ($depotdeb == '' && $depotfin == '') { $depotforce = "oui"; $depotdeb = date('d/m/Y', mktime(0, 0, 0, 1, 1, $anneedeb)); $depotfin = date('d/m/Y', mktime(0, 0, 0, 12, 31, $anneefin)); } // si depotdeb défini mais pas depotfin, on force depotfin à aujourd'hui if ($depotdeb != '' && $depotfin == '') {$depotfin = date('d/m/Y', time());} // si depotfin défini mais pas depotdeb, on force depotdeb au 1er janvier de l'année de depotfin if ($depotdeb == '' && $depotfin != '') { $tabdepotfin = explode('/', $depotfin); $depotdeb = date('d/m/Y', mktime(0, 0, 0, 1, 1, $tabdepotfin[2])); } // si depotdeb est postérieur à depotfin, on inverse les deux if ($depotfin < $depotdeb) {$depottemp = $depotdeb; $depotdeb = $depotfin; $depotfin = $depottemp;} $urlsauv .= "&depotdeb=".$depotdeb; $urlsauv .= "&depotfin=".$depotfin; $typnum = $_POST["typnum"]; $urlsauv .= "&typnum=".$typnum; $typaut = $_POST["typaut"]; $urlsauv .= "&typaut=".$typaut; $typnom = $_POST["typnom"]; $urlsauv .= "&typnom=".$typnom; $typcol = $_POST["typcol"]; $urlsauv .= "&typcol=".$typcol; $typlim = $_POST["typlim"]; $urlsauv .= "&typlim=".$typlim; $limaff = $_POST["limaff"]; $urlsauv .= "&limaff=".$limaff; $typtit = ','; $listit = '~'; for ($i=0;$iaddSection(); $font = new PHPRtfLite_Font(9, 'Trebuchet', '#000000', '#FFFFFF'); $fontlien = new PHPRtfLite_Font(9, 'Trebuchet', '#0000FF', '#FFFFFF'); $fonth3 = new PHPRtfLite_Font(12, 'Trebuchet', '#000000', '#FFFFFF'); $fonth2 = new PHPRtfLite_Font(14, 'Trebuchet', '#000000', '#FFFFFF'); $parFormat = new PHPRtfLite_ParFormat(PHPRtfLite_ParFormat::TEXT_ALIGN_JUSTIFY); //sauvegarde URL $root = 'http'; if ( isset ($_SERVER["HTTPS"]) && $_SERVER["HTTPS"] == "on") { $root.= "s"; } $urlsauv = $root."://".$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']; $urlsauv .= "?team=".$team; $listaut = strtoupper($_GET["listaut"]); if ($listaut == "") {$listaut = $team;} $urlsauv .= "&listaut=".$listaut; $urlsauv .= "&idhal=".$idhal; $evhal = $_GET["evhal"]; $urlsauv .= "&evhal=".$evhal; if (isset($_GET['publis'])) {//Articles de revue $publis = $_GET["publis"]; $urlsauv .= "&publis=".$publis; $tabpublis = explode("~", $publis); $i = 0; $choix_publis = "-"; while (isset($tabpublis[$i])) { $choix_publis .= $tabpublis[$i]."-"; $i++; } } if (isset($_GET['comm'])) {//Communications / conférences $comm = $_GET["comm"]; $urlsauv .= "&comm=".$comm; $tabcomm = explode("~", $comm); $i = 0; $choix_comm = "-"; while (isset($tabcomm[$i])) { $choix_comm .= $tabcomm[$i]."-"; $i++; } } if (isset($_GET['ouvr'])) {//Ouvrages $ouvr = $_GET["ouvr"]; $urlsauv .= "&ouvr=".$ouvr; $tabouvr = explode("~", $ouvr); $i = 0; $choix_ouvr = "-"; while (isset($tabouvr[$i])) { $choix_ouvr .= $tabouvr[$i]."-"; $i++; } } if (isset($_GET['autr'])) {//Autres $autr = $_GET["autr"]; $urlsauv .= "&autr=".$autr; $tabautr = explode("~", $autr); $i = 0; $choix_autr = "-"; while (isset($tabautr[$i])) { $choix_autr .= $tabautr[$i]."-"; $i++; } } //Création des listes des auteurs appartenant à la collection spécifiée pour la liste include "./pvt/ExtractionHAL-auteurs.php"; $listenominit = "~"; $listenomcomp1 = "~"; $listenomcomp2 = "~"; foreach($AUTEURS_LISTE AS $i => $valeur) { if ($AUTEURS_LISTE[$i]['collhal'] == $listaut || $AUTEURS_LISTE[$i]['colleqhal'] == $listaut) { $listenomcomp1 .= nomCompEntier($AUTEURS_LISTE[$i]['nom'])." ".prenomCompEntier($AUTEURS_LISTE[$i]['prenom'])."~"; $listenomcomp2 .= prenomCompEntier($AUTEURS_LISTE[$i]['prenom'])." ".nomCompEntier($AUTEURS_LISTE[$i]['nom'])."~"; //si prénom composé et juste les ititiales $prenom = prenomCompInit($AUTEURS_LISTE[$i]['prenom']); $listenominit .= nomCompEntier($AUTEURS_LISTE[$i]['nom'])." ".$prenom.".~"; if (isset($AUTEURS_LISTE[$i]['arriv']) && $AUTEURS_LISTE[$i]['arriv'] != "") { $arriv .= $AUTEURS_LISTE[$i]['arriv']."~"; }else{ $arriv .= "1900~"; } if (isset($AUTEURS_LISTE[$i]['depar']) && $AUTEURS_LISTE[$i]['depar'] != "") { $depar .= $AUTEURS_LISTE[$i]['depar']."~"; }else{ $moisactuel = date('n', time()); if ($moisactuel >= 10) {$idepar = date('Y', time())+1;}else{$idepar = date('Y', time());} $depar .= $idepar."~"; } } } //Extraction sur un IdHAL > auteur à mettre en évidence if (isset($evhal) && $evhal != "") { $list = explode(" ", $evhal); $listenomcomp1 = "~".nomCompEntier($list[1])." ".prenomCompEntier($list[0])."~"; $listenomcomp2 = "~".prenomCompEntier($list[0])." ".nomCompEntier($list[1])."~"; //si prénom composé et juste les ititiales $prenom = prenomCompInit($list[0]); $listenominit = "~".nomCompEntier($list[1])." ".$prenom.".~"; $arriv = "~1900~"; $moisactuel = date('n', time()); if ($moisactuel >= 10) {$idepar = date('Y', time())+1;}else{$idepar = date('Y', time());} $depar = "~".$idepar."~"; } if (isset($_GET['anneedeb'])) {$anneedeb = $_GET['anneedeb'];}else{$anneedeb = date('Y', time());$anneefin = date('Y', time());} if (isset($_GET['anneefin'])) {$anneefin = $_GET['anneefin'];}else{if (isset($_GET['anneedeb'])) {$anneefin = $_GET['anneedeb'];}else{$anneefin = $anneedeb;}} // vérification sur ordre des années si différentes if ($anneefin < $anneedeb) {$anneetemp = $anneedeb; $anneedeb = $anneefin; $anneefin = $anneetemp;} $urlsauv .= "&anneedeb=".$anneedeb; $urlsauv .= "&anneefin=".$anneefin; if (isset($_GET['depotdeb'])) {$depotdeb = $_GET['depotdeb'];} if (isset($_GET['depotfin'])) {$depotfin = $_GET['depotfin'];} // si depotdeb et depotfin non définis, on force depotdeb au 01/01/anneedeb et depotfin au 31/12/anneefin if ($depotdeb == '' && $depotfin == '') { $depotforce = "oui"; $depotdeb = date('d/m/Y', mktime(0, 0, 0, 1, 1, $anneedeb)); $depotfin = date('d/m/Y', mktime(0, 0, 0, 12, 31, $anneefin)); } // si depotdeb défini mais pas depotfin, on force depotfin à aujourd'hui if ($depotdeb != '' && $depotfin == '') {$depotfin = date('d/m/Y', time());} // si depotfin défini mais pas depotdeb, on force depotdeb au 1er janvier de l'année de depotfin if ($depotdeb == '' && $depotfin != '') { $tabdepotfin = explode('/', $depotfin); $depotdeb = date('d/m/Y', mktime(0, 0, 0, 1, 1, $tabdepotfin[2])); } // si depotdeb est postérieur à depotfin, on inverse les deux if ($depotfin < $depotdeb) {$depottemp = $depotdeb; $depotdeb = $depotfin; $depotfin = $depottemp;} $urlsauv .= "&depotdeb=".$depotdeb; $urlsauv .= "&depotfin=".$depotfin; $typnum = $_GET["typnum"]; $urlsauv .= "&typnum=".$typnum; $typaut = $_GET["typaut"]; $urlsauv .= "&typaut=".$typaut; $typnom = $_GET["typnom"]; $urlsauv .= "&typnom=".$typnom; $typcol = $_GET["typcol"]; $urlsauv .= "&typcol=".$typcol; $typlim = $_GET["typlim"]; $urlsauv .= "&typlim=".$typlim; $limaff = $_GET["limaff"]; $urlsauv .= "&limaff=".$limaff; $typtit = $_GET["typtit"]; $urlsauv .= "&typtit=".$typtit; $typann = $_GET["typann"]; $urlsauv .= "&typann=".$typann; $typchr = $_GET["typchr"]; $urlsauv .= "&typchr=".$typchr; $typtri = $_GET["typtri"]; $urlsauv .= "&typtri=".$typtri; $typfor = $_GET["typfor"]; $urlsauv .= "&typfor=".$typfor; $typdoi = $_GET["typdoi"]; $urlsauv .= "&typdoi=".$typdoi; $surdoi = $_GET["surdoi"]; $urlsauv .= "&surdoi=".$surdoi; $typidh = $_GET["typidh"]; $urlsauv .= "&typidh=".$typidh; $racine = $_GET["racine"]; $urlsauv .= "&racine=".$racine; $typreva = $_GET["typreva"]; $urlsauv .= "&typreva=".$typreva; $typrevc = $_GET["typrevc"]; $urlsauv .= "&typrevc=".$typrevc; $typavsa = $_GET["typavsa"]; $urlsauv .= "&typavsa=".$typavsa; $delim = $_GET["delim"]; switch($delim) { case "pvir": $delim = ";"; $urlsauv .= "&delim=pvir"; break; case "poun": $delim = "£"; $urlsauv .= "&delim=poun"; break; case "para": $delim = "§"; $urlsauv .= "&delim=para"; break; } $nomeqp[0] = $team; if (isset($_GET['typcro'])) { $typcro = $_GET["typcro"]; $urlsauv .= "&typcro=".$typcro; } if (isset($_GET['typeqp'])) { $typeqp = $_GET["typeqp"]; $urlsauv .= "&typeqp=".$typeqp; } if (isset($_GET['prefeq'])) { $prefeq = $_GET["prefeq"]; $urlsauv .= "&prefeq=".$prefeq; } if (isset($_GET['nbeqp'])) { $nbeqp = $_GET["nbeqp"]; $urlsauv .= "&nbeqp=".$nbeqp; } if (isset($typeqp) && $typeqp == "oui") {//Numérotation/codification par équipe $gr = "¤".$team."¤"; for($i = 1; $i <= $nbeqp; $i++) { $gr .= $_GET['eqp'.$i]."¤"; $nomeqp[$i] = $_GET['eqp'.$i]; $urlsauv .= "&eqp".$i."=".$nomeqp[$i]; } } } ?>

Cette page permet d’afficher et d’exporter en RTF,CSV et/ou Bibtex des listes de publications HAL d’une unité, d'une équipe de recherche ou d'un auteur, à partir d’un script PHP créé par Philippe Gambette, repris et modifié par Olivier Troccaz (ECOBIO - OSUR) pour l’Université de Rennes 1. Si vous souhaitez utiliser le script PHP pour une autre institution, consultez la page Bibliopedia (ExtractionHAL).

Code collection HAL (qu’est-ce que c’est ?)Code visible dans l’URL d’une collection. Exemple : IPR-MOL est le code de la collection http://hal.archives-ouvertes.fr/IPR-PMOL de l’équipe Physique moléculaire de l’unité IPR UMR CNRS 6251 :

Code collection HAL pour la liste des auteurs à mettre en évidence (exemple)Indiquez ici le code collection de votre labo ou de votre équipe, selon que vous souhaitez mettre en évidence le nom des auteurs du labo ou de l'équipe. :

ou

Identifiant HAL auteur (IdHAL) : Créer mon IdHAL

Auteur correspondant à l'IdHAL à mettre en évidence (Prénom Nom) :

Choix des listes de publications à afficher (sélection/désélection multiple en maintenant la touche 'Ctrl' (PC) ou 'Pomme' (Mac) enfoncée):

Articles de revue :

Communications / conférences :

Ouvrages :

Autres productions scientifiques :

Période :	Depuis Jusqu'à
Date de dépôt :	Du Jusqu'au

Options d'affichage et d'export :
      • Numérotation :        >visible        >invisible
      • Auteurs (tous):        >soulignés        >gras        >aucun
      • Auteurs (tous):        >Nom, initiale(s) du(des) prénom(s)        >Nom Prénom(s)        >Prénom(s) Nom
      • Auteurs (de la collection) ou auteur IdHAL:        >soulignés        >gras        >aucun
      • Limiter l’affichage aux premiers auteurs (« et al. »):        >non        >oui
= 1) || !isset($team)) { $aucun = "checked"; $typtit = ",aucun"; }else{ $typtit = str_replace("aucun,","",$typtit); if (strpos($typtit,"guil") >= 1) {$guil = "checked";} if (strpos($typtit,"gras") >= 1) {$gras = "checked";} if (strpos($typtit,"ital") >= 1) {$ital = "checked";} if (strpos($typtit,"reto") >= 1) {$reto = "checked";} } ?>       • Titres (articles, ouvrages, chapitres, etc.) ('aucun' est prioritaire et doit donc être décoché pour activer une ou plusieurs des autres formes) :
             >entre guillemets        >en gras        >en italique        >suivi d'un RC        >aucun
      • Année :        >après les auteurs        >avant le numéro de volume
      • Classer par :        >année puis nom du premier auteur        >année puis journal
      • Années :        >décroissantes        >croissantes
      • Format métadonnées (articles de revues) :        >vol 5, n°2, pp. 320        >5(2):320
      • Lien DOI :        >visible        >invisible
      • Afficher les doublons par surlignage :        >oui        >non
      • Identifiant HAL :        >visible        >invisible

URL racine HAL :

      • Rang revues HCERES :        >visible        >invisible
      • Rang revues CNRS :        >visible        >invisible
      • Information (acte)/(sans acte) pour les communications et posters :        >visible        >invisible
      • Délimiteur export CSV :

      • Numérotation/codification par équipe :        >oui        >non

. Nombre d'équipes :

'); } echo('
'); echo('            . Limiter l\'affichage seulement aux publications croisées :'); echo('      '); echo('non'); echo('      '); echo('oui'); echo('

'); echo('            . Afficher le préfixe AERES :'); echo('      '); echo('oui'); echo('      '); echo('non'); } if (isset($_GET["team"])) { for($i = 1; $i <= $nbeqp; $i++) { echo('            . Nom HAL équipe '.$i.' :
'); } echo('
'); echo('            . Limiter l\'affichage seulement aux publications croisées :'); echo('      '); echo('non'); echo('      '); echo('oui'); echo('

'); echo('            . Afficher le préfixe AERES :'); echo('      '); echo('oui'); echo('      '); echo('non'); } } ?>

Exporter les données affichées en RTF, en CSV ou en Bibtex"); echo(" "); echo("Réinitialiser tous les paramètres"); echo(" "); echo("URL raccourcie directe : ".$urlbitly.""); echo("

"); } ?>

Sommaire

Tous les articles

Articles de revues à comité de lecture
Articles de revues sans comité de lecture
Articles de revues internationales
Articles de revues nationales
Articles de revues internationales à comité de lecture
Articles de revues nationales à comité de lecture
Articles de revues internationales sans comité de lecture
Articles de revues nationales sans comité de lecture
Articles de vulgarisation
Toutes les communications
Communications avec actes
Communications sans actes
Communications internationales
Communications nationales
Communications avec actes internationales
Communications sans actes internationales
Communications avec actes nationales
Communications sans actes nationales
Communications invitées avec ou sans actes, nationales ou internationales
Communications invitées avec actes
Communications invitées sans actes
Communications non invitées avec actes
Communications non invitées sans actes
Communications invitées internationales
Communications non invitées internationales
Communications invitées nationales
Communications non invitées nationales
Communications par affiches (posters) avec ou sans actes, nationales ou internationales
Communications par affiches (posters) avec actes
Communications par affiches (posters) sans actes
Communications par affiches internationales
Communications par affiches nationales
Conférences grand public
Tous les ouvrages
Ouvrages scientifiques de portée internationale
Ouvrages scientifiques de portée nationale
Chapitres d’ouvrages scientifiques
Chapitres d’ouvrages scientifiques de portée internationale
Chapitres d’ouvrages scientifiques de portée nationale
Directions d’ouvrages scientifiques
Directions d’ouvrages scientifiques de portée internationale
Directions d’ouvrages scientifiques de portée nationale
Ouvrages ou chapitres d’ouvrages
Ouvrages ou chapitres d’ouvrages de portée internationale
Ouvrages ou chapitres d’ouvrages de portée nationale
Ouvrages ou directions d’ouvrages
Ouvrages ou directions d’ouvrages de portée internationale
Ouvrages ou directions d’ouvrages de portée nationale
Ouvrages ou chapitres ou directions d’ouvrages
Ouvrages ou chapitres ou directions d’ouvrages de portée internationale
Ouvrages ou chapitres ou directions d’ouvrages de portée internationale
Ouvrages ou chapitres de vulgarisation
Brevets
Rapports
Thèses
HDR
Preprints, working papers, manuscrits non publiés
Autres publications
Bilan quantitatif

. */ //Compilation des critères de recherche $specificRequestCode = ''; //Période de recherche if (isset($anneedeb) && isset($anneefin) && $anneedeb != $anneefin) { $iann = $anneedeb; while ($iann <= $anneefin) { if ($iann == $anneedeb) {$specificRequestCode .= "%20AND%20(";}else{$specificRequestCode .= "%20OR%20";} $specificRequestCode .= 'producedDateY_i:"'.$iann.'"'; $iann++; } $specificRequestCode .= ')'; }else{ if (!isset($anneedeb)) {$anneedeb = date('Y', time());} $specificRequestCode .= '%20AND%20producedDateY_i:"'.$anneedeb.'"'; } //Date de dépôt if (isset($depotdeb) && $depotdeb != "" && isset($depotfin) && $depotfin != "") { //Conversion des dates au format HAL ISO 8601 jj/mm/aaaa > aaaa-mm-jjT00:00:00Z $tabdepotdeb = explode('/', $depotdeb); $depotdebiso = $tabdepotdeb[2].'-'.$tabdepotdeb[1].'-'.$tabdepotdeb[0].'T00:00:00Z'; $tabdepotfin = explode('/', $depotfin); $depotfiniso = $tabdepotfin[2].'-'.$tabdepotfin[1].'-'.$tabdepotfin[0].'T00:00:00Z'; //champ:[valeurDébut TO valeurFin] $specificRequestCode .= '%20AND%20submittedDate_tdate:['.$depotdebiso.'%20TO%20'.$depotfiniso.']'; } //collCode_s sert aussi bien pour une collection que pour un idhal function getReferences($infoArray,$sortArray,$docType,$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre){ static $listedoi = ""; include "ExtractionHAL-rang-AERES-SHS.php"; include "ExtractionHAL-rang-CNRS.php"; $docType_s=$docType; if (isset($idhal) && $idhal != "") {$atester = "authIdHal_s";}else{$atester = "collCode_s";} $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:".$docType_s.$specificRequestCode."&rows=0"); //echo "http://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:".$docType_s.$specificRequestCode."&rows=0"; if ($docType_s=="COMM+POST"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"COMM\"%20OR%20docType_s:\"POSTER\")".$specificRequestCode."&rows=0"); } if ($docType_s=="OUV+COUV"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"COUV\")".$specificRequestCode."&rows=0"); } if ($docType_s=="OUV+DOUV"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"DOUV\")".$specificRequestCode."&rows=0"); } if ($docType_s=="OUV+COUV+DOUV"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"COUV\"%20OR%20docType_s:\"DOUV\")".$specificRequestCode."&rows=0"); } if ($docType_s=="UNDEF"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:\"UNDEFINED\"".$specificRequestCode."&rows=0"); } if ($docType_s!="OUV+COUV" && $docType_s!="OUV+DOUV" && $docType_s!="OUV+COUV+DOUV" && $docType_s!="UNDEF" && $docType_s!="COMM+POST"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:".$docType_s.$specificRequestCode."&rows=0"); } $contents = utf8_encode($contents); $results = json_decode($contents); $numFound=$results->response->numFound; //Extracted fields depend on type of reference: $fields="docid,authFirstName_s,authLastName_s,authFullName_s,title_s,files_s,label_s,seeAlso_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; if ($docType_s=="ART"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,journalTitle_s,journalIssn_s,volume_s,issue_s,page_s,producedDateY_i,proceedings_s,files_s,label_s,doiId_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="COMM"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,conferenceTitle_s,city_s,country_s,conferenceStartDate_s,producedDateY_i,proceedings_s,comment_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,conferenceStartDateD_i,conferenceStartDateM_i,conferenceStartDateY_i,conferenceEndDateD_i,conferenceEndDateM_i,conferenceEndDateY_i,collCode_s,source_s,bookTitle_s,volume_s,issue_s,page_s,doiId_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="POSTER"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,conferenceTitle_s,city_s,country_s,conferenceStartDate_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,conferenceEndDateY_i,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s,source_s,volume_s,page_s"; } if ($docType_s=="OTHER" or $docType_s=="OTHERREPORT"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,conferenceTitle_s,city_s,country_s,conferenceStartDate_s,producedDateY_i,proceedings_s,comment_s,files_s,label_s,description_s,seeAlso_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="REPORT"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,conferenceTitle_s,city_s,country_s,conferenceStartDate_s,producedDateY_i,proceedings_s,comment_s,files_s,label_s,description_s,seeAlso_s,halId_s,pubmedId_s,arxivId_s,reportType_s,number_s,authorityInstitution_s,page_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="THESE"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,producedDateY_i,director_s,authorityInstitution_s,defenseDateY_i,nntId_id,nntId_s,seeAlso_s,halId_s,pubmedId_s,arxivId_s,reportType_s,number_s,authorityInstitution_s,page_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="HDR"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,producedDateY_i,director_s,authorityInstitution_s,defenseDateY_i,nntId_id,nntId_s,seeAlso_s,halId_s,pubmedId_s,arxivId_s,reportType_s,number_s,authorityInstitution_s,page_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="OUV" or $docType_s=="DOUV"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,isbn_s,page_s,doiId_s,seeAlso_s,scientificEditor_s,publisher_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="COUV" or $docType_s=="DOUV"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,isbn_s,page_s,doiId_s,seeAlso_s,bookTitle_s,scientificEditor_s,publisher_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } if ($docType_s=="PATENT"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,number_s,producedDateY_i,producedDateY_i,seeAlso_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; } //Cas particulierS pour combinaisons if ($docType_s=="COMM+POST"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,conferenceTitle_s,city_s,country_s,conferenceStartDate_s,producedDateY_i,proceedings_s,comment_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,conferenceStartDateD_i,conferenceStartDateM_i,conferenceStartDateY_i,conferenceEndDateD_i,conferenceEndDateM_i,conferenceEndDateY_i,collCode_s,source_s,bookTitle_s,volume_s,issue_s,page_s,doiId_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"COMM\"%20OR%20docType_s:\"POSTER\")".$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); } if ($docType_s=="OUV+COUV"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,isbn_s,page_s,doiId_s,seeAlso_s,bookTitle_s,scientificEditor_s,publisher_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"COUV\")".$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); } if ($docType_s=="OUV+DOUV"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,isbn_s,page_s,doiId_s,seeAlso_s,bookTitle_s,scientificEditor_s,publisher_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"DOUV\")".$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); } if ($docType_s=="OUV+COUV+DOUV"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,bookCollection_s,isbn_s,page_s,doiId_s,seeAlso_s,bookTitle_s,scientificEditor_s,publisher_s,producedDateY_i,proceedings_s,files_s,label_s,halId_s,pubmedId_s,arxivId_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20(docType_s:\"OUV\"%20OR%20docType_s:\"COUV\"%20OR%20docType_s:\"DOUV\")".$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); } if ($docType_s=="UNDEF"){ $fields="docid,authFirstName_s,authLastName_s,authFullName_s,authAlphaLastNameFirstNameId_fs,title_s,journalTitle_s,volume_s,issue_s,page_s,producedDateY_i,proceedings_s,files_s,label_s,doiId_s,halId_s,pubmedId_s,arxivId_s,seeAlso_s,localReference_s,collCode_s,popularLevel_s,peerReviewing_s,invitedCommunication_s,proceedings_s,audience_s,label_bibtex,docType_s"; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:\"UNDEFINED\"".$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); } if ($docType_s!="OUV+COUV" && $docType_s!="OUV+DOUV" && $docType_s!="OUV+COUV+DOUV" && $docType_s!="UNDEF" && $docType_s!="COMM+POST"){ $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:".$docType_s.$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"); //$contents = utf8_encode($contents); } //echo "http://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$collCode_s."%20AND%20docType_s:".$docType_s.$specificRequestCode."&rows=".$numFound."&fl=".$fields."&sort=auth_sort%20asc"; ini_set('memory_limit', '256M'); $results = json_decode($contents); //var_dump($results); foreach($results->response->docs as $entry){ $img=""; $chaine1 = ""; $chaine2 = ""; if(isset($entry->files_s)){ $img="files_s[0]."\">

"; } $img.=" docid."&wt=bibtex\">

"; $entryInfo = ""; //Adding collCode_s for specific case GR $listColl = "~"; if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)) { foreach($entry->collCode_s as $coll){ if (strpos($listColl, "~".$coll."~") === false) { $listColl .= "~".$coll."~"; for($i = 1; $i <= $nbeqp; $i++) { if (isset($_POST["soumis"])) { if ($coll == strtoupper($_POST['eqp'.$i])) { $entryInfo .= "GR".$i." - ¤ - "; $eqpgr = strtoupper($_POST['eqp'.$i]); break; } } if (isset($_GET["team"])) { if ($coll == $_GET['eqp'.$i]) { $entryInfo .= "GR".$i." - ¤ - "; $eqpgr = $_GET['eqp'.$i]; break; } } } } } $chaine1 .= "Collection"; $chaine2 .= $entryInfo; } //Le champ 'producedDateY_i' n'est pas obligatoire pour les communications et posters > on testera alors avec conferenceEndDateY_i if ($docType_s != "COMM" || $docType_s != "POSTER" || $docType_s != "COMM+POST") { $dateprod = $entry->producedDateY_i; }else{ if (isset($entry->producedDateY_i)) { $dateprod = $entry->producedDateY_i; }else{ $dateprod = $entry->conferenceEndDateY_i; } } //Adding authors: $initial = 1; $i = 0; foreach($entry->authLastName_s as $nom){ //$nom = ucwords(mb_strtolower($nom, 'UTF-8')); $nom = nomCompEntier($nom); $prenom = ucfirst(mb_strtolower($entry->authFirstName_s[$i], 'UTF-8')); //Si, Nom, initiale du prénom if ($typnom == "nominit") { //si prénom composé et initiales $prenom = prenomCompInit($prenom); if ($initial == 1){ $initial = 0; $authors = ""; }else{ $authors .= ", "; } if (strpos($listenominit, $nom." ".$prenom) === false) { $deb = "";$fin = ""; }else{ //On vérifie que l'auteur est bien dans la collection pour l'année de la publication $deb = ""; $fin = ""; $pos = strpos($listenominit, $nom." ".$prenom); $pos = substr_count(substr($listenominit, 0, $pos), '~'); $crit = 0; for ($k = 1; $k <= $pos; $k++) { $crit = strpos($arriv, '~', $crit+1); //echo 'toto : '.strlen($arriv).' - '.$crit.'
'; //echo 'toto : '.$arriv.'
'; //echo 'toto : '.$depar.'
'; } $datearriv = substr($arriv, $crit-4, 4); $datedepar = substr($depar, $crit-4, 4); //echo 'titi : '.$dateprod <= $datedepar; if ($dateprod >= $datearriv && $dateprod <= $datedepar) { if ($typcol == "soul") {$deb = "";$fin = "";} if ($typcol == "gras") {$deb = "";$fin = "";} if ($typcol == "aucun") {$deb = "";$fin = "";} } } $authors .= $deb.$nom." ".$prenom.$fin; }else{//Si nom/prénom complets if ($typnom == "nomcomp1") {//Nom Prénom if ($initial == 1){ $initial = 0; $authors = ""; }else{ $authors .= ", "; } $prenom = prenomCompEntier($prenom); if (strpos($listenomcomp1, $nom." ".$prenom) === false) { $deb = "";$fin = ""; }else{ //On vérifie que l'auteur est bien dans la collection pour l'année de la publication $deb = ""; $fin = ""; $pos = strpos($listenomcomp1, $nom." ".$prenom); $pos = substr_count(substr($listenomcomp1, 0, $pos), '~'); $crit = 0; for ($k = 1; $k <= $pos; $k++) { $crit = strpos($arriv, '~', $crit+1); } $datearriv = substr($arriv, $crit-4, 4); $datedepar = substr($depar, $crit-4, 4); if ($dateprod >= $datearriv && $dateprod <= $datedepar) { if ($typcol == "soul") {$deb = "";$fin = "";} if ($typcol == "gras") {$deb = "";$fin = "";} if ($typcol == "aucun") {$deb = "";$fin = "";} } } $authors .= $deb.$nom." ".$prenom.$fin; }else{//Prénom Nom if ($initial == 1){ $initial = 0; $authors = ""; }else{ $authors .= ", "; } $prenom = prenomCompEntier($prenom); if (strpos($listenomcomp2, $prenom." ".$nom) === false) { $deb = "";$fin = ""; }else{ //On vérifie que l'auteur est bien dans la collection pour l'année de la publication $pos = strpos($listenomcomp2, $prenom." ".$nom); $pos = substr_count(substr($listenomcomp2, 0, $pos), '~'); $crit = 0; for ($k = 1; $k <= $pos; $k++) { $crit = strpos($arriv, '~', $crit+1); } $datearriv = substr($arriv, $crit-4, 4); $datedepar = substr($depar, $crit-4, 4); if ($dateprod >= $datearriv && $dateprod <= $datedepar) { if ($typcol == "soul") {$deb = "";$fin = "";} if ($typcol == "gras") {$deb = "";$fin = "";} if ($typcol == "aucun") {$deb = "";$fin = "";} } } $authors .= $deb.$prenom." ".$nom.$fin; } } $i++; } //Limiting to 5, 10, 15 or 20 authors + et al. if (isset($typlim) && $typlim == "oui") { $cpt = 1; $pospv = 0; $lim_aut_ok = 1; $limvirg = $limaff; while ($cpt <= $limvirg) { if (strpos($authors, ",", $pospv+1) !== false) { $pospv = strpos($authors, ",", $pospv+1); $cpt ++; }else{ $lim_aut_ok = 0; break; } } $extract = $authors; if ($lim_aut_ok != 0) { //$extract = mb_substr($authors, 0, $pospv, 'UTF-8'); $extract = substr($authors, 0, $pospv); $extract .= " et al."; }else{ if ($typnom != "nominit") { $extract .= "."; } } }else{ $extract = $authors; } if ($typaut == "soul") {$extract = "".$extract."";} if ($typaut == "gras") {$extract = "".$extract."";} $entryInfo .= $extract; if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)) { $chaine1 .= $delim."Auteurs"; $chaine2 .= $delim.strip_tags($extract); }else{ $chaine1 .= "Auteurs"; $chaine2 .= strip_tags($extract); } //Adding producedDateY_i: $chaine1 .= $delim."Année"; if ($typann == "apres") {//Année après les auteurs if ($docType_s=="ART" || $docType_s=="UNDEF" || $docType_s=="COMM" || $docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" or $docType_s=="OUV+COUV" or $docType_s=="OUV+DOUV" or $docType_s=="OUV+COUV+DOUV" or $docType_s=="OTHER" or $docType_s=="OTHERREPORT" or $docType_s=="REPORT" or $docType_s=="COMM+POST"){ $entryInfo .= " (".$dateprod.")"; $chaine2 .= $delim.$dateprod; }else{ $chaine2 .= $delim; } }else{ $entryInfo .= ", "; $chaine2 .= $delim; } //HDR - adding defenseDateY_i $chaine1 .= $delim."Année de soutenance"; if ($docType_s=="HDR" && isset($entry->defenseDateY_i)){ $entryInfo .= " (".$entry->defenseDateY_i.")"; $chaine2 .= $delim.$entry->defenseDateY_i; }else{ $chaine2 .= $delim; } //Adding title: $chaine1 .= $delim."Titre"; if ($typann == "apres") {$point = ".";}else{$point = "";} $deb = " "; $fin = ""; if (strpos($typtit,"guil") >= 1) {$deb .= "« ";$fin .= " »";} if (strpos($typtit,"gras") >= 1) {$deb .= "";$fin .= "";} if (strpos($typtit,"ital") >= 1) {$deb .= "";$fin .= "";} if (strpos($typtit,"reto") >= 1) {$fin .= "
";} $titre = cleanup_title($entry->title_s[0]); $deb2 = ""; $fin2 = ""; //Est-ce un doublon et, si oui, faut-il l'afficher? if (stripos($listetitre, $titre) === false) {//non $listetitre .= "¤".$titre; }else{ if ($surdoi == "vis") { $deb2 = ""; $fin2 = ""; } } $entryInfo .= $point.$deb.$deb2.$titre.$fin2.$fin; $chaine2 .= $delim.$titre; //Adding journalTitle_s: $chaine1 .= $delim."Titre journal"; if ($docType_s=="ART"){ $entryInfo .= ". ".$entry->journalTitle_s.""; $chaine2 .= $delim.$entry->journalTitle_s; }else{ $chaine2 .= $delim; } //Adding $dateprod (=producedDateY_i ou conferenceEndDateY_i) $chaine1 .= $delim."Année"; if ($typann == "avant") {//Année avant le numéro de volume if ($docType_s=="ART" || $docType_s=="UNDEF"){ if (strpos($typtit,"reto") >= 1) { $entryInfo .= $dateprod.","; }else{ $entryInfo .= ", ".$dateprod.","; } $chaine2 .= $delim.$dateprod; }else{ $chaine2 .= $delim; } if ($docType_s == "COMM" || $docType_s == "COMM+POST"){ if (strpos($typtit,"reto") >= 1) { $entryInfo .= $dateprod.","; }else{ $entryInfo .= ", ".$dateprod.","; } $chaine2 .= $delim.$dateprod; }else{ $chaine2 .= $delim; } }else{ if ($docType_s != "THESE" && $docType_s != "HDR") { if (strpos($typtit,"reto") >= 1) { }else{ $entryInfo .= ", "; } $chaine2 .= $delim; }else{ $entryInfo .= ". "; $chaine2 .= $delim; } } $hasVolumeOrNumber=0; $toAppear=0; //Adding volume_s: $vol = ""; $chaine1 .= $delim."Volume"; if ($docType_s=="ART"){ if(isset($entry->volume_s) && !is_array($entry->volume_s)){ if($entry->volume_s!="" and $entry->volume_s!=" " and $entry->volume_s!="-" and $entry->volume_s!="()"){ if(toAppear($entry->volume_s)){ $toAppear=1; } else { if ($typfor == "typ2") { $entryInfo .= " ".$entry->volume_s; $chaine2 .= $delim.$entry->volume_s; $hasVolumeOrNumber=1; }else{ $vol = $entry->volume_s; $hasVolumeOrNumber=1; $chaine2 .= $delim; } } }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding issue_s: $iss = ""; $chaine1 .= $delim."Issue"; //if ($docType_s=="ART" OR $docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV" OR $docType_s=="COMM+POST"){ if ($docType_s=="ART" OR $docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if(isset($entry->issue_s[0]) && !is_array($entry->issue_s[0])){ if($entry->issue_s[0]!="" and $entry->issue_s[0]!=" " and $entry->issue_s[0]!="-" and $entry->issue_s[0]!="()"){ if(toAppear($entry->issue_s[0])){ $toAppear=1; }else{ if ($typfor == "typ2") { $entryInfo .= "(".$entry->issue_s[0].")"; $chaine2 .= $delim.$entry->issue_s[0]; $hasVolumeOrNumber=1; }else{ $iss = $entry->issue_s[0]; $hasVolumeOrNumber=1; $chaine2 .= $delim; } } }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding scientificEditor_s: $chaine1 .= $delim."Editeur scientifique"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if(count($entry->scientificEditor_s)>0){ $initial = 1; foreach($entry->scientificEditor_s as $editor){ if ($initial==1){ $entryInfo .= ", in ".$editor; $chaine2 .= $delim.$entry->scientificEditor_s; $initial=0; } else { $entryInfo .= ", in ".$editor; $chaine2 .= $delim.$entry->scientificEditor_s; } } }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding bookTitle_s: $chaine1 .= $delim."Titre ouvrage"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if (isset($entry->bookTitle_s)) { $entryInfo .= ", ".$entry->bookTitle_s.""; $chaine2 .= $delim.$entry->bookTitle_s; }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding bookCollection_s: $chaine1 .= $delim."Titre du volume"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if (isset($entry->bookCollection_s)) { $entryInfo .= ". ".$entry->bookCollection_s; $chaine2 .= $delim.$entry->bookCollection_s; }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding publisher_s: $chaine1 .= $delim."Editeur revue"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if(!$entry->publisher_s[0]==""){ $entryInfo .= ", ".$entry->publisher_s[0]; $chaine2 .= $delim.$entry->publisher_s[0]; }else{ $chaine2 .= $delim.$entry->publisher_s[0]; } }else{ $chaine2 .= $delim; } //Adding page_s: $chaine1 .= $delim."Volume, Issue, Pages"; if ($docType_s=="ART" or $docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ if (isset($entry->page_s)) { $page = $entry->page_s; $patterns = array(); $patterns[0] = '/--/'; $patterns[1] = '/Pages:/'; $patterns[2] = '/–/'; $patterns[3] = '/ - /'; $replacements = array(); $replacements[0] = '-'; $replacements[1] = ''; $replacements[2] = '-'; $replacements[3] = '-'; $page = preg_replace($patterns, $replacements, $page); if(substr($page,0,1)==" "){ $page=substr($page,-(strlen($page)-1)); } if(toAppear($page)){ $toAppear=1; } if($toAppear==1){ $entryInfo .= ", to appear"; $chaine2 .= $delim."to appear"; } else { if(!($page=="?" or $page=="-" or $page=="" or $page==" " or $page=="–")){ if ($typfor == "typ2") { if($hasVolumeOrNumber==1){ $entryInfo .= ":".$page; $chaine2 .= $delim.$page; }else{ $entryInfo .= ", ".$page; $chaine2 .= $delim.$page; } }else{ if ($vol != "") {$entryInfo .= " vol ".$vol;$chaine2 .= $delim." vol ".$vol;}else{$chaine2 .= $delim;} if ($iss != "") {$entryInfo .= ", n°".$iss;$chaine2 .= " ,n° ".$iss;} if ($page != "") { if (is_numeric(substr($page,0,1))) { $entryInfo .= ", pp. ".$page; $chaine2 .= ", pp. ".$page; }else{ $entryInfo .= $page; $chaine2 .= $page; } } } }else{ $chaine2 .= $delim; } } }else{ if ($docType_s=="ART") {$entryInfo .= ' in press';} $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding isbn_s: $chaine1 .= $delim."ISBN"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" OR $docType_s=="OUV+COUV" OR $docType_s=="OUV+DOUV" OR $docType_s=="OUV+COUV+DOUV"){ $entryInfo .= ", ".$entry->isbn_s."."; $chaine2 .= $delim.$entry->isbn_s; }else{ $chaine2 .= $delim; } //Adding conferenceTitle_s: $chaine1 .= $delim."Titre conférence"; if ($docType_s=="COMM" || $docType_s=="POSTER" || $docType_s == "COMM+POST"){ if (strpos($typtit,"reto") >= 1) { $entryInfo .= " ".$entry->conferenceTitle_s; }else{ $entryInfo .= ", ".$entry->conferenceTitle_s; } $chaine2 .= $delim.$entry->conferenceTitle_s; }else{ $chaine2 .= $delim; } //Adding comment: $chaine1 .= $delim."Commentaire"; if (($docType_s=="COMM" and $specificRequestCode=="%20AND%20invitedCommunication_s:1") or ($docType_s=="OTHER") or ($docType_s=="OTHERREPORT") || $docType_s == "COMM+POST"){ if (isset($entry->comment_s) && $entry->comment_s!="" and $entry->comment_s!=" " and $entry->comment_s!="-" and $entry->comment_s!="?"){ $entryInfo .= ", ".$entry->comment_s; $chaine2 .= $delim.$entry->comment_s; }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding congress dates $chaine1 .= $delim."Date congrès"; $mois = Array('','janvier','février','mars','avril','mai','juin','juillet','août','septembre','octobre','novembre','décembre'); if ($docType_s=="COMM" || $docType_s=="POSTER" || $docType_s == "COMM+POST"){ if (isset($entry->conferenceStartDateY_i) && isset($entry->conferenceEndDateY_i) && $entry->conferenceStartDateY_i != "" && $entry->conferenceStartDateY_i == $entry->conferenceEndDateY_i) {//même année if (isset($entry->conferenceStartDateM_i) && isset($entry->conferenceEndDateM_i) && $entry->conferenceStartDateM_i != "" && $entry->conferenceStartDateM_i == $entry->conferenceEndDateM_i) {//même mois if (isset($entry->conferenceStartDateD_i) && isset($entry->conferenceEndDateD_i) && $entry->conferenceStartDateD_i != "" && $entry->conferenceStartDateD_i == $entry->conferenceEndDateD_i) {//même jour $entryInfo .= ", ".$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; $chaine2 .= $delim.$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; }else{//jours différents if (isset($entry->conferenceStartDateD_i) && $entry->conferenceStartDateD_i != "") { $entryInfo .= ", ".$entry->conferenceStartDateD_i; $chaine2 .= $delim.$entry->conferenceStartDateD_i; } if (isset($entry->conferenceEndDateD_i) && $entry->conferenceEndDateD_i != "" && $entry->conferenceEndDateM_i != "" && $entry->conferenceEndDateY_i != "") { $entryInfo .= "-".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; $chaine2 .= "-".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; } } }else{//mois différents if (isset($entry->conferenceStartDateD_i) && $entry->conferenceStartDateD_i != "" && $entry->conferenceStartDateM_i != "") { $entryInfo .= ", ".$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceStartDateM_i]; $chaine2 .= $delim.$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceStartDateM_i]; } if (isset($entry->conferenceEndDateD_i) && $entry->conferenceEndDateD_i != "" && $entry->conferenceEndDateM_i != "" && $entry->conferenceEndDateY_i != "") { $entryInfo .= "-".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; $chaine2 .= "-".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; } } }else{//années différentes if (isset($entry->conferenceStartDateD_i) && $entry->conferenceStartDateD_i != "" && $entry->conferenceStartDateM_i != "" && $entry->conferenceStartDateY_i != "") { $entryInfo .= ", ".$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceStartDateM_i]." ".$entry->conferenceStartDateY_i; $chaine2 .= $delim.$entry->conferenceStartDateD_i." ".$mois[$entry->conferenceStartDateM_i]." ".$entry->conferenceStartDateY_i; } if (isset($entry->conferenceEndDateY_i) && $entry->conferenceEndDateD_i != "" && $entry->conferenceEndDateM_i != "" && $entry->conferenceEndDateY_i != "") { $entryInfo .= " - ".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; $chaine2 .= " - ".$entry->conferenceEndDateD_i." ".$mois[$entry->conferenceEndDateM_i]." ".$entry->conferenceEndDateY_i; } } //si aucune date renseignée if (isset($entry->conferenceStartDateY_i) && $entry->conferenceStartDateY_i == "" && $entry->conferenceStartDateM_i == "" && $entry->conferenceStartDateD_i == "" && $entry->conferenceEndDateY_i == "" && $entry->conferenceEndDateM_i == "" && $entry->conferenceEndDateD_i == "") { $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding city_s: $chaine1 .= $delim."Ville"; if ($docType_s=="COMM" || $docType_s=="POSTER" || $docType_s == "COMM+POST"){ if($entry->city_s!=""){ $entryInfo .= ", ".$entry->city_s; $chaine2 .= $delim.$entry->city_s; }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding country_s: $chaine1 .= $delim."Pays"; if ($docType_s=="COMM" || $docType_s=="POSTER" || $docType_s == "COMM+POST"){ if($entry->country_s!=""){ $entryInfo .= " (".$countries[$entry->country_s].")."; $chaine2 .= $delim.$countries[$entry->country_s]; }else{ $entryInfo .= "."; $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Cas où certaines communications sont recensées sous formes d'abstracts dans des revues if ($docType_s == "COMM" || $docType_s == "COMM+POST") { //Adding source_s: $chaine1 .= $delim."Source"; if(isset($entry->source_s) && $entry->source_s != ""){ $entryInfo .= " ".$entry->source_s.","; $chaine2 .= $delim.$entry->source_s; }else{ if(isset($entry->bookTitle_s) && $entry->bookTitle_s != "") { $entryInfo .= " ".$entry->bookTitle_s.","; $chaine2 .= $delim.$entry->bookTitle_s; }else{ $chaine2 .= $delim; } } //Adding volume_s: $vol = 0; $chaine1 .= $delim."Volume"; if(isset($entry->volume_s) && $entry->volume_s != ""){ $vol = 1; $entryInfo .= " ".$entry->volume_s; $chaine2 .= $delim.$entry->volume_s; }else{ $chaine2 .= $delim; } //Adding issue_s: $iss = 0; $chaine1 .= $delim."Numéro"; if(isset($entry->issue_s) && $entry->issue_s != ""){ $iss = 1; $entryInfo .= "(".$entry->issue_s[0].")"; $chaine2 .= $delim.$entry->issue_s[0]; }else{ $chaine2 .= $delim; } //Adding page_s: $chaine1 .= $delim."Pagination"; if(isset($entry->page_s) && $entry->page_s != ""){ if ($vol == 1 && $iss == 1) { $entryInfo .= ":"; }else{ $entryInfo .= " "; } $entryInfo .= $entry->page_s; $chaine2 .= $delim.$entry->page_s; }else{ $entryInfo .= " in press"; $chaine2 .= $delim; } $entryInfo .= "."; } //Adding conferenceStartDate_s: //if ($docType_s=="COMM" || $docType_s=="POSTER" || $docType_s == "COMM+POST"){ //$entryInfo .= ", ".$entry->conferenceStartDate_s; //} //Ajout de l'identifiant et des actes pour les posters avec actes if ($docType_s == "POSTER") { //Adding source_s: $chaine1 .= $delim."Source"; if($entry->source_s != ""){ $entryInfo .= " ".$entry->source_s.","; $chaine2 .= $delim.$entry->source_s; } $chaine2 .= $delim; //Adding volume_s: $chaine1 .= $delim."Volume"; if($entry->volume_s != ""){ $entryInfo .= " ".$entry->volume_s.","; $chaine2 .= $delim.$entry->volume_s; } $chaine2 .= $delim; //Adding page_s: $chaine1 .= $delim."Page/identifiant"; if($entry->page_s != ""){ $entryInfo .= " pp.".$entry->page_s.","; $chaine2 .= $delim.$entry->page_s; } $chaine2 .= $delim; } //Adding (avec acte)/(sans acte) pour les communications et posters if ($docType_s == "COMM" || $docType_s == "POSTER" || $docType_s == "COMM+POST") { if (isset($typavsa) && $typavsa == "vis") { $chaine1 .= $delim."Info avsa"; if ($entry->proceedings_s == "0") { $entryInfo .= " (sans acte)"; $chaine2 .= $delim."(sans acte)"; }else{ $entryInfo .= " (avec acte)"; $chaine2 .= $delim."(avec acte)"; } } } //Adding patent number: $chaine1 .= $delim."Patent n°"; if ($docType_s=="PATENT"){ $entryInfo .= " Patent n°".$entry->number_s[0]; $chaine2 .= $delim.$entry->number_s[0]; }else{ $chaine2 .= $delim; } //Adding $dateprod (=producedDateY_i ou conferenceEndDateY_i): $chaine1 .= $delim."Date de publication"; if ($docType_s=="PATENT"){ $entryInfo .= " (".$dateprod.")"; $chaine2 .= $delim.$dateprod; }else{ $chaine2 .= $delim; } //Adding reportType_s: $chaine1 .= $delim."Type de rapport"; if ($docType_s=="REPORT" && isset($entry->reportType_s)) { if ($entry->reportType_s == 6) {$reportType = "Rapport de recherche";} if ($entry->reportType_s == 2) {$reportType = "Contrat";} if ($entry->reportType_s == 5) {$reportType = "Stage";} if ($entry->reportType_s == 3) {$reportType = "Interne";} if ($entry->reportType_s == 1) {$reportType = "Travail universitaire";} if ($entry->reportType_s == 4) {$reportType = "Rapport technique";} if ($entry->reportType_s == 0) {$reportType = "Rapport de recherche";} $entryInfo .= ". ".$reportType; $chaine2 .= $delim.$reportType; }else{ $chaine2 .= $delim; } //Adding number_s: $chaine1 .= $delim."N°"; if ($docType_s=="REPORT" && isset($entry->number_s)) { $entryInfo .= ", N°".$entry->number_s[0]; $chaine2 .= $delim.$entry->number_s[0]; }else{ $chaine2 .= $delim; } //Adding authorityInstitution_s: $chaine1 .= $delim."Organisme de délivrance"; if ($docType_s=="REPORT" && isset($entry->authorityInstitution)) { $entryInfo .= ". ".$entry->authorityInstitution; $chaine2 .= $delim.$entry->authorityInstitution; }else{ $chaine2 .= $delim; } //Adding page_s for report: $chaine1 .= $delim."Pages"; if ($docType_s=="REPORT") { if (isset($entry->page_s)) { $entryInfo .= ". ".$entry->page_s; $chaine2 .= $delim.$entry->page_s; if (strpos($entry->page_s, "p") === false) {$entryInfo .= "p.";} }else{ $entryInfo .= ", in press"; $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Adding $dateprod (=producedDateY_i ou conferenceEndDateY_i): $chaine1 .= $delim."Date de publication"; if ($docType_s=="OUV" or $docType_s=="DOUV" or $docType_s=="COUV" or $docType_s=="OUV+COUV" or $docType_s=="OUV+DOUV" or $docType_s=="OUV+COUV+DOUV" or $docType_s=="OTHER" or ($docType_s=="OTHERREPORT") or ($docType_s=="REPORT")){ if ($typann == "avant") { $entryInfo .= ", ".$dateprod."."; $chaine2 .= $delim.$dateprod; }else{ $chaine2 .= $delim; } }else{ $chaine2 .= $delim; } //Thesis - adding director_s $chaine1 .= $delim."Directeur de thèse"; if ($docType_s=="THESE" && isset($entry->director_s)){ $entryInfo .= "Dir : ".$entry->director_s[0]."."; $chaine2 .= $delim.$entry->director_s[0]; }else{ $chaine2 .= $delim; } //Thesis - adding authorityInstitution_s $chaine1 .= $delim."Université de soutenance"; if ($docType_s=="THESE" && isset($entry->authorityInstitution_s)){ $entryInfo .= " ".$entry->authorityInstitution_s[0]; $chaine2 .= $delim.$entry->authorityInstitution_s[0]; }else{ $chaine2 .= $delim; } //Thesis - adding defenseDateY_i $chaine1 .= $delim."Année de soutenance"; if ($docType_s=="THESE" && isset($entry->defenseDateY_i)){ $entryInfo .= ", ".$entry->defenseDateY_i; $chaine2 .= $delim.$entry->defenseDateY_i; }else{ $chaine2 .= $delim; } //HDR - adding authorityInstitution_s $chaine1 .= $delim."Organisme de délivrance"; if ($docType_s=="HDR" && isset($entry->authorityInstitution_s)){ $entryInfo .= "HDR, ".$entry->authorityInstitution_s[0]; $chaine2 .= $delim.$entry->authorityInstitution_s[0]; }else{ $chaine2 .= $delim; } //Corrections diverses $entryInfo =str_replace(",, ", ", ", $entryInfo); $entryInfo =str_replace(", , ", ", ", $entryInfo); $entryInfo =str_replace("..", ".", $entryInfo); //$entryInfo =str_replace(".,", ",", $entryInfo); $entryInfo =str_replace("?.", "?", $entryInfo); $entryInfo =str_replace("?,", "?", $entryInfo); $entryInfo =str_replace(", , ", ", ", $entryInfo); $entryInfo =str_replace("
. ", ".
", $entryInfo); $entryInfo = str_replace("--", "-", $entryInfo); $rtfInfo = $entryInfo; $rtfInfo = str_replace(" ", " ", $rtfInfo); //Adding DOI $rtfdoi = ""; $chaine1 .= $delim."DOI"; if (isset($entry->doiId_s) && $typdoi == "vis") { //Est-ce un doublon et, si oui, faut-il l'afficher? $deb = ""; $fin = ""; if (stripos($listedoi, $entry->doiId_s) === false) {//non $listedoi .= "~".$entry->doiId_s; }else{ if ($surdoi == "vis") { $deb = ""; $fin = ""; } } $entryInfo .= ". doi: ".$deb."https://doi.org/".$entry->doiId_s.$fin.""; $rtfdoi = $entry->doiId_s; $chaine2 .= $delim.$entry->doiId_s; }else{ $chaine2 .= $delim; } //Thesis - adding nntId_s $rtfnnt = ""; $chaine1 .= $delim."NNT"; if ($docType_s=="THESE" && isset($entry->nntId_s)){ $entryInfo .= ". NNT: ".$entry->nntId_s.""; $rtfnnt = $entry->nntId_s; $chaine2 .= $delim.$entry->nntId_s; }else{ $chaine2 .= $delim; } //Adding Pubmed ID $rtfpubmed = ""; $chaine1 .= $delim."Pubmed"; if (isset($entry->pubmedId_s)) { $entryInfo .= ". Pubmed: ".$entry->pubmedId_s.""; $rtfpubmed = $entry->pubmedId_s; $chaine2 .= $delim.$entry->pubmedId_s; }else{ $chaine2 .= $delim; } //Adding localReference_s $rtflocref = ""; $chaine1 .= $delim."Référence"; if ($docType_s=="UNDEF" && isset($entry->localReference_s)) { $entryInfo .= ". Référence: ".$entry->localReference_s[0]; $rtflocref = $entry->localReference_s[0]; $chaine2 .= $delim.$entry->localReference_s[0]; }else{ $chaine2 .= $delim; } //Adding ArXiv ID $rtfarxiv = ""; $chaine1 .= $delim."ArXiv"; if (isset($entry->arxivId_s) && $typidh != "vis") { $entryInfo .= ". ArXiv: ".$entry->arxivId_s.""; $rtfarxiv = $entry->arxivId_s; $chaine2 .= $delim.$entry->arxivId_s; }else{ $chaine2 .= $delim; } //Adding description_s $rtfdescrip = ""; $chaine1 .= $delim."Description"; if ($docType_s=="OTHER" && isset($entry->description_s)) { $entryInfo .= ". ".ucfirst($entry->description_s); $rtfdescrip = $entry->description_s; $chaine2 .= $delim.$entry->description_s; }else{ $chaine2 .= $delim; } //Adding seeAlso_s $rtfalso = ""; $chaine1 .= $delim."Voir aussi"; if (($docType_s=="PATENT" || $docType_s=="REPORT" || $docType_s=="UNDEF" || $docType_s=="OTHER") && isset($entry->seeAlso_s)) { $entryInfo .= ". URL: ".$entry->seeAlso_s[0].""; $rtfalso = $entry->seeAlso_s[0]; $chaine2 .= $delim.$entry->seeAlso_s[0]; }else{ $chaine2 .= $delim; } //Adding référence HAL $rtfrefhal = ""; $chaine1 .= $delim."Réf. HAL"; if (isset($entry->halId_s) && $typidh == "vis") { $entryInfo .= ". Réf. HAL: ".$entry->halId_s.""; $rtfrefhal = $entry->halId_s; $chaine2 .= $delim.$entry->halId_s; }else{ $chaine2 .= $delim; } //Adding rang HCERES $rtfaeres = ""; $chaine1 .= $delim."Rang HCERES"; if ($docType_s=="ART" && isset($entry->journalIssn_s) && $typreva == "vis") { foreach($AERES_SHS AS $i => $valeur) { if (($AERES_SHS[$i]['issn'] == $entry->journalIssn_s) && ($AERES_SHS[$i]['rang'] != "")) { $entryInfo .= ". Rang HCERES: ".$AERES_SHS[$i]['rang']; $rtfaeres = $AERES_SHS[$i]['rang']; $chaine2 .= $delim.$AERES_SHS[$i]['rang']; break; } } if ($rtfaeres == "") {$chaine2 .= $delim;} }else{ $chaine2 .= $delim; } //Adding rang CNRS $rtfcnrs = ""; $chaine1 .= $delim."Rang CNRS"; if ($docType_s=="ART" && $typrevc == "vis") { foreach($CNRS AS $i => $valeur) { if (($CNRS[$i]['titre'] == $entry->journalTitle_s) && ($CNRS[$i]['rang'] != "")) { $entryInfo .= ". Rang CNRS: ".$CNRS[$i]['rang']; $rtfcnrs = $CNRS[$i]['rang']; $chaine2 .= $delim.$CNRS[$i]['rang']; break; } } if ($rtfcnrs == "") {$chaine2 .= $delim;} }else{ $chaine2 .= $delim; } //Corrections diverses $entryInfo =str_replace("..", ".", $entryInfo); $entryInfo =str_replace(", .", ".", $entryInfo); if (!isset($entry->page_s)) { $entryInfo = str_replace(array(", in press", " in press.", " in press", "; in press"), "", $entryInfo); } //Adding the reference to the array array_push($infoArray,$entryInfo); //if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)) { //créer un tableau avec GR1,2,3... + (10000 - année) + premier auteur + année et faire un tri ensuite dessus ? //if($typchr == "decr") {//ordre chronologique décroissant //array_push($sortArray,substr(10000-($dateprod),0,5)."-".$eqpgr."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); //}else{ //array_push($sortArray,substr($dateprod,0,5)."-".$eqpgr."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); //} //}else{ if($typtri == "premierauteur") { if($typchr == "decr") {//ordre chronologique décroissant array_push($sortArray,substr(10000-($dateprod),0,5)."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); }else{ array_push($sortArray,substr($dateprod,0,5)."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); } }else{ if($typchr == "decr") {//ordre chronologique décroissant array_push($sortArray,substr(10000-($dateprod),0,5)."-".$entry->journalTitle_s."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); }else{ array_push($sortArray,substr($dateprod,0,5)."-".$entry->journalTitle_s."-".$entry->authAlphaLastNameFirstNameId_fs[0]."-".$entry->title_s[0]."-".$dateprod); } } //} //array_push($sortArray,$dateprod); //Récupération du préfixe AERES pour affichage éventuel $affprefeq = ""; if ($entry->popularLevel_s == 1) {$affprefeq = "PV";} if ($entry->popularLevel_s == 0) { if ($docType_s == "ART") { if ($entry->peerReviewing_s == 0) { $affprefeq = "ASCL"; }else{ $affprefeq = "ACL"; } } if ($docType_s == "PATENT") {$affprefeq = "BRE";} if ($docType_s == "COMM") { if ($entry->invitedCommunication_s == 1) {$affprefeq = "C-INV";} if ($entry->proceedings_s == 1) { if ($entry->audience_s == 2) { $affprefeq = "C-ACTI"; }else{ $affprefeq = "C-ACTN"; } } if ($entry->proceedings_s == 0) {$affprefeq = "C-COM";} } if ($docType_s == "POSTER") {$affprefeq = "C-AFF";} if ($docType_s == "DOUV") {$affprefeq = "DO";} if ($docType_s == "OUV" || $docType_s == "COUV") {$affprefeq = "OS";} //$affprefeq = "Toto"; } if ($affprefeq == "") {$affprefeq = "AP";} array_push($rtfArray,$rtfInfo."^".$rtfdoi."^".$rtfpubmed."^".$rtflocref."^".$rtfarxiv."^".$rtfdescrip."^".$rtfalso."^".$rtfrefhal."^".$rtfaeres."^".$rtfcnrs."^".$chaine1."^".$chaine2."^".$rtfnnt."^".$affprefeq."^".$racine); //bibtex $biblabel = $entry->label_bibtex; if (isset($entry->label_bibtex)) {array_push($bibArray,$entry->label_bibtex."¤");}else{array_push($bibArray," ¤");} if (isset($entry->peerReviewing_s)) {array_push($bibArray,$entry->peerReviewing_s."¤");}else{array_push($bibArray," ¤");} if (isset($entry->audience_s)) {array_push($bibArray,$entry->audience_s."¤");}else{array_push($bibArray," ¤");} if (isset($entry->proceedings_s)) {array_push($bibArray,$entry->proceedings_s."¤");}else{array_push($bibArray," ¤");} if (isset($entry->invitedCommunication_s)) {array_push($bibArray,$entry->invitedCommunication_s."¤");}else{array_push($bibArray," ¤");} //array_push($bibArray,$entry->label_bibtex."¤".$entry->peerReviewing_s."¤".$entry->audience_s."¤".$entry->proceedings_s."¤".$entry->invitedCommunication_s); } $result=array(); array_push($result,$infoArray); array_push($result,$sortArray); array_push($result,$rtfArray); array_push($result,$bibArray); //var_dump($rtfArray); return $result; } function toAppear($string){ $toAppear=0; if (strtolower($string)=="accepted" or strtolower($string)=="accepté" or strtolower($string)=="to appear" or strtolower($string)=="accepted manuscript"){ $toAppear=1; } return $toAppear; } function displayRefList($docType_s,$collCode_s,$specificRequestCode,$countries,$refType,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre){ $infoArray = array(); $sortArray = array(); $rtfArray = array(); $bibArray = array(); if ($docType_s=="COMPOSTER"){ //Request on a union of HAL types //COMM ACTI $result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,"%20AND%20proceedings_s:1%20AND%20audience_s:2".$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); //$result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,$specificRequestCode,$countries); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; //COMM ACTN $result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,"%20AND%20proceedings_s:1%20AND%20audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0".$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); //$result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,$specificRequestCode,$countries); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; //COMM COM $specificRequestCode = '%20AND%20proceedings_s:0'; $result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,"%20AND%20proceedings_s:0".$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); //$result = getReferences($infoArray,$sortArray,"COMM",$collCode_s,$specificRequestCode,$countries); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; //COMM POSTER $result = getReferences($infoArray,$sortArray,"POSTER",$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; } else { if ($docType_s=="VULG"){ //Request on a union of HAL types $result = getReferences($infoArray,$sortArray,"COUV",$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; $result = getReferences($infoArray,$sortArray,"OUV",$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; } else { if ($docType_s=="OTHER"){ //Request on a union of HAL types $result = getReferences($infoArray,$sortArray,"OTHER",$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; $result = getReferences($infoArray,$sortArray,"OTHERREPORT",$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; } else { //Request on a simple HAL type $result = getReferences($infoArray,$sortArray,$docType_s,$collCode_s,$specificRequestCode,$countries,$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $infoArray = $result[0]; $sortArray = $result[1]; $rtfArray = $result[2]; $bibArray = $result[3]; //var_dump($result[1]); } } } array_multisort($sortArray, $infoArray, $rtfArray); //var_dump($sortArray); $currentYear="99999"; $i = 0; $ind = 0; static $indgr = array(); static $crogr = array(); static $drefl = array(); if (isset($drefl[0]) && $drefl[0] == "") { for ($j = 1; $j <= $nbeqp; $j++) { $indgr[$j] = 1; $crogr[$j] = 0; } } $yearNumbers = array(); foreach($infoArray as $entryInfo){ if($typcro == "oui") {//afficher seulement les publications croisées $aff = "non";//critère d'affichage (ou non) des résultats }else{ $aff = "oui"; } if (strcmp($currentYear,substr($sortArray[$i],-4))==0){ // Même année $rtf = explode("^", $rtfArray[$i]); if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)) {//GR $rtfval = $rtf[0]; $rtfcha = $rtf[11]; for ($j = 1; $j <= $nbeqp; $j++) { if (strpos($entryInfo,"GR".$j." - ¤ -") !== false) { $entryInfo = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j]." -", $entryInfo); $rtfval = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j]." -", $rtfval); $rtfcha = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j], $rtfcha); if (strpos($entryInfo, " - GR") !== false) {//publication croisée $crogr[$j] += 1; $aff = "oui"; } if ($aff == "oui") {$indgr[$j] += 1;} } } } for ($j = 1; $j <= $nbeqp; $j++) { $entryInfo = str_replace("GR".$j, $nomeqp[$j], $entryInfo); $rtfval = str_replace("GR".$j, $nomeqp[$j], $rtfval); $rtfcha = str_replace("GR".$j, $nomeqp[$j], $rtfcha); } if ($aff == "oui") { if ($typnum == "vis") { $ind += 1; echo "

".$ind.". "; if ($prefeq == "oui") {echo $rtf[13]." - ";}//Affichage préfixe AERES echo $entryInfo."

"; if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)){//GR if ($prefeq == "oui") {//Ecriture préfixe AERES $sect->writeText($ind.". ".$rtf[13]." - ".$rtfval, $font); }else{ $sect->writeText($ind.". ".$rtfval, $font); } }else{ $sect->writeText($ind.". ".$rtf[0], $font); } }else{ echo "

"; if ($prefeq == "oui") {echo $rtf[13]." - ";} echo $entryInfo."

".substr($sortArray[$i],-4)."

"; $currentYear=substr($sortArray[$i],-4); $sect->writeText("".substr($sortArray[$i],-4)."

", $fonth3); if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)) {//GR $rtfval = $rtf[0]; $rtfcha = $rtf[11]; for ($j = 1; $j <= $nbeqp; $j++) { if (strpos($entryInfo,"GR".$j." - ¤ -") !== false) { $entryInfo = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j]." -", $entryInfo); $rtfval = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j]." -", $rtfval); $rtfcha = str_replace("GR".$j." - ¤ -", "GR".$j." - ".$indgr[$j], $rtfcha); if (strpos($entryInfo, " - GR") !== false) {//publication croisée $crogr[$j] += 1; $aff = "oui"; } if ($aff == "oui") {$indgr[$j] += 1;} } } } for ($j = 1; $j <= $nbeqp; $j++) { $entryInfo = str_replace("GR".$j, $nomeqp[$j], $entryInfo); $rtfval = str_replace("GR".$j, $nomeqp[$j], $rtfval); $rtfcha = str_replace("GR".$j, $nomeqp[$j], $rtfcha); } if ($aff == "oui") { $yearNumbers[substr($sortArray[$i],-4)]=1; if ($typnum == "vis") { $ind += 1; echo "

".$ind.". "; if ($prefeq == "oui") {echo $rtf[13]." - ";}//Affichage préfixe AERES echo $entryInfo."

"; if ($prefeq == "oui") {echo $rtf[13]." - ";} echo $entryInfo."

"; if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)){//GR if ($prefeq == "oui") {//Ecriture préfixe AERES $sect->writeText($rtf[13]." - ".$rtfval, $font); }else{ $sect->writeText($rtfval, $font); } }else{ $sect->writeText($rtf[0], $font); } } if ($rtf[1] != "") { $sect->writeText(". doi: ", $font); $sect->writeHyperLink("https://doi.org/".$rtf[1], "https://doi.org/".$rtf[1]."", $fontlien); } if ($rtf[12] != "") { $sect->writeText(". NNT: ", $font); $sect->writeHyperLink("http://www.theses.fr/".$rtf[12], "".$rtf[12]."", $fontlien); } if ($rtf[2] != "") { $sect->writeText(". Pubmed: ", $font); $sect->writeHyperLink("http://www.ncbi.nlm.nih.gov/pubmed/".$rtf[2], "".$rtf[2]."", $fontlien); } if ($rtf[3] != "") { $sect->writeText(". Référence: ".$rtf[3], $font); } if ($rtf[4] != "") { $sect->writeText(". ArXiv: ", $font); $sect->writeHyperLink("http://arxiv.org/abs/".$rtf[4], "".$rtf[4]."", $fontlien); } if ($rtf[5] != "") { $sect->writeText(". ".ucfirst($rtf[5]), $font); } if ($rtf[6] != "") { $sect->writeText(". URL: ", $font); $sect->writeHyperLink($rtf[5], "".$rtf[6]."", $fontlien); } if ($rtf[7] != "") { $sect->writeText(". Réf. HAL: ", $font); $sect->writeHyperLink($rtf[14].$rtf[7], "".$rtf[7]."", $fontlien); } if ($rtf[8] != "") { $sect->writeText(". Rang HCERES: ".$rtf[8], $font); } if ($rtf[9] != "") { $sect->writeText(". Rang CNRS: ".$rtf[9], $font); } $sect->writeText("

", $font); //export CSV if ($i == 0) { if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)){ $chaine = $rtf[10].chr(13).chr(10).$rtfcha.chr(13).chr(10); }else{ $chaine = $rtf[10].chr(13).chr(10).$rtf[11].chr(13).chr(10); } }else{ if (isset($collCode_s) && isset($gr) && (strpos($gr, $collCode_s) !== false)){ $chaine = $rtfcha.chr(13).chr(10); }else{ $chaine = $rtf[11].chr(13).chr(10); } } if (isset($idhal) && $idhal != "") {$team = $idhal;} $Fnm1 = "./HAL/extractionHAL_".$team.".csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,$chaine); } } //export bibtex $bib = explode("¤", $bibArray[$i]); $tex0 = $bib[0]; //$tex = substr($bib[0], 0, (strlen($bib[0])-2)); $tex1 = ""; if (isset($bib[1])) {$tex1 .= "PEER_REVIEWING = {".$bib[1]."},\r\n";} if (isset($bib[2])) {$tex1 .= " AUDIENCE = {".$bib[2]."},\r\n";} if (isset($bib[3])) {$tex1 .= " PROCEEDINGS = {".$bib[3]."},\r\n";} if (isset($bib[4])) {$tex1 .= " INVITED_COMMUNICATION = {".$bib[4]."},\r\n";} //$tex .= "}\r\n"; $tex = str_replace("HAL_VERSION", $tex1." HAL_VERSION", $tex0); $Fnm2 = "./HAL/extractionHAL_".$team.".bib"; $inF2 = fopen($Fnm2,"a+"); fseek($inF2, 0); fwrite($inF2,$tex."\r\n"); $i++; } if (isset($idhal) && $idhal != "") {$team = $idhal;} $Fnm1 = "./HAL/extractionHAL_".$team.".csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,chr(13).chr(10)); $drefl[0] = $yearNumbers;//le nombre de publications $drefl[1] = $crogr;//le nombre de publications croisées //return $yearNumbers; //var_dump($crogr); return $drefl; } ?> "Afghanistan", "za" => "Afrique du Sud", "al" => "Albanie", "dz" => "Algérie", "de" => "Allemagne", "ad" => "Andorre", "ao" => "Angola", "ai" => "Anguilla", "aq" => "Antarctique", "ag" => "Antigua-et-Barbuda", "an" => "Antilles Néerlandaises", "sa" => "Arabie Saoudite", "ar" => "Argentine", "am" => "Arménie", "aw" => "Aruba", "au" => "Australie", "at" => "Autriche", "az" => "Azerbaïdjan", "bs" => "Bahamas", "bh" => "Bahreïn", "bd" => "Bangladesh", "bb" => "Barbade", "be" => "Belgique", "bz" => "Belize", "bm" => "Bermudes", "bt" => "Bhoutan", "bo" => "Bolivie", "ba" => "Bosnie-Herzégovine", "bw" => "Botswana", "bv" => "Bouvet Island", "bn" => "Brunei", "br" => "Brésil", "bg" => "Bulgarie", "bf" => "Burkina Faso", "bi" => "Burundi", "by" => "Biélorussie", "bj" => "Bénin", "kh" => "Cambodge", "cm" => "Cameroun", "ca" => "Canada", "cv" => "Cap Vert", "cl" => "Chili", "cn" => "Chine", "cy" => "Chypre", "va" => "Cité du Vatican", "co" => "Colombie", "km" => "Comores", "cg" => "Congo, République", "cd" => "République Démocratique du Congo", "kp" => "Corée du Nord", "kr" => "Corée du Sud", "cr" => "Costa Rica", "hr" => "Croatie", "cu" => "Cuba", "cw" => "Curaçao", "ci" => "Côte d'Ivoire", "dk" => "Danemark", "dj" => "Djibouti", "dm" => "Dominique", "eg" => "Égypte", "ae" => "Émirats Arabes Unis", "ec" => "Équateur", "er" => "Érythrée", "es" => "Espagne", "ee" => "Estonie", "us" => "États-Unis", "et" => "Éthiopie", "fj" => "Fidji", "fi" => "Finlande", "fr" => "France", "fx" => "France métropolitaine", "ga" => "Gabon", "gm" => "Gambie", "ps" => "Gaza", "gh" => "Ghana", "gi" => "Gibraltar", "gd" => "Grenade", "gl" => "Groenland", "gr" => "Grèce", "gp" => "Guadeloupe", "gu" => "Guam", "gt" => "Guatemala", "gn" => "Guinée", "gw" => "Guinée Bissau", "gq" => "Guinée Équatoriale", "gy" => "Guyana", "gf" => "Guyane", "ge" => "Géorgie", "gs" => "Géorgie du Sud et les îles Sandwich du Sud", "ht" => "Haïti", "hn" => "Honduras", "hk" => "Hong Kong", "hu" => "Hongrie", "im" => "Île de Man", "ky" => "Îles Caïman", "cx" => "Îles Christmas", "cc" => "Îles Cocos", "ck" => "Îles Cook", "fo" => "Îles Féroé", "gg" => "Îles Guernesey", "hm" => "Îles Heardet McDonald", "fk" => "Îles Malouines", "mp" => "Îles Mariannes du Nord", "mh" => "Îles Marshall", "mu" => "Îles Maurice", "um" => "Îles mineures éloignées des États-Unis", "nf" => "Îles Norfolk", "sb" => "Îles Salomon", "tc" => "Îles Turques et Caïque", "vi" => "Îles Vierges des États-Unis", "vg" => "Îles Vierges du Royaume-Uni", "in" => "Inde", "id" => "Indonésie", "ir" => "Iran", "iq" => "Iraq", "ie" => "Irlande", "is" => "Islande", "il" => "Israël", "it" => "Italie", "jm" => "Jamaïque", "jp" => "Japon", "je" => "Jersey", "jo" => "Jordanie", "kz" => "Kazakhstan", "ke" => "Kenya", "kg" => "Kirghizistan", "ki" => "Kiribati", "xk" => "Kosovo", "kw" => "Koweït", "la" => "Laos", "ls" => "Lesotho", "lv" => "Lettonie", "lb" => "Liban", "ly" => "Libye", "lr" => "Liberia", "li" => "Liechtenstein", "lt" => "Lituanie", "lu" => "Luxembourg", "mo" => "Macao", "mk" => "Macédoine", "mg" => "Madagascar", "my" => "Malaisie", "mw" => "Malawi", "mv" => "Maldives", "ml" => "Mali", "mt" => "Malte", "ma" => "Maroc", "mq" => "Martinique", "mr" => "Mauritanie", "yt" => "Mayotte", "mx" => "Mexique", "fm" => "Micronésie", "md" => "Moldavie", "mc" => "Monaco", "mn" => "Mongolie", "ms" => "Montserrat", "me" => "Monténégro", "mz" => "Mozambique", "mm" => "Birmanie", "na" => "Namibie", "nr" => "Nauru", "ni" => "Nicaragua", "ne" => "Niger", "ng" => "Nigeria", "nu" => "Niue", "no" => "Norvège", "nc" => "Nouvelle Calédonie", "nz" => "Nouvelle Zélande", "np" => "Népal", "om" => "Oman", "ug" => "Ouganda", "uz" => "Ouzbékistan", "pk" => "Pakistan", "pw" => "Palau", "pa" => "Panama", "pg" => "Papouasie-Nouvelle-Guinée", "py" => "Paraguay", "nl" => "Pays-Bas", "ph" => "Philippines", "pn" => "Pitcairn", "pl" => "Pologne", "pf" => "Polynésie Française", "pr" => "Porto Rico", "pt" => "Portugal", "pe" => "Pérou", "qa" => "Qatar", "ro" => "Roumanie", "gb" => "Royaume-Uni", "ru" => "Russie", "rw" => "Rwanda", "cf" => "République Centraficaine", "do" => "République Dominicaine", "cz" => "République Tchèque", "re" => "Réunion", "eh" => "Sahara Occidental", "bl" => "Saint Barthelemy", "sh" => "Saint Hélène", "kn" => "Saint Kitts et Nevis", "mf" => "Saint Martin", "sx" => "Saint Martin", "pm" => "Saint Pierre et Miquelon", "vc" => "Saint Vincent et les Grenadines", "lc" => "Sainte Lucie", "sv" => "Salvador", "as" => "Samoa Américaines", "ws" => "Samoa Occidentales", "sm" => "San Marin", "st" => "Sao Tomé et Principe", "rs" => "Serbie", "sc" => "Seychelles", "sl" => "Sierra Léone", "sg" => "Singapour", "sk" => "Slovaquie", "si" => "Slovénie", "so" => "Somalie", "sd" => "Soudan", "lk" => "Sri Lanka", "ss" => "Sud Soudan", "ch" => "Suisse", "sr" => "Surinam", "se" => "Suède", "sj" => "Svalbard et Jan Mayen", "sz" => "Swaziland", "sy" => "Syrie", "sn" => "Sénégal", "tj" => "Tadjikistan", "tw" => "Taïwan", "tz" => "Tanzanie", "td" => "Tchad", "tf" => "Terres Australes et Antarctique Françaises", "ps" => "Territoires Palestiniens occupés", "th" => "Thaïlande", "tl" => "Timor-Leste", "tg" => "Togo", "tk" => "Tokelau", "to" => "Tonga", "tt" => "Trinité et Tobago", "tn" => "Tunisie", "tm" => "Turkménistan", "tr" => "Turquie", "tv" => "Tuvalu", "io" => "Territoire Britannique de l'Océan Indien", "ua" => "Ukraine", "uy" => "Uruguay", "vu" => "Vanuatu", "ve" => "Venezuela", "vn" => "Vietnam", "wf" => "Wallis et Futuna", "ye" => "Yémen", "zm" => "Zambie", "zw" => "Zimbabwe", // ?!? "xx" => "inconnu"); $numbers=array(); //$team sert aussi bien à une collection qu'à un idhal if (isset($idhal) && $idhal != "") {$team = $idhal;} if (isset($choix_publis) && strpos($choix_publis, "-TA-") !== false) { //$sect->writeText(substr($sortArray[$i],-4)."

", $font); echo "

Tous les articles (sauf vulgarisation) ⇫

"; $sect->writeText("Tous les articles (sauf vulgarisation)

", $fonth2); $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Tous les articles (sauf vulgarisation)".chr(13).chr(10)); list($numbers["TA"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"TA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ACL-") !== false) { echo "

Articles de revues à comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues à comité de lecture".chr(13).chr(10)); $sect->writeText("Articles de revues à comité de lecture

", $fonth2); list($numbers["ACL"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20peerReviewing_s:1".$specificRequestCode,$countries,"ACL",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ASCL-") !== false) { echo "

Articles de revues sans comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues sans comité de lecture".chr(13).chr(10)); $sect->writeText("Articles de revues sans comité de lecture

", $fonth2); list($numbers["ASCL"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20peerReviewing_s:0".$specificRequestCode,$countries,"ASCL",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ARI-") !== false) { echo "

Articles de revues internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues internationales".chr(13).chr(10)); $sect->writeText("Articles de revues internationales

", $fonth2); list($numbers["ARI"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"ARI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ARN-") !== false) { echo "

Articles de revues nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues nationales".chr(13).chr(10)); $sect->writeText("Articles de revues nationales

", $fonth2); list($numbers["ARN"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:0%20OR%20audience_s:1)".$specificRequestCode,$countries,"ARN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ACLRI-") !== false) { echo "

Articles de revues internationales à comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues internationales à comité de lecture".chr(13).chr(10)); $sect->writeText("Articles de revues internationales à comité de lecture

", $fonth2); list($numbers["ACLRI"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2%20AND%20peerReviewing_s:1".$specificRequestCode,$countries,"ACLRI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ACLRN-") !== false) { echo "

Articles de revues nationales à comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues nationales à comité de lecture".chr(13).chr(10)); $sect->writeText("Articles de revues nationales à comité de lecture

", $fonth2); list($numbers["ACLRN"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:0%20OR%20audience_s:1)%20AND%20peerReviewing_s:1".$specificRequestCode,$countries,"ACLRN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ASCLRI-") !== false) { echo "

Articles de revues internationales sans comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues internationales sans comité de lecture".chr(13).chr(10)); $sect->writeText("Articles de revues internationales sans comité de lecture

", $fonth2); list($numbers["ASCLRI"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2%20AND%20peerReviewing_s:0".$specificRequestCode,$countries,"ASCLRI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_publis) && strpos($choix_publis, "-ASCLRN-") !== false) { echo "

Articles de revues nationales sans comité de lecture ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de revues nationales sans comité de lecture".chr(13).chr(10)); list($numbers["ASCLRN"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:0%20OR%20audience_s:1)%20AND%20peerReviewing_s:0".$specificRequestCode,$countries,"ASCLRN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); $sect->writeText("Articles de revues nationales sans comité de lecture

", $fonth2); } if (isset($choix_publis) && strpos($choix_publis, "-AV-") !== false) { echo "

Articles de vulgarisation ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Articles de vulgarisation".chr(13).chr(10)); $sect->writeText("Articles de vulgarisation

", $fonth2); list($numbers["AV"],$crores) = displayRefList("ART",$team,"%20AND%20popularLevel_s:1".$specificRequestCode,$countries,"AV",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-TC-") !== false) { echo "

Toutes les communications (sauf grand public) ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Toutes les communications (sauf grand public)".chr(13).chr(10)); $sect->writeText("Toutes les communications (sauf grand public)

", $fonth2); list($numbers["TC"],$crores) = displayRefList("COMM+POST",$team,"%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"TC",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CA-") !== false) { echo "

Communications avec actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications avec actes".chr(13).chr(10)); $sect->writeText("Communications avec actes

", $fonth2); list($numbers["CA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:1".$specificRequestCode,$countries,"CA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CSA-") !== false) { echo "

Communications sans actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications sans actes".chr(13).chr(10)); $sect->writeText("Communications sans actes

", $fonth2); list($numbers["CSA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:0".$specificRequestCode,$countries,"CSA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CI-") !== false) { echo "

Communications internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications internationales".chr(13).chr(10)); $sect->writeText("Communications internationales

", $fonth2); list($numbers["CI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"CI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CN-") !== false) { echo "

Communications nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications nationales".chr(13).chr(10)); $sect->writeText("Communications nationales

", $fonth2); list($numbers["CN"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CAI-") !== false) { echo "

Communications avec actes internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications avec actes internationales".chr(13).chr(10)); $sect->writeText("Communications avec actes internationales

", $fonth2); list($numbers["CAI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:1%20AND%20audience_s:2".$specificRequestCode,$countries,"CAI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CSAI-") !== false) { echo "

Communications sans actes internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications sans actes internationales".chr(13).chr(10)); $sect->writeText("Communications sans actes internationales

", $fonth2); list($numbers["CSAI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"CSAI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CAN-") !== false) { echo "

Communications avec actes nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications avec actes nationales".chr(13).chr(10)); $sect->writeText("Communications avec actes nationales

", $fonth2); list($numbers["CAN"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:1%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CAN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CSAN-") !== false) { echo "

Communications sans actes nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications sans actes nationales".chr(13).chr(10)); $sect->writeText("Communications sans actes nationales

", $fonth2); list($numbers["CSAN"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CSAN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CINVASANI-") !== false) { echo "

Communications invitées avec ou sans actes, nationales ou internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications invitées avec ou sans actes, nationales ou internationales".chr(13).chr(10)); $sect->writeText("Communications invitées avec ou sans actes, nationales ou internationales

", $fonth2); list($numbers["CINVASANI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:1".$specificRequestCode,$countries,"CINVASANI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CINVA-") !== false) { echo "

Communications invitées avec actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications invitées avec actes".chr(13).chr(10)); $sect->writeText("Communications invitées avec actes

", $fonth2); list($numbers["CINVA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:1%20AND%20proceedings_s:1".$specificRequestCode,$countries,"CINVA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CINVSA-") !== false) { echo "

Communications invitées sans actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications invitées sans actes".chr(13).chr(10)); $sect->writeText("Communications invitées sans actes

", $fonth2); list($numbers["CINVSA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:1%20AND%20proceedings_s:0".$specificRequestCode,$countries,"CINVSA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CNONINVA-") !== false) { echo "

Communications non invitées avec actes⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications non invitées avec actes".chr(13).chr(10)); $sect->writeText("Communications non invitées avec actes

", $fonth2); list($numbers["CNONINVA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:0%20AND%20proceedings_s:1".$specificRequestCode,$countries,"CNONINVA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CNONINVSA-") !== false) { echo "

Communications non invitées sans actes⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications non invitées sans actes".chr(13).chr(10)); $sect->writeText("Communications non invitées sans actes

", $fonth2); list($numbers["CNONINVSA"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:0%20AND%20proceedings_s:0".$specificRequestCode,$countries,"CNONINVSA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CINVI-") !== false) { echo "

Communications invitées internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications invitées internationales".chr(13).chr(10)); $sect->writeText("Communications invitées internationales

", $fonth2); list($numbers["CINVI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:1%20AND%20audience_s:2".$specificRequestCode,$countries,"CINVI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CNONINVI-") !== false) { echo "

Communications non invitées internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications non invitées internationales".chr(13).chr(10)); $sect->writeText("Communications non invitées internationales

", $fonth2); list($numbers["CNONINVI"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"CNONINVI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CINVN-") !== false) { echo "

Communications invitées nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications invitées nationales".chr(13).chr(10)); $sect->writeText("Communications invitées nationales

", $fonth2); list($numbers["CINVN"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:1%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CINVN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CNONINVN-") !== false) { echo "

Communications non invitées nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications non invitées nationales".chr(13).chr(10)); $sect->writeText("Communications non invitées nationales

", $fonth2); list($numbers["CNONINVN"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:0%20AND%20invitedCommunication_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CNONINVN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CPASANI-") !== false) { echo "

Communications par affiches (posters) avec ou sans actes, nationales ou internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications par affiches (posters) avec ou sans actes, nationales ou internationales".chr(13).chr(10)); $sect->writeText("Communications par affiches (posters) avec ou sans actes, nationales ou internationales

", $fonth2); list($numbers["CPASANI"],$crores) = displayRefList("POSTER",$team,"%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"CPASANI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CPA-") !== false) { echo "

Communications par affiches (posters) avec actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications pas affiches (posters)".chr(13).chr(10)); $sect->writeText("Communications par affiches (posters) avec actes

", $fonth2); list($numbers["CPA"],$crores) = displayRefList("POSTER",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:1".$specificRequestCode,$countries,"CPA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CPSA-") !== false) { echo "

Communications par affiches (posters) sans actes ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications pas affiches (posters)".chr(13).chr(10)); $sect->writeText("Communications par affiches (posters) sans actes

", $fonth2); list($numbers["CPSA"],$crores) = displayRefList("POSTER",$team,"%20AND%20popularLevel_s:0%20AND%20proceedings_s:0".$specificRequestCode,$countries,"CPSA",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CPI-") !== false) { echo "

Communications par affiches internationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications par affiches internationales".chr(13).chr(10)); $sect->writeText("Communications par affiches internationales

", $fonth2); list($numbers["CPI"],$crores) = displayRefList("POSTER",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"CPI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CPN-") !== false) { echo "

Communications par affiches nationales ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Communications par affiches nationales".chr(13).chr(10)); $sect->writeText("Communications par affiches nationales

", $fonth2); list($numbers["CPN"],$crores) = displayRefList("POSTER",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"CPN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_comm) && strpos($choix_comm, "-CGP-") !== false) { echo "

Conférences grand public ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Conférences grand public".chr(13).chr(10)); $sect->writeText("Conférences grand public

", $fonth2); list($numbers["CGP"],$crores) = displayRefList("COMM",$team,"%20AND%20popularLevel_s:1".$specificRequestCode,$countries,"CGP",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-TO-") !== false) { echo "

Tous les ouvrages (sauf vulgarisation) ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Tous les ouvrages (sauf vulgarisation)".chr(13).chr(10)); $sect->writeText("Tous les ouvrages (sauf vulgarisation)

", $fonth2); list($numbers["TO"],$crores) = displayRefList("OUV",$team,"%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"TO",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OSPI-") !== false) { echo "

Ouvrages scientifiques de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages scientifiques de portée internationale".chr(13).chr(10)); $sect->writeText("Ouvrages scientifiques de portée internationale

", $fonth2); list($numbers["OSPI"],$crores) = displayRefList("OUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"OSPI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OSPN-") !== false) { echo "

Ouvrages scientifiques de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages scientifiques de portée nationale".chr(13).chr(10)); $sect->writeText("Ouvrages scientifiques de portée nationale

", $fonth2); list($numbers["OSPN"],$crores) = displayRefList("OUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"OSPN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-COS-") !== false) { echo "

Chapitres d’ouvrages scientifiques ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Chapitres d'ouvrages scientifiques".chr(13).chr(10)); $sect->writeText("Chapitres d’ouvrages scientifiques

", $fonth2); list($numbers["COS"],$crores) = displayRefList("COUV",$team,""."%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"COS",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-COSI-") !== false) { echo "

Chapitres d’ouvrages scientifiques de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Chapitres d’ouvrages scientifiques de portée internationale".chr(13).chr(10)); $sect->writeText("Chapitres d’ouvrages scientifiques de portée internationale

", $fonth2); list($numbers["COSI"],$crores) = displayRefList("COUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"COSI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-COSN-") !== false) { echo "

Chapitres d’ouvrages scientifiques de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Chapitres d’ouvrages scientifiques de portée nationale".chr(13).chr(10)); $sect->writeText("Chapitres d’ouvrages scientifiques de portée nationale

", $fonth2); list($numbers["COSN"],$crores) = displayRefList("COUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"COSN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-DOS-") !== false) { echo "

Directions d’ouvrages scientifiques ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Directions d’ouvrages scientifiques".chr(13).chr(10)); $sect->writeText("Directions d’ouvrages scientifiques

", $fonth2); list($numbers["DOS"],$crores) = displayRefList("DOUV",$team,""."%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"DOS",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-DOSI-") !== false) { echo "

Directions d’ouvrages scientifiques de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Directions d’ouvrages scientifiques de portée internationale".chr(13).chr(10)); $sect->writeText("Directions d’ouvrages scientifiques de portée internationale

", $fonth2); list($numbers["DOSI"],$crores) = displayRefList("DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"DOSI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-DOSN-") !== false) { echo "

Directions d’ouvrages scientifiques de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Directions d’ouvrages scientifiques de portée nationale".chr(13).chr(10)); $sect->writeText("Directions d’ouvrages scientifiques de porté nationale

", $fonth2); list($numbers["DOSN"],$crores) = displayRefList("DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"DOSN",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCO-") !== false) { echo "

Ouvrages ou chapitres d’ouvrages ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres d’ouvrages".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres d’ouvrages

", $fonth2); list($numbers["OCO"],$crores) = displayRefList("OUV+COUV",$team,""."%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"OCO",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCOI-") !== false) { echo "

Ouvrages ou chapitres d’ouvrages de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres d’ouvrages de portée internationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres d’ouvrages de portée internationale

", $fonth2); list($numbers["OCOI"],$crores) = displayRefList("OUV+COUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"OCOI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCON-") !== false) { echo "

Ouvrages ou chapitres d’ouvrages de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres d’ouvrages de portée nationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres d’ouvrages de portée nationale

", $fonth2); list($numbers["OCON"],$crores) = displayRefList("OUV+COUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"OCON",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-ODO-") !== false) { echo "

Ouvrages ou directions d’ouvrages ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou directions d’ouvrages".chr(13).chr(10)); $sect->writeText("Ouvrages ou directions d’ouvrages

", $fonth2); list($numbers["ODO"],$crores) = displayRefList("OUV+DOUV",$team,""."%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"ODO",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-ODOI-") !== false) { echo "

Ouvrages ou directions d’ouvrages de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou directions d’ouvrages de portée internationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou directions d’ouvrages de portée internationale

", $fonth2); list($numbers["ODOI"],$crores) = displayRefList("OUV+DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"ODOI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-ODON-") !== false) { echo "

Ouvrages ou directions d’ouvrages de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou directions d’ouvrages de portée nationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou directions d’ouvrages de portée nationale

", $fonth2); list($numbers["ODON"],$crores) = displayRefList("OUV+DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"ODON",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCDO-") !== false) { echo "

Ouvrages ou chapitres ou directions d’ouvrages ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres ou directions d’ouvrages".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres ou directions d’ouvrages

", $fonth2); list($numbers["OCDO"],$crores) = displayRefList("OUV+COUV+DOUV",$team,"%20AND%20popularLevel_s:0".$specificRequestCode,$countries,"OCDO",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCDOI-") !== false) { echo "

Ouvrages ou chapitres ou directions d’ouvrages de portée internationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres ou directions d’ouvrages de portée internationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres ou directions d’ouvrages de portée internationale

", $fonth2); list($numbers["OCDOI"],$crores) = displayRefList("OUV+COUV+DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20audience_s:2".$specificRequestCode,$countries,"OCDOI",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCDON-") !== false) { echo "

Ouvrages ou chapitres ou directions d’ouvrages de portée nationale ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres ou directions d’ouvrages de portée nationale".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres ou directions d’ouvrages de portée nationale

", $fonth2); list($numbers["OCDON"],$crores) = displayRefList("OUV+COUV+DOUV",$team,"%20AND%20popularLevel_s:0%20AND%20(audience_s:3%20OR%20audience_s:1%20OR%20audience_s:0)".$specificRequestCode,$countries,"OCDON",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_ouvr) && strpos($choix_ouvr, "-OCV-") !== false) { echo "

Ouvrages ou chapitres de vulgarisation ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Ouvrages ou chapitres de vulgarisation".chr(13).chr(10)); $sect->writeText("Ouvrages ou chapitres de vulgarisation

", $fonth2); list($numbers["OCV"],$crores) = displayRefList("OUV+COUV",$team,"%20AND%20popularLevel_s:1".$specificRequestCode,$countries,"OCV",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-BRE-") !== false) { echo "

Brevets ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Brevets".chr(13).chr(10)); $sect->writeText("Brevets

", $fonth2); list($numbers["BRE"],$crores) = displayRefList("PATENT",$team,"".$specificRequestCode,$countries,"BRE",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-RAP-") !== false) { echo "

Rapports ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Rapports".chr(13).chr(10)); $sect->writeText("Rapports

", $fonth2); list($numbers["RAP"],$crores) = displayRefList("REPORT",$team,"".$specificRequestCode,$countries,"RAP",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-THE-") !== false) { echo "

Thèses ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Thèses".chr(13).chr(10)); $sect->writeText("Thèses

", $fonth2); list($numbers["THE"],$crores) = displayRefList("THESE",$team,"".$specificRequestCode,$countries,"THE",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-HDR-") !== false) { echo "

HDR ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"HDR".chr(13).chr(10)); $sect->writeText("HDR

", $fonth2); list($numbers["HDR"],$crores) = displayRefList("HDR",$team,"".$specificRequestCode,$countries,"HDR",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-PWM-") !== false) { echo "

Preprints, working papers, manuscrits non publiés ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Preprints, working papers, manuscrits non publiés".chr(13).chr(10)); $sect->writeText("Preprints, working papers, manuscrits non publiés

", $fonth2); list($numbers["PWM"],$crores) = displayRefList("UNDEF",$team,"".$specificRequestCode,$countries,"PWM",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } if (isset($choix_autr) && strpos($choix_autr, "-AP-") !== false) { echo "

Autres publications ⇫

"; $Fnm1 = "./HAL/extractionHAL.csv"; $inF = fopen($Fnm1,"a+"); fseek($inF, 0); fwrite($inF,"Autres publications".chr(13).chr(10)); $sect->writeText("Autres publications

", $fonth2); list($numbers["AP"],$crores) = displayRefList("OTHER",$team,"".$specificRequestCode,$countries,"AP",$institut,$typnum,$typaut,$typnom,$typcol,$typlim,$limaff,$typtit,$team,$idhal,$typann,$typchr,$typtri,$typfor,$typdoi,$surdoi,$typidh,$racine,$typreva,$typrevc,$typavsa,$typcro,$listenominit,$listenomcomp1,$listenomcomp2,$arriv,$depar,$sect,$Fnm,$delim,$prefeq,$rtfArray,$bibArray,$font,$fontlien,$fonth2,$fonth3,$root,$gr,$nbeqp,$nomeqp,$listedoi,$listetitre); } echo "

Bilan quantitatif ⇫

"; //Find all years with publications $availableYears=array(); foreach($numbers as $rType => $yearNumbers){ foreach($yearNumbers as $year => $nb){ $availableYears[$year]=1; } } ksort($availableYears); if (count($availableYears) != 0) {//Y-a-t-il au moins un résultat ? //Display the table of publications by year (column) and by type (line) echo ""; echo ""; foreach($availableYears as $year => $nb){ echo ""; } echo ""; foreach($numbers as $rType => $yearNumbers){ echo ""; foreach($availableYears as $year => $nb){ if(array_key_exists($year,$yearNumbers)){ echo ""; } else { echo ""; } } echo ""; } echo "

	".$year."
".$rType."	".$yearNumbers[$year]."	0

"; //export en RTF $sect->writeText("

", $font); $rtf->save($Fnm); if (isset($_POST["soumis"]) || isset($_GET["team"])) { //Création de graphes //Librairies pChart include("./lib/pChart/class/pData.class.php"); include("./lib/pChart/class/pDraw.class.php"); include("./lib/pChart/class/pImage.class.php"); // Données année par type de publication $MyData = new pData(); //$MyData->addPoints(array(150,220,300,-250,-420,-200,300,200,100),$anneedeb); //$MyData->addPoints(array(140,0,340,-300,-320,-300,200,100,50),"Server B"); foreach($numbers as $rType => $yearNumbers){ $MyData->addPoints($rType,"Labels"); foreach($availableYears as $year => $nb){ if(array_key_exists($year,$yearNumbers)){ $MyData->addPoints($yearNumbers[$year],$year); } else { $MyData->addPoints(VOID,$year); } } } $MyData->setAxisName(0,"Nombre"); $MyData->setSerieDescription("Labels","Type de publication"); $MyData->setAbscissa("Labels"); $MyData->setAbscissaName("Type de publication"); /* Create the pChart object */ $myPicture = new pImage(700,280,$MyData); $myPicture->drawGradientArea(0,0,700,280,DIRECTION_VERTICAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>100)); $myPicture->drawGradientArea(0,0,700,280,DIRECTION_HORIZONTAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>20)); $myPicture->drawRectangle(0,0,699,279,array("R"=>0,"G"=>0,"B"=>0)); $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10)); /* Turn of Antialiasing */ $myPicture->Antialias = FALSE; /* Draw the scale */ $myPicture->setGraphArea(50,50,680,220); $myPicture->drawText(350,40,"Type de publication par année",array("FontSize"=>20,"Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); $myPicture->drawScale(array("CycleBackground"=>TRUE,"DrawSubTicks"=>TRUE,"GridR"=>0,"GridG"=>0,"GridB"=>0,"GridAlpha"=>10,"Mode"=>SCALE_MODE_START0)); /* Turn on shadow computing */ $myPicture->setShadow(TRUE,array("X"=>1,"Y"=>1,"R"=>0,"G"=>0,"B"=>0,"Alpha"=>10)); /* Draw the chart */ $settings = array("Gradient"=>TRUE,"DisplayPos"=>LABEL_POS_INSIDE,"DisplayValues"=>TRUE,"DisplayR"=>255,"DisplayG"=>255,"DisplayB"=>255,"DisplayShadow"=>TRUE,"Surrounding"=>-30,"InnerSurrounding"=>30); $myPicture->drawBarChart($settings); /* Write the chart legend */ $myPicture->drawLegend(30,260,array("Style"=>LEGEND_NOBORDER,"Mode"=>LEGEND_HORIZONTAL)); /* Do the mirror effect */ $myPicture->drawAreaMirror(0,220,700,15); /* Draw the horizon line */ //$myPicture->drawLine(1,220,698,220,array("R"=>80,"G"=>80,"B"=>80)); /* Render the picture (choose the best way) */ //$myPicture->autoOutput("test.png"); //$myPicture->stroke(); $myPicture->render("img/mypic1_".$team.".png"); echo('

'); // Données type de publication par année $MyData = new pData(); //$MyData->addPoints(array(150,220,300,-250,-420,-200,300,200,100),$anneedeb); //$MyData->addPoints(array(140,0,340,-300,-320,-300,200,100,50),"Server B"); foreach($availableYears as $year => $nb){ $MyData->addPoints($year,"Labels"); foreach($numbers as $rType => $yearNumbers){ if(array_key_exists($year,$yearNumbers)){ $MyData->addPoints($yearNumbers[$year],$rType); } else { $MyData->addPoints(VOID,$rType); } } } $MyData->setAxisName(0,"Nombre"); $MyData->setSerieDescription("Labels","Année"); $MyData->setAbscissa("Labels"); $MyData->setAbscissaName("Année"); /* Create the pChart object */ $myPicture = new pImage(700,280,$MyData); $myPicture->drawGradientArea(0,0,700,280,DIRECTION_VERTICAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>100)); $myPicture->drawGradientArea(0,0,700,280,DIRECTION_HORIZONTAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>20)); $myPicture->drawRectangle(0,0,699,279,array("R"=>0,"G"=>0,"B"=>0)); $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10)); /* Turn of Antialiasing */ $myPicture->Antialias = FALSE; /* Draw the scale */ $myPicture->setGraphArea(50,50,680,220); $myPicture->drawText(350,40,"Année par type de publication",array("FontSize"=>20,"Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); $myPicture->drawScale(array("CycleBackground"=>TRUE,"DrawSubTicks"=>TRUE,"GridR"=>0,"GridG"=>0,"GridB"=>0,"GridAlpha"=>10,"Mode"=>SCALE_MODE_START0)); /* Turn on shadow computing */ $myPicture->setShadow(TRUE,array("X"=>1,"Y"=>1,"R"=>0,"G"=>0,"B"=>0,"Alpha"=>10)); /* Draw the chart */ $settings = array("Gradient"=>TRUE,"DisplayPos"=>LABEL_POS_INSIDE,"DisplayValues"=>TRUE,"DisplayR"=>255,"DisplayG"=>255,"DisplayB"=>255,"DisplayShadow"=>TRUE,"Surrounding"=>-30,"InnerSurrounding"=>30); $myPicture->drawBarChart($settings); /* Write the chart legend */ $myPicture->drawLegend(30,260,array("Style"=>LEGEND_NOBORDER,"Mode"=>LEGEND_HORIZONTAL)); /* Do the mirror effect */ $myPicture->drawAreaMirror(0,220,700,15); /* Draw the horizon line */ //$myPicture->drawLine(1,220,698,220,array("R"=>80,"G"=>80,"B"=>80)); /* Render the picture (choose the best way) */ //$myPicture->autoOutput("test.png"); //$myPicture->stroke(); $myPicture->render("img/mypic2_".$team.".png"); echo('

'); //Si choix sur tous les articles, camembert avec détails if (isset($choix_publis) && strpos($choix_publis, "-TA-") !== false) { include("./lib/pChart/class/pPie.class.php"); $i = 3; if (isset($idhal) && $idhal != "") {$atester = "authIdHal_s";}else{$atester = "collCode_s";} foreach($availableYears as $year => $nb){ $MyData = new pData(); $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$team."%20AND%20docType_s:ART%20AND%20audience_s:2%20AND%20peerReviewing_s:1%20AND%20producedDateY_i:".$year); //echo $root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$team."%20AND%20docType_s:ART%20AND%20audience_s:2%20AND%20peerReviewing_s:1%20AND%20producedDateY_i:".$year; $results = json_decode($contents); $ACLRI=$results->response->numFound; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$team."%20AND%20docType_s:ART%20AND%20(audience_s:3%20OR%20audience_s:0%20OR%20audience_s:1)%20AND%20peerReviewing_s:1%20AND%20producedDateY_i:".$year); $results = json_decode($contents); $ACLRN=$results->response->numFound; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$team."%20AND%20docType_s:ART%20AND%20audience_s:2%20AND%20peerReviewing_s:0%20AND%20producedDateY_i:".$year); $results = json_decode($contents); $ASCLRI=$results->response->numFound; $contents = file_get_contents($root."://api.archives-ouvertes.fr/search/".$institut."?q=".$atester.":".$team."%20AND%20docType_s:ART%20AND%20(audience_s:3%20OR%20audience_s:0%20OR%20audience_s:1)%20AND%20peerReviewing_s:0%20AND%20producedDateY_i:".$year); $results = json_decode($contents); $ASCLRN=$results->response->numFound; $MyData->addPoints(array($ACLRI,$ACLRN,$ASCLRI,$ASCLRN),"Detail"); $MyData->setSerieDescription("ScoreA","Application A"); /* Define the absissa serie */ $MyData->addPoints(array("ACLRI","ACLRN","ASCLRI","ASCLRN"),"Labels"); $MyData->setAbscissa("Labels"); /* Create the pChart object */ $myPicture = new pImage(350,230,$MyData,TRUE); /* Draw a solid background */ $Settings = array("R"=>173, "G"=>152, "B"=>217, "Dash"=>1, "DashR"=>193, "DashG"=>172, "DashB"=>237); $myPicture->drawFilledRectangle(0,0,350,230,$Settings); /* Draw a gradient overlay */ //$Settings = array("StartR"=>209, "StartG"=>150, "StartB"=>231, "EndR"=>111, "EndG"=>3, "EndB"=>138, "Alpha"=>50); //$myPicture->drawGradientArea(0,0,700,230,DIRECTION_VERTICAL,$Settings); //$myPicture->drawGradientArea(0,0,700,20,DIRECTION_VERTICAL,array("StartR"=>0,"StartG"=>0,"StartB"=>0,"EndR"=>50,"EndG"=>50,"EndB"=>50,"Alpha"=>100)); $myPicture->drawGradientArea(0,0,350,280,DIRECTION_VERTICAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>100)); $myPicture->drawGradientArea(0,0,350,280,DIRECTION_HORIZONTAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>20)); /* Add a border to the picture */ $myPicture->drawRectangle(0,0,349,229,array("R"=>0,"G"=>0,"B"=>0)); /* Write the picture title */ $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10)); $myPicture->drawText(175,40,"Détail TA".$year,array("FontSize"=>20,"Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); /* Set the default font properties */ $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10,"R"=>80,"G"=>80,"B"=>80)); /* Create the pPie object */ $PieChart = new pPie($myPicture,$MyData); /* Define the slice color */ $PieChart->setSliceColor(0,array("R"=>143,"G"=>197,"B"=>0)); $PieChart->setSliceColor(1,array("R"=>97,"G"=>77,"B"=>63)); $PieChart->setSliceColor(2,array("R"=>97,"G"=>113,"B"=>63)); /* Enable shadow computing */ $myPicture->setShadow(TRUE,array("X"=>3,"Y"=>3,"R"=>0,"G"=>0,"B"=>0,"Alpha"=>10)); /* Draw a splitted pie chart */ $PieChart->draw3DPie(175,125,array("WriteValues"=>TRUE,"ValuePosition"=>PIE_VALUE_OUTSIDE,"ValueR"=>0,"ValueG"=>0,"ValueB"=>0,"DataGapAngle"=>10,"DataGapRadius"=>6,"Border"=>TRUE)); /* Write the legend */ $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10)); $myPicture->setShadow(TRUE,array("X"=>1,"Y"=>1,"R"=>0,"G"=>0,"B"=>0,"Alpha"=>20)); /* Write the legend box */ $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10,"R"=>0,"G"=>0,"B"=>0)); $PieChart->drawPieLegend(30,200,array("Style"=>LEGEND_NOBORDER,"Mode"=>LEGEND_HORIZONTAL)); $myPicture->render('img/mypic'.$i.'_'.$team.'.png'); echo('

'); $i++; } } foreach($numbers as $rType => $yearNumbers){ switch($rType) { case "TA": echo('   TA = Tous les articles (sauf vulgarisation)
'); break; case "ACL" : echo('   ACL = Articles de revues à comité de lecture
'); break; case "ASCL" : echo('   ASCL = Articles de revues sans comité de lecture
'); break; case "ARI" : echo('   ARI = Articles de revues internationales
'); break; case "ARN" : echo('   ARN = Articles de revues nationales
'); break; case "ACLRI" : echo('   ACLRI = Articles de revues internationales à comité de lecture
'); break; case "ACLRN" : echo('   ACLRN = Articles de revues nationales à comité de lecture
'); break; case "ASCLRI" : echo('   ASCLRI = Articles de revues internationales sans comité de lecture
'); break; case "ASCLRN" : echo('   ASCLRN = Articles de revues nationales sans comité de lecture
'); break; case "AV" : echo('   AV = Articles de vulgarisation
'); break; case "TC" : echo('   TC = Toutes les communications (sauf grand public)
'); break; case "CA" : echo('   CA = Communications avec actes
'); break; case "CSA" : echo('   CSA = Communications sans actes
'); break; case "CI" : echo('   CI = Communications internationales
'); break; case "CN" : echo('   CN = Communications nationales
'); break; case "CAI" : echo('   CAI = Communications avec actes internationales
'); break; case "CSAI" : echo('   CSAI = Communications sans actes internationales
'); break; case "CAN" : echo('   CAN = Communications avec actes nationales
'); break; case "CSAN" : echo('   CSAN = Communications sans actes nationales
'); break; case "CINVA" : echo('   CINVASANI = Communications invitées avec ou sans actes, nationales ou internationales
'); break; case "CINVA" : echo('   CINVA = Communications invitées avec actes
'); break; case "CINVSA" : echo('   CINVSA = Communications invitées sans actes
'); break; case "CNONINVA" : echo('   CNONINVA = Communications non invitées avec actes
'); break; case "CNONINVSA" : echo('   CNONINVSA = Communications non invitées sans actes
'); break; case "CINVI" : echo('   CINVI = Communications invitées internationales
'); break; case "CNONINVI" : echo('   CNONINVI = Communications non invitées internationales
'); break; case "CINVN" : echo('   CINVN = Communications invitées nationales
'); break; case "CNONINVN" : echo('   CNONINVN = Communications non invitées nationales
'); break; case "CPASANI" : echo('   CPASANI = Communications par affiches (posters) avec ou sans actes, nationales ou internationales
'); break; case "CPA" : echo('   CPA = Communications par affiches (posters) avec actes
'); break; case "CPSA" : echo('   CPSA = Communications par affiches (posters) sans actes
'); break; case "CPI" : echo('   CPI = Communications par affiches internationales
'); break; case "CPN" : echo('   CPN = Communications par affiches nationales
'); break; case "CGP" : echo('   CGP = Conférences grand public
'); break; case "TO" : echo('   TO = Tous les ouvrages (sauf vulgarisation)
'); break; case "OSPI" : echo('   OSPI = Ouvrages scientifiques de portée internationale
'); break; case "OSPN" : echo('   OSPN = Ouvrages scientifiques de portée nationale
'); break; case "COS" : echo('   COS = Chapitres d’ouvrages scientifiques
'); break; case "COSI" : echo('   COSI = Chapitres d’ouvrages scientifiques de portée internationale
'); break; case "COSN" : echo('   COSN = Chapitres d’ouvrages scientifiques de portée nationale
'); break; case "DOS" : echo('   DOS = Directions d’ouvrages scientifiques
'); break; case "DOSI" : echo('   DOSI = Directions d’ouvrages scientifiques de portée internationale
'); break; case "DOSN" : echo('   DOSN = Directions d’ouvrages scientifiques de portée nationale
'); break; case "OCO" : echo('   OCO = Ouvrages ou chapitres d’ouvrages
'); break; case "OCOI" : echo('   OCOI = Ouvrages ou chapitres d’ouvrages de portée internationale
'); break; case "OCON" : echo('   OCON = Ouvrages ou chapitres d’ouvrages de portée nationale
'); break; case "ODO" : echo('   ODO = Ouvrages ou directions d’ouvrages
'); break; case "ODOI" : echo('   ODOI = Ouvrages ou directions d’ouvrages de portée internationale
'); break; case "ODON" : echo('   ODON = Ouvrages ou directions d’ouvrages de portée nationale
'); break; case "OCDO" : echo('   OCDO = Ouvrages ou chapitres ou directions d’ouvrages
'); break; case "OCDOI" : echo('   OCDOI = Ouvrages ou chapitres ou directions d’ouvrages de portée internationale
'); break; case "OCDON" : echo('   OCDON = Ouvrages ou chapitres ou directions d’ouvrages de portée nationale
'); break; case "OCV" : echo('   OCV = Ouvrages ou chapitres de vulgarisation
'); break; case "BRE" : echo('   BRE = Brevets
'); break; case "RAP" : echo('   RAP = Rapports
'); break; case "THE" : echo('   THE = Thèses
'); break; case "HDR" : echo('   HDR = HDR
'); break; case "PWM" : echo('   PWM = Preprints, working papers, manuscrits non publiés
'); break; case "AP" : echo('   AP = Autres publications
'); break; } } if (isset($choix_publis) && strpos($choix_publis, "-TA-") !== false) { echo('   ACLRI = Articles de revues internationales à comité de lecture
'); echo('   ACLRN = Articles de revues nationales à comité de lecture
'); echo('   ASCLRI = Articles de revues internationales sans comité de lecture
'); echo('   ASCLRN = Articles de revues nationales sans comité de lecture
'); } //si GR, graphes dédiés if (isset($team) && isset($gr) && (strpos($gr, $team) !== false)) {//GR $graphe = "non"; for($j=1;$j
'); //Nombre de publications croisées par équipe sur la période $MyData = new pData(); $i = 0; for($i=0;$iaddPoints($nomeqp[$j],"Labels"); if($crores[$j] != 0){ $MyData->addPoints($crores[$j],"Equipe"); } else { $MyData->addPoints(VOID,"Equipe"); } } //$MyData->addPoints(array($gr1,$gr2,$gr3,$gr4,$gr5,$gr6,$gr7,$gr8,$gr9),"Equipe"); //$MyData->addPoints(array("GR1","GR2","GR3","GR4","GR5","GR6","GR7","GR8","GR9"),"Labels"); $MyData->setAxisName(0,"Nombre"); $MyData->setSerieDescription("Labels","Nombre de publications croisées"); $MyData->setAbscissa("Labels"); $MyData->setAbscissaName("Equipe"); /* Create the pChart object */ $myPicture = new pImage(900,280,$MyData); $myPicture->drawGradientArea(0,0,900,280,DIRECTION_VERTICAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>100)); $myPicture->drawGradientArea(0,0,900,280,DIRECTION_HORIZONTAL,array("StartR"=>240,"StartG"=>240,"StartB"=>240,"EndR"=>180,"EndG"=>180,"EndB"=>180,"Alpha"=>20)); $myPicture->drawRectangle(0,0,899,279,array("R"=>0,"G"=>0,"B"=>0)); $myPicture->setFontProperties(array("FontName"=>"./lib/pChart/fonts/corbel.ttf","FontSize"=>10)); /* Turn of Antialiasing */ $myPicture->Antialias = FALSE; /* Draw the scale */ $myPicture->setGraphArea(50,50,880,220); $myPicture->drawText(450,40,"Nombre global de publications croisées par équipe",array("FontSize"=>20,"Align"=>TEXT_ALIGN_BOTTOMMIDDLE)); $myPicture->drawScale(array("CycleBackground"=>TRUE,"DrawSubTicks"=>TRUE,"GridR"=>0,"GridG"=>0,"GridB"=>0,"GridAlpha"=>10,"Mode"=>SCALE_MODE_START0)); /* Turn on shadow computing */ $myPicture->setShadow(TRUE,array("X"=>1,"Y"=>1,"R"=>0,"G"=>0,"B"=>0,"Alpha"=>10)); /* Draw the chart */ $settings = array("Gradient"=>TRUE,"DisplayPos"=>LABEL_POS_INSIDE,"DisplayValues"=>TRUE,"DisplayR"=>255,"DisplayG"=>255,"DisplayB"=>255,"DisplayShadow"=>TRUE,"Surrounding"=>-30,"InnerSurrounding"=>30); $myPicture->drawBarChart($settings); /* Write the chart legend */ //$myPicture->drawLegend(30,260,array("Style"=>LEGEND_NOBORDER,"Mode"=>LEGEND_HORIZONTAL)); /* Do the mirror effect */ $myPicture->drawAreaMirror(0,220,900,15); /* Draw the horizon line */ //$myPicture->drawLine(1,220,898,220,array("R"=>80,"G"=>80,"B"=>80)); /* Render the picture (choose the best way) */ $myPicture->render('img/mypic_crogr_'.$team.'.png'); echo('

'); echo('Ce graphe est généré lors d\'une numérotation/codification par équipe :
'); echo('. Dans le cas d\'une extraction pour une unité, il représente l\'ensemble des publications croisées identifiées pour chaque équipe.
'); echo('. Dans le cas d\'une extraction pour une équipe, il représente le nombre de publications croisées de cette équipe et celui des autres équipes concernées en regard. '); echo('Les sommes respectives ne sont pas forcément égales car une même publication croisée peut concerner plus de deux équipes : elle comptera alors pour 1 pour l\'équipe concernée par l\'extraction, '); echo('mais également pour 1 pour chacune des autres équipes associées.

'); echo('

Pour illuster ce dernier cas, l\'exemple ci-contre représente l\'extraction des publications de l\'équipe GR2 dans une unité comportant quatre équipes. GR2 compte ainsi un total de 6 publications croisées: précisément, 3 avec GR1 seule, 1 avec GR3 seule, 1 avec GR1 et GR3, et 1 avec GR1 et GR4, d\'où, globalement, 5 avec GR1, 2 avec GR3 et 1 avec GR4.

'); } } } }else{ echo ('Aucun résultat'); } ?>
document.getElementById("detrac").style.display = "block";');} ?>

>Toutes les communications (sauf grand public)
>Communications avec actes
>Communications sans actes
>Communications internationales
>Communications nationales
>Communications avec actes internationales
>Communications sans actes internationales
>Communications avec actes nationales
>Communications sans actes nationales
>Communications invitées avec ou sans actes, nationales ou internationales
>Communications invitées avec actes
>Communications invitées sans actes
>Communications non invitées avec actes
>Communications non invitées sans actes
>Communications invitées internationales
>Communications non invitées internationales
>Communications invitées nationales
>Communications non invitées nationales
>Communications par affiches (posters) avec ou sans actes, nationales ou internationales
>Communications par affiches (posters) avec actes
>Communications par affiches (posters) sans actes
>Communications par affiches internationales
>Communications par affiches nationales
>Conférences grand public