Bug 21205: (follow-up) Fix column name - itemnumbers -> itemnumber

Signed-off-by: Josef Moravec <josef.moravec@gmail.com>

Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>

Signed-off-by: Nick Clemens <nick@bywatersolutions.com>

diff --git a/acqui/orderreceive.pl b/acqui/orderreceive.pl
index fd49e6d..1db00d3 100755 (executable)
--- a/acqui/orderreceive.pl
+++ b/acqui/orderreceive.pl
@@ -130,7 +130,7 @@ if ($AcqCreateItem eq 'receiving') {
     );
 } elsif ($AcqCreateItem eq 'ordering') {
     my $fw = ($acq_fw) ? 'ACQ' : '';
-    my @itemnumbers = $order_object->items->get_column('itemnumbers');
+    my @itemnumbers = $order_object->items->get_column('itemnumber');
     my @items;
     foreach (@itemnumbers) {
         my $item = GetItem($_); # FIXME We do not need this call, we already have the Koha::Items

diff --git a/acqui/parcel.pl b/acqui/parcel.pl
index da0b4cf..da06003 100755 (executable)
--- a/acqui/parcel.pl
+++ b/acqui/parcel.pl
@@ -140,7 +140,7 @@ for my $order ( @orders ) {
 
     my %line = %{ $order };
     $line{invoice} = $invoice->{invoicenumber};
-    my @itemnumbers = $order_object->items->get_column('itemnumbers');
+    my @itemnumbers = $order_object->items->get_column('itemnumber');
     my $biblio = Koha::Biblios->find( $line{biblionumber} );
     $line{total_holds} = $biblio ? $biblio->holds->count : 0;
     $line{item_holds} = $biblio ? $biblio->current_holds->search(
@@ -247,7 +247,7 @@ unless( defined $invoice->{closedate} ) {
         my $cnt_subscriptions = $biblio ? $biblio->subscriptions->count: 0;
         my $itemcount   = $biblio ? $biblio->items->count : 0;
         my $holds_count = $biblio ? $biblio->holds->count : 0;
-        my @itemnumbers = $order_object->items->get_column('itemnumbers');
+        my @itemnumbers = $order_object->items->get_column('itemnumber');
         my $itemholds = $biblio ? $biblio->holds->search({ itemnumber => { -in => \@itemnumbers } })->count : 0;
 
         my $suggestion   = GetSuggestionInfoFromBiblionumber($line{biblionumber});