$line{barcode}=$items[$i]->{'barcode'};
$line{itemnumber}=$items[$i]->{'itemnumber'};
$line{biblionumber}=$data->{'biblionumber'};
$line{barcode}=$items[$i]->{'barcode'};
$line{itemnumber}=$items[$i]->{'itemnumber'};
$line{biblionumber}=$data->{'biblionumber'};