\n"; $notice.="\n"; $requete="select * from notices where notice_id=$id"; $resultat=pmb_mysql_query($requete); $rn=pmb_mysql_fetch_object($resultat); //Référence //$notice.=" ".htmlspecialchars($id)."\n"; //Organisme (OP) $requete="select notices_custom_list_lib from notices_custom_lists, notices_custom_values where notices_custom_lists.notices_custom_champ=1 and notices_custom_values.notices_custom_champ=1 and notices_custom_integer=notices_custom_list_value and notices_custom_origine=$id"; $resultat=pmb_mysql_query($requete); if (pmb_mysql_num_rows($resultat)) { $op=pmb_mysql_result($resultat,0,0); $notice.=" ".htmlspecialchars(strtoupper($op),ENT_QUOTES,$charset)."\n"; } //Date saisie (DS) $requete="select notices_custom_date from notices_custom_values where notices_custom_champ=3 and notices_custom_origine=$id"; $resultat=pmb_mysql_query($requete); if (pmb_mysql_num_rows($resultat)) { $date=pmb_mysql_result($resultat,0,0); } else $date=date("Y")."-".date("m")."-".date("d"); $notice.="".$date."\n"; //NOM $serie=""; if ($rn->tparent_id) { $requete="select serie_name from series where serie_id=".$rn->tparent_id; $resultat=pmb_mysql_query($requete); if (pmb_mysql_num_rows($resultat)) $serie=pmb_mysql_result($resultat,0,0); } if ($rn->tnvol) $serie.=($serie?" ":"").$rn->tnvol; if ($serie) $serie.=". "; // ajout GM 15/12/2006 pour export sous-titre dans TI if ($rn->tit4!="") {$soustitre=" : ".$rn->tit4;} // fin ajout GM // modif GM 15/12/2006 ajout du sous-titre pour l'export // $notice.=" ".htmlspecialchars(strtoupper($serie.$rn->tit1))."\n"; $notice.=" ".htmlspecialchars(strtoupper($serie.$rn->tit1.$soustitre),ENT_QUOTES,$charset)."\n"; //MEL $no=$rn->n_gen; if ($no) { $notice.="".htmlspecialchars($no,ENT_QUOTES,$charset)."\n"; } $requete="select num_noeud from notices_categories where notcateg_notice=$id"; $resultat=pmb_mysql_query($requete); $doc=array(); $de=array(); while (list($categ_id)=pmb_mysql_fetch_row($resultat)) { $categ=new category($categ_id); switch ($categ->thes->id_thesaurus) { case 1: $de[]=$categ->libelle; break; case 12: $doc[]=$categ->libelle; break; } } //Descripteurs (DE) if (count($de)) { sort($de); $notice.="".htmlspecialchars(strtoupper(implode(",",$de)),ENT_QUOTES,$charset)."\n"; } //Descripteurs Web if (count($doc)) { sort($doc); $notice.="".htmlspecialchars(strtoupper(implode(",",$doc)),ENT_QUOTES,$charset)."\n"; } //Resumé (COMMENT) if ($rn->n_resume) { $notice.="".htmlspecialchars($rn->n_resume,ENT_QUOTES,$charset)."\n"; } //Site (SITE) if ($rn->lien) { $notice.="".htmlspecialchars($rn->lien,ENT_QUOTES,$charset)."\n"; } //LI if ($rn->n_contenu) { $notice.="

".htmlspecialchars($rn->n_contenu,ENT_QUOTES,$charset)."

\n"; } //DO if ($rn->indexint) { $requete="select indexint_name from indexint where indexint_id=".$rn->indexint; $resultat=pmb_mysql_query($requete); $do=pmb_mysql_result($resultat,0,0); $notice.="".htmlspecialchars($do,ENT_QUOTES,$charset)."\n"; } $notice.=""; return $notice; } public static function convert_data($notice, $s, $islast, $isfirst, $param_path) { $r_="+++"; $nt=_parser_text_no_function_($notice,"NOTICE"); if (!$nt["OP"][0]["value"]) $nt["OP"][0]["value"]=$s["OP"][0]["value"]; $r_.=$nt["DO"][0]["value"].";;".$nt["DS"][0]["value"].";;".$nt["OP"][0]["value"].";;"; //$r_.=$nt["REF"][0]["value"].";;".$nt["DO"][0]["value"].";;".$nt["DS"][0]["value"].";;".$nt["OP"][0]["value"].";;"; $r_.=$nt["NOM"][0]["value"].";;".$nt["SITE"][0]["value"].";;".$nt["MEL"][0]["value"].";;".$nt["DE"][0]["value"].";;"; $r_.=$nt["COMMENT"][0]["value"].";;".$nt["DOC"][0]["value"].";;".$nt["LI"][0]["value"]; $r['VALID'] = true; $r['ERROR'] = ""; $r['DATA'] = $r_; return $r; } }