inner_directory);$i++) {
$cle=$record->inner_directory[$i]['label'];
switch($cle) {
case "949": // infos CNL
$info_949=$record->get_subfield($cle,"a","b","c");
break;
case "997": // infos expl CNL
$info_997=$record->get_subfield($cle,"3","a","c","d","t");
break;
default:
break;
} /* end of switch */
} /* end of for */
} // fin recup_noticeunimarc_suite = fin récupération des variables propres au CNL
function import_new_notice_suite() {
global $dbh ;
global $notice_id ;
global $info_949 ;
global $id949_c, $id949_b ;
global $info_606_a, $info_606_j, $info_606_x, $info_606_y, $info_606_z ;
global $id_rech_theme, $id_rech_geo, $id_rech_chrono ;
/*
echo "";
print_r ($info_949);
print_r ($info_997);
echo "
";
*/
// 949$c est stocké dans un champ personnalisé "liste de valeur"
// ce champ personnalisé a l'id $id949_c
// le code de la liste de valeur (949$c) est dans notices_custom_lists.notices_custom_list_value WHERE notices_custom_champ=$id949_c
// TRAITEMENT :
// Chercher si 949$c est présent dans notices_custom_lists.notices_custom_list_value where notices_custom_champ=$id949_c
// Créer si besoin = INSERT INTO notices_custom_lists (notices_custom_champ, notices_custom_list_value, notices_custom_list_lib, ordre) VALUES ($id949_c, $info_949['c'], $info_949['c']." -Importé", 0 )
// Rechercher si l'enregistrement existe déjà dans notices_custom_values = SELECT 1 FROM notices_custom_values WHERE notices_custom_champ=$id949_c AND notices_custom_origine=$notice_id AND notices_custom_small_text=$info_949['c']
// Créer si besoin
// CORRECTION suite à test d'import : $c contient $a."texte à la con" on ne retient donc que $a
$info_949[0]['c'] = $info_949[0]['a'] ;
$rqt = "select count(1) from notices_custom_lists where notices_custom_champ='".$id949_c."' and notices_custom_list_value='".$info_949[0]['c']."'" ;
if (!mysql_result(mysql_query($rqt, $dbh),0,0)) {
$rqt_ajout = "INSERT INTO notices_custom_lists (notices_custom_champ, notices_custom_list_value, notices_custom_list_lib, ordre) VALUES ('".$id949_c."', '".$info_949[0]['c']."', '".$info_949[0]['c']." -Importé','0')" ;
$res_ajout = mysql_query ($rqt_ajout, $dbh) ;
}
$rqt = "SELECT count(1) FROM notices_custom_values WHERE notices_custom_champ='".$id949_c."' AND notices_custom_origine='".$notice_id."' " ;
if (!mysql_result(mysql_query($rqt, $dbh),0,0)) {
$rqt_ajout = "INSERT INTO notices_custom_values (notices_custom_champ, notices_custom_origine, notices_custom_small_text) VALUES ('".$id949_c."', '".$notice_id."', '".$info_949[0]['c']."') " ;
$res_ajout = mysql_query ($rqt_ajout, $dbh) ;
}
// 949$b est stocké dans un champ personnalisé texte
// ce champ personnalisé a l'id $id949_b
// TRAITEMENT :
// Rechercher si l'enregistrement existe déjà dans notices_custom_values = SELECT 1 FROM notices_custom_values WHERE notices_custom_champ=$id949_b AND notices_custom_origine=$notice_id
// Créer si besoin
$rqt = "SELECT count(1) FROM notices_custom_values WHERE notices_custom_champ='".$id949_b."' AND notices_custom_origine='".$notice_id."' " ;
if (!mysql_result(mysql_query($rqt, $dbh),0,0)) {
$rqt_ajout = "INSERT INTO notices_custom_values (notices_custom_champ, notices_custom_origine, notices_custom_small_text) VALUES ('".$id949_b."', '".$notice_id."', '".$info_949[0]['b']."')" ;
$res_ajout = mysql_query ($rqt_ajout, $dbh) ;
}
// les champs $606 sont stockés dans les catégories
// $a >> en sous catégories de $id_rech_theme
// $j en complément de $a
// $x en sous catégories de $a
// $y >> en sous catégories de $id_rech_geo
// $z >> en sous catégories de $id_rech_chrono
// TRAITEMENT :
// pour $a=0 à size_of $info_606_a
// pour $j=0 à size_of $info_606_j[$a]
// concaténer $libelle_j .= $info_606_j[$a][$j]
// $libelle_final = $info_606_a[0]." ** ".$libelle_j
// Rechercher si l'enregistrement existe déjà dans categories =
// SELECT categ_id FROM categories WHERE categ_parent='".$id_rech_theme."' AND categ_libelle='".addslashes($libelle_final)."' "
// Créer si besoin et récupérer l'id $categid_a
// $categid_parent = $categid_a
// pour $x=0 à size_of $info_606_x[$a]
// Rechercher si l'enregistrement existe déjà dans categories =
// SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_x[$a][$x])."' "
// Créer si besoin et récupérer l'id $categid_parent
//
// $categid_parent = $id_rech_geo
// pour $y=0 à size_of $info_606_y[$a]
// Rechercher si l'enregistrement existe déjà dans categories =
// SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_y[$a][$y])."' "
// Créer si besoin et récupérer l'id $categid_parent
//
// $categid_parent = $id_rech_chrono
// pour $y=0 à size_of $info_606_z[$a]
// Rechercher si l'enregistrement existe déjà dans categories =
// SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_z[$a][$y])."' "
// Créer si besoin et récupérer l'id $categid_parent
//
for ($a=0; $a lender_libelle;
$subfields["c"] = $ex -> lender_libelle;
$subfields["f"] = $ex -> expl_cb;
$subfields["k"] = $ex -> expl_cote;
$subfields["u"] = $ex -> expl_note;
if ($ex->statusdoc_codage_import) $subfields["o"] = $ex -> statusdoc_codage_import;
if ($ex -> tdoc_codage_import) $subfields["r"] = $ex -> tdoc_codage_import;
else $subfields["r"] = "uu";
if ($ex -> sdoc_codage_import) $subfields["q"] = $ex -> sdoc_codage_import;
else $subfields["q"] = "u";
global $export996 ;
$export996['f'] = $ex -> expl_cb ;
$export996['k'] = $ex -> expl_cote ;
$export996['u'] = $ex -> expl_note ;
$export996['m'] = substr($ex -> expl_date_depot, 0, 4).substr($ex -> expl_date_depot, 5, 2).substr($ex -> expl_date_depot, 8, 2) ;
$export996['n'] = substr($ex -> expl_date_retour, 0, 4).substr($ex -> expl_date_retour, 5, 2).substr($ex -> expl_date_retour, 8, 2) ;
$export996['a'] = $ex -> lender_libelle;
$export996['b'] = $ex -> expl_owner;
$export996['v'] = $ex -> location_libelle;
$export996['w'] = $ex -> ldoc_codage_import;
$export996['x'] = $ex -> section_libelle;
$export996['y'] = $ex -> sdoc_codage_import;
$export996['e'] = $ex -> tdoc_libelle;
$export996['r'] = $ex -> tdoc_codage_import;
$export996['1'] = $ex -> statut_libelle;
$export996['2'] = $ex -> statusdoc_codage_import;
$export996['3'] = $ex -> pret_flag;
global $export_traitement_exemplaires ;
$export996['0'] = $export_traitement_exemplaires ;
return $subfields ;
}