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 (!pmb_mysql_result(pmb_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 = pmb_mysql_query($rqt_ajout, $dbh) ; } import_records::insert_value_custom_field($id949_c, $notice_id, $info_949[0]['c']); // 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 import_records::insert_value_custom_field($id949_b, $notice_id, $info_949[0]['b']); // 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 // $nb_infos_606_a = count($info_606_a); for ($a = 0; $a < $nb_infos_606_a; $a++) { $nb_infos_606_j = count($info_606_j[$a]); for ($j = 0; $j < $nb_infos_606_j; $j++) { if (!$libelle_j) $libelle_j .= $info_606_j[$a][$j] ; else $libelle_j .= " ** ".$info_606_j[$a][$j] ; } if (!$libelle_j) $libelle_final = $info_606_a[$a][0] ; else $libelle_final = $info_606_a[$a][0]." ** ".$libelle_j ; if (!$libelle_final) break ; $rqt_a = "SELECT categ_id FROM categories WHERE categ_parent='".$id_rech_theme."' AND categ_libelle='".addslashes($libelle_final)."' " ; $res_a = pmb_mysql_query($rqt_a,$dbh) ; if (pmb_mysql_num_rows($res_a)) { $categid_a = pmb_mysql_result($res_a, 0, 0) ; } else { $rqt_ajout = "insert into categories set categ_parent='".$id_rech_theme."', categ_libelle='".addslashes($libelle_final)."', index_categorie=' ".strip_empty_words($libelle_final)." ' " ; $res_ajout = pmb_mysql_query($rqt_ajout, $dbh); $categid_a = pmb_mysql_insert_id($dbh) ; } // récup des sous-categ en cascade sous $a $categ_parent = $categid_a ; $nb_info_606_x = count($info_606_x[$a]); for ($x = 0; $x < $nb_info_606_x; $x++) { $rqt_x = "SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_x[$a][$x])."' " ; $res_x = pmb_mysql_query($rqt_x,$dbh) ; if (pmb_mysql_num_rows($res_x)) { $categ_parent = pmb_mysql_result($res_x, 0, 0) ; } else { $rqt_ajout = "insert into categories set categ_parent='".$categ_parent."', categ_libelle='".addslashes($info_606_x[$a][$x])."', index_categorie=' ".strip_empty_words($info_606_x[$a][$x])." ' " ; $res_ajout = pmb_mysql_query($rqt_ajout, $dbh); $categ_parent = pmb_mysql_insert_id($dbh) ; } } // fin récup des $x en cascade sous l'id de la catégorie 606$a if ($categ_parent != $id_rech_theme) { // insertion dans la table notices_categories $rqt_ajout = "insert into notices_categories set notcateg_notice='".$notice_id."', notcateg_categorie='".$categ_parent."' " ; $res_ajout = @pmb_mysql_query($rqt_ajout, $dbh); } // récup des categ géo à loger sous la categ géo principale $categ_parent = $id_rech_geo ; $nb_info_606_y = count($info_606_y[$a]); for ($y = 0; $y < $nb_info_606_y; $y++) { $rqt_y = "SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_y[$a][$y])."' " ; $res_y = pmb_mysql_query($rqt_y,$dbh) ; if (pmb_mysql_num_rows($res_y)) { $categ_parent = pmb_mysql_result($res_y, 0, 0) ; } else { $rqt_ajout = "insert into categories set categ_parent='".$categ_parent."', categ_libelle='".addslashes($info_606_y[$a][$y])."', index_categorie=' ".strip_empty_words($info_606_y[$a][$y])." ' " ; $res_ajout = pmb_mysql_query($rqt_ajout, $dbh); $categ_parent = pmb_mysql_insert_id($dbh) ; } } // fin récup des $y en cascade sous l'id de la catégorie principale thème géo if ($categ_parent != $id_rech_geo) { // insertion dans la table notices_categories $rqt_ajout = "insert into notices_categories set notcateg_notice='".$notice_id."', notcateg_categorie='".$categ_parent."' " ; $res_ajout = @pmb_mysql_query($rqt_ajout, $dbh); } // récup des categ chrono à loger sous la categ chrono principale $categ_parent = $id_rech_chrono ; $nb_info_606_z = count($info_606_z[$a]); for ($z = 0; $z < $nb_info_606_z; $z++) { $rqt_z = "SELECT categ_id FROM categories WHERE categ_parent='".$categ_parent."' AND categ_libelle='".addslashes($info_606_z[$a][$z])."' " ; $res_z = pmb_mysql_query($rqt_z,$dbh) ; if (pmb_mysql_num_rows($res_z)) { $categ_parent = pmb_mysql_result($res_z, 0, 0) ; } else { $rqt_ajout = "insert into categories set categ_parent='".$categ_parent."', categ_libelle='".addslashes($info_606_z[$a][$z])."', index_categorie=' ".strip_empty_words($info_606_z[$a][$z])." ' " ; $res_ajout = pmb_mysql_query($rqt_ajout, $dbh); $categ_parent = pmb_mysql_insert_id($dbh) ; } } // fin récup des $z en cascade sous l'id de la catégorie principale thème chrono if ($categ_parent != $id_rech_chrono) { // insertion dans la table notices_categories $rqt_ajout = "insert into notices_categories set notcateg_notice='".$notice_id."', notcateg_categorie='".$categ_parent."' " ; $res_ajout = @pmb_mysql_query($rqt_ajout, $dbh); } } } // fin import_new_notice_suite // TRAITEMENT DES EXEMPLAIRES ICI function traite_exemplaires () { global $msg, $dbh ; global $prix, $notice_id, $tdoc_codage, $book_lender_id, $sdoc_codage, $book_statut_id, $locdoc_codage, $statisdoc_codage, $cote_mandatory ; global $info_997 ; global $idcode_stat_expl ; // lu en 010$d de la notice $price = $prix[0]; $nb_infos_997 = count($info_997); // la zone 997 est répétable ? for ($nb_expl = 0; $nb_expl < $nb_infos_997; $nb_expl++) { /* RAZ expl */ $expl = array(); /* préparation du tableau à passer à la méthode */ if (!$info_997[$nb_expl]['a']) $expl['cb'] = "ABS $notice_id" ; else $expl['cb'] = $info_997[$nb_expl]['a']; $expl['notice'] = $notice_id ; // Type de document $data_doc=array(); $data_doc['tdoc_libelle'] = $info_997[$nb_expl]['t']." -Importé"; $data_doc['duree_pret'] = 0 ; /* valeur par défaut */ $data_doc['tdoc_codage_import'] = $info_997[$nb_expl]['t'] ; if ($tdoc_codage) $data_doc['tdoc_owner'] = $book_lender_id ; else $data_doc['tdoc_owner'] = 0 ; $expl['typdoc'] = docs_type::import($data_doc); // cote du document : $3 ? $expl['cote'] = $info_997[$nb_expl]['3']; // Section $data_doc=array(); $data_doc['section_libelle'] = $info_997[$nb_expl]['d']." -Importé"; $data_doc['sdoc_codage_import'] = $info_997[$nb_expl]['d'] ; if ($sdoc_codage) $data_doc['sdoc_owner'] = $book_lender_id ; else $data_doc['sdoc_owner'] = 0 ; $expl['section'] = docs_section::import($data_doc); // Statut : choisi lors de l'import $expl['statut'] = $book_statut_id; // Localisation $data_doc=array(); $data_doc['location_libelle'] = $info_997[$nb_expl]['c']."-Importé"; $data_doc['locdoc_codage_import'] = $info_997[$nb_expl]['c'] ; if ($locdoc_codage) $data_doc['locdoc_owner'] = $book_lender_id ; else $data_doc['locdoc_owner'] = 0 ; $expl['location'] = docs_location::import($data_doc); // Code statistique : fixé dans le paramétrage $expl['codestat'] = $idcode_stat_expl; $expl['prix'] = $price; $expl['expl_owner'] = $book_lender_id ; $expl['cote_mandatory'] = $cote_mandatory ; $expl_id = exemplaire::import($expl); if ($expl_id == 0) { $nb_expl_ignores++; } } // fin for } // fin traite_exemplaires TRAITEMENT DES EXEMPLAIRES JUSQU'ICI // fonction spécifique d'export de la zone 995 function export_traite_exemplaires ($ex=array()) { return import_expl::export_traite_exemplaires($ex); }