View | Details | Raw Unified | Return to bug 21184
Collapse All | Expand All

(-)a/C4/Items.pm (-20 lines)
Lines 75-81 BEGIN { Link Here
75
	GetHostItemsInfo
75
	GetHostItemsInfo
76
        GetItemnumbersForBiblio
76
        GetItemnumbersForBiblio
77
	get_hostitemnumbers_of
77
	get_hostitemnumbers_of
78
        GetBarcodeFromItemnumber
79
        GetHiddenItemnumbers
78
        GetHiddenItemnumbers
80
        ItemSafeToDelete
79
        ItemSafeToDelete
81
        DelItemCheck
80
        DelItemCheck
Lines 1359-1382 sub get_hostitemnumbers_of { Link Here
1359
    return @returnhostitemnumbers;
1358
    return @returnhostitemnumbers;
1360
}
1359
}
1361
1360
1362
1363
=head2 GetBarcodeFromItemnumber
1364
1365
  $result = GetBarcodeFromItemnumber($itemnumber);
1366
1367
=cut
1368
1369
sub GetBarcodeFromItemnumber {
1370
    my ($itemnumber) = @_;
1371
    my $dbh = C4::Context->dbh;
1372
1373
    my $rq =
1374
      $dbh->prepare("SELECT barcode FROM items WHERE items.itemnumber=?");
1375
    $rq->execute($itemnumber);
1376
    my ($result) = $rq->fetchrow;
1377
    return ($result);
1378
}
1379
1380
=head2 GetHiddenItemnumbers
1361
=head2 GetHiddenItemnumbers
1381
1362
1382
    my @itemnumbers_to_hide = GetHiddenItemnumbers(@items);
1363
    my @itemnumbers_to_hide = GetHiddenItemnumbers(@items);
1383
- 

Return to bug 21184