bulkmarcimport.pl Bug Fix matching biblios enhanced

matching biblios is now also getting biblioitemnumber so that Items management can be performed

diff --git a/misc/migration_tools/bulkmarcimport.pl b/misc/migration_tools/bulkmarcimport.pl
index e4f7dba..2e583c8 100755 (executable)
--- a/misc/migration_tools/bulkmarcimport.pl
+++ b/misc/migration_tools/bulkmarcimport.pl
@@ -354,7 +354,11 @@ RECORD: while (  ) {
                          }
                        }
                                        # create biblio, unless we already have it ( either match or isbn )
-            unless ($biblionumber) {
+            if ($biblionumber) {
+                               eval{$biblioitemnumber=GetBiblioData($biblionumber)->{biblioitemnumber};}
+                       }
+                       else 
+                       {
                 eval { ( $biblionumber, $biblioitemnumber ) = AddBiblio($record, '', { defer_marc_save => 1 }) };
             }
             if ( $@ ) {