# and put it in the MARC::Record of the item
#
my $items = Koha::Items->({ onloan => { '!=' => undef } });
my $items = Koha::Items->search({ onloan => { '!=' => undef } });
$|=1;
while ( my $item = $items->next ) {
-