Bug 18611 - Followup, remove tabs to make qa tools happy
Signed-off-by: Josef Moravec <josef.moravec@gmail.com>
Signed-off-by: Marcel de Rooy <m.de.rooy@rijksmuseum.nl>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
(cherry picked from commit 092f02d227)
Signed-off-by: Katrin Fischer <katrin.fischer.83@web.de>
This commit is contained in:
parent
ed4946ad40
commit
fac99c82cc
|
|
@ -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();
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue