| Lines 388-405
          sub order_line {
      
      
        Link Here | 
        
          | 388 |         foreach my $item (@linked_itemnumbers) { | 388 |         foreach my $item (@linked_itemnumbers) { | 
        
          | 389 |             my $i_obj = $schema->resultset('Item')->find( $item->itemnumber ); | 389 |             my $i_obj = $schema->resultset('Item')->find( $item->itemnumber ); | 
        
          | 390 |             if ( defined $i_obj ) { | 390 |             if ( defined $i_obj ) { | 
          
            
              | 391 |                 push @items, $i_obj; | 391 |                 push @items, { | 
            
              |  |  | 392 |                     branchcode     => $item->{branchcode}, | 
            
              | 393 |                     itype          => $item->{itype}, | 
            
              | 394 |                     location       => $item->{location}, | 
            
              | 395 |                     itemcallnumber => $item->{itemcallnumber}, | 
            
              | 396 |                 }; | 
        
          | 392 |             } | 397 |             } | 
        
          | 393 |         } | 398 |         } | 
        
          | 394 |     } | 399 |     } | 
        
          | 395 |     else { | 400 |     else { | 
        
          | 396 |         my $item_hash = { | 401 |         my $item_hash = { | 
          
            
              | 397 |             itemtype  => $biblioitem->itemtype, | 402 |             itemtype       => $biblioitem->itemtype, | 
            
              | 398 |             shelfmark => $biblioitem->cn_class, | 403 |             itemcallnumber => $biblioitem->cn_class, | 
        
          | 399 |         }; | 404 |         }; | 
        
          | 400 |         my $branch = $orderline->basketno->deliveryplace; | 405 |         my $branch = $orderline->basketno->deliveryplace; | 
        
          | 401 |         if ($branch) { | 406 |         if ($branch) { | 
          
            
              | 402 |             $item_hash->{branch} = $branch; | 407 |             $item_hash->{branchcode} = $branch; | 
        
          | 403 |         } | 408 |         } | 
        
          | 404 |         for ( 1 .. $orderline->quantity ) { | 409 |         for ( 1 .. $orderline->quantity ) { | 
        
          | 405 |             push @items, $item_hash; | 410 |             push @items, $item_hash; | 
  
    | Lines 412-421
          sub order_line {
      
      
        Link Here | 
        
          | 412 |     for my $item (@items) { | 417 |     for my $item (@items) { | 
        
          | 413 |         push @{$item_fields}, | 418 |         push @{$item_fields}, | 
        
          | 414 |           { | 419 |           { | 
          
            
              | 415 |             branchcode     => $item->homebranch->branchcode, | 420 |             branchcode     => $item->{branchcode}, | 
            
              | 416 |             itype          => $item->itype, | 421 |             itype          => $item->{itype}, | 
            
              | 417 |             location       => $item->location, | 422 |             location       => $item->{location}, | 
            
              | 418 |             itemcallnumber => $item->itemcallnumber, | 423 |             itemcallnumber => $item->{itemcallnumber}, | 
        
          | 419 |           }; | 424 |           }; | 
        
          | 420 |     } | 425 |     } | 
        
          | 421 |     $self->add_seg( | 426 |     $self->add_seg( | 
            
              | 422 | -  |  |  |