Ignore:
Timestamp:
Feb 21, 2018, 1:52:18 PM (19 months ago)
Author:
jrpelegrina
Message:

WIP in migration 1

File:
1 edited

Legend:

Unmodified
Added
Removed
  • pmb5.0/trunk/fuentes/pmb/admin/import/iimport_expl.php

    r6883 r6888  
    121121                $book_lender_name = $msg[561];
    122122        }
     123
     124//------------------------------------- LLIUREX 22/02/2018--------------------------------------
     125} else if ($sub == "import_reb"){
     126        echo window_title($msg["import_reb"].$msg[1003].$msg[1001]);
     127// ------------------------------------- FIN LLIUREX 22/02/2018 ------------   
    123128} else {
    124129        echo window_title($msg[500].$msg[1003].$msg[1001]);
     
    131136                        $book_statut_id = "";
    132137                        print $tpl_beforeupload_expl ;
     138
     139// ------------------------------ LLIUREX 22/02/2018--------------------------------------
     140        } else if ($sub == "import_reb") {
     141                   print $tpl_beforeupload_reb ;
     142// ----------------------------FIN LLIUREX 22/02/2018----------------------------------         
    133143                } else {
    134144                        // import de notice
     
    183193                                print "<SCRIPT>setTimeout(\"document.afterupload.submit()\",2000);</SCRIPT>";
    184194                        }
     195// -------------------------------- LLIUREX 22/02/2018--------------------------------------
     196         } else if ($sub == "import_reb") {
     197
     198                // import de rebeca
     199                   if ($to_file=="") {
     200                           printf ($msg[503],$from_file); /* wrong permissions to copy the file %s ... Contact your admin... */
     201                           break;
     202                        }
     203
     204                        //if (strrpos(strtolower($from_file), ".reb") == false) {
     205                        //      printf ($msg['import_reb_fail_reb'],$from_file); /* wrong rebeca file %s ... Contact your admin... */
     206                    //          break;
     207                        //}
     208
     209                   if (!move_uploaded_file($tmp_file,$to_file)) {
     210                           printf ($msg[504],$from_file); /* Fail to copy %s, Contact your admin... */
     211                        } else {
     212                                printf ($msg[505],$from_file); /* File transfered, Loading is about to go on */
     213                                print "<form class='form-$current_module' NAME=\"afterupload\" METHOD=\"post\" ACTION=\"iimport_expl.php\">";
     214                                print "<INPUT NAME=\"categ\" TYPE=\"hidden\" value=\"import\">";
     215                                print "<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\">";
     216                                print "<INPUT NAME=\"action\" TYPE=\"hidden\" value=\"preload\">";
     217                                print "<input type=\"hidden\" name=\"file_submit\" value=\"$to_file\">";
     218                                print "</FORM>";
     219                                print "<SCRIPT>setTimeout(\"document.afterupload.submit()\",2000);</SCRIPT>";
     220                        }
     221// ------------------------------ FIN LLIUREX 22/02/2018------------------------------------
     222
    185223                } else {
    186224                        // import de notice
     
    219257                        if ($file_submit=="") {
    220258                                /* l'utilisateur n'est pas passé par le téléchargement du fichier */
    221                                 $filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     259                               
     260// ---------------------------------- LLIUREX 22/02/2018--------------------------------------
     261// Cambiando la ruta de lectura del fichero a leer
     262// Previamente se ha modificado folow_import.php para esc
     263                                #$filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     264                                $filename = $base_path."/temp/".$nom_fichier_transfert_ftp;
     265
     266// --------------------------------- FIN LLIUREX 22/02/2018------------------------------------
     267
    222268                                $from_file = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic";
    223269                        } else {
     
    422468            print $formulaire;
    423469            print $script;
     470
     471// ----------------------------------- LLIUREX 22/02/2018--------------------------------------
     472                } else if ($sub == "import_reb") {
     473
     474                // import de notice
     475                /* Does the file exist ? */
     476                if ($file_submit=="") $filename = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic"; else $filename=$file_submit;
     477
     478                if ($noticenumber=="") $noticenumber=0;
     479       
     480                if (!file_exists($filename)) {
     481                        printf ($msg[506],$filename); /* The file %s doesn't exist... */
     482                        return;
     483                        }
     484       
     485                if (filesize($filename)==0) {
     486                        printf ($msg[507],$filename); /* The file % is empty, it's going to be deleted */
     487                        unlink ($filename);
     488                        return;
     489                        }
     490       
     491                $handle = fopen ($filename, "rb");
     492                if (!$handle) {
     493                        printf ($msg[508],$filename); /* Unable to open the file %s ... */
     494                        return;
     495                        }
     496               
     497                exec("yaz-marcdump -o marc -s ".$base_path."/temp/rebdump ".$filename." >/dev/null", $output, $return_var);
     498                if ($return_var) {
     499                        printf ($msg['import_reb_fail_dump'],$filename); /* dump failed */
     500                        unlink ($filename);
     501                        return;
     502                        }
     503               
     504                $formulaire="<form class='form-$current_module' name=\"load\" method=\"post\" action=\"iimport_expl.php\">";
     505                $formulaire.="<INPUT NAME=\"categ\" TYPE=\"hidden\" value=\"import\">";
     506                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\">";
     507                $formulaire.="<INPUT NAME=\"action\" TYPE=\"hidden\" value=\"load\">";
     508                $formulaire.="<input type=\"hidden\" name=\"filename\" value=\"$filename\">";
     509                $formulaire.="</form>";
     510                printf ($msg[509].$msg[512], $filename, $filename); /* File %s... . End of preload... */
     511                $script = "<script>setTimeout(\"document.load.submit()\",2000);</script>";
     512                   
     513                print $formulaire;
     514                print $script;
     515// ------------------------------FIN LLIUREX 22/02/2018 ---------------------------
     516
    424517                } else {
    425518                    // import de notice
    426519                    /* Does the file exist ? */
    427520                    if ($file_submit=="") {
    428                         $filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     521
     522// ---------------------------------- LLIUREX 22/02/2018--------------------------------------
     523// Cambiando la ruta de lectura del fichero a leer
     524// Previamente se ha modificado folow_import.php para escribir en esta nueva ruta       
     525//                      $filename = $base_path."/admin/import/".$nom_fichier_transfert_ftp;
     526                                $filename = $base_path."/temp/".$nom_fichier_transfert_ftp;
     527// ------------------------------- FIN LLIUREX 22/02/2018--------------------------------------
    429528                        $from_file = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic";
    430529                    } else {
     
    573672        break;
    574673    case 'load':
     674
     675// -----------------------------------LLIUREX 22/02/2018--------------------------------------
     676        if ($sub == "import_reb") {
     677                include("$class_path/audit.class.php");
     678                require ($base_path."/catalog/z3950/notice.inc.php");
     679                include("$include_path/templates/expl.tpl.php");
     680                include ("$class_path/z3950_notice.class.php");
     681                require_once($base_path."/catalog/z3950/func_other.inc.php");
     682
     683                $integration_OK=0;
     684                $integration_UP=0;
     685
     686
     687               
     688                $dirrec=scandir($base_path."/temp/");
     689                foreach($dirrec as $file) {
     690                        if ( (strpos($file, "rebdump")) !== false ) {
     691                                $fp = fopen ($base_path."/temp/".$file,"r");
     692                                $buffer="";
     693                                while (!feof($fp)) {
     694                                        $buffer.= fread($fp, 4096);
     695                                }
     696                                fclose($fp);
     697                                unlink($base_path."/temp/".$file);
     698
     699                                $notice = new z3950_notice ("usmarc", $buffer);
     700                                $res_integration = $notice->insert_in_database($show=false);
     701                                $new_notice=$res_integration[0];
     702                                $num_notice=$res_integration[1];
     703                                //if (($new_notice==0) && ($num_notice==0)) $integration_OK="ECHEC";
     704                                //if (($new_notice==0) && ($num_notice!=0)) $integration_OK="EXISTAIT";
     705                                if (($new_notice==1) && ($num_notice!=0)) $integration_OK++;
     706                                if (($new_notice==2) && ($num_notice!=0)) $integration_UP++;
     707                                //if (($new_notice==1) && ($num_notice==0)) $integration_OK="NEWRATEE";
     708
     709                        }
     710                }
     711                unlink($filename);
     712
     713                printf ($msg['import_reb_ok'], $integration_OK);
     714                printf ($msg['import_reb_up'], $integration_UP);
     715
     716                return;
     717        }
     718
     719// ----------------------------------FIN LLIUREX 22/02/2018 -------------------------------
     720
    575721                if (!$statutnot) $statutnot=1;
    576722                printf ($msg[509], $from_file);
     
    9781124                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_expl\" />";
    9791125                $form_text=file_get_contents("$include_path/messages/help/$lang/import_expl.txt");
    980         }else{
     1126        }
     1127
     1128// ---------------------------------- LLIUREX 22/02/2018--------------------------------------
     1129        else if ($sub == "import_reb") {
     1130                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import_reb\" />";
     1131                $form_text=file_get_contents("$include_path/messages/help/$lang/import_reb.txt") ;
     1132                }
     1133// --------------------------------- FIN LLIUREX 22/02/2018-------------------------------     
     1134
     1135        else{
    9811136                $formulaire.="<INPUT NAME=\"sub\" TYPE=\"hidden\" value=\"import\" />";
    9821137                $form_text=file_get_contents("$include_path/messages/help/$lang/import.txt");
     
    10491204                </select></br></br>";
    10501205       
     1206// ---------------------------- LLIUREX 22/02/2018 ---------------------------------           
     1207       /*       
    10511208        $formulaire.=$selecteur_fic;
    10521209        $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";
     
    10541211        $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();\" />";
    10551212        $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();\"/>";
     1213        */
     1214        if ($sub <> "import_reb") $formulaire.=$selecteur_fic;
     1215        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";
     1216                $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();\" />";
     1217        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();\"/>";
     1218
     1219// ----------------------------- FIN LLIUREX 22/02/2018----------------------
     1220
    10561221        $formulaire.="</form>\n";
    10571222       
Note: See TracChangeset for help on using the changeset viewer.