diff --git a/C4/ImportBatch.pm b/C4/ImportBatch.pm index c34a2c0f9d..22645ff48d 100644 --- a/C4/ImportBatch.pm +++ b/C4/ImportBatch.pm @@ -1057,18 +1057,18 @@ sub GetImportBatchRangeDesc { =cut sub GetItemNumbersFromImportBatch { - my ($batch_id) = @_; - my $dbh = C4::Context->dbh; - my $sth = $dbh->prepare("SELECT items.itemnumber FROM import_batches,import_records,import_items, items WHERE import_batches.import_batch_id=import_records.import_batch_id AND import_records.import_record_id=import_items.import_record_id AND items.itemnumber=import_items.itemnumber AND import_batches.import_batch_id=?"); - $sth->execute($batch_id); - my @items ; - while ( my ($itm) = $sth->fetchrow_array ) { - push @items, $itm; - } - return @items; + my ($batch_id) = @_; + my $dbh = C4::Context->dbh; + my $sth = $dbh->prepare("SELECT items.itemnumber FROM import_batches,import_records,import_items, items WHERE import_batches.import_batch_id=import_records.import_batch_id AND import_records.import_record_id=import_items.import_record_id AND items.itemnumber=import_items.itemnumber AND import_batches.import_batch_id=?"); + $sth->execute($batch_id); + my @items ; + while ( my ($itm) = $sth->fetchrow_array ) { + push @items, $itm; + } + return @items; } -=head2 GetNumberOfImportBatches +=head2 GetNumberOfImportBatches my $count = GetNumberOfImportBatches();