Changeset 818


Ignore:
Timestamp:
Mar 9, 2016, 2:42:56 PM (3 years ago)
Author:
jrpelegrina
Message:

WIP in lliurex features and modifications

Location:
pmb4.2/trunk/fuentes/pmb
Files:
12 edited

Legend:

Unmodified
Added
Removed
  • pmb4.2/trunk/fuentes/pmb/admin/convert/folow_import.php

    r815 r818  
    4545} else {
    4646        //@copy("$base_path/temp/$file_out","$base_path/admin/import/unimarc.fic");
    47         @copy("$base_path/temp/$file_out","$base_path/admin/import/unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic");
     47// ------------------------------------- LLIUREX 09/03/2016--------------------------------------
     48// Cambiando la ruta de escritura del fichero temporal
     49// Es necesario modificar iiimport.php preload para cargar de esta nueva ruta
     50
     51        // @copy("$base_path/temp/$file_out","$base_path/admin/import/unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic");
     52        @copy("$base_path/temp/$file_out","$base_path/temp/unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic");
     53// -------------------- FIN LLIUREX 09/03/2016 
    4854
    4955        @unlink("$base_path/temp/$file_out");
  • pmb4.2/trunk/fuentes/pmb/admin/convert/imports/catalog.xml

    r815 r818  
    66        <item name="MARC ISO2709 -&gt; pmb-XML MARC" path="marciso2pmbxml" output_pmbxml="yes"/>
    77        <item name="MARC ISO2709 -&gt; TEXTE MARC" path="marciso2txt"/>
    8         <item name="Text -&gt; UNIMARC ISO2709" path="text2unimarciso" import="yes" importname="Texte"/>
    9         <item name="Text -&gt; pmb-XML UNIMARC" path="text2pmbxml"/>
     8
     9//-------------------- LLIUREX 09/03/2016 ------------------------
     10//-- Sustituir Text por CSV ----       
     11        <item name="CSV -&gt; UNIMARC ISO2709" path="text2unimarciso" import="yes" importname="Texte"/>
     12        <item name="CSV -&gt; pmb-XML UNIMARC" path="text2pmbxml"/>
     13//------------------- FIN LLIUREX 09/03/2016 ---------------------     
    1014        <item name="MEMO NOTICES BCDI -&gt; UNIMARC ISO2709" path="bcdi2uniiso" import="yes" importname="MEMO NOTICES BCDI"/>
    1115        <item name="MEMO NOTICES BCDI -&gt; pmb-XML UNIMARC" path="bcdi2pmbxmluni"/>
  • pmb4.2/trunk/fuentes/pmb/admin/empr/main.inc.php

    r815 r818  
    5656        include("./admin/empr/parametres_perso_empr.inc.php");
    5757        break;
     58// ---------- LLIUREX 09/03/2016 --------------------------------------------------------
     59// usuarios GESCEN/ITACA
     60    case 'imple':
     61        $admin_layout = str_replace('!!menu_sous_rub!!', $msg["import_lec_lien"], $admin_layout);
     62        print $admin_layout;
     63        echo window_title($database_window_title.$msg["import_lec_lien"].$msg[1003].$msg[1001]);
     64        if ($pmb_import_modele_lecteur) $import_modele=$pmb_import_modele_lecteur; else $import_modele="usur_imp.php";
     65        include("$import_modele");
     66        break;
     67    case 'itaca':
     68        $admin_layout = str_replace('!!menu_sous_rub!!', $msg["import_usu_from_itaca_b"],$admin_layout);
     69        print $admin_layout;
     70        echo window_title($database_window_title.$msg["import_usu_from_itaca_a"].$msg[1003].$msg[1001]);
     71        include("./usur_imp_itaca.php");
     72    break;
     73    case 'export':
     74        $admin_layout = str_replace('!!menu_sous_rub!!', $msg["usur_exp_b"],$admin_layout);
     75        print $admin_layout;
     76        echo window_title($database_window_title.$msg["usur_exp_a"].$msg[1003].$msg[1001]);
     77        include("./usur_exp.php");
     78        break;
     79    case 'migration':
     80        $admin_layout = str_replace('!!menu_sous_rub!!', $msg["usur_migr_menu"],$admin_layout);
     81        print $admin_layout;
     82        echo window_title($database_window_title.$msg["usur_migr_menu"].$msg[1003].$msg[1001]);
     83        include("./migracion_NIA.php");
     84        break;
     85// ----------------- FIN LLIUREX 09/03/2015
    5886    default:
    5987        $admin_layout = str_replace('!!menu_sous_rub!!', "", $admin_layout);
  • pmb4.2/trunk/fuentes/pmb/admin/import/func_bdp.inc.php

    r815 r818  
    116116                $data_doc=array();
    117117                $info_995[$nb_expl]['q']=trim($info_995[$nb_expl]['q']);
    118                 if (!$info_995[$nb_expl]['q'])
     118
     119// -------------- LLIUREX 09/03/2015 -----------------------------------------------
     120// añadido || !$section_995[$info_995[$nb_expl]['q']] a la condicion de entrada
     121
     122                if (!$info_995[$nb_expl]['q'] || !$section_995[$info_995[$nb_expl]['q']])
    119123                        $info_995[$nb_expl]['q'] = "u";
     124//------------- FIN LLIUREX 09/03/2015         
    120125                $data_doc['section_libelle'] = $section_995[$info_995[$nb_expl]['q']];
    121126                $data_doc['sdoc_codage_import'] = $info_995[$nb_expl]['q'] ;
  • pmb4.2/trunk/fuentes/pmb/admin/import/iimport_expl.php

    r815 r818  
    121121                $book_lender_name = $msg[561];
    122122        }
     123//------------------------------------- LLIUREX 09/03/2016--------------------------------------
     124} else if ($sub == "import_reb"){
     125        echo window_title($msg["import_reb"].$msg[1003].$msg[1001]);
     126// ------------------------------------- FIN LLIUREX 09/03/2016 ----------------------
     127
    123128} else {
    124129        echo window_title($msg[500].$msg[1003].$msg[1001]);
     
    131136                        $book_statut_id = "";
    132137                        print $tpl_beforeupload_expl ;
    133                 } else {
     138
     139// -------------------------------- LLIUREX 09/03/2016--------------------------------------
     140        } else if ($sub == "import_reb") {
     141                   print $tpl_beforeupload_reb ;
     142// ------------------------------------- FIN LLIUREX 09/03/2016----------------------------------
     143
     144                        } else {
    134145                        // import de notice
    135146                         print $tpl_beforeupload_notices ;
    136                 }
     147                        }
    137148        break;
    138149        case 'afterupload':
     
    179190                                print "<SCRIPT>setTimeout(\"document.afterupload.submit()\",2000);</SCRIPT>";
    180191                        }
     192
     193// -------------------------------- LLIUREX 09/03/2016--------------------------------------
     194         } else if ($sub == "import_reb") {
     195
     196                // import de rebeca
     197                   if ($to_file=="") {
     198                           printf ($msg[503],$from_file); /* wrong permissions to copy the file %s ... Contact your admin... */
     199                           break;
     200                        }
     201
     202                        //if (strrpos(strtolower($from_file), ".reb") == false) {
     203                        //      printf ($msg['import_reb_fail_reb'],$from_file); /* wrong rebeca file %s ... Contact your admin... */
     204                    //          break;
     205                        //}
     206
     207                   if (!move_uploaded_file($tmp_file,$to_file)) {
     208                           printf ($msg[504],$from_file); /* Fail to copy %s, Contact your admin... */
     209                        } else {
     210                                printf ($msg[505],$from_file); /* File transfered, Loading is about to go on */
     211                                print "<form class='form-$current_module' NAME=\"afterupload\" METHOD=\"post\" ACTION=\"iimport_expl.php\">";
     212                                print "<INPUT NAME=\"categ\" TYPE=\"hidden\" value=\"import\">";
     213                                print "<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\">";
     214                                print "<INPUT NAME=\"action\" TYPE=\"hidden\" value=\"preload\">";
     215                                print "<input type=\"hidden\" name=\"file_submit\" value=\"$to_file\">";
     216                                print "</FORM>";
     217                                print "<SCRIPT>setTimeout(\"document.afterupload.submit()\",2000);</SCRIPT>";
     218                        }
     219// -------------------------------- FIN LLIUREX 09/03/2016--------------------------------------
     220
    181221                } else {
    182222                        // import de notice
     
    213253                        if ($file_submit=="") {
    214254                                /* l'utilisateur n'est pas passé par le téléchargement du fichier */
    215                                 $filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     255
     256// ---------------------------------- LLIUREX 09/03/2016--------------------------------------
     257// Cambiando la ruta de lectura del fichero a leer
     258// Previamente se ha modificado folow_import.php para escribir en esta nueva ruta
     259                                //$filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     260                                $filename = $base_path."/temp/".$nom_fichier_transfert_ftp;
     261// --------------------------------- FIN LLIUREX 02/03/2016------------------------------------
    216262                                $from_file = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic";
    217263                        } else {
     
    393439            print $formulaire;
    394440            print $script;
     441
     442// ----------------------------------- LLIUREX 09/03/2016--------------------------------------
     443                } else if ($sub == "import_reb") {
     444
     445                // import de notice
     446                /* Does the file exist ? */
     447                if ($file_submit=="") $filename = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic"; else $filename=$file_submit;
     448
     449                if ($noticenumber=="") $noticenumber=0;
     450       
     451                if (!file_exists($filename)) {
     452                        printf ($msg[506],$filename); /* The file %s doesn't exist... */
     453                        return;
     454                        }
     455       
     456                if (filesize($filename)==0) {
     457                        printf ($msg[507],$filename); /* The file % is empty, it's going to be deleted */
     458                        unlink ($filename);
     459                        return;
     460                        }
     461       
     462                $handle = fopen ($filename, "rb");
     463                if (!$handle) {
     464                        printf ($msg[508],$filename); /* Unable to open the file %s ... */
     465                        return;
     466                        }
     467               
     468                exec("yaz-marcdump -o marc -s ".$base_path."/temp/rebdump ".$filename." >/dev/null", $output, $return_var);
     469                if ($return_var) {
     470                        printf ($msg['import_reb_fail_dump'],$filename); /* dump failed */
     471                        unlink ($filename);
     472                        return;
     473                        }
     474               
     475                $formulaire="<form class='form-$current_module' name=\"load\" method=\"post\" action=\"iimport_expl.php\">";
     476                $formulaire.="<INPUT NAME=\"categ\" TYPE=\"hidden\" value=\"import\">";
     477                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\">";
     478                $formulaire.="<INPUT NAME=\"action\" TYPE=\"hidden\" value=\"load\">";
     479                $formulaire.="<input type=\"hidden\" name=\"filename\" value=\"$filename\">";
     480                $formulaire.="</form>";
     481                printf ($msg[509].$msg[512], $filename, $filename); /* File %s... . End of preload... */
     482                $script = "<script>setTimeout(\"document.load.submit()\",2000);</script>";
     483                   
     484                print $formulaire;
     485                print $script;
     486// ------------------------------FIN LLIUREX 09/03/2016--------------------------------------
     487
    395488                } else {
    396489                    // import de notice
    397490                    /* Does the file exist ? */
    398491                    if ($file_submit=="") {
    399                         $filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     492
     493// ---------------------------------- LLIUREX 09/03/2016--------------------------------------
     494// Cambiando la ruta de lectura del fichero a leer
     495// Previamente se ha modificado folow_import.php para escribir en esta nueva ruta                       
     496                        //$filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     497                                $filename = $base_path."/temp/".$nom_fichier_transfert_ftp;
     498// ------------------------------- FIN LLIUREX 09/03/2016--------------------------------------
     499
    400500                        $from_file = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic";
    401501                    } else {
     
    521621        break;
    522622    case 'load':
     623
     624// -----------------------------------LLIUREX 09/03/2016--------------------------------------
     625        if ($sub == "import_reb") {
     626                include("$class_path/audit.class.php");
     627                require ($base_path."/catalog/z3950/notice.inc.php");
     628                include("$include_path/templates/expl.tpl.php");
     629                include ("$class_path/z3950_notice.class.php");
     630                require_once($base_path."/catalog/z3950/func_other.inc.php");
     631
     632                $integration_OK=0;
     633                $integration_UP=0;
     634
     635
     636               
     637                $dirrec=scandir($base_path."/temp/");
     638                foreach($dirrec as $file) {
     639                        if ( (strpos($file, "rebdump")) !== false ) {
     640                                $fp = fopen ($base_path."/temp/".$file,"r");
     641                                $buffer="";
     642                                while (!feof($fp)) {
     643                                        $buffer.= fread($fp, 4096);
     644                                }
     645                                fclose($fp);
     646                                unlink($base_path."/temp/".$file);
     647
     648                                $notice = new z3950_notice ("usmarc", $buffer);
     649                                $res_integration = $notice->insert_in_database($show=false);
     650                                $new_notice=$res_integration[0];
     651                                $num_notice=$res_integration[1];
     652                                //if (($new_notice==0) && ($num_notice==0)) $integration_OK="ECHEC";
     653                                //if (($new_notice==0) && ($num_notice!=0)) $integration_OK="EXISTAIT";
     654                                if (($new_notice==1) && ($num_notice!=0)) $integration_OK++;
     655                                if (($new_notice==2) && ($num_notice!=0)) $integration_UP++;
     656                                //if (($new_notice==1) && ($num_notice==0)) $integration_OK="NEWRATEE";
     657
     658                        }
     659                }
     660                unlink($filename);
     661
     662                printf ($msg['import_reb_ok'], $integration_OK);
     663                printf ($msg['import_reb_up'], $integration_UP);
     664
     665                return;
     666        }
     667
     668// ----------------------------------FIN LLIUREX 09/03/2016----------------------------------
     669
    523670                if (!$statutnot) $statutnot=1;
    524671                printf ($msg[509], $from_file);
     
    8801027                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_expl\" />";
    8811028                $form_text=file_get_contents("$include_path/messages/help/$lang/import_expl.txt");
    882         }else{
     1029       
     1030        }
     1031// ---------------------------------- LLIUREX 09/03/2016--------------------------------------
     1032        else if ($sub == "import_reb") {
     1033                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\" />";
     1034                $form_text=file_get_contents("$include_path/messages/help/$lang/import_reb.txt") ;
     1035                }
     1036// --------------------------------- FIN LLIUREX 09/03/2016-------------------------------             
     1037       else{
    8831038                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import\" />";
    8841039                $form_text=file_get_contents("$include_path/messages/help/$lang/import.txt");
     
    9501105                        <option value=\"iso8859\" ".(($encodage_fic_source == "iso8859") ? " selected=\"selected\" ": "").">".htmlentities($msg["admin_import_encodage_fic_source_iso8859"],ENT_QUOTES,$charset)."</option>
    9511106                </select></br></br>";
    952        
    953         $formulaire.=$selecteur_fic;
     1107 
     1108  // ----------------------------------- LLIUREX 09/03/2016--------------------------------
     1109               
     1110        /*$formulaire.=$selecteur_fic;
    9541111        $formulaire.="<label class=\"etiquette\" for=\"".$name_func."\" id=\"text_desc_func_import\" name=\"text_desc_func_import\">".htmlentities($text_desc_func_import,ENT_QUOTES,$charset)."</label></br>\n";
    9551112        $formulaire.=$selecteur_encodage;
    9561113        $formulaire.="<INPUT type=\"button\" value=\"".htmlentities($msg["admin_import_notice_telechargement"],ENT_QUOTES,$charset)."\" class=\"bouton\" onclick=\"document.getElementById('action').value ='beforeupload';document.beforeupload.submit();\" />";
    957         $formulaire.="<INPUT type=\"button\" value=\"".htmlentities($msg["admin_import_notice_prechargement"],ENT_QUOTES,$charset)."\" class=\"bouton\" onclick=\"document.getElementById('action').value ='preload'; document.beforeupload.submit();\"/>";
     1114        $formulaire.="<INPUT type=\"button\" value=\"".htmlentities($msg["admin_import_notice_prechargement"],ENT_QUOTES,$charset)."\" class=\"bouton\" onclick=\"document.getElementById('action').value ='preload'; document.beforeupload.submit();\"/>";*/
     1115                if ($sub <> "import_reb") $formulaire.=$selecteur_fic;
     1116        if ($sub <> "import_reb") $formulaire.="<label class=\"etiquette\" for=\"".$name_func."\" id=\"text_desc_func_import\" name=\"text_desc_func_import\">".htmlentities($text_desc_func_import,ENT_QUOTES,$charset)."</label></br></br>\n";
     1117                $formulaire.="<INPUT type=\"button\" value=\"".htmlentities($msg["admin_import_notice_telechargement"],ENT_QUOTES,$charset)."\" class=\"bouton\" onclick=\"document.getElementById('action').value ='beforeupload';document.beforeupload.submit();\" />";
     1118        if ($sub <> "import_reb") $formulaire.="<INPUT type=\"button\" value=\"".htmlentities($msg["admin_import_notice_prechargement"],ENT_QUOTES,$charset)."\" class=\"bouton\" onclick=\"document.getElementById('action').value ='preload'; document.beforeupload.submit();\"/>";
     1119
     1120// ----------------------------------- FIN LLIUREX 09/03/2016----------------------------------
     1121
    9581122        $formulaire.="</form>\n";
    9591123       
  • pmb4.2/trunk/fuentes/pmb/admin/import/import_func.inc.php

    r815 r818  
    193193                    </FORM>";
    194194
     195//------------------------------------- LLIUREX 09/03/2016 ----------------------------------
     196$tpl_beforeupload_reb = "
     197                    <form class='form-$current_module' ENCTYPE='multipart/form-data' METHOD='post' ACTION='iimport_expl.php' />
     198                    <h3>".$msg['import_reb_form_titre']."</h3>
     199                    <div class='form-contenu'>
     200                        <div class='row'>
     201                            <label class='etiquette' for='txt_suite'>".$msg['import_reb_form_file']."</label>
     202                            </div>
     203                        <div class='row'>
     204                            <INPUT NAME='userfile' class='bouton' TYPE='file' size='60'>
     205                            <INPUT NAME='categ' TYPE='hidden' value='import'>
     206                            <INPUT NAME='sub' TYPE='hidden' value='import_reb'>
     207                            <INPUT NAME='action' TYPE='hidden' value='afterupload'>
     208                            </div>
     209                        </div>
     210                    <INPUT TYPE='SUBMIT' class='bouton' NAME='upload' VALUE='".$msg[502]."' />
     211                    </FORM>";
     212//----------------------------- FIN LLIUREX 09/03/2016 -------------------------------
     213
     214
     215
    195216// PRELOAD
    196217function loadfile_in_table () {
     
    199220        global $noticenumber, $filename, $from_file, $pb_fini, $recharge ;
    200221        global $pmb_import_limit_read_file ;
     222
     223//------------------------------ LLIUREX 09/03/2016---------------------------------
     224//en principio parece que no le hace falta, pero lo dejo comentado porque puede servir de referencia para futuras modificaciones
     225//  if ((stripos($filename, "/temp/"))==false){
     226//  $filename="../../temp/".$filename;
     227//}
     228//------------------------------FIN LLIUREX 09/03/2016 ------------------------------
     229
     230
    201231
    202232        if ($noticenumber=="") $noticenumber=0;
  • pmb4.2/trunk/fuentes/pmb/admin/import/main.inc.php

    r815 r818  
    2323                include("./admin/import/pointage_expl.inc.php");
    2424                break;
     25// --------------------------------- LLIUREX  09/03/2016 -----------------------------------
     26        case 'import_reb':
     27                $admin_layout = str_replace('!!menu_sous_rub!!', $msg["import_reb"], $admin_layout);
     28                print $admin_layout;
     29                include("./admin/import/import_expl.inc.php");
     30                break;
     31// -------------------------------- FIN LLIUREX 09/03/2016 ----------------------------------
     32
    2533        case 'import_skos':
    2634                $admin_layout = str_replace('!!menu_sous_rub!!', $msg["ontology_skos_admin_import"], $admin_layout);
  • pmb4.2/trunk/fuentes/pmb/admin/sauvegarde/main.inc.php

    r815 r818  
    4343                include("./admin/sauvegarde/sauvegarde_list.inc.php");
    4444                break;
     45
     46// ------------------------------ LLIUREX 03/09/2016--------------------------------------------               
     47// Ponemos los links en la pagina de administracion/copias de seguridad
     48        case 'lliurexp':
     49                //Lliurex modulo exportacion de toda la base de datos
     50                $admin_layout = str_replace('!!menu_sous_rub!!', $msg["sauv_title_lliurex"], $admin_layout);
     51                print $admin_layout;
     52                echo window_title($msg["sauv_title_lliurex"]);
     53                include("./copia_seg.php");
     54                break;
     55
     56        case 'lliureximp':
     57                //Lliurex modulo exportacion de toda la base de datos
     58                $admin_layout = str_replace('!!menu_sous_rub!!', $msg["sauv_title_lliurex"], $admin_layout);
     59                print $admin_layout;
     60                echo window_title($msg["sauv_title_lliurex"]);
     61                include("./copia_seg_importa.php");
     62                break;
     63// -----------------------------FIN LLIUREX 09/03/2016--------------------------------------------
     64
    4565        default :
    4666                //Page de gestion des sauvegardes déjà effectuées
  • pmb4.2/trunk/fuentes/pmb/catalog/expl/expl_create.inc.php

    r815 r818  
    77if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
    88
    9 
     9// -------------------------------------- LLIUREX 09/03/2016 ---------------------------------
     10function f_rellena_ceros($as_dato) {
     11        if(strlen($as_dato)>0 && strlen($as_dato)<9){
     12                for($i=strlen($as_dato); $i<9; $i++)
     13                        $as_dato="0".$as_dato;}
     14       
     15        return $as_dato;
     16}
     17// ------------------------------------ FIN LLIUREX 09/03/2016 -----------------------------
    1018// gestion des exemplaires
    1119
     
    1624$res = pmb_mysql_query($requete, $dbh);
    1725
    18 if((!pmb_mysql_result($res, 0, 0))||(($option_num_auto)&&($noex==''))) {
     26// ------------------------------------- LLIUREX 09/03/2016 ---------------------------------
     27$requete2 = "SELECT count(1) FROM exemplaires WHERE expl_cb='".f_rellena_ceros($noex)."' ";
     28$res2 = pmb_mysql_query($requete2, $dbh);
     29// ------------------------------------- FIN LLIUREX 09/03/2016 ---------------------------
     30
     31// ------------------------------------- LLIUREX 09/03/2016 --------------------------------
     32// añadida condicion de sustitución de blancos por ceros
     33// && !mysql_result($res2, 0, 0)
     34
     35
     36if(((!pmb_mysql_result($res, 0, 0)) && !pmb_mysql_result($res2,0,0))||(($option_num_auto)&&($noex=='')&& !pmb_mysql_result($res2,0,0))) {
     37// ------------------------------------- FIN LLIUREX 09/03/2016 -------------------------------
    1938        $notice = new mono_display($id, 1, './catalog.php?categ=modif&id=!!id!!', FALSE);
    2039        print pmb_bidi("<div class='row'><b>".$notice->header."</b><br />");
     
    2443        // On ne vérifie que si l'utlisateur peut créer sur au moins une localisation :
    2544        if (!$pmb_droits_explr_localises||$explr_visible_mod) {
    26                 $nex = new exemplaire($noex, 0, $id);
     45// ------------------------------------ LLIUREX 09/03/2016 -------------------------------------
     46//f_rellena_ceros()     
     47
     48                $nex = new exemplaire(f_rellena_ceros($noex), 0, $id);
     49// ------------------------------------- FIN LLIUREX 09/03/2016 ---------------------------
     50               
    2751                print "<div class='row'>";
    2852                $expl_form = $nex->expl_form('./catalog.php?categ=expl_update&sub=create', "./catalog.php?categ=isbd&id=$id");
  • pmb4.2/trunk/fuentes/pmb/catalog/notices/search/authors/expl.inc.php

    r815 r818  
    2727$code = '';
    2828$rqt_bulletin = 0;
     29// ----------------------------------- LLIUREX 09/03/2016 -----------------------------
     30function f_rellena_ceros($as_dato) {
     31        if(strlen($as_dato)>0 && strlen($as_dato)<9){
     32                for($i=strlen($as_dato); $i<9; $i++)
     33                        $as_dato="0".$as_dato;}
     34       
     35        return $as_dato;
     36}
     37// ----------------------------------- FIN LLIUREX 09/03/2016 --------------------------
     38
    2939
    3040if(isEAN($ex_query)) {
     
    165175                $requete.= $limit_page;
    166176                $myQuery = pmb_mysql_query($requete, $dbh);
    167                 if(pmb_mysql_num_rows($myQuery)==0) {
    168                         // rien trouvé en monographie
    169                         $requete = "SELECT distinct notices.*, bulletin_id FROM notices ";
    170                         $requete.= $acces_j;
    171                         $requete.= "left join bulletins on bulletin_notice=notice_id left join exemplaires on (bulletin_id=expl_bulletin and expl_notice=0) ";
    172                         $requete.= "WHERE niveau_biblio='s' AND (exemplaires.expl_cb like '$code' OR bulletin_numero like '$code' OR bulletin_cb like '$code' OR notices.code like '$code')  $where_typedoc ";
     177
     178// ------------------------------- LLIUREX 09/03/2016 --------------------------------------
     179//rellena ceros
     180
     181                if(pmb_mysql_num_rows($myQuery)==0) {
     182                        // rien trouvé en monographie
     183                        $requete = "SELECT distinct notices.*, bulletin_id FROM notices ";
     184                        $requete.= $acces_j;
     185                        $requete.= "left join bulletins on bulletin_notice=notice_id left join exemplaires on (bulletin_id=expl_bulletin and expl_notice=0) ";
     186                        $requete.= "WHERE niveau_biblio='s' AND (exemplaires.expl_cb like '$code' OR bulletin_numero like '$code' OR bulletin_cb like '$code' OR notices.code like '".f_rellena_ceros($code)."')  $where_typedoc ";
     187// ----------------------------- FIN LLIUREX 09/03/2016 ------------------------------------                   
    173188                        $requete.= "GROUP BY bulletin_id ".$limit_page;
    174189                        $rqt_bulletin=1;
  • pmb4.2/trunk/fuentes/pmb/catalog/z3950/search.inc.php

    r815 r818  
    66
    77if (stristr($_SERVER['REQUEST_URI'], ".inc.php")) die("no access");
     8
     9//-------------------------------------- LLIUREX 09/03/2016 ------------------------------
     10// Chequeamos la tabla z_attr para ver si es correcta
     11// Si no lo es, la inyectamos nueva. Esto soluciona el problema de z3950.
     12check_z_attr_table();
     13//-------------------------------------- FIN LLIUREX 09/03/2016--------------------------
    814
    915print "<h1>$msg[z3950_recherche]</h1>";
  • pmb4.2/trunk/fuentes/pmb/catalog/z3950/z3950_func.inc.php

    r815 r818  
    158158        return $retour;
    159159        }
     160// -----------------------------LLIUREX 09/03/2016 --------------------------------------------
     161// Chequeamos la tabla z_attr para ver si es correcta
     162// Si no lo es, la inyectamos nueva. Esto soluciona el problema de z3950.
     163
     164function check_z_attr_table() {
     165        global $dbh;
     166        $requete="SELECT * FROM z_attr WHERE attr_bib_id=1 AND attr_libelle LIKE 'sujet' AND attr_attr=21";
     167        $resultat=pmb_mysql_query($requete, $dbh);
     168        if (pmb_mysql_num_rows($resultat)!=1) {
     169                require("./includes/db_param.inc.php");
     170                $nom_fich="./lliurex/z_attr.sql";
     171                $comando= "cat ". $nom_fich ." | mysql -u ". USER_NAME ." --password=". USER_PASS ." ". DATA_BASE;
     172                system($comando, $salida);
     173        }
     174}
     175
     176// ------------------------- FIN LLIUREX 09/03/2016 -----------------------------------------
Note: See TracChangeset for help on using the changeset viewer.