From: dbs <dbs@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Mon, 1 Dec 2008 19:43:10 +0000 (+0000)
Subject: Backport r11369 from trunk to handle the clean schema import scenario
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=ee7ad62883f5d732bbb26dd0dc374f5f2305e292;p=Evergreen.git

Backport r11369 from trunk to handle the clean schema import scenario


git-svn-id: svn://svn.open-ils.org/ILS/branches/rel_1_4@11370 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/Open-ILS/src/extras/import/marc2bre.pl b/Open-ILS/src/extras/import/marc2bre.pl
index c8663e3e95..7b90dab1c7 100755
--- a/Open-ILS/src/extras/import/marc2bre.pl
+++ b/Open-ILS/src/extras/import/marc2bre.pl
@@ -93,6 +93,12 @@ if (!$recid) {
 	$sth->fetch;
 	$sth->finish;
 	$dbh->disconnect;
+
+	# In a clean Evergreen schema, the maximum ID will be -1; but sequences
+	# have to start at 1, so handle the clean Evergreen schema situation
+	if ($recid == 0) {
+		$recid = 1;
+	}
 }
 
 my %tcn_source_map = (