bugfix for 2451 : serial recieve & barcode does exist complaint
authorPaul POULAIN <paul.poulain@biblibre.com>
Mon, 4 Aug 2008 13:31:07 +0000 (15:31 +0200)
committerJoshua Ferraro <jmf@liblime.com>
Mon, 4 Aug 2008 13:43:20 +0000 (08:43 -0500)
Signed-off-by: Joshua Ferraro <jmf@liblime.com>
serials/serials-edit.pl

index d54912e..8cefe5d 100755 (executable)
@@ -241,7 +241,10 @@ if ($op eq 'serialchangestatus') {
   #           push @errors,"barcode_not_unique" if($exists);
             $template->param("barcode_not_unique" => 1,'errserialseq'=>$serialseqs[$index]);
             # if barcode exists, don't create, but report The problem.
-                       unless ($exists){
+                       if ($exists){
+              $url_error_str = "rcv_error=barcode_not_unique&rcv_error_param=$serialseqs[$index]";
+              $template->param("barcode_not_unique" => 1,'errserialseq'=>$serialseqs[$index]);
+            } else {
               my ($biblionumber,$bibitemnum,$itemnumber) = AddItemFromMarc($record,$itemhash{$item}->{'bibnum'});
               AddItem2Serial($itemhash{$item}->{'serial'},$itemnumber);
             }