diff -Nuar pmb.orig/admin/convert/start_import.php pmb/admin/convert/start_import.php
--- pmb.orig/admin/convert/start_import.php 2010-05-20 16:03:57.000000000 +0200
+++ pmb/admin/convert/start_import.php 2010-05-20 16:04:52.000000000 +0200
@@ -159,23 +159,25 @@
//-------------------------------------> L L I U R E X <--------------------------------------
- //Cambiamos codificacion y modificamos el texto del campo unimarc (si fuese xml)
- $fi = fopen("$base_path/temp/".$file_in, "r+");
- while (!feof($fi)){ //metemos el fichero en una variable
- $linea.=fgets($fi);
- }
- $linea= str_replace("encoding=\"ISO-8859-1\"", "encoding=\"UTF-8\"", $linea);
- $fitemp = fopen("$base_path/temp/tempo", "w+");
- fwrite($fitemp, $linea);
- fclose($fitemp);
- $fitemp = fopen("$base_path/temp/tempo", "r");
- fclose($fi);
- unlink("$base_path/temp/".$file_in);
- $fi = fopen("$base_path/temp/".$file_in, "w");
- $bool=recode_file("iso-8859-1..utf-8", $fitemp, $fi);
- fclose($fitemp);
- fclose($fi);
- unlink("$base_path/temp/tempo");
+ //Cambiamos codificacion y modificamos el texto del campo unimarc (si fuese xml)
+ if ($input_type == "xml") {
+ $fi = fopen($base_path."/temp/".$file_in, "r+");
+ while (!feof($fi)){ //metemos el fichero en una variable
+ $linea.=fgets($fi);
+ }
+ $linea= str_replace("encoding=\"ISO-8859-1\"", "encoding=\"UTF-8\"", $linea);
+ $fitemp = fopen($base_path."/temp/tempo", "w+");
+ fwrite($fitemp, $linea);
+ fclose($fitemp);
+ $fitemp = fopen($base_path."/temp/tempo", "r");
+ fclose($fi);
+ unlink($base_path."/temp/".$file_in);
+ $fi = fopen($base_path."/temp/".$file_in, "w");
+ $bool=recode_file("iso-8859-1..utf-8", $fitemp, $fi);
+ fclose($fitemp);
+ fclose($fi);
+ unlink($base_path."/temp/tempo");
+ }
//-------------------------------------> L L I U R E X <--------------------------------------
diff -Nuar pmb.orig/admin/import/iimport_expl.php pmb/admin/import/iimport_expl.php
--- pmb.orig/admin/import/iimport_expl.php 2010-05-20 16:03:57.000000000 +0200
+++ pmb/admin/import/iimport_expl.php 2010-05-20 16:04:52.000000000 +0200
@@ -75,21 +75,29 @@
}
} else {
$book_lender_name = $msg[561];
- }
- } else {
- echo window_title($msg[500].$msg[1003].$msg[1001]);
- }
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else if ($sub == "import_reb"){
+ echo window_title($msg["import_reb"].$msg[1003].$msg[1001]);
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else {
+ echo window_title($msg[500].$msg[1003].$msg[1001]);
+ }
switch ($action) {
case 'beforeupload':
if ($sub == "import_expl") {
$book_lender_id = "";
$book_statut_id = "";
- print $tpl_beforeupload_expl ;
- } else {
- // import de notice
- print $tpl_beforeupload_notices ;
- }
+ print $tpl_beforeupload_expl ;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else if ($sub == "import_reb") {
+ print $tpl_beforeupload_reb ;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else {
+ // import de notice
+ print $tpl_beforeupload_notices ;
+ }
break;
case 'afterupload':
if (!$statutnot) $statutnot = 1 ;
@@ -135,34 +143,61 @@
print "";
print "";
- }
- } else {
- // import de notice
- if ($userfile_name=="") {
- printf ($msg[503],$userfile_name); /* wrong permissions to copy the file %s ... Contact your admin... */
- break;
- }
- //if (!is_writeable($userfile)) {
- // printf ($msg[503],$userfile_name); /* wrong permissions to copy the file %s ... Contact your admin... */
- // break;
- // }
- if (!move_uploaded_file($userfile,$userfile_name)) {
- printf ($msg[504],$userfile_name); /* Fail to copy %s, Contact your admin... */
- } else {
- printf ($msg[505],$userfile_name); /* File transfered, Loading is about to go on */
- print "
";
- print "";
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else if ($sub == "import_reb") {
+
+ // import de rebeca
+ if ($userfile_name=="") {
+ printf ($msg[503],$userfile_name); /* wrong permissions to copy the file %s ... Contact your admin... */
+ break;
+ }
+
+ if (strrpos(strtolower($userfile_name), ".reb") === false) {
+ printf ($msg['import_reb_fail_reb'],$userfile_name); /* wrong rebeca file %s ... Contact your admin... */
+ break;
}
- }
+
+ if (!move_uploaded_file($userfile,$userfile_name)) {
+ printf ($msg[504],$userfile_name); /* Fail to copy %s, Contact your admin... */
+ } else {
+ printf ($msg[505],$userfile_name); /* File transfered, Loading is about to go on */
+ print "";
+ print "";
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else {
+ // import de notice
+ if ($userfile_name=="") {
+ printf ($msg[503],$userfile_name); /* wrong permissions to copy the file %s ... Contact your admin... */
+ break;
+ }
+ //if (!is_writeable($userfile)) {
+ // printf ($msg[503],$userfile_name); /* wrong permissions to copy the file %s ... Contact your admin... */
+ // break;
+ // }
+ if (!move_uploaded_file($userfile,$userfile_name)) {
+ printf ($msg[504],$userfile_name); /* Fail to copy %s, Contact your admin... */
+ } else {
+ printf ($msg[505],$userfile_name); /* File transfered, Loading is about to go on */
+ print "";
+ print "";
+ }
+ }
break;
case 'preload':
if ($sub == "import_expl") {
@@ -306,8 +341,54 @@
$script = "";
}
print $formulaire;
- print $script;
- } else {
+ print $script;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ } else if ($sub == "import_reb") {
+
+ // import de notice
+ /* Does the file exist ? */
+ if ($file_submit=="") $filename = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic"; else $filename=$file_submit;
+
+ if ($noticenumber=="") $noticenumber=0;
+
+ if (!file_exists($filename)) {
+ printf ($msg[506],$filename); /* The file %s doesn't exist... */
+ return;
+ }
+
+ if (filesize($filename)==0) {
+ printf ($msg[507],$filename); /* The file % is empty, it's going to be deleted */
+ unlink ($filename);
+ return;
+ }
+
+ $handle = fopen ($filename, "rb");
+ if (!$handle) {
+ printf ($msg[508],$filename); /* Unable to open the file %s ... */
+ return;
+ }
+
+ exec("yaz-marcdump -o marc -s ".$base_path."/temp/rebdump ".$filename." >/dev/null", $output, $return_var);
+ if ($return_var) {
+ printf ($msg['import_reb_fail_dump'],$filename); /* dump failed */
+ unlink ($filename);
+ return;
+ }
+
+ $formulaire="";
+ printf ($msg[509].$msg[512], $filename, $filename); /* File %s... . End of preload... */
+ $script = "";
+
+ print $formulaire;
+ print $script;
+//-------------------------------------> L L I U R E X <--------------------------------------
+
+ } else {
// import de notice
/* Does the file exist ? */
if ($file_submit=="") $filename = "unimarc".(defined("LOCATION")?"_".constant("LOCATION"):"").".fic"; else $filename=$file_submit;
@@ -380,7 +461,52 @@
print $script;
}
break;
- case 'load':
+ case 'load':
+//-------------------------------------> L L I U R E X <--------------------------------------
+ if ($sub == "import_reb") {
+ include("$class_path/audit.class.php");
+ require ($base_path."/catalog/z3950/notice.inc.php");
+ include("$include_path/templates/expl.tpl.php");
+ include ("$class_path/z3950_notice.class.php");
+ require_once($base_path."/catalog/z3950/func_other.inc.php");
+
+ $integration_OK=0;
+ $integration_UP=0;
+
+
+
+ $dirrec=scandir($base_path."/temp/");
+ foreach($dirrec as $file) {
+ if ( (strpos($file, "rebdump")) !== false ) {
+ $fp = fopen ($base_path."/temp/".$file,"r");
+ $buffer="";
+ while (!feof($fp)) {
+ $buffer.= fread($fp, 4096);
+ }
+ fclose($fp);
+ unlink($base_path."/temp/".$file);
+
+ $notice = new z3950_notice ("usmarc", $buffer);
+ $res_integration = $notice->insert_in_database($show=false);
+ $new_notice=$res_integration[0];
+ $num_notice=$res_integration[1];
+ //if (($new_notice==0) && ($num_notice==0)) $integration_OK="ECHEC";
+ //if (($new_notice==0) && ($num_notice!=0)) $integration_OK="EXISTAIT";
+ if (($new_notice==1) && ($num_notice!=0)) $integration_OK++;
+ if (($new_notice==2) && ($num_notice!=0)) $integration_UP++;
+ //if (($new_notice==1) && ($num_notice==0)) $integration_OK="NEWRATEE";
+
+ }
+ }
+ unlink($filename);
+
+ printf ($msg['import_reb_ok'], $integration_OK);
+ printf ($msg['import_reb_up'], $integration_UP);
+
+ return;
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+
if (!$statutnot) $statutnot=1;
printf ($msg[509], $filename) ;
if ($nbtot_notice=="") {
@@ -626,7 +752,10 @@
}
break;
default:
- if ($sub == "import_expl") include("$include_path/messages/help/$lang/import_expl.txt") ;
+ if ($sub == "import_expl") include("$include_path/messages/help/$lang/import_expl.txt") ;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ else if ($sub == "import_reb") include("$include_path/messages/help/$lang/import_reb.txt") ;
+//-------------------------------------> L L I U R E X <--------------------------------------
else include("$include_path/messages/help/$lang/import.txt") ;
break;
}
diff -Nuar pmb.orig/admin/import/import_func.inc.php pmb/admin/import/import_func.inc.php
--- pmb.orig/admin/import/import_func.inc.php 2010-05-20 16:03:57.000000000 +0200
+++ pmb/admin/import/import_func.inc.php 2010-05-20 16:04:52.000000000 +0200
@@ -129,7 +129,25 @@
- ";
+ ";
+//-------------------------------------> L L I U R E X <--------------------------------------
+$tpl_beforeupload_reb = "
+
+
".$msg['import_reb_form_titre']."
+
+
+
+
+
+
+
+
+
+
+
+
+ ";
+//-------------------------------------> L L I U R E X <--------------------------------------
// PRELOAD
function loadfile_in_table () {
diff -Nuar pmb.orig/admin/import/main.inc.php pmb/admin/import/main.inc.php
--- pmb.orig/admin/import/main.inc.php 2007-03-10 09:32:22.000000000 +0100
+++ pmb/admin/import/main.inc.php 2010-05-20 16:04:52.000000000 +0200
@@ -21,7 +21,14 @@
$admin_layout = str_replace('!!menu_sous_rub!!', $msg[569], $admin_layout);
print $admin_layout;
include("./admin/import/pointage_expl.inc.php");
- break;
+ break;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ case 'import_reb':
+ $admin_layout = str_replace('!!menu_sous_rub!!', $msg["import_reb"], $admin_layout);
+ print $admin_layout;
+ include("./admin/import/import_expl.inc.php");
+ break;
+//-------------------------------------> L L I U R E X <--------------------------------------
default:
$admin_layout = str_replace('!!menu_sous_rub!!', "", $admin_layout);
print $admin_layout;
diff -Nuar pmb.orig/catalog/z3950/func_other.inc.php pmb/catalog/z3950/func_other.inc.php
--- pmb.orig/catalog/z3950/func_other.inc.php 2007-11-14 09:28:40.000000000 +0100
+++ pmb/catalog/z3950/func_other.inc.php 2010-05-20 16:04:52.000000000 +0200
@@ -58,7 +58,7 @@
if ($champ_rameau) $champ_rameau.=" @@@ ";
$champ_rameau.=$libelle_final;
}
- echo "Rameau sera ignoré : ".htmlentities($champ_rameau,ENT_QUOTES,$charset);
+ echo htmlentities($champ_rameau,ENT_QUOTES,$charset);
return "";
}
diff -Nuar pmb.orig/catalog/z3950/z_progression_visible2.php pmb/catalog/z3950/z_progression_visible2.php
--- pmb.orig/catalog/z3950/z_progression_visible2.php 2006-09-04 18:07:28.000000000 +0200
+++ pmb/catalog/z3950/z_progression_visible2.php 2010-05-20 16:04:52.000000000 +0200
@@ -17,10 +17,10 @@
// avec Mozilla/Firefox il devient visible à la fin de yaz_wait()
// avec autres browser je ne sais pas ;-)
-$visi='hidden';
-if (preg_match('/\bMSIE\b/i',$_SERVER[HTTP_USER_AGENT])){
- $visi='"visible"';
-}
+$visi='visible';
+#if (preg_match('/\bMSIE\b/i',$_SERVER[HTTP_USER_AGENT])){
+# $visi='"visible"';
+#}
print "
L L I U R E X <--------------------------------------
$ISO5426=array(
- chr(0xa0)=>chr(0xa0),chr(0xa1)=>chr(0xa1),chr(0xa2)=>chr(0x22),chr(0xa3)=>chr(0xa3),
- chr(0xa4)=>chr(0xa4),chr(0xa5)=>chr(0xa5),chr(0xa6)=>chr(0x3f),chr(0xa7)=>chr(0xa7),
- chr(0xa8)=>chr(0x27),chr(0xa9)=>chr(0x60),chr(0xaa)=>chr(0x22),chr(0xab)=>chr(0xab),
- chr(0xac)=>chr(0x62),chr(0xad)=>chr(0xa9),chr(0xae)=>chr(0x28).chr(0x50).chr(0x29) ,
- chr(0xaf)=>chr(0xae),chr(0xb0)=>chr(0x3f),chr(0xb1)=>chr(0x3f),chr(0xb2)=>chr(0x2c),
- chr(0xb3)=>chr(0x3f),chr(0xb4)=>chr(0x3f),chr(0xb5)=>chr(0x3f),chr(0xb6)=>chr(0x3f),
- chr(0xb7)=>chr(0xb7),chr(0xb8)=>chr(0x27).chr(0x27),chr(0xb9)=>chr(0x27),chr(0xba)=>chr(0x22),
- chr(0xbb)=>chr(0xbb),chr(0xbc)=>chr(0x23),chr(0xbd)=>chr(0x27),chr(0xbe)=>chr(0x22),
- chr(0xbf)=>chr(0xbf),chr(0xe0)=>chr(0x3f),chr(0xe1)=>chr(0xc6),chr(0xe2)=>chr(0xd0),
- chr(0xe3)=>chr(0x3f),chr(0xe4)=>chr(0x3f),chr(0xe5)=>chr(0x3f),chr(0xe6)=>chr(0x49).chr(0x4a),
- chr(0xe7)=>chr(0x3f),chr(0xe8)=>chr(0x4c),chr(0xe9)=>chr(0xd8),chr(0xea)=>chr(0xbc),
- chr(0xeb)=>chr(0x3f),chr(0xec)=>chr(0xde),chr(0xed)=>chr(0x3f),chr(0xee)=>chr(0x3f),
- chr(0xef)=>chr(0x3f),chr(0xf0)=>chr(0x3f),chr(0xf1)=>chr(0xe6),chr(0xf2)=>chr(0x64),
- chr(0xf3)=>chr(0xf0),chr(0xf4)=>chr(0x3f),chr(0xf5)=>chr(0x69),chr(0xf6)=>chr(0x69).chr(0x6a),
- chr(0xf7)=>chr(0x3f),chr(0xf8)=>chr(0x6c),chr(0xf9)=>chr(0xf8),chr(0xfa)=>chr(0xbd),
- chr(0xfb)=>chr(0xdf),chr(0xfc)=>chr(0xfe),chr(0xfd)=>chr(0x3f),chr(0xfe)=>chr(0x3f),
- chr(0xff)=>chr(0x3f)
+ chr(0xa0)=>chr(0xa0),
+ chr(0xa1)=>chr(0xc5).chr(0x81),
+ chr(0xa2)=>chr(0xc3).chr(0x98),
+ chr(0xa3)=>chr(0xc4).chr(0x90),
+ chr(0xa4)=>chr(0xc3).chr(0x9e),
+ chr(0xa5)=>chr(0xc3).chr(0x86),
+ chr(0xa6)=>chr(0xc5).chr(0x92),
+ chr(0xa7)=>chr(0xca).chr(0xb9),
+ chr(0xa8)=>chr(0xc2).chr(0xb7),
+ chr(0xa9)=>chr(0xe2).chr(0x99).chr(0xad),
+ chr(0xaa)=>chr(0xc2).chr(0xae),
+ chr(0xab)=>chr(0xc2).chr(0xb1),
+ chr(0xac)=>chr(0xc6).chr(0xa0),
+ chr(0xad)=>chr(0xc6).chr(0xaf),
+ chr(0xae)=>chr(0xca).chr(0xbc),
+ chr(0xaf)=>chr(0xae),
+ chr(0xb0)=>chr(0xca).chr(0xbb),
+ chr(0xb1)=>chr(0xc5).chr(0x82),
+ chr(0xb2)=>chr(0xc3).chr(0xb8),
+ chr(0xb3)=>chr(0xc4).chr(0x91),
+ chr(0xb4)=>chr(0xc3).chr(0xbe),
+ chr(0xb5)=>chr(0xc3).chr(0xa6),
+ chr(0xb6)=>chr(0xc5).chr(0x93),
+ chr(0xb7)=>chr(0xca).chr(0xba),
+ chr(0xb8)=>chr(0xc4).chr(0xb1),
+ chr(0xb9)=>chr(0xc2).chr(0xa3),
+ chr(0xba)=>chr(0xc3).chr(0xb0),
+ chr(0xbb)=>chr(0xbb),
+ chr(0xbc)=>chr(0xc6).chr(0xa1),
+ chr(0xbd)=>chr(0xc6).chr(0xb0),
+ chr(0xbe)=>chr(0x22),
+ chr(0xbf)=>chr(0xbf),
+ chr(0xc0)=>chr(0xc2).chr(0xb0),
+ chr(0xc1)=>chr(0xe2).chr(0x84).chr(0x93),
+ chr(0xc2)=>chr(0xe2).chr(0x84).chr(0x97),
+ chr(0xc3)=>chr(0xc2).chr(0xa9),
+ chr(0xc4)=>chr(0xe2).chr(0x99).chr(0xaf),
+ chr(0xc5)=>chr(0xc2).chr(0xbf),
+ chr(0xc6)=>chr(0xc2).chr(0xa1),
+ chr(0xc7)=>chr(0xc3).chr(0x9f),
+ chr(0xc8)=>chr(0xe2).chr(0x82).chr(0xac),
+ chr(0xe0)=>chr(0xcc).chr(0x89),
+ chr(0xe1)=>chr(0xcc).chr(0x80),
+ chr(0xe1).chr(0x61)=>chr(0xe0),
+ chr(0xe1).chr(0x65)=>chr(0xe8),
+ chr(0xe1).chr(0x69)=>chr(0xec),
+ chr(0xe1).chr(0x6f)=>chr(0xf2),
+ chr(0xe1).chr(0x75)=>chr(0xf9),
+ chr(0xe1).chr(0x41)=>chr(0xc0),
+ chr(0xe1).chr(0x45)=>chr(0xc8),
+ chr(0xe1).chr(0x49)=>chr(0xcc),
+ chr(0xe1).chr(0x4f)=>chr(0xd2),
+ chr(0xe1).chr(0x55)=>chr(0xd9),
+ chr(0xe2)=>chr(0xcc).chr(0x81),
+ chr(0xe2).chr(0x61)=>chr(0xe1),
+ chr(0xe2).chr(0x65)=>chr(0xe9),
+ chr(0xe2).chr(0x69)=>chr(0xed),
+ chr(0xe2).chr(0x6f)=>chr(0xf3),
+ chr(0xe2).chr(0x75)=>chr(0xfa),
+ chr(0xe2).chr(0x41)=>chr(0xc1),
+ chr(0xe2).chr(0x45)=>chr(0xc9),
+ chr(0xe2).chr(0x49)=>chr(0xcd),
+ chr(0xe2).chr(0x4f)=>chr(0xd3),
+ chr(0xe2).chr(0x55)=>chr(0xda),
+ chr(0xe2).chr(0x79)=>chr(0xfd),
+ chr(0xe2).chr(0x59)=>chr(0xdd),
+ chr(0xe3)=>chr(0xcc).chr(0x82),
+ chr(0xe3).chr(0x61)=>chr(0xe2),
+ chr(0xe3).chr(0x65)=>chr(0xea),
+ chr(0xe3).chr(0x69)=>chr(0xee),
+ chr(0xe3).chr(0x6f)=>chr(0xf4),
+ chr(0xe3).chr(0x75)=>chr(0xfb),
+ chr(0xe3).chr(0x41)=>chr(0xc2),
+ chr(0xe3).chr(0x45)=>chr(0xca),
+ chr(0xe3).chr(0x49)=>chr(0xce),
+ chr(0xe3).chr(0x4f)=>chr(0xd4),
+ chr(0xe3).chr(0x55)=>chr(0xdb),
+ chr(0xe4)=>chr(0xcc).chr(0x83),
+ chr(0xe4).chr(0x61)=>chr(0xe3),
+ chr(0xe4).chr(0x41)=>chr(0xc3),
+ chr(0xe4).chr(0x6f)=>chr(0xf5),
+ chr(0xe4).chr(0x4f)=>chr(0xd5),
+ chr(0xe4).chr(0x6e)=>chr(0xf1),
+ chr(0xe4).chr(0x4e)=>chr(0xd1),
+ chr(0xe5)=>chr(0xcc).chr(0x84),
+ chr(0xe6)=>chr(0xcc).chr(0x86),
+ chr(0xe7)=>chr(0xcc).chr(0x87),
+ chr(0xe8)=>chr(0xcc).chr(0x88),
+ chr(0xe8).chr(0x61)=>chr(0xe4),
+ chr(0xe8).chr(0x65)=>chr(0xeb),
+ chr(0xe8).chr(0x69)=>chr(0xef),
+ chr(0xe8).chr(0x6f)=>chr(0xf6),
+ chr(0xe8).chr(0x75)=>chr(0xfc),
+ chr(0xe8).chr(0x41)=>chr(0xc4),
+ chr(0xe8).chr(0x45)=>chr(0xcb),
+ chr(0xe8).chr(0x49)=>chr(0xcf),
+ chr(0xe8).chr(0x4f)=>chr(0xd6),
+ chr(0xe8).chr(0x55)=>chr(0xdc),
+ chr(0xe8).chr(0x79)=>chr(0xff),
+ chr(0xe9)=>chr(0xcc).chr(0x8c),
+ chr(0xea)=>chr(0xcc).chr(0x8a),
+ chr(0xea).chr(0x61)=>chr(0xe5),
+ chr(0xea).chr(0x41)=>chr(0xc5),
+ chr(0xeb)=>chr(0xcd).chr(0xa1),
+ chr(0xec)=>chr(0xef).chr(0xb8).chr(0xa1),
+ chr(0xed)=>chr(0xcc).chr(0x95),
+ chr(0xee)=>chr(0xcc).chr(0x8b),
+ chr(0xef)=>chr(0xcc).chr(0x90),
+ chr(0xf0)=>chr(0xcc).chr(0xa7),
+ chr(0xf0).chr(0x63)=>chr(0xe7),
+ chr(0xf0).chr(0x43)=>chr(0xc7),
+ chr(0xf1)=>chr(0xcc).chr(0xa8),
+ chr(0xf2)=>chr(0xcc).chr(0xa3),
+ chr(0xf3)=>chr(0xcc).chr(0xa4),
+ chr(0xf4)=>chr(0xcc).chr(0xa5),
+ chr(0xf5)=>chr(0xcc).chr(0xb3),
+ chr(0xf6)=>chr(0xcc).chr(0xb2),
+ chr(0xf7)=>chr(0xcc).chr(0xa6),
+ chr(0xf8)=>chr(0xcc).chr(0x9c),
+ chr(0xf9)=>chr(0xcc).chr(0xae),
+ chr(0xfa)=>chr(0xcd).chr(0xa0),
+ chr(0xfb)=>chr(0xef).chr(0xb8).chr(0xa3),
+ chr(0xfc)=>chr(0xfe),
+ chr(0xfd)=>chr(0x3f),
+ chr(0xfe)=>chr(0xcc).chr(0x93),
+ chr(0xff)=>chr(0x3f)
);
-
+//-------------------------------------> L L I U R E X <--------------------------------------
+
//Tableaux de correspondance de ISO8859-15 vers ISO646/5426
//Pour les diacritiques, il y a correspondance biunivoque, on fait donc une inversion du tableau
$ISO8859_15_dia=array_flip($ISO5426_dia);
@@ -689,17 +799,33 @@
else if (($string[$i]>=chr(0xC0))&&($string[$i]<=chr(0xDF))) {
//Si c'est un diacritique on regarde le caractère suivant et on cherche dans la table de correspondance
$car=$string[$i].$string[$i+1];
- //Si le caractère est connu
+ //Si le caractère est connu
+//-------------------------------------> L L I U R E X <--------------------------------------
if ($ISO5426_dia[$car]) {
- $string_r.=$ISO5426_dia[$car];
+ $string_r.=$ISO5426_dia[$car];
+ $i++;
+ } else if ($ISO5426[$string[$i]]) {
+ $string_r.=$ISO5426[$string[$i]];
} else {
//Sinon on ne tient juste pas compte du diacritique
- $string_r.=$string[$i+1];
+ $string_r.=$string[$i+1];
+ $i++;
}
//On avance d'un caractère
- $i++;
- } else {
- //Sinon c'est un catactère spécial ou un symbole
+ }
+ else if ( (($string[$i]>=chr(0xE1))&&($string[$i]<=chr(0xE4))) || ($string[$i]==chr(0xE8)) || ($string[$i]==chr(0xEA)) || ($string[$i]==chr(0xF0)) ) {
+ $car=$string[$i].$string[$i+1];
+ if ($ISO5426[$car]) {
+ $string_r.=$ISO5426[$car];
+ $i++;
+ } else {
+ $car=$string[$i];
+ $string_r.=$ISO5426[$car];
+ }
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ else {
+ //Sinon c'est un catactère spécial ou un symbole
$car=$string[$i];
$string_r.=$ISO5426[$car];
}
@@ -730,4 +856,4 @@
} # fin déclaration
-?>
\ No hay ningún carácter de nueva lÃnea al final del fichero
+?>
diff -Nuar pmb.orig/classes/z3950_notice.class.php pmb/classes/z3950_notice.class.php
--- pmb.orig/classes/z3950_notice.class.php 2007-11-14 16:18:52.000000000 +0100
+++ pmb/classes/z3950_notice.class.php 2010-05-20 16:04:52.000000000 +0200
@@ -107,7 +107,7 @@
$string = str_replace ("!!$tag!!", htmlentities($value,ENT_QUOTES, $charset), $string);
}
- function insert_in_database () {
+ function insert_in_database ($show=true) {
global $dbh ;
$new_notice = 0;
$notice_retour = 0;
@@ -132,8 +132,9 @@
} else $new_notice = 1;
if ($new_notice == 0) {
- $retour = array ($new_notice, $notice_retour);
- return $retour;
+ $retour = array ($new_notice, $notice_retour);
+ return $this->update_in_database($notice_retour, $show);
+ //return $retour;
}
for ($i = 0; $i < 2; $i++) {
@@ -148,7 +149,8 @@
$serie_id = serie::import(stripslashes($this->serie));
/* traitement de Dewey */
- if ($this->internal_index=="!!indexint_id!!") $this->internal_index = indexint::import(clean_string($this->dewey[0]));
+ if ($this->internal_index=="!!indexint_id!!") $this->internal_index = indexint::import(clean_string($this->dewey[0]));
+ else if (!$show) $this->internal_index = indexint::import(clean_string(stripslashes($this->dewey[0])));
$title_indexes_wew = $this->serie." ".$this->nbr_in_serie ;
for ($i = 0; $i < 4; $i++) {
@@ -166,7 +168,8 @@
/* Origine de la notice */
$orinot_id = origine_notice::import($this->origine_notice);
if ($orinot_id==0) $orinot_id=1 ;
-
+ if (!$show) $this->statut="1";
+
$sql_ins = "insert into notices (
typdoc ,
code ,
@@ -280,21 +283,42 @@
}
// traitement des langues
- // langues
- global $max_lang, $max_langorg;
- $f_lang_form = array();
- $f_langorg_form = array() ;
- for ($i=0; $i< $max_lang ; $i++) {
- $var_langcode = "f_lang_code$i" ;
- global $$var_langcode ;
- if ($$var_langcode) $f_lang_form[] = array ('code' => $$var_langcode);
- }
- // langues originales
- for ($i=0; $i< $max_langorg ; $i++) {
- $var_langorgcode = "f_langorg_code$i" ;
- global $$var_langorgcode;
- if ($$var_langorgcode) $f_langorg_form[] = array ('code' => $$var_langorgcode);
- }
+ // langues
+//-------------------------------------> L L I U R E X <--------------------------------------
+ if (!$show) {
+ $f_lang_form = array();
+ $f_langorg_form = array() ;
+ if (sizeof($this->language_code)==0) $max_lang = 1 ;
+ else $max_lang = sizeof($this->language_code) ;
+ if (sizeof($this->original_language_code)==0) $max_langorg = 1 ;
+ else $max_langorg = sizeof($this->original_language_code) ;
+
+ for ($i=0; $i< $max_lang ; $i++) {
+ $f_lang_form[] = array ('code' => $this->language_code[$i]);
+ }
+
+ for ($i=0; $i< $max_langorg ; $i++) {
+ $f_langorg_form[] = array ('code' => $this->original_language_code[$i]);
+ }
+
+ }
+ else {
+ global $max_lang, $max_langorg;
+ $f_lang_form = array();
+ $f_langorg_form = array() ;
+ for ($i=0; $i< $max_lang ; $i++) {
+ $var_langcode = "f_lang_code$i" ;
+ global $$var_langcode ;
+ if ($$var_langcode) $f_lang_form[] = array ('code' => $$var_langcode);
+ }
+ // langues originales
+ for ($i=0; $i< $max_langorg ; $i++) {
+ $var_langorgcode = "f_langorg_code$i" ;
+ global $$var_langorgcode;
+ if ($$var_langorgcode) $f_langorg_form[] = array ('code' => $$var_langorgcode);
+ }
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
$rqt_del = "delete from notices_langues where num_notice='$notice_retour' ";
$res_del = mysql_query($rqt_del, $dbh);
@@ -326,14 +350,20 @@
$nberrors=$p_perso->check_submited_fields();
$p_perso->rec_fields_perso($notice_retour);
+ //Traitement import perso
+//-------------------------------------> L L I U R E X <--------------------------------------
+
//Traitement import perso
global $notice_id,$notice_org,$notice_type_org;
if (function_exists('recup_noticeunimarc_suite')) {
$notice_id=$notice_retour;
- z_recup_noticeunimarc_suite($notice_org);
- z_import_new_notice_suite();
+ if ($show) {
+ z_recup_noticeunimarc_suite($notice_org);
+ z_import_new_notice_suite();
+ }
}
-
+
+//-------------------------------------> L L I U R E X <--------------------------------------
// Mise à jour de la table notices_global_index
notice::majNoticesGlobalIndex($notice_retour);
// Mise à jour de la table notices_mots_global_index
@@ -343,7 +373,7 @@
return $retour;
}
- function update_in_database ($id_notice=0) {
+ function update_in_database ($id_notice=0, $show=true) {
global $dbh ;
$new_notice = 2;
$notice_retour = $id_notice;
@@ -365,24 +395,26 @@
$serie_id = serie::import(stripslashes($this->serie));
/* traitement de Dewey */
- if ($this->internal_index=="!!indexint_id!!") $this->internal_index = indexint::import(clean_string($this->dewey[0]));
+ if ($this->internal_index=="!!indexint_id!!") $this->internal_index = indexint::import(clean_string($this->dewey[0]));
+ else if (!$show) $this->internal_index = indexint::import(clean_string(stripslashes($this->dewey[0])));
- $title_indexes_wew = $this->serie ;
+ $title_indexes_wew = $this->serie." ".$this->nbr_in_serie ;
for ($i = 0; $i < 4; $i++) {
$title_indexes_wew .= " ".$this->titles[$i] ;
}
- $title_indexes_sew = strip_empty_words ($title_indexes_wew);
- $serie_index = strip_empty_words ($this->serie);
+ $title_indexes_sew = strip_empty_words ($title_indexes_wew);
+ $this->serie ? $serie_index = ' '.strip_empty_words ($this->serie).' ' : $serie_index='' ;
$this->free_index ? $this->matieres_index = ' '.strip_empty_words($this->free_index).' ' : $this->matieres_index = '';
- $this->general_note ? $index_n_gen = strip_empty_words($this->general_note) : $index_n_gen = '';
- $this->content_note ? $index_n_contenu = strip_empty_words($this->content_note) : $index_n_contenu = '';
- $this->abstract_note ? $index_n_resume = strip_empty_words($this->abstract_note) : $index_n_resume = '';
+ $this->general_note ? $index_n_gen = ' '.strip_empty_words($this->general_note).' ' : $index_n_gen = '';
+ $this->content_note ? $index_n_contenu = ' '.strip_empty_words($this->content_note).' ' : $index_n_contenu = '';
+ $this->abstract_note ? $index_n_resume = ' '.strip_empty_words($this->abstract_note).' ' : $index_n_resume = '';
/* Origine de la notice */
$orinot_id = origine_notice::import($this->origine_notice);
- if ($orinot_id==0) $orinot_id=1 ;
+ if ($orinot_id==0) $orinot_id=1 ;
+ if (!$show) $this->statut="1";
$sql_ins = "update notices set
typdoc ='".$this->document_type."',
@@ -460,20 +492,41 @@
// traitement des langues
// langues
- global $max_lang, $max_langorg;
- $f_lang_form = array();
- $f_langorg_form = array() ;
- for ($i=0; $i< $max_lang ; $i++) {
- $var_langcode = "f_lang_code$i" ;
- global $$var_langcode ;
- if ($$var_langcode) $f_lang_form[] = array ('code' => $$var_langcode);
- }
- // langues originales
- for ($i=0; $i< $max_langorg ; $i++) {
- $var_langorgcode = "f_langorg_code$i" ;
- global $$var_langorgcode;
- if ($$var_langorgcode) $f_langorg_form[] = array ('code' => $$var_langorgcode);
- }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ if (!$show) {
+ $f_lang_form = array();
+ $f_langorg_form = array() ;
+ if (sizeof($this->language_code)==0) $max_lang = 1 ;
+ else $max_lang = sizeof($this->language_code) ;
+ if (sizeof($this->original_language_code)==0) $max_langorg = 1 ;
+ else $max_langorg = sizeof($this->original_language_code) ;
+
+ for ($i=0; $i< $max_lang ; $i++) {
+ $f_lang_form[] = array ('code' => $this->language_code[$i]);
+ }
+
+ for ($i=0; $i< $max_langorg ; $i++) {
+ $f_langorg_form[] = array ('code' => $this->original_language_code[$i]);
+ }
+
+ }
+ else {
+ global $max_lang, $max_langorg;
+ $f_lang_form = array();
+ $f_langorg_form = array() ;
+ for ($i=0; $i< $max_lang ; $i++) {
+ $var_langcode = "f_lang_code$i" ;
+ global $$var_langcode ;
+ if ($$var_langcode) $f_lang_form[] = array ('code' => $$var_langcode);
+ }
+ // langues originales
+ for ($i=0; $i< $max_langorg ; $i++) {
+ $var_langorgcode = "f_langorg_code$i" ;
+ global $$var_langorgcode;
+ if ($$var_langorgcode) $f_langorg_form[] = array ('code' => $$var_langorgcode);
+ }
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
$rqt_del = "delete from notices_langues where num_notice='$notice_retour' ";
$res_del = mysql_query($rqt_del, $dbh);
@@ -502,13 +555,18 @@
//Suppression des champs persos
$requete="delete from notices_custom_values where notices_custom_origine=".$notice_retour;
@mysql_query($requete);
- $notice_id=$notice_retour;
- z_recup_noticeunimarc_suite($notice_org);
- z_import_new_notice_suite();
+ $notice_id=$notice_retour;
+//-------------------------------------> L L I U R E X <--------------------------------------
+ if ($show) {
+ z_recup_noticeunimarc_suite($notice_org);
+ z_import_new_notice_suite();
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
}
// Mise à jour de la table notices_global_index
- notice::majNoticesGlobalIndex($notice_retour);
+ notice::majNoticesGlobalIndex($notice_retour);
+
$retour = array ($new_notice, $notice_retour);
return $retour;
@@ -985,31 +1043,46 @@
function from_usmarc ($record) {
$this->document_type = $record->inner_guide[dt];
$this->bibliographic_level = $record->inner_guide[bl];
- $this->hierarchic_level = $record->inner_guide[hl];
+ $this->hierarchic_level = $record->inner_guide[hl];
+
+ if ($this->bibliographic_level=="a") $this->bibliographic_level="m";
if ($this->hierarchic_level=="") {
if ($this->bibliographic_level=="s") $this->hierarchic_level="1";
if ($this->bibliographic_level=="m") $this->hierarchic_level="0";
- }
+ }
+ $tit_for_2= array();
for ($i=0;$iinner_directory);$i++) {
$cle=$record->inner_directory[$i]['label'];
- switch($cle) {
+ switch($cle) {
+//-------------------------------------> L L I U R E X <--------------------------------------
+ case "008": /* language */
+ $subrecord = $record->get_subfield($cle);
+ $subrecord[0]=trim(ereg_replace( '\|', ' ', $subrecord[0]));
+ $subrecord_s = explode(" ", $subrecord[0]);
+ if (strlen($subrecord_s[count($subrecord_s)-1]) == 3) $this->language_code = array( 0 => $subrecord_s[count($subrecord_s)-1]);
+ else $this->language_code = array(0 => $subrecord_s[count($subrecord_s)-2]);
+ break;
case "020": /* isbn */
$isbn = $record->get_subfield($cle,'a');
break;
case "041": /* language */
- $this->language_code = $record->get_subfield_array($cle,"a");
+ $this->language_code = $record->get_subfield_array($cle,"a");
+ $this->original_language_code = $record->get_subfield_array($cle,"h");
break;
case "245": /* titles */
- $tit = $record->get_subfield($cle, "a", "b", "n", "p");
+ $tit = $record->get_subfield($cle, "a", "b", "c", "n", "p");
break;
case "246": /* titles */
$tit_sup=$record->get_subfield($cle, "a");
break;
case "247": /* former title */
$tit_for=$record->get_subfield($cle, "a");
- break;
+ break;
+ case "740": /* former title */
+ $tit_for_2=$record->get_subfield($cle, "a");
+ break;
case "250": /* mention_edition */
$subfield = $record->get_subfield($cle,"a");
$this->mention_edition = $subfield[0];
@@ -1029,6 +1102,9 @@
break;
case "022": /* collection */
$collection_022=$record->get_subfield($cle,"a");
+ break;
+ case "080": /* Dewey */
+ $this->dewey=$record->get_subfield($cle,"a");
break;
case "222": /* collection */
$collection_222=$record->get_subfield($cle,"a","v","x");
@@ -1041,9 +1117,27 @@
break;
case "502": /* abstract */
$content_note = $record->get_subfield($cle,"a");
+ break;
+ case "504": /* abstract */
+ $content_note_504 = $record->get_subfield($cle,"a");
+ break;
+ case "505": /* abstract */
+ $content_note_505 = $record->get_subfield($cle,"a");
+ break;
+ case "510": /* abstract */
+ $content_note_510 = $record->get_subfield($cle,"a");
+ break;
+ case "534": /* abstract */
+ $content_note_534 = $record->get_subfield($cle,"a");
+ break;
+ case "546": /* abstract */
+ $content_note_546 = $record->get_subfield($cle,"a");
break;
case "520": /* abstract */
$abstract_note = $record->get_subfield($cle,"a");
+ break;
+ case "530": /* abstract */
+ $content_note_530 = $record->get_subfield($cle,"a");
break;
case "082": /* Dewey */
$this->dewey=$record->get_subfield($cle,"a");
@@ -1056,6 +1150,21 @@
break;
case "111":
$aut_111=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "130":
+ $aut_130=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "600":
+ $info_600=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "610":
+ $info_610=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "611":
+ $info_611=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "630":
+ $info_630=$record->get_subfield($cle,"a","d","e","4");
break;
case "700":
$aut_700=$record->get_subfield($cle,"a","d","e","4");
@@ -1065,24 +1174,44 @@
break;
case "711":
$aut_711=$record->get_subfield($cle,"a","d","e","4");
+ break;
+ case "730":
+ $aut_730=$record->get_subfield($cle,"a","d","e","4");
break;
case "856":
$subfield = $record->get_subfield($cle,"u","q");
$this->ressource = $subfield[0];
break;
case "650":
- $this->info_606_a=$record->get_subfield_array_array($cle,"a");
- $this->info_606_j=$record->get_subfield_array_array($cle,"j");
- $this->info_606_x=$record->get_subfield_array_array($cle,"x");
- $this->info_606_y=$record->get_subfield_array_array($cle,"y");
- $this->info_606_z=$record->get_subfield_array_array($cle,"z");
+ $info_650_a=$record->get_subfield_array_array($cle,"a");
+ $info_650_j=$record->get_subfield_array_array($cle,"j");
+ $info_650_x=$record->get_subfield_array_array($cle,"x");
+ $info_650_y=$record->get_subfield_array_array($cle,"y");
+ $info_650_z=$record->get_subfield_array_array($cle,"z");
+ break;
+ case "651":
+ $info_651_a=$record->get_subfield_array_array($cle,"a");
+ $info_651_j=$record->get_subfield_array_array($cle,"j");
+ $info_651_x=$record->get_subfield_array_array($cle,"x");
+ $info_651_y=$record->get_subfield_array_array($cle,"y");
+ $info_651_z=$record->get_subfield_array_array($cle,"z");
break;
case "653":
$index_sujets=$record->get_subfield($cle,"a");
+ break;
+ case "490":
+ $info_490_a=$record->get_subfield_array_array($cle,"a");
+ $info_490_v=$record->get_subfield_array_array($cle,"v");
+ break;
+ case "773":
+ $info_773_t=$record->get_subfield_array_array($cle,"t");
+ $info_773_x=$record->get_subfield_array_array($cle,"x");
+ $info_773_d=$record->get_subfield_array_array($cle,"d");
+ $info_773_g=$record->get_subfield_array_array($cle,"g");
break;
default:
break;
-
+//-------------------------------------> L L I U R E X <--------------------------------------
} /* end of switch */
} /* end of for */
@@ -1101,7 +1230,8 @@
/* on compte tout de suite le nbre d'enreg dans les répétables */
$nb_repet_700=sizeof($aut_700);
$nb_repet_710=sizeof($aut_710);
- $nb_repet_711=sizeof($aut_711);
+ $nb_repet_711=sizeof($aut_711);
+ $nb_repet_730=sizeof($aut_730);
/* renseignement de aut0 */
if ($aut_100[0][a]!="") { /* auteur principal en 100 ? */
@@ -1133,6 +1263,15 @@
"fonction" => convert_usmarc_unimarc_functions($aut_111[0][4]),
"id" => 0,
"responsabilite" => 0 ) ;
+ } elseif ($aut_130[0]['a']!="") { /* auteur principal en 130 ? */
+ $author=$this->process_author($aut_130[0]['a'],$aut_130[0]['b'],'','');
+ $this->aut_array[] = array(
+ "entree" => $author['name'], //$aut_130[0]['a'],
+ "rejete" => $author['rejete'], //$aut_130[0]['b'],
+ "type_auteur" => "71",
+ "fonction" => convert_usmarc_unimarc_functions($aut_130[0][4]),
+ "id" => 0,
+ "responsabilite" => 0 ) ;
}
/* renseignement de aut1 */
@@ -1166,6 +1305,18 @@
"fonction" => convert_usmarc_unimarc_functions($aut_711[$i][4]),
"id" => 0,
"responsabilite" => 2 ) ;
+ }
+
+ /* renseignement de aut2 */
+ for ($i=0 ; $i < $nb_repet_730 ; $i++) {
+ $author=$this->process_author($aut_730[$i]['a'],$aut_730[$i]['b'],'','');
+ $this->aut_array[] = array(
+ "entree" => $author['name'], //$aut_730[$i]['a'],
+ "rejete" => $author['rejete'], //$aut_730[$i]['b'],
+ "type_auteur" => "71",
+ "fonction" => convert_usmarc_unimarc_functions($aut_730[$i][4]),
+ "id" => 0,
+ "responsabilite" => 2 ) ;
}
/* Editors */
@@ -1213,20 +1364,47 @@
$this->subcollection['name']=clean_string($subcoll_name);
$this->subcollection['issn']=clean_string($subcoll_issn);
-
- /* Series */
- $this->serie = clean_string ($tit[0][p]);
- $this->nbr_in_serie = clean_string ($tit[0][n]);
-
- /* traitement ressources */
- $this->link_url = $ressource[0]["u"];
- $this->link_format = $ressource[0]["2"];
+
+ global $pmb_keyword_sep ;
+ if (!$pmb_keyword_sep) $pmb_keyword_sep=" ";
+//-------------------------------------> L L I U R E X <--------------------------------------
+ /* Series */
+ if (strlen($info_490_a) > 0) {
+ for ($i = 0; $i < sizeof($info_490_a); $i++) {
+ if (is_array($info_490_a[$i])) $this->serie .= clean_string(implode ($pmb_keyword_sep,$info_490_a[$i])." ");
+ else $this->serie .= clean_string($info_490_a[$i]." ");
+ }
+
+ for ($i = 0; $i < sizeof($info_490_v); $i++) {
+ if (is_array($info_490_v[$i])) $this->nbr_in_serie .= clean_string(implode ($pmb_keyword_sep,$info_490_v[$i])." ");
+ else $this->nbr_in_serie .= clean_string($info_490_v[$i]." ");
+ }
+ } else {
+ $this->serie = clean_string ($tit[0][p]);
+ $this->nbr_in_serie = clean_string ($tit[0][n]);
+ }
- /* traitement des titres */
- $this->titles[0] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$|\\$|\.+$/', '', trim($tit[0][a]));
- $this->titles[1] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_sup[0][a]));
- $this->titles[2] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_for[0][a]));
- $this->titles[3] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit[0][b]));
+ /* traitement ressources */
+ $this->link_url = $this->ressource["u"];
+ if ($this->ressource["3"]) $this->link_format = $this->ressource["3"];
+ else $this->link_format = $this->ressource["2"];
+
+ /* traitement des titres */
+
+ $this->titles[0] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$|\\$|\.+$/', '', trim($tit[0][a]));
+ if (is_array($tit_sup[0][a])) $this->titles[1] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_sup[0][a]));
+ elseif (is_array($tit_sup)) $this->titles[1] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim(implode(", ", $tit_sup)));
+ else $this->titles[1] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_sup));
+
+ if (is_array($tit_for[0][a])) $this->titles[2] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_for[0][a]));
+ else $this->titles[2] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_for));
+
+
+ if (is_array($tit_for_2[0][a])) $this->titles[2] .= preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim(implode(", ",$tit_for_2[0][a])));
+ elseif (is_array($tit_for_2)) $this->titles[2] .= preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim(implode(", ",$tit_for_2)));
+ else $this->titles[2] .= preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit_for_2));
+ $this->titles[3] = preg_replace('/-$| $|\||\($|\)$|\[$|\]$|\:$|\;$|\/$\|\$|\.+$/', '', trim($tit[0][b])." ".trim($tit[0][c]));
+//-------------------------------------> L L I U R E X <--------------------------------------
$this->general_note = "";
$this->content_note = "";
@@ -1244,14 +1422,160 @@
}
if (trim ($this->abstract_note) == "")
$this->abstract_note = $this->general_note." ".$this->content_note;
+
+
+//-------------------------------------> L L I U R E X <--------------------------------------
+ for ($i = 0; $i < count ($content_note_504); $i++) {
+ if (strlen($this->general_note) > 0) $this->general_note .= ". ".$content_note_504[$i];
+ else $this->general_note .= $content_note_504[$i];
+ }
+
+ for ($i = 0; $i < count ($content_note_510); $i++) {
+ if (strlen($this->general_note) > 0) $this->general_note .= ". ".$content_note_510[$i];
+ else $this->general_note .= $content_note_510[$i];
+ }
+
+ for ($i = 0; $i < count ($content_note_530); $i++) {
+ if (strlen($this->general_note) > 0) $this->general_note .= ". ".$content_note_530[$i];
+ else $this->general_note .= $content_note_530[$i];
+ }
+
+ $this->matieres_index = strip_empty_words ($this->content_note." ".$this->general_note." ".$this->abstract_note);
+
+ for ($i = 0; $i < count ($content_note_505); $i++) {
+ if (strlen($this->content_note) > 0) $this->content_note .= ". ".$content_note_505[$i];
+ else $this->content_note .= $content_note_505[$i];
+ }
+
+ for ($i = 0; $i < count ($content_note_534); $i++) {
+ if (strlen($this->content_note) > 0) $this->content_note .= ". ".$content_note_534[$i];
+ else $this->content_note .= $content_note_534[$i];
+ }
+
+ for ($i = 0; $i < count ($content_note_546); $i++) {
+ if (strlen($this->content_note) > 0) $this->content_note .= ". ".$content_note_546[$i];
+ else $this->content_note .= $content_note_546[$i];
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
- $this->matieres_index = strip_empty_words ($this->content_note." ".$this->general_note." ".$this->abstract_note);
-
global $pmb_keyword_sep ;
if (!$pmb_keyword_sep) $pmb_keyword_sep=" ";
if (is_array($index_sujets)) $this->free_index = implode ($pmb_keyword_sep,$index_sujets);
- else $this->free_index = $index_sujets;
-
+ else $this->free_index = $index_sujets;
+
+
+//-------------------------------------> L L I U R E X <--------------------------------------
+ for ($i=0 ; $i < sizeof($info_600) ; $i++) {
+ $author=$this->process_author($aut_600[$i]['a'],$aut_600[$i]['b'],'','');
+ if ($author['rejete'])
+ $this->free_index .= $author = $author['rejete']." ".$author['name'].$pmb_keyword_sep;
+ else
+ $this->free_index .= $author['name'].$pmb_keyword_sep;
+ }
+
+ for ($i=0 ; $i < sizeof($info_610) ; $i++) {
+ $author=$this->process_author($aut_610[$i]['a'],$aut_610[$i]['b'],'','');
+ if ($author['rejete'])
+ $this->free_index .= $author = $author['rejete']." ".$author['name'].$pmb_keyword_sep;
+ else
+ $this->free_index .= $author['name'].$pmb_keyword_sep;
+ }
+
+ for ($i=0 ; $i < sizeof($info_611) ; $i++) {
+ $author=$this->process_author($aut_611[$i]['a'],$aut_611[$i]['b'],'','');
+ if ($author['rejete'])
+ $this->free_index .= $author = $author['rejete']." ".$author['name'].$pmb_keyword_sep;
+ else
+ $this->free_index .= $author['name'].$pmb_keyword_sep;
+ }
+
+ for ($i=0 ; $i < sizeof($info_630) ; $i++) {
+ $author=$this->process_author($aut_630[$i]['a'],$aut_630[$i]['b'],'','');
+ if ($author['rejete'])
+ $this->free_index .= $author = $author['rejete']." ".$author['name'].$pmb_keyword_sep;
+ else
+ $this->free_index .= $author['name'].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_650_a); $i++) {
+ if (is_array($info_650_a[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_650_a[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_650_a[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_650_j); $i++) {
+ if (is_array($info_650_j[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_650_j[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_650_j[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_650_x); $i++) {
+ if (is_array($info_650_x[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_650_x[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_650_x[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_650_y); $i++) {
+ if (is_array($info_650_y[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_650_y[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_650_y[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_650_z); $i++) {
+ if (is_array($info_650_z[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_650_z[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_650_z[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_651_a); $i++) {
+ if (is_array($info_651_a[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_651_a[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_651_a[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_651_j); $i++) {
+ if (is_array($info_651_j[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_651_j[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_651_j[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_651_x); $i++) {
+ if (is_array($info_651_x[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_651_x[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_651_x[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_651_y); $i++) {
+ if (is_array($info_651_y[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_651_y[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_651_y[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_651_z); $i++) {
+ if (is_array($info_651_z[$i])) $this->free_index .= implode ($pmb_keyword_sep,$info_651_z[$i]).$pmb_keyword_sep;
+ else $this->free_index .= $info_651_z[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_773_t); $i++) {
+ if (strlen($this->abstract_note) > 0) $sep=". ";
+ else $sep="";
+ if (is_array($info_773_t[$i])) $this->abstract_note .= $sep.implode ($pmb_keyword_sep,$info_773_t[$i]).$pmb_keyword_sep;
+ else $this->abstract_note .= $sep.$info_773_t[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_773_x); $i++) {
+ if (strlen($this->abstract_note) > 0) $sep=". ";
+ else $sep="";
+ if (is_array($info_773_x[$i])) $this->abstract_note .= $sep.implode ($pmb_keyword_sep,$info_773_x[$i]).$pmb_keyword_sep;
+ else $this->abstract_note .= $sep.$info_773_x[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_773_d); $i++) {
+ if (strlen($this->abstract_note) > 0) $sep=". ";
+ else $sep="";
+ if (is_array($info_773_d[$i])) $this->abstract_note .= $sep.implode ($pmb_keyword_sep,$info_773_d[$i]).$pmb_keyword_sep;
+ else $this->abstract_note .= $sep.$info_773_d[$i].$pmb_keyword_sep;
+ }
+
+ for ($i = 0; $i < sizeof($info_773_g); $i++) {
+ if (strlen($this->abstract_note) > 0) $sep=". ";
+ else $sep="";
+ if (is_array($info_773_g[$i])) $this->abstract_note .= $sep.implode ($pmb_keyword_sep,$info_773_g[$i]).$pmb_keyword_sep;
+ else $this->abstract_note .= $sep.$info_773_g[$i].$pmb_keyword_sep;
+ }
+
+//-------------------------------------> L L I U R E X <--------------------------------------
}
function from_unimarc ($record) {
diff -Nuar pmb.orig/includes/marc_tables/es_ES/relationtypeup.xml pmb/includes/marc_tables/es_ES/relationtypeup.xml
--- pmb.orig/includes/marc_tables/es_ES/relationtypeup.xml 2007-09-14 12:20:22.000000000 +0200
+++ pmb/includes/marc_tables/es_ES/relationtypeup.xml 2010-05-20 16:04:52.000000000 +0200
@@ -23,5 +23,5 @@
Título siguienteTraducido bajo el títuloTraducción de
- Est accompagné de
+ Acompañado de
diff -Nuar pmb.orig/includes/messages/es_ES.xml pmb/includes/messages/es_ES.xml
--- pmb.orig/includes/messages/es_ES.xml 2010-05-20 16:04:10.000000000 +0200
+++ pmb/includes/messages/es_ES.xml 2010-05-20 17:58:40.000000000 +0200
@@ -2011,7 +2011,7 @@
El título es obligatorioSolamente los abonados ?Espere....
-Carta
+CarnetCobro rápidoValidar las transacciones seleccionadasCobrar
@@ -2035,8 +2035,8 @@
Creditar la cuentaPasar a pérdidasDebitar la cuenta
-Créditer le compte et encaisser
-Débiter le compte et décaisser
+Abonar la cuenta y cobrar
+Vender la cuenta y desembolsarRazónValidarValidar transacciones
@@ -2158,10 +2158,10 @@
LocalizaciónEcuacionesEcuaciones afectadas
-Abonados
+UsuariosTodas las categorías de usuariosUsuarios asignados
-Asignación de los abonados a la cesta
+Asignación de los usuarios a la cestaHa modificado la categoría de la cesta, para actualizar los abonos de los usuarios de estas categorías, valide con Ok, o haga clic en Anular.Classe de la ecuación :Nombre de la ecuación
@@ -2203,7 +2203,7 @@
ListadoEcuaciones asociadasClick here to associate an equation.
-Nº de abonados
+Nº de usuariosExportarReservaRetrasos por fecha
@@ -2222,20 +2222,20 @@
Balance de las coberturasBalance cobertura usuario lecteur #%sPassar al nivel %s
-Passar en recouvrement
-Recouvrement expl #%s
+Pasar en recuperación
+Recuperación expl #%sNo devuelto por el usuario
-Frais de relance
+Costes de reactivaciónFecha de préstamo: %s Devolución prevista el : %sMulta : %sTotal de las multas: %s
-Frais de relance niveau %s
+Gastos de reactivación nivel %sValidar todas las accionesImprimir todas las cartasMulta : %sTotal de las multas :
-Frais de relance et solde :
-Total dû :
+Gastos de reactivación y saldo :
+Total adeudado : El préstamo está bloqueado hasta %sProlongar/DesbloquearProlongar el bloqueo hasta %s
@@ -2243,7 +2243,7 @@
AplicarDocumentos electrónicosÚnicamente los abonados?
-Únicament los abonados?
+Únicamente los abonados?Visibilidad generalRestricción ?Registros
@@ -2697,7 +2697,7 @@
Rechazar las sugerencias actuales ?Suprimir las sugerencias actuales o archivadas ?Confirmar las sugerencias validadas ?
-Abandonner les suggestions validées, confirmées ou commandées ?
+¿Abandonar las sugerencias validadas, confirmadas o mandadas?Pedir las sugerencias confirmadas ?Hacer la recepción de las sugerencias pedidas ?Archivar las sugerencias abandonadas o recibidas ?
@@ -2723,7 +2723,7 @@
Información Phpfacturadopagado
-Va ha eliminar un ejercicio junto con todas sus informaciones asociadas (presupuestos, pedidos, ...).\nEstà usted seguro vous de querer eliminar el ejercicio :
+Va a eliminar un ejercicio junto con todas sus informaciones asociadas (presupuestos, pedidos, ...).\nEstà usted seguro vous de querer eliminar el ejercicio : Devolución segura de documentosArchivo de códigos de barras de ejemplaresArchivo de ejemplares en devolución
@@ -2848,7 +2848,7 @@
No se puede eliminar esta categoría de sugerencia.Se usa en las sugerencias.Categoría
- : ce libellé existe déjà !
+ : ¡esta redacción ya existe!Destinar a la categoríaNo hay ninguna categoría seleccionada¿ Cambiar la categoría de sugerenica en curso y validar ?
@@ -2871,13 +2871,13 @@
Reindexación de las facturas de comprafacturas de compra realizadasReindexación de las adquisiciones finalizada
-Actif (Défaut)
-par défaut
-Choix établissement :
-Choix exercice :
-Choix établissement et exercice :
-Dupliquer
-Impossible de supprimer cette catégorie car elle est utilisée.
+Activo (por defecto)
+por defecto
+Elección establecimiento :
+Elección de ejercicio :
+Elección de establecimiento y ejercicio :
+Duplicar
+Imposible de suprimir esta categoría puesto que es utilizada.Creación automáticaYa existe una ficha de usuario idénticaDevolución inicial
@@ -2912,26 +2912,26 @@
RéservationOPACDSI
-DSI privée
-Autoriser l'emprunt
-Autoriser la réservation
-Autoriser la connexion à l'OPAC
-Autoriser la DSI
-Autoriser la DSI privée
-Le statut de cet emprunteur lui interdit l'emprunt.
-Le statut de cet emprunteur lui interdit réservation.
-Le statut de cet emprunteur lui interdit la connexion à l'OPAC.
-Le statut de cet emprunteur lui interdit l'accès à la DSI.
-Le statut de cet emprunteur lui interdit l'accès à la DSI privée.
-Création d'un statut d'emprunteur
-Ajouter un statut d'emprunteur
-Modification d'un statut d'emprunteur
-Un statut portant ce nom existe déjà.
-Statut
-Impossible de supprimer ce statut car il est utilisé dans des emprunteurs.
-Impossible de supprimer les statuts 'Actif' et 'Interdit'.
-Statut de lecteur par défaut
-Catégories
+DSI privada
+Autorizar el préstamo
+Autorizar la reserva
+Autorizar la conexión en el OPAC
+Autorizar la DSI
+Autorizar la DSI privada
+El estado de este usuario le prohíbe el préstamo.
+El estado de este usuario le prohíbe reserva.
+El estado de este usuario le prohíbe la conexión en el OPAC.
+El estado de este usuario le prohíbe el acceso a la DSI.
+El estado de este usuario le prohíbe el acceso a la DSI privada.
+Creación de un estado de usuario
+Añdir un estado de usuario
+Modificación de un estado de usuario
+Un estado que lleva este nombre existe ya.
+Estado
+Imposible de suprimir este estado puesto que es utilizado por usuarios.
+Imposible de suprimir los estados 'Activo' e 'Incapacitado'.
+Estado de lector por defecto
+CategoríasRetrasos por gruposImprimir la lista de préstamos por grupoImprimir la lista de préstamos de los grupos seleccionados
@@ -3002,314 +3002,314 @@
Creación automática de ejemplaresPlantilla(s) asociada(s)Total de números en la serie
-bulletinage
-Bulletinage
-Sélection de la liste:
-A recevoir
-En retard
-En alerte
-Localisation
-Liste des bulletins:
-Reçu
-Non recevable
-Inexistant
-Création/modification d'un abonnement
-Un abonnement du même nom existe déjà dans la base
-Impossible de modifier cet abonnement
-Création/modification d'un modèle
-Un modèle du même nom existe déjà dans la base
-Création/modification d'un modèle
-Impossible de modifier ce modèle
-Imprimer les retards
-Non recevable
-Données du bulletin
-Date
-Périodique
-Numero
-Abonnement
-Ce code barre est déjà utilisé !
-Voir le bulletin
-Ajouter
-Confirmez-vous la suppression de cet abonnement ?
-Confirmez-vous la suppression de ce modèle ?
-Nombre d'abonnements à dupliquer
-Format libellé de période
-Format du numéro
-Email destinataire en copie cachée, BCC
-Suggestions
-Autoriser les suggestions d'acquisition
-Le statut de cet emprunteur lui interdit de faire des suggestions.
-Prolongation
-Autoriser la demande de prolongation
-Le statut de cet emprunteur lui interdit la demande de prolongation.
+boletines
+Boletines
+Selección de la lista:
+A recibir
+En retraso
+En alerta
+Localización.
+Lista de los boletines:
+Recibo
+No admisible
+Inexistente
+Creación / modificación de una suscripción
+Una suscripción del mismo nombre ya existe en la base de datos
+No se puede cambiar la suscripción
+Crear / editar una plantilla
+Una plantilla del mismo nombre ya existe en la base de datos
+Crear / editar una plantilla
+No es posible editar la plantilla
+Imprimer retrasos
+No admisible
+Datos del boletÃn
+Fecha
+Periodicidad
+Número
+Abono.
+¡Este código de barras ya es utilizado!
+Ver el boletín
+Añadir
+¿Confirma la eliminación de este abono?
+¿Confirma la eliminación de este modelo?
+Abonos a duplicar
+Formato redactado de periodo
+Formato del número
+Email destinatario en copie caché, BCC
+Sugerencias
+Autorizar las sugerencias de adquisición
+El estado de este usuario le prohíbe hacer sugerencias.
+Prolongación
+Autorizar la petición de prolongación
+El estado de este usuario le prohíbe la petición de prolongación.seriesLímite de la alerta (en días)Retraso (en días)Esta periodicidad ya existe.El retraso debe ser obligatoriamente superior o igual al límite de la alerta.
-Monter
-Descendre
-Tri Croissant
-Tri décroissant
-Définir un nouveau tri
-Critères de tri disponibles
-Critères de tri retenus
-Tris disponibles
-Nom du tri
-Sauvegarder
-Aucun tri disponible
-Veuillez saisir un nom de tri
-trié(s) par
-Modifier ce tri
-Supprimer ce tri
-Aucun tri
-Pertinence
-Appliquer ce tri
-Année d'édition
-Ce nom de tri existe déjà
-Titre de la série
-Numéro de la série
-Statut de la notice
-Type de document
-Localisation
-Langue
-Champs principaux
-Série
+Subir
+Bajar
+Selección Creciente
+Selección decreciente
+Definir una nuevo selección
+Criterios de selección disponibles
+Criterios de selección retenidos
+Selecciones disponibles
+Nombre del selección
+Guardar
+Ninguna selección disponible
+Escoger un nombre de selección
+por selección(s)
+Modificar esta selección
+Suprimir esta selección
+Ninguna selección
+Pertinencia
+Aplicar esta selección
+Año de edición
+Este nombre de selección ya existe
+Título de la serie
+Número de la serie
+Estado de la referencia
+Tipo de documento
+Localización
+Lengua
+Campos principales
+SerieISBN ou ISSN
-Note de résumé
-Toutes les notes
-Indexations
-Langue de publication
-Langue originale
-Document/périodique/article
-Articles
-Origine de la notice
-Commentaire de gestion
-Date de création
-Exemplaires
-Codes-barres
-Date de parution du bulletin
-Titre du périodique
-Numéro de bulletin
-Expression booléenne
-Contient tous les mots
-Contient au moins un des mots
-Commence par
-Finit par
-Exactement comme
-Est vide
-N'est pas vide
-Recherches
-Choisissez une recherche de l'historique
-Paniers
-Gestion
-Actions
-Gestion des paniers
-Gestion des procédures
-Collecte
-Pointage
-Collecte par sélection
-Pointage par sélection
-Effacer les pointages
-Après transfert :
-Vider le panier
+Nota de resumen
+Todas las notas
+Indexaciones
+Idioma de publicación
+Idioma original
+Documento/publicación periódica/artículo
+Artículos
+Origen de la nota
+Comentario de gestión
+Fecha de creación
+Ejemplares
+Códigos-barras
+Fecha de publicación del boletín
+Título de la publicación periódica
+Número de boletín
+Expresión booleana
+Contiene todas las palabras
+Contiene por lo menos una de las palabras
+Empieza por
+Acaba por
+Exactamente como
+Es vacío
+No es vacío
+Búsquedas
+Elija una búsqueda del histórico
+Cestas
+Gestión
+Acciones
+Gestión de las cestas
+Gestión de los procedimientos
+Colecta
+Puntuación
+Colecta por selección
+Puntuación por selección
+Borrar la Puntuación
+Después de la transferencia :
+Vaciar la cestaSuppr de la base
-Transfert
-Par procédure d'action
-Editions
-Export
-Mailing
-Modifier
-Supprimer
-Confirmez vous la suppression de ce panier ?
-Vous devez saisir un nom pour le panier.
-Nom du panier
-Commentaire
-Autorisations accordées à :
-Choisissez un panier où ajouter votre emprunteur:
-Choisissez un panier d'emprunteurs destinataires:
-Continuer
-Envoi d'un message
-Objet du mail:
-Corps du message:
-Visualiser
-Envoyer
-Résultat de l'envoi:
-Fin de l'envoi d'un message
-Remise à zéro des envois
-Envoyés : !!total_envoyes!! sur un total de !!total!!.
-Envois échoués :
-Envoyés : !!total_envoyes!! sur un total de !!total!!. Reste à faire: !!n_envoi_restant!!.
-Détail de l'emprunteur
-Printemps
-Eté
-Automne
-Hiver
-Tous
-Modifier les plans de classement
-Ajouter un plan de classement
-Création d'un plan de classement
-Modification d'un plan de classement
-Type de document
-Veuillez indiquer un libellé pour ce plan de classement
-Liste des plans de classement
-Impossible d'effacer ce plan de classement, des indexations décimales sont liées
-Impossible de retrouver ce plan de classement
-Plan de classement
-Aucun plan de classement trouvé
-Date invalide
-Note d'application
-Abonnements à renouveler
-Abonnements dépassés
-Date de fin
-prêt(s) prolongé(s)
-Document
-Visibilité des exemplaires
+Transferencia
+Por procedimiento de acción
+Ediciones
+Exportación
+Envio por correo
+Modificar
+Suprimir
+¿Confirma la eliminación de esta cesta?
+Debe introducir un nombre para la cesta.
+Nombre de la cesta
+Comentario
+Autorizaciones concedidas a :
+Elija una cesta donde añadir a su usuario:
+Elija una cesta de usuarios destinatarios:
+Continuar
+Envío de un mensaje
+Objeto del correo:
+Cuerpo del mensaje:
+Visualizar
+Enviar
+Resultado del envío:
+Fin del envío de un mensaje
+Restablecer los envios
+Enviados: : !!total_envoyes!! sobre un total de !!total!!.
+Envíos fallidos :
+Enviados : !!total_envoyes!! sobre un total de !!total!!. Resto a hacer: !!n_envoi_restant!!.
+Detalle del usuario
+Primavera
+Verano
+Otoño
+Invierno
+Todos
+Modificar los planes de clasificación
+Añadir un plan de clasificación
+Creación de un plan de clasificación
+Modificación de un plan de clasificación
+Tipo de documento
+Por favor indique una redacción para este plan de clasificación
+Lista de planes de clasificación
+Imposible de borrar este plan de clasificación, indexaciones decimales están vinculadas
+Imposible de encontrar este plan de clasificación
+Plan de clasificación
+Ningún plan de clasificación encontrado
+Fecha inválida
+Nota de aplicación
+Abonos a renovar
+Abonos superados
+Fecha de fin
+préstamo(s) extendido(s)
+Documento
+Visibilidad de los ejemplaresInvisible
-Visible et modifiable
-Visible et non modifiable
-Vous n'avez pas le droit de modifier l'exemplaire.
-Toutes les localisations sont invisibles, vous n'avez pas le droit de créer un exemplaire
-La date saisie est invalide
-Sélectionnez au moins un modèle d'abonnement
-dans la localisation
-Code-barre
-Nom et prénom
-Adresse
-Ville
-Catégorie
-Statut
-Groupe
-Année de naissance
-Toutes les villes
-Toutes les localisations
-Toutes les catégories
-Tous les groupes
-Tous les statuts
-Filtres
-Filtrés par
-Triés par
-puis par
-Aucun lecteur trouvé
-La clé %s inexistante dans la requête d'origine.
- elle est utilisée par des utilisateurs de PMB.]]>
-Un mot de passe a été affecté.
-Copie d'un emprunteur
-Dupliquer
-Mettre le statut des lecteurs de la liste en :
-Appliquer
-Appliquer
-Toutes les valeurs
-Ajouter dans un panier
-Champ %s : aucun détail disponible
-Envoyer toutes les relances d'adhésion
-Elle est utilisée par des abonnements de périodique.
-Elle est utilisée par des abonnements de périodique.
-Filtres et tris disponibles
-(Bulletin de %s)
-tous les niveaux
-Des exemplaires sont associés aux notices filles de cette notice. Voulez-vous réellement la supprimer ?
-Veuillez cocher au moins une recherche
+Visible y modificable
+Visible y no modificable
+No tiene permiso para modificar el ejemplar.
+Todas las localizaciones son invisibles, no tiene permiso para crear un ejemplar
+La fecha introducida es inválida
+Seleccione por lo menos un modelo de abono
+en la localización
+Código-barra
+Nombre y apellidos
+Dirección
+Ciudad
+Categoría
+Estado
+Grupo
+Año de nacimiento
+Todas las ciudades
+Todas las localizaciones
+Todas las categorías
+Todos los grupos
+Todos los estados
+Filtros
+Filtrados por
+Clasificados por
+después por
+Ningún lector encontrado
+Clave %s inexistente en la demanda de origen.
+ está siendo utilizada por usuarios de PMB.]]>
+Se ha asignado una contraseña.
+Copia de un usuario
+Duplicar
+Poner el estado de los lectores de la lista en :
+Aplicar
+Aplicar
+Todos los valores
+Añadir en una cesta
+Campo %s : ningún detalle disponible
+Enviar todas las reactivaciones de adhesión
+Es utilizada por abonos periódicos.
+Es utilizada por abonos periódicos.
+Filtros y selecciones disponibles
+(Boletín de %s)
+todos los niveles
+Ejemplares son asociados a las registros hijos de este registro. ¿Quiere suprimirla realmente?
+Por favor marque por lo menos una búsquedaHist.
-Autoriser l'historique des prêts
-Avis
-Autoriser l'abonné à laisser son avis
+Autorizar el histórico de los préstamos
+Aviso
+Autorizar al abonado a dejar su avisoTag
-Autoriser l'abonné à ajouter des tags
-Calculer
-Toutes les années
-Tous les codes postaux
-Attention, le nettoyage des catégories va définitivement purger les descripteurs inutilisés.
-Attention, le nettoyage des notices sans exemplaire va définitivement purger les notices (hors périodiques) inutilisées.
-Générer toutes les signatures de notices
-Modification de la table notice:
-signature(s) générée(s)
-Il existe une notice similaire
-Forcer l'enregistrement
-Attention, cet exemplaire est affecté à une autre localisation que la vôtre...
-Confirmer les prêts
-Sémantique
-Dictionnaire des synonymes
-Synonymes du mot
-Synonymes
-Sélection d'un mot
-Mot
-Ajouter un mot
-Créer un mot
-Etes-vous sûr de vouloir supprimer ce mot ?
-Veuillez saisir un mot !
-Ce mot existe déjà
-Ce mot est synonyme d'un autre mot, impossible de le supprimer.
-Dictionnaire des mots vides
-Mots vides calculés
-Mots vides saisis
-Ajouter un mot vide
-Mots vides
-Seuil du nombre de notices dans lequel les mots sont présents (en pourcentage)
-Mots non vides
-La valeur saisie doit être un chiffre entre 0 et 100.
-Tous les mots vides
-Mots trouvés sous la clé
-Mot non vide
-Mot vide calculé
-Mot vide saisi
-Voir les derniers mots créés
-Voir les derniers mots ajoutés
-Paniers d'exemplaires
-Paniers d'emprunteurs
-Paniers de bulletins
-Choisissez un panier où ajouter le(s) emprunteur(s)
-Nombre total de notices
-Nombre total d'exemplaires
-Nombre total de bulletins
-Nombre total d'auteurs
-Nombre total d'éditeurs
-Nombre total d'emprunteurs
-Nombre total de prêts en cours
-Nombre total de prêts en cours et archivés
-Suggestions:
-à valider
-éditeur HTML
+Autorizar al abonado a añadir tags
+Calcular
+Todos los años
+Todos los códigos postales
+Atención, la limpieza de las categorías va a eliminar definitivamente los descriptores inutilizados.
+Atención, la limpieza de los registros sin ejemplar va a eliminar definitivamente los registros (fuera de las publicaciones periódicas) inutilizadas.
+Generar todas las firmas de las referencias
+Modificación de la tabla referencias:
+firma(s) generada(s)
+Existe una referencia similar
+Forzar el registro
+Atención, este ejemplar es destinado a otra localización que la suya...
+Confirmar los préstamos
+Semántica
+Diccionario de los sinónimos
+Sinónimos de la palabra
+Sinónimos
+Selección de una palabra
+Palabra
+Añadir una palabra
+Crear una palabra
+¿Está seguro de querer suprimir esta palabra?
+!Por favor elija una palabra!
+Esta palabra ya existe
+Esta palabra es sinónima de otra palabra, imposible de suprimirla.
+Diccionario de las palabras vacías
+Palabras vacías calculadas
+Palabras vacías introducidas
+Añadir una palabra vacía
+Palabras vacías
+Umbral del número de referencias en el cual las palabras están presentes (porcentual)
+Palabras no vacías
+El valor introducido debe ser una cifra entre 0 y 100.
+Todas las palabras vacías
+Palabras encontradas bajo la clave
+Palabra no vacía
+Palabra vacía calculada
+Palabra vacía introducida
+Ver las últimas palabras creadas
+Ver las últimas palabras añadidas
+Cestas de ejemplares
+Cestas de usuarios
+Cestas de boletines
+Elija una cesta donde añadir el/los usuario(s)
+Número total de referencias
+Número total de ejemplares
+Número total de boletines
+Número total de autores
+Número total de editores
+Número total de usuarios
+Número total de préstamos en curso
+Número total de préstamos en curso y archivados
+Sugerencias:
+a validar
+editor HTMLSuppr.MdP
-Autoriser l'abonné à changer son mot de passe
-Réservations en cours sur le document
-Lettres de rappel ?
-Voir le bulletinage
-Barcode for musical documents
+Autorizar al abonado a cambiar su contraseña
+Reservas en curso sobre el documento
+¿Cartas de llamada?
+Ver los boletines
+Código-barra para documentos musicalesEuropean article number (EAN)
-All fields
+Todos los camposisrnismn
-Oui
-Non
-Propriétés du connecteur !!connecteur!!
-Time-out (en secondes)
-Nombre d'essais
-Durée de validité des résultats (en secondes)
-Entrepôt
-Vous devez saisir un nom !
-Propriétés de la source !!source!! du connecteur !!connecteur!!
-Nom de la source
-Description
-%s source(s)
-Ajouter une source
-%s Notice(s)
-Synchroniser
-Vider
-Toutes les notices de la source seront supprimées, êtes vous sûr ?
-Le nom est déjà utilisé par un autre connecteur !
-Group(s)
+Sí
+No
+Propiedades del conector !!connecteur!!
+Tiempo de espera (en segundos)
+Número de pruebas
+Duración de la validez de los resultados (en segundos)
+Almacén
+¡ Debe introducir un nombre !
+Propiedades de la fuente !!source!! del conector !!connecteur!!
+Nombre de la fuente
+Descripción
+%s fuente(s)
+Añadir una fuente
+%s Registro(s)
+Sincronizar
+Vaciar
+Todas los registros de la fuente serán suprimidas, ¿Está usted seguro?
+! El nombre es utilizado ya por otro conector !
+Grupo(s)!!nb_retards!! overdue item(s) over !!nb_total!! current loan(s).
-La modification de cette catégorie est interdite
-Interrogation externe
-Sources
-Interroger des sources externes
-Recherches précédentes
-Interrogation externe simple
-Interrogation externe avancée
-<a href='%s'>faire une recherche avancée</a>
-Critères
+La modificación de esta categoría está prohibida
+Consulta externa
+Fuentes
+Consultar en las fuentes externas
+Búsquedas anteriores
+Consulta externa simple
+Consulta externa avanzada
+<a href='%s'>hacer una búsqueda avanzada</a>
+CriteriosCopia seguridad en sqlCopia Seguridad (LliureX)Importa copias seguridad en sql
@@ -3339,6 +3339,19 @@
Seleccione un archivo de texto y pulse EnterSeparador de camposExportar usuarios a un fichero de texto
-Para realizar etiquetas, tiene que poner los códigos del ejemplar separados por comas, o bien separados por guiones si quiere acotar dos numeros (NO TIENE QUE HABER ESPACIOS ENTRE LOS CÓDIGOS)
-Tejuelo - Etiquetas
+GENERACIÓN DE TEJUELOS PARA UN TAMAÑO DE ETIQUETA ADHESIVA APLI 1272 A4 (70X35mm)
Para realizar etiquetas, tiene que poner los códigos del ejemplar separados por comas, o bien separados por guiones si quiere acotar dos numeros (NO TIENE QUE HABER ESPACIOS ENTRE LOS CÓDIGOS)
+Ejemplos:
+- 100-120
+- 000AM5R1
+- 100-120,500,000485R1
+- * (Asterisco imprime todos los tejuelos)
]]>
+
+Tejuelo - Etiquetas
+Importar registros REBECA (archivos *.reb)
+Importación de registros REBECA
+Haga clic en el botón de la derecha para escoger un fichero y después haga clic en Siguiente para cargar el archivo.<br><b>Recuerda que el fichero debe tener extensión de REBECA ".reb".</b>
+ No se ha podido realizar el dump del fichero %s... ]]>
+ El fichero %s no es un fichero de Rebeca válido ]]>
+ Se han integrado: %s registro(s) de Rebeca]]>
+Se han actualizado: %s registro(s) de Rebeca ]]>
diff -Nuar pmb.orig/includes/messages/help/es_ES/import_reb.txt pmb/includes/messages/help/es_ES/import_reb.txt
--- pmb.orig/includes/messages/help/es_ES/import_reb.txt 1970-01-01 01:00:00.000000000 +0100
+++ pmb/includes/messages/help/es_ES/import_reb.txt 2010-05-20 16:04:52.000000000 +0200
@@ -0,0 +1,19 @@
+
+CUIDADO, esta herramienta sirve para crear los registros y las autoridades.
+ También se actualizarán registros ya existentes.
+
+
+El archivo debe estar en formato IBERMARC (REBECA). El resultado de la búsqueda de registros en la página web
+de Registros Bibliográficos del Ministerio de Cultura http://www.mcu.es/bibliotecas/MC/Rebeca/index.html
+se puede descargar en un fichero 000*.reb para su importación desde PMB.
+
+
La importación se realiza en tres fases :
+
+
Primero se envía el archivo
+
Luego se carga
+
Finalmente se transfieren los registros a la base de datos
+
+
+
Enviar el archivo
+
+
diff -Nuar pmb.orig/includes/messages/help/va_ES/import_reb.txt pmb/includes/messages/help/va_ES/import_reb.txt
--- pmb.orig/includes/messages/help/va_ES/import_reb.txt 1970-01-01 01:00:00.000000000 +0100
+++ pmb/includes/messages/help/va_ES/import_reb.txt 2010-05-20 16:04:52.000000000 +0200
@@ -0,0 +1,18 @@
+
+ATENCIÓ, esta ferramenta servix per a crear els registres i les autoritats.
+ Tamb; s'actualitzaran registres ja existents.
+
+
+El fitxer ha d'estar en format IBERMARC (REBECA). El resultat de la busca de registres en la pàgina web
+de Registres Bibliogràfics del Ministeri de Cultura http://www.mcu.es/bibliotecas/MC/Rebeca/index.html
+es pot baixar a un fitxer 000*.reb per a la importació des del PMB.
+
+
La importació es produïx en tres fases :
+
+
Càrrega del fitxer
+
Precàrrega del fitxer
+
Transferència a la base de dades de registres
+
+
+
Envia el fitxer
+
diff -Nuar pmb.orig/includes/messages/help/va_ES/import.txt pmb/includes/messages/help/va_ES/import.txt
--- pmb.orig/includes/messages/help/va_ES/import.txt 2010-05-20 16:03:43.000000000 +0200
+++ pmb/includes/messages/help/va_ES/import.txt 2010-05-20 16:04:52.000000000 +0200
@@ -3,15 +3,15 @@
Esta funció no actualitza registres ja existents.
-L'arxiu ha de tindre el format UNIMARC
+El fitxer ha de tindre el format UNIMARC
La importació es produïx en tres fases :
-
Càrrega de l'arxiu
-
Precàrrega de l'arxiu
+
Càrrega del fitxer
+
Precàrrega del fitxer
Transferència a la base de dades de registres
-
En comptes de carregar l'arxiu, podeu posar-lo a disposició del servidor
+
En comptes de carregar el fitxer, podeu posar-lo a disposició del servidor
pel mètode que més convinga (FTP per exemple). En este cas el fitxer s'ha d'anomenar
"" i podeu utilitzar directament la
precàrrega.
diff -Nuar pmb.orig/includes/messages/va_ES.xml pmb/includes/messages/va_ES.xml
--- pmb.orig/includes/messages/va_ES.xml 2010-05-20 16:04:10.000000000 +0200
+++ pmb/includes/messages/va_ES.xml 2010-05-20 17:58:46.000000000 +0200
@@ -3339,6 +3339,19 @@
Seleccioneu un arxiu de text i premeu EnterSeparador de campsExporta usuaris a un fitxer de text
-Para realizar etiquetas, tiene que poner los códigos del ejemplar separados por comas, o bien separados por guiones si quiere acotar dos numeros (NO TIENE QUE HABER ESPACIOS ENTRE LOS CÓDIGOS)
-Tejuelo - Etiquetas
+GENERACIÓN DE TEJUELOS PARA UN TAMAÑO DE ETIQUETA ADHESIVA APLI 1272 A4 (70X35mm)
Per a realitzar etiquetes, heu de posar els codis de l'exemplar separats per comes, o bé separats per guions si voleu acotar dos números (NO HA D'HAVER-HI ESPAIS ENTRE ELS CODIS)
+Exemples:
+- 100-120
+- 000AM5R1
+- 100-120,500,000485R1
+- * (Asterisco imprime todos los tejuelos)
]]>
+
+Teixell - Etiquetes
+Importa registres REBECA (fitxers *.reb)
+Importació de registres REBECA
+Feu clic en el botó de la dreta per a escollir un fitxer i després feu clic en Següent per a carregar el fitxer.<br><b>Recorda que el fitxer ha de tindre extensió de REBECA ".reb".</b>
+ No s'ha pogut realitzar l'abocament del fitxer %s... ]]>
+ El fitxer %s no és un fitxer de Rebeca vàlid ]]>
+ S'han integrat: %s registre(s) de Rebeca]]>
+S'han actualitzat: %s registre(s) de Rebeca ]]>
diff -Nuar pmb.orig/includes/section_param/es_ES.xml pmb/includes/section_param/es_ES.xml
--- pmb.orig/includes/section_param/es_ES.xml 2007-07-28 09:02:48.000000000 +0200
+++ pmb/includes/section_param/es_ES.xml 2010-05-20 16:04:52.000000000 +0200
@@ -18,7 +18,7 @@
Opciones de formato de las facturasOpciones de formato de las listas de sugerenciasOpciones de formato de los correos electrónicas de sugerencias
- Options pour les categories
- Options pour les thésaurus
- Options pour les plans de classement
-
\ No hay ningún carácter de nueva lÃnea al final del fichero
+ Opciones para las categorías
+ Opciones para los tesauros
+ Opciones para los planes de clasificación
+
diff -Nuar pmb.orig/includes/templates/admin.tpl.php pmb/includes/templates/admin.tpl.php
--- pmb.orig/includes/templates/admin.tpl.php 2010-05-20 16:03:57.000000000 +0200
+++ pmb/includes/templates/admin.tpl.php 2010-05-20 16:04:52.000000000 +0200
@@ -56,7 +56,8 @@
$msg[519] > !!menu_sous_rub!!
$msg[500]$msg[520]
-".$msg[569]."
+".$msg[569]."
+".$msg["import_reb"]."
";
// $admin_menu_convert : menu outils de conversion de formats
diff -Nuar pmb.orig/includes/templates/common.tpl.php pmb/includes/templates/common.tpl.php
--- pmb.orig/includes/templates/common.tpl.php 2007-10-31 12:36:48.000000000 +0100
+++ pmb/includes/templates/common.tpl.php 2010-05-20 16:04:52.000000000 +0200
@@ -242,7 +242,7 @@
$extra .="";
if (SESSrights & SAUV_AUTH)
- $extra .="";
+ $extra .="";
if ($pmb_show_rtl) {
$extra .= "";
diff -Nuar pmb.orig/opac_css/classes/iso2709.class.php pmb/opac_css/classes/iso2709.class.php
--- pmb.orig/opac_css/classes/iso2709.class.php 2007-10-18 16:31:28.000000000 +0200
+++ pmb/opac_css/classes/iso2709.class.php 2010-05-20 16:04:52.000000000 +0200
@@ -609,25 +609,136 @@
chr(0xc5).chr(0x20)=>chr(0xaf),chr(0xca).chr(0x20)=>chr(0xb0),chr(0xc7).chr(0x20)=>chr(0xba)
);
+//-------------------------------------> L L I U R E X <--------------------------------------
$ISO5426=array(
- chr(0xa0)=>chr(0xa0),chr(0xa1)=>chr(0xa1),chr(0xa2)=>chr(0x22),chr(0xa3)=>chr(0xa3),
- chr(0xa4)=>chr(0xa4),chr(0xa5)=>chr(0xa5),chr(0xa6)=>chr(0x3f),chr(0xa7)=>chr(0xa7),
- chr(0xa8)=>chr(0x27),chr(0xa9)=>chr(0x60),chr(0xaa)=>chr(0x22),chr(0xab)=>chr(0xab),
- chr(0xac)=>chr(0x62),chr(0xad)=>chr(0xa9),chr(0xae)=>chr(0x28).chr(0x50).chr(0x29) ,
- chr(0xaf)=>chr(0xae),chr(0xb0)=>chr(0x3f),chr(0xb1)=>chr(0x3f),chr(0xb2)=>chr(0x2c),
- chr(0xb3)=>chr(0x3f),chr(0xb4)=>chr(0x3f),chr(0xb5)=>chr(0x3f),chr(0xb6)=>chr(0x3f),
- chr(0xb7)=>chr(0xb7),chr(0xb8)=>chr(0x27).chr(0x27),chr(0xb9)=>chr(0x27),chr(0xba)=>chr(0x22),
- chr(0xbb)=>chr(0xbb),chr(0xbc)=>chr(0x23),chr(0xbd)=>chr(0x27),chr(0xbe)=>chr(0x22),
- chr(0xbf)=>chr(0xbf),chr(0xe0)=>chr(0x3f),chr(0xe1)=>chr(0xc6),chr(0xe2)=>chr(0xd0),
- chr(0xe3)=>chr(0x3f),chr(0xe4)=>chr(0x3f),chr(0xe5)=>chr(0x3f),chr(0xe6)=>chr(0x49).chr(0x4a),
- chr(0xe7)=>chr(0x3f),chr(0xe8)=>chr(0x4c),chr(0xe9)=>chr(0xd8),chr(0xea)=>chr(0xbc),
- chr(0xeb)=>chr(0x3f),chr(0xec)=>chr(0xde),chr(0xed)=>chr(0x3f),chr(0xee)=>chr(0x3f),
- chr(0xef)=>chr(0x3f),chr(0xf0)=>chr(0x3f),chr(0xf1)=>chr(0xe6),chr(0xf2)=>chr(0x64),
- chr(0xf3)=>chr(0xf0),chr(0xf4)=>chr(0x3f),chr(0xf5)=>chr(0x69),chr(0xf6)=>chr(0x69).chr(0x6a),
- chr(0xf7)=>chr(0x3f),chr(0xf8)=>chr(0x6c),chr(0xf9)=>chr(0xf8),chr(0xfa)=>chr(0xbd),
- chr(0xfb)=>chr(0xdf),chr(0xfc)=>chr(0xfe),chr(0xfd)=>chr(0x3f),chr(0xfe)=>chr(0x3f),
- chr(0xff)=>chr(0x3f)
+ chr(0xa0)=>chr(0xa0),
+ chr(0xa1)=>chr(0xc5).chr(0x81),
+ chr(0xa2)=>chr(0xc3).chr(0x98),
+ chr(0xa3)=>chr(0xc4).chr(0x90),
+ chr(0xa4)=>chr(0xc3).chr(0x9e),
+ chr(0xa5)=>chr(0xc3).chr(0x86),
+ chr(0xa6)=>chr(0xc5).chr(0x92),
+ chr(0xa7)=>chr(0xca).chr(0xb9),
+ chr(0xa8)=>chr(0xc2).chr(0xb7),
+ chr(0xa9)=>chr(0xe2).chr(0x99).chr(0xad),
+ chr(0xaa)=>chr(0xc2).chr(0xae),
+ chr(0xab)=>chr(0xc2).chr(0xb1),
+ chr(0xac)=>chr(0xc6).chr(0xa0),
+ chr(0xad)=>chr(0xc6).chr(0xaf),
+ chr(0xae)=>chr(0xca).chr(0xbc),
+ chr(0xaf)=>chr(0xae),
+ chr(0xb0)=>chr(0xca).chr(0xbb),
+ chr(0xb1)=>chr(0xc5).chr(0x82),
+ chr(0xb2)=>chr(0xc3).chr(0xb8),
+ chr(0xb3)=>chr(0xc4).chr(0x91),
+ chr(0xb4)=>chr(0xc3).chr(0xbe),
+ chr(0xb5)=>chr(0xc3).chr(0xa6),
+ chr(0xb6)=>chr(0xc5).chr(0x93),
+ chr(0xb7)=>chr(0xca).chr(0xba),
+ chr(0xb8)=>chr(0xc4).chr(0xb1),
+ chr(0xb9)=>chr(0xc2).chr(0xa3),
+ chr(0xba)=>chr(0xc3).chr(0xb0),
+ chr(0xbb)=>chr(0xbb),
+ chr(0xbc)=>chr(0xc6).chr(0xa1),
+ chr(0xbd)=>chr(0xc6).chr(0xb0),
+ chr(0xbe)=>chr(0x22),
+ chr(0xbf)=>chr(0xbf),
+ chr(0xc0)=>chr(0xc2).chr(0xb0),
+ chr(0xc1)=>chr(0xe2).chr(0x84).chr(0x93),
+ chr(0xc2)=>chr(0xe2).chr(0x84).chr(0x97),
+ chr(0xc3)=>chr(0xc2).chr(0xa9),
+ chr(0xc4)=>chr(0xe2).chr(0x99).chr(0xaf),
+ chr(0xc5)=>chr(0xc2).chr(0xbf),
+ chr(0xc6)=>chr(0xc2).chr(0xa1),
+ chr(0xc7)=>chr(0xc3).chr(0x9f),
+ chr(0xc8)=>chr(0xe2).chr(0x82).chr(0xac),
+ chr(0xe0)=>chr(0xcc).chr(0x89),
+ chr(0xe1)=>chr(0xcc).chr(0x80),
+ chr(0xe1).chr(0x61)=>chr(0xe0),
+ chr(0xe1).chr(0x65)=>chr(0xe8),
+ chr(0xe1).chr(0x69)=>chr(0xec),
+ chr(0xe1).chr(0x6f)=>chr(0xf2),
+ chr(0xe1).chr(0x75)=>chr(0xf9),
+ chr(0xe1).chr(0x41)=>chr(0xc0),
+ chr(0xe1).chr(0x45)=>chr(0xc8),
+ chr(0xe1).chr(0x49)=>chr(0xcc),
+ chr(0xe1).chr(0x4f)=>chr(0xd2),
+ chr(0xe1).chr(0x55)=>chr(0xd9),
+ chr(0xe2)=>chr(0xcc).chr(0x81),
+ chr(0xe2).chr(0x61)=>chr(0xe1),
+ chr(0xe2).chr(0x65)=>chr(0xe9),
+ chr(0xe2).chr(0x69)=>chr(0xed),
+ chr(0xe2).chr(0x6f)=>chr(0xf3),
+ chr(0xe2).chr(0x75)=>chr(0xfa),
+ chr(0xe2).chr(0x41)=>chr(0xc1),
+ chr(0xe2).chr(0x45)=>chr(0xc9),
+ chr(0xe2).chr(0x49)=>chr(0xcd),
+ chr(0xe2).chr(0x4f)=>chr(0xd3),
+ chr(0xe2).chr(0x55)=>chr(0xda),
+ chr(0xe2).chr(0x79)=>chr(0xfd),
+ chr(0xe2).chr(0x59)=>chr(0xdd),
+ chr(0xe3)=>chr(0xcc).chr(0x82),
+ chr(0xe3).chr(0x61)=>chr(0xe2),
+ chr(0xe3).chr(0x65)=>chr(0xea),
+ chr(0xe3).chr(0x69)=>chr(0xee),
+ chr(0xe3).chr(0x6f)=>chr(0xf4),
+ chr(0xe3).chr(0x75)=>chr(0xfb),
+ chr(0xe3).chr(0x41)=>chr(0xc2),
+ chr(0xe3).chr(0x45)=>chr(0xca),
+ chr(0xe3).chr(0x49)=>chr(0xce),
+ chr(0xe3).chr(0x4f)=>chr(0xd4),
+ chr(0xe3).chr(0x55)=>chr(0xdb),
+ chr(0xe4)=>chr(0xcc).chr(0x83),
+ chr(0xe4).chr(0x61)=>chr(0xe3),
+ chr(0xe4).chr(0x41)=>chr(0xc3),
+ chr(0xe4).chr(0x6f)=>chr(0xf5),
+ chr(0xe4).chr(0x4f)=>chr(0xd5),
+ chr(0xe4).chr(0x6e)=>chr(0xf1),
+ chr(0xe4).chr(0x4e)=>chr(0xd1),
+ chr(0xe5)=>chr(0xcc).chr(0x84),
+ chr(0xe6)=>chr(0xcc).chr(0x86),
+ chr(0xe7)=>chr(0xcc).chr(0x87),
+ chr(0xe8)=>chr(0xcc).chr(0x88),
+ chr(0xe8).chr(0x61)=>chr(0xe4),
+ chr(0xe8).chr(0x65)=>chr(0xeb),
+ chr(0xe8).chr(0x69)=>chr(0xef),
+ chr(0xe8).chr(0x6f)=>chr(0xf6),
+ chr(0xe8).chr(0x75)=>chr(0xfc),
+ chr(0xe8).chr(0x41)=>chr(0xc4),
+ chr(0xe8).chr(0x45)=>chr(0xcb),
+ chr(0xe8).chr(0x49)=>chr(0xcf),
+ chr(0xe8).chr(0x4f)=>chr(0xd6),
+ chr(0xe8).chr(0x55)=>chr(0xdc),
+ chr(0xe8).chr(0x79)=>chr(0xff),
+ chr(0xe9)=>chr(0xcc).chr(0x8c),
+ chr(0xea)=>chr(0xcc).chr(0x8a),
+ chr(0xea).chr(0x61)=>chr(0xe5),
+ chr(0xea).chr(0x41)=>chr(0xc5),
+ chr(0xeb)=>chr(0xcd).chr(0xa1),
+ chr(0xec)=>chr(0xef).chr(0xb8).chr(0xa1),
+ chr(0xed)=>chr(0xcc).chr(0x95),
+ chr(0xee)=>chr(0xcc).chr(0x8b),
+ chr(0xef)=>chr(0xcc).chr(0x90),
+ chr(0xf0)=>chr(0xcc).chr(0xa7),
+ chr(0xf0).chr(0x63)=>chr(0xe7),
+ chr(0xf0).chr(0x43)=>chr(0xc7),
+ chr(0xf1)=>chr(0xcc).chr(0xa8),
+ chr(0xf2)=>chr(0xcc).chr(0xa3),
+ chr(0xf3)=>chr(0xcc).chr(0xa4),
+ chr(0xf4)=>chr(0xcc).chr(0xa5),
+ chr(0xf5)=>chr(0xcc).chr(0xb3),
+ chr(0xf6)=>chr(0xcc).chr(0xb2),
+ chr(0xf7)=>chr(0xcc).chr(0xa6),
+ chr(0xf8)=>chr(0xcc).chr(0x9c),
+ chr(0xf9)=>chr(0xcc).chr(0xae),
+ chr(0xfa)=>chr(0xcd).chr(0xa0),
+ chr(0xfb)=>chr(0xef).chr(0xb8).chr(0xa3),
+ chr(0xfc)=>chr(0xfe),
+ chr(0xfd)=>chr(0x3f),
+ chr(0xfe)=>chr(0xcc).chr(0x93),
+ chr(0xff)=>chr(0x3f)
);
+//-------------------------------------> L L I U R E X <--------------------------------------
//Tableaux de correspondance de ISO8859-15 vers ISO646/5426
//Pour les diacritiques, il y a correspondance biunivoque, on fait donc une inversion du tableau
@@ -689,17 +800,33 @@
else if (($string[$i]>=chr(0xC0))&&($string[$i]<=chr(0xDF))) {
//Si c'est un diacritique on regarde le caractère suivant et on cherche dans la table de correspondance
$car=$string[$i].$string[$i+1];
- //Si le caractère est connu
+ //Si le caractère est connu
+//-------------------------------------> L L I U R E X <--------------------------------------
if ($ISO5426_dia[$car]) {
- $string_r.=$ISO5426_dia[$car];
+ $string_r.=$ISO5426_dia[$car];
+ $i++;
+ } else if ($ISO5426[$string[$i]]) {
+ $string_r.=$ISO5426[$string[$i]];
} else {
//Sinon on ne tient juste pas compte du diacritique
- $string_r.=$string[$i+1];
+ $string_r.=$string[$i+1];
+ $i++;
}
//On avance d'un caractère
- $i++;
- } else {
- //Sinon c'est un catactère spécial ou un symbole
+ }
+ else if ( (($string[$i]>=chr(0xE1))&&($string[$i]<=chr(0xE4))) || ($string[$i]==chr(0xE8)) || ($string[$i]==chr(0xEA)) || ($string[$i]==chr(0xF0)) ) {
+ $car=$string[$i].$string[$i+1];
+ if ($ISO5426[$car]) {
+ $string_r.=$ISO5426[$car];
+ $i++;
+ } else {
+ $car=$string[$i];
+ $string_r.=$ISO5426[$car];
+ }
+ }
+//-------------------------------------> L L I U R E X <--------------------------------------
+ else {
+ //Sinon c'est un catactère spécial ou un symbole
$car=$string[$i];
$string_r.=$ISO5426[$car];
}
@@ -728,4 +855,4 @@
} # fin déclaration
-?>
\ No hay ningún carácter de nueva lÃnea al final del fichero
+?>
diff -Nuar pmb.orig/opac_css/includes/marc_tables/es_ES/relationtypeup.xml pmb/opac_css/includes/marc_tables/es_ES/relationtypeup.xml
--- pmb.orig/opac_css/includes/marc_tables/es_ES/relationtypeup.xml 2007-09-14 14:07:22.000000000 +0200
+++ pmb/opac_css/includes/marc_tables/es_ES/relationtypeup.xml 2010-05-20 16:04:52.000000000 +0200
@@ -23,5 +23,5 @@
Título siguienteTraducido bajo el títuloTraducción de
- Accompagne
+ Acompañado de
diff -Nuar pmb.orig/opac_css/includes/messages/es_ES.xml pmb/opac_css/includes/messages/es_ES.xml
--- pmb.orig/opac_css/includes/messages/es_ES.xml 2007-11-06 21:59:58.000000000 +0100
+++ pmb/opac_css/includes/messages/es_ES.xml 2010-05-20 16:04:52.000000000 +0200
@@ -291,7 +291,7 @@
todos los tipos de documentosBúsqueda avanzada : %s%s página %s, último término consultado %s]]>
-Vider l'historique
+Vaciar el históricoHistorial de búsquedastodo tipo de documentosBuscar por palabras
@@ -557,119 +557,119 @@
ISBDCategoríaRenovar hasta
-Les paramètres de votre compte ne vous autorisent pas l'emprunt.
-Les paramètres de votre compte ne vous autorisent pas la réservation.
-Les paramètres de votre compte ne vous autorisent pas la connexion à cet espace.
-Les paramètres de votre compte ne vous autorisent pas à acceder à cet espace d'information personalisée.
-Les paramètres de votre compte ne vous autorisent pas à créer une veille personalisée.
-Les paramètres de votre compte ne vous autorisent pas la suggestion d'acquisitions.
-Les paramètres de votre compte ne vous permettent pas de demanedr la prolongation de vos prêts.
-%s notices affichées sur %s, voir les %s autres
-Surligner les mots recherchés
-Ne pas surligner les mots recherchés
-!!nb_export!! notice(s) exportable(s) sur un total de !!nb_total!!.
-Aucune notice exportable.
-Cocher toutes les cases
-Supprimer les recherches cochées
-Tris disponibles
-Aucun tri disponible
-trié(s) par
-puis par
-Supprimer les tris cochés
-Définir un nouveau tri
-Pertinence
-Editeur
-Indexation décimale
-Année d'édition
-Croissant
-Décroissant
-Alphanumérique
-Numérique
-Aucun tri
-Appliquer ce tri
-Enregistrer et appliquer ce tri
-Ce tri existe déjà
-Supprimer les tris cochés
-Titre de la série
+Los parámetros de su cuenta no le autorizan el préstamo.
+Los parámetros de su cuenta no le autorizan la reserva.
+Los parámetros de su cuenta no le autorizan la conexión a este espacio.
+Los parámetros de su cuenta no le autorizan a acceder a este espacio de información personalizada.
+Los parámetros de su cuenta no le autorizan a crear una control personalizado.
+Los parámetros de su cuenta no le autorizan la sugerencia de adquisiciones.
+Los parámetros de su cuenta no le permiten demandar la prolongación de sus préstamos.
+%s notas anunciadas sobre %s, ver los %s otros
+Subrayar las palabras rebuscadas
+No subrayar las palabras rebuscadas
+!!nb_export!! registro(s) exportable(s) sobre un total de !!nb_total!!.
+Ninguna nota exportable.
+Marcar todos los casos
+Suprimir las búsquedas marcadas
+Selecciones disponibles
+Ninguna selección disponible
+clasificado(s) por
+después por
+Suprimir las selecciones marcadas
+Definir una nueva selección
+Pertinencia
+Editor
+Indexación decimal
+Año de edición
+Creciente
+Decreciente
+Alfanumérico
+Numérico
+Ninguna selección
+Aplicar esta selección
+Grabar y aplicar esta selección
+Esta selección ya existe
+Suprimir las selecciones marcadas
+Título de la serieNuméro de la série
-Statut de la notice
-Type de document
-Localisation
-Langue
-Champs principaux
-Série
+Estado del registro
+Tipo de documento
+Localización
+Lengua
+Campos principales
+SerieISBN ou ISSN
-Note de résumé
-Toutes les notes
-Indexations
-Langue de publication
-Langue originale
-Document/périodique/article
-Articles
-Origine de la notice
-Commentaire de gestion
-Date de création
-Exemplaires
-Codes-barres
-Date de parution du bulletin
-Titre du périodique
-Numéro de bulletin
-Expression booléenne
-Contient tous les mots
-Contient au moins un des mots
-Commence par
-Finit par
-Exactement comme
-Est vide
-N'est pas vide
-Auteur
-Titre
-Tous les champs
-Editeur
-Collection
-Sous collection
-Notes
-Note générale
-Note de contenu
-Catégories
-Indexation décimale
-Mots-clés
-Périodiques
-Périodiques
-Documents
-Propriétaire
-Support
-Cote
-Contient
-Recherches
-Historique des recherches
-Historique vide
-Etagère virtuelle
-Types
-Choisissez une recherche de l'historique
-Affiner la recherche
-Navigation libre : %s
+Nota de resumen
+Todas las notas
+Indexaciones
+Lengua de publicación
+Lengua original
+Document/publicación periódica/artículo
+Artículos
+Origen del registro
+Comentario de gestión
+Fecha de creación
+Ejemplares
+Códigos-barras
+Fecha de publicación del boletín
+Título de la publicación periódica
+Número de boletín
+Expresión booleana
+Contiene todas las palabras
+Contiene por lo menos una de las palabras
+Empieza por
+Acaba por
+Exactamente como
+Es vacío
+No está vacío
+Autor
+Título
+Todos los campos
+Editor
+Colección
+Subcolección
+Notas
+Nota general
+Nota de contenido
+Categorías
+Indexación decimal
+Palabras clave
+Publicaciones periódicas
+Publicaciones periódicas
+Documentos
+Propietario
+Soporte
+Calificación
+Contiene
+Búsquedas
+Histórico de las búsquedas
+Histórico vacío
+Estantería virtual
+Tipos
+Elija una búsqueda del histórico
+Afinar la búsqueda
+Navegación libre : %sISSN
-Afficher les prêts précédents
-Prêts précédents
-Les abonnés qui ont emprunté ce document ont également emprunté :
-Etat des collections
-Rechercher les bulletins
-par numéro
-par date
-La date saisie est invalide
-Aucun bulletin trouvé
+Visualizar los préstamos anteriores
+Préstamos anteriores
+Los usuarios que han pedido prestado este documento han pedido igualmente prestado :
+Estado de las colecciones
+Buscar los boletines
+por número
+por fecha
+La fecha introducida es inválida
+Ningún boletín encontradode
-à
-Collections rattachées
-Rang
-Interrogation externe
-Modifier les critères
-Interroger des sources externes
-Any language
-Lien électronique dans la notice
-Sources
-Recherches précédentes
-Aucune source n'est sélectionnée !
-Vous pouvez lancer une recherche portant sur un ou plusieurs mots ou <a href='%s'>faire une recherche multi-critère</a>
-
\ No hay ningún carácter de nueva lÃnea al final del fichero
+a
+Colecciones vinculadas
+Rango
+Consulta externa
+Modificar los criterios
+Consulta de las fuentes externas
+Cualquier lengua
+Enlace electrónico en el registro
+Fuentes
+Búsquedas anteriores
+Ninguna fuente seleccionada !
+Puede hacer una búsqueda que se refiere a unas o varias palabras o <a href='%s'>hacer una búsqueda multi-criterio</a>
+
diff -Nuar pmb.orig/tejuelo.php pmb/tejuelo.php
--- pmb.orig/tejuelo.php 2010-05-20 16:04:10.000000000 +0200
+++ pmb/tejuelo.php 2010-05-20 17:58:56.000000000 +0200
@@ -19,13 +19,13 @@
define(CONVERSION,(1/25.4));//Conversión inch/mm
define(COLS_PER_PAGE, 3); // Nº columnas por página
define(ROWS_PER_PAGE, 8); // Nº filas por página
-define(BARCODE_HEIGHT, 50); // en pixels
-define(BARCODE_WIDTH, 170); // en pixels
+define(BARCODE_HEIGHT, 54); // en pixels
+define(BARCODE_WIDTH, 175); // en pixels
define(ALIGN, 'C');
-define(LABEL_WIDTH, (70*CONVERSION)); // en mm
-define(LABEL_HEIGHT, (35*CONVERSION)); // en mm
-define(H_MARGIN, (0*CONVERSION)); // horizontal (izquierda y derecha) margenes de la pagina, en mm
-define(V_MARGIN, (10*CONBERSION)); // vertical (top & bottom) margins of page, in mm
+define(LABEL_WIDTH, (70.8*CONVERSION)); // en mm
+define(LABEL_HEIGHT, (36.5*CONVERSION)); // en mm
+define(H_MARGIN, (7*CONVERSION)); // horizontal (izquierda y derecha) margenes de la pagina, en mm
+define(V_MARGIN, (12*CONVERSION)); // vertical (top & bottom) margins of page, in mm
//define(SPACE_BETWEEN_LABELS, ($parametros["SPACE_BETWEEN_LABELS"])*CONVERSION); // espacio horizontal entre etiquetas
//define(SPACE_BETWEEN_LABELS_VERTICAL, ($parametros["SPACE_BETWEEN_LABELS_VERTICAL"])*CONVERSION); // espacio vertical entre etiquetas
@@ -39,6 +39,10 @@
}
+function str_squeeze($test) {
+ return trim(ereg_replace( ' +', '', $test));
+}
+
$codigos=$_GET['codigos'];
//$codigos=str_replace(" ", "", $codigos);
@@ -57,45 +61,74 @@
$base_noheader = 1;
require_once ("$base_path/includes/init.inc.php");
-if((strpos($codigos, ",")!== false)){
-$aux=explode(",",$codigos);
+$codigos=str_squeeze($codigos);
+
+if((strpos($codigos, ",")!== false)) $aux=explode(",",$codigos);
+else $aux=$codigos;
+require("$base_path/includes/db_param.inc.php");
+
+$link2 = @mysql_connect(SQL_SERVER, USER_NAME, USER_PASS) OR die("Error MySQL");
+
+
+if (is_array($aux)) {
+ foreach ($aux as $codi) {
+ if(strpos($codi, "-") === false && strlen($codi) <= 9 ){
+ if (is_numeric($codi)) $matriz[]= (int) $codi;
+ else $matriz[]= $codi;
+ }
+ else if (strpos($codi, "-") !== false) {
+ $aux2=explode("-",$codi);
+ if ( is_numeric($aux2[0]) && is_numeric($aux2[1]) ) {
+ $aux2[0]= (int) $aux2[0];
+ $aux2[1]= (int) $aux2[1];
+ while($aux2[0] <= $aux2[1]){
+ if (strlen($aux2[0]) <= 9) $matriz[] = (int) $aux2[0];
+ $aux2[0]++;
+ }
+ }
+ }
-foreach ($aux as $codi) {
- if(strpos($codi, "-")=== false && is_numeric($codi) && strlen($codi) <= 9 ){
- $codi= (int) trim(strtr($codi, " ", ""));
- $matriz[]= $codi;
}
- else if (strpos($codi, "-")!== false) {
- $aux2=explode("-",$codi);
- if ( is_numeric($aux2[0]) && is_numeric($aux2[1]) ) {
- $aux2[0]= (int) trim(strtr($aux2[0], " ", ""));
- $aux2[1]= (int) trim(strtr($aux2[1], " ", ""));
- while($aux2[0] <= $aux2[1]){
- $matriz[] = $aux2[0];
- $aux2[0]++;
- }
- }
- }
-
- }
-}
-else if ( strpos($codigos, ",") === false && is_numeric($codigos) ) {
- $codi= (int) trim(strtr($codigos, " ", ""));
- $matriz[]=$codi;
-
}
+elseif ($aux === "*"){
+ $q ='SELECT expl_cb FROM exemplaires';
-$num = count($matriz);
+ $resultData = @mysql_query($q, $link2);
+ if (@mysql_num_rows($resultData) != 0) {
-$numRows = ceil($num/COLS_PER_PAGE);
+ while ($rowData = mysql_fetch_array($resultData)) {
+ if (strlen($rowData['expl_cb']) <= 9) $matriz[]= $rowData['expl_cb'];
+ }
+ }
+ mysql_free_result($resultData);
+}
+else {
+ if(strpos($aux, "-") === false && strlen($aux) <= 9 ){
+ if (is_numeric($aux)) $matriz[]= (int) $aux;
+ else $matriz[]= $aux;
+ }
+ else if (strpos($aux, "-") !== false) {
+ $aux2=explode("-",$aux);
+ if ( is_numeric($aux2[0]) && is_numeric($aux2[1]) ) {
+ $aux2[0]= (int) $aux2[0];
+ $aux2[1]= (int) $aux2[1];
+ while($aux2[0] <= $aux2[1]){
+ if (strlen($aux2[0]) <= 9) $matriz[] = (int) $aux2[0];
+ $aux2[0]++;
+ }
+ }
+ }
+}
+
+$size = count($matriz);
//Determinamos margenes de los barcode
$barcode_h_margin = ((LABEL_WIDTH-(BARCODE_WIDTH/72))/2);
$barcode_v_margin = ((LABEL_HEIGHT-(BARCODE_HEIGHT/72))/2);
// Creamos objeto PDF
-$pdf=new FPDF('P','in','Letter');
+$pdf=new FPDF('P','in','A4');
// Metadata
$pdf->SetAuthor('Lliurex');
@@ -114,91 +147,90 @@
$pdf->SetAutoPageBreak(false);
$pdf->AddFont('barcode', '', "barcode.php");
$y = V_MARGIN; //Esta variable sigue la posición y (vertical)
+$x = H_MARGIN; // Nueva fila, reseteamos x-position
-// Creamos un contador
-$counter = 0;
-require("$base_path/includes/db_param.inc.php");
-$link2 = @mysql_connect(SQL_SERVER, USER_NAME, USER_PASS) OR die("Error MySQL");
-$parar=false;
+$new_row=1;
+$new_col=1;
-for ($i=0; $i<($num/3); $i++)
-{
-
- // Esta variable sigue la posición x (horizontal)
- $x = H_MARGIN; // Nueva fila, reseteamos x-position
-
- if ( ($i%ROWS_PER_PAGE==0) && ($i!=0) ) // Nueva fila, reseteamos x-position
- {
- // Creamos una nueva pagina
- $pdf->AddPage();
- $pdf->SetMargins(H_MARGIN, V_MARGIN);
- $pdf->SetAutoPageBreak(false);
- $y = V_MARGIN;
- } else {
- $pdf->SetY($y);
+foreach ($matriz as $exe_cote) {
+
+ if (is_numeric($exe_cote)) {
+ $q ='SELECT expl_cote, expl_cb FROM exemplaires WHERE expl_cb='.f_rellena_ceros($exe_cote).'';
+ }else {
+ $q ='SELECT expl_cote, expl_cb FROM exemplaires WHERE expl_cb=\''.$exe_cote.'\'';
}
-
- for ($j=1; $j<=COLS_PER_PAGE; $j++)
- {
- $pdf->SetX($x);
- if (($counter+1) <= $num) // Si la fila actual es mayor que el nº de filas por pagina
- {
-
+ //if ((strlen($exe_cote)==9) || $all == true){
+ $resultData = @mysql_query($q, $link2);
+ if (@mysql_num_rows($resultData) != 0) {
- /////////////////////////////////////////////////////////////
- $matriz[$counter]=f_rellena_ceros($matriz[$counter]);
- if ((strlen($matriz[$counter])==9)){
- $q ='SELECT expl_cote FROM exemplaires WHERE expl_cb='.$matriz[$counter].'';
-
- $resultData = @mysql_query($q, $link2);
-
- //Recuperamos los datos de cada solicitud confirmada
-
- while ($rowData = mysql_fetch_array($resultData))
- {
-
- //dato cote
- if ((mysql_result($resultData,0,0))!=NULL){
-
- $cote=$rowData['expl_cote'];
- ;
- }
- else{
- $cote= 0;
- $matriz[$counter]= 0;
- }
+ //Recuperamos los datos de cada solicitud confirmada
-
+ while ($rowData = mysql_fetch_array($resultData)) {
- }
- /////////////////////////////////////////////////////////////
- $matriz2=explode(" ",$cote);
- $pdf->SetFont('Arial','B',10);
- $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[0],0, 0,'C');
- $pdf->Ln();
- $pdf->SetX($x);
- $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[1],0, 0,'C');
- $pdf->setFont('barcode',"",20);
- $pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),"*".$matriz[$counter]."*",0, 0,'R');
- $pdf->SetFont('Arial','B',10);
- $pdf->Ln();
- $pdf->SetX($x);
- $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[2],0, 0,'C');
- $pdf->Cell(LABEL_WIDTH-0.8, ($barcode_v_margin*1),$matriz[$counter],0, 0,'C');
-
- } //else $parar=true;
-// Reset height
- $pdf->SetY($y);
+ //dato cote
+ $cote=$rowData['expl_cote'];
+ if (is_numeric($exe_cote)) {
+ if (is_numeric($rowData['expl_cb'])) {
+ if ((int) $exe_cote === (int) $rowData['expl_cb']) $cb=(int)$rowData['expl_cb'];
+ else continue;
+ } else continue;
+ } else $cb=$rowData['expl_cb'];
+
+ if ($new_row > 8) // Nueva pagina, reseteamos x-position
+ {
+ // Creamos una nueva pagina
+ $pdf->AddPage();
+ $pdf->SetMargins(H_MARGIN, V_MARGIN);
+ $pdf->SetAutoPageBreak(false);
+ $y = V_MARGIN;
+ $x = H_MARGIN;
+ $new_row=1;
+ $new_col=1;
+ }
+
+ $matriz2=explode(" ",$cote);
+ $pdf->SetFont('Arial','B',10);
+ $pdf->SetY($y);
+ $pdf->SetX($x);
+ if (strlen($matriz2[0])>6) $align="";
+ else $align="C";
+ $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[0],"LT", 0, $align);
+ $pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),"","TR", 0,'C');
+ $pdf->Ln();
+ $pdf->SetX($x);
+ $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[1],"L", 0,'C');
+ $pdf->setFont('barcode',"",25);
+ $pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),"*".f_rellena_ceros($cb)."*","R", 0,'C');
+ $pdf->SetFont('Arial','B',10);
+ $pdf->Ln();
+ $pdf->SetX($x);
+ $pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[2],"LB", 0,'C');
+ $pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),f_rellena_ceros($cb),"BR", 0,'C');
+
+ if (($new_col%COLS_PER_PAGE)==0) {
+ $x = H_MARGIN;
+ $y += LABEL_HEIGHT-0.03;
+ $new_row++;
+ $new_col=1;
+ } else {
+ $new_col++;
+ $x += LABEL_WIDTH-0.10;
+ }
+
+
}
- $counter++;
- $x += LABEL_WIDTH; // Se suma la distancia horizontal entre etiquetas
- }
- $y += LABEL_HEIGHT; // Se suma la distancia vertical entre etiquetas
+ @mysql_free_result($resultData);
+
+ }else continue;
+ //} else continue;
+
}
+
+
// Desconexión de la Base de Datos
mysql_close();