(bug #3688) add index for acqdate in unimarc and fix maintenance script

This patch add the support of acqdate in unimarc, and fix maintenance script for brokend records.

diff --git a/etc/zebradb/marc_defs/unimarc/biblios/record.abs b/etc/zebradb/marc_defs/unimarc/biblios/record.abs
index ac7c069..6188c6a 100644 (file)
--- a/etc/zebradb/marc_defs/unimarc/biblios/record.abs
+++ b/etc/zebradb/marc_defs/unimarc/biblios/record.abs
@@ -24,7 +24,7 @@ all any
 melm 001        Local-number,Local-number:n
 # Local-number (biblionumber can be either in 090$9 or, on some setup, on 001)
 melm 090$9      Local-number,Local-number:n
-melm 099$c      date-entered-on-file:s,date-entered-on-file:n,date-entered-on-file:y
+melm 099$c      date-entered-on-file:s,date-entered-on-file:n,date-entered-on-file:y,Date-of-acquisition,Date-of-acquisition:d,Date-of-acquisition:s
 melm 099$d      Date/time-last-modified:s,Date/time-last-modified:n,Date/time-last-modified:y
 
 

diff --git a/misc/maintenance/UNIMARC_sync_date_created_with_marc_biblio.pl b/misc/maintenance/UNIMARC_sync_date_created_with_marc_biblio.pl
index 3aef5c6..43b5550 100755 (executable)
--- a/misc/maintenance/UNIMARC_sync_date_created_with_marc_biblio.pl
+++ b/misc/maintenance/UNIMARC_sync_date_created_with_marc_biblio.pl
@@ -20,6 +20,8 @@ sub updateMarc {
     my $field;
     my $biblio = GetMarcBiblio($id);
 
+    return unless $biblio;
+
     if(!$biblio->field('099'))
     {
         $field = new MARC::Field('099','','',