home/eliteafr/pmb/includes/external.inc.php000066600000006672152164707360015010 0ustar00is_utf8 = true; } $field_order=-1; $field=$r->ufield; $field_ind= $r->field_ind; while(strlen($field_ind)<2){ $field_ind.= ' '; } $sfields=array(); while ($r=pmb_mysql_fetch_object($resultat)) { switch ($r->ufield) { case "rs": $unimarc->set_rs($r->value); break; case "dt": $unimarc->set_dt($r->value); break; case "bl": $unimarc->set_bl($r->value); break; case "hl": $unimarc->set_hl($r->value); break; case "el": $unimarc->set_el($r->value); break; case "ru": $unimarc->set_ru($r->value); break; case "001": $unimarc->add_field("001",' ',$r->value); default: if ($field_order!=$r->field_order) { if (count($sfields)) { $unimarc->add_field($field,$field_ind,$sfields); } $field=$r->ufield; $field_ind= $r->field_ind; while(strlen($field_ind)<2){ $field_ind.= ' '; } $sfields=array(); $field_order=$r->field_order; } if (!$r->usubfield) $unimarc->add_field($r->ufield,'',$r->value); else { $sfields[][0]=$r->usubfield; $sfields[count($sfields)-1][1]=$r->value; } break; } } if (count($sfields)) { $unimarc->add_field($field,$field_ind,$sfields); } $unimarc->update(); return array('notice' => $unimarc->full_record, 'source_id' => $source_id); } function suppr_item_to_entrepot($item){ global $dbh; $requete = "SELECT source_id FROM external_count WHERE rid=".addslashes($item).";"; $myQuery = pmb_mysql_query($requete, $dbh); //on évite les mauvaises surprises (genre rechargement de page...) if(pmb_mysql_num_rows($myQuery)){ $source_id = pmb_mysql_result($myQuery, 0, 0); if($source_id){ //on supprime les documents numériques intégrés en tant que fichiers $q = "select value as file_name from entrepot_source_$source_id where recid='".addslashes($item)."' and ufield='897' and usubfield='a' and value like '/%' "; $r = pmb_mysql_query($q,$dbh); if (pmb_mysql_num_rows($r)) { while ($row = pmb_mysql_fetch_object($r)) { @unlink($row->file_name); } } //on supprime les infos $requete="delete from entrepot_source_$source_id where recid='".addslashes($item)."'"; $resultat = pmb_mysql_query($requete, $dbh); //on supprime la référence $requete = "delete from external_count WHERE rid=".addslashes($item).";"; $myQuery = pmb_mysql_query($requete, $dbh); } } } ?>