| Lines 291-307
          subtest 'transferbook test from branch' => sub {
      
      
        Link Here | 
        
          | 291 |         barcode   => $item->barcode, | 291 |         barcode   => $item->barcode, | 
        
          | 292 |         trigger => "Manual" | 292 |         trigger => "Manual" | 
        
          | 293 |     }); | 293 |     }); | 
          
            
              | 294 |     my ($datesent,$from_branch,$to_branch) = GetTransfers($item->itemnumber); | 294 |     my $transfer = $item->get_transfer; | 
            
              | 295 |     is( $from_branch, $library->branchcode, 'The transfer is initiated from the specified branch, not the items home or holdingbranch'); | 295 |     is( $transfer->frombranch, $library->branchcode, 'The transfer is initiated from the specified branch, not the items home or holdingbranch'); | 
            
              | 296 |     is( $to_branch, $item->homebranch, 'The transfer is initiated to the specified branch'); | 296 |     is( $transfer->tobranch, $item->homebranch, 'The transfer is initiated to the specified branch'); | 
        
          | 297 |     C4::Circulation::transferbook({ | 297 |     C4::Circulation::transferbook({ | 
        
          | 298 |         from_branch => $item->homebranch, | 298 |         from_branch => $item->homebranch, | 
        
          | 299 |         to_branch => $library->branchcode, | 299 |         to_branch => $library->branchcode, | 
        
          | 300 |         barcode   => $item->barcode, | 300 |         barcode   => $item->barcode, | 
        
          | 301 |         trigger => "Manual" | 301 |         trigger => "Manual" | 
        
          | 302 |     }); | 302 |     }); | 
          
            
              | 303 |     ($datesent,$from_branch,$to_branch) = GetTransfers($item->itemnumber); | 303 |     $transfer = $item->get_transfer; | 
            
              | 304 |     is( $from_branch, $item->homebranch, 'The transfer is initiated from the specified branch'); | 304 |     is( $transfer->frombranch, $item->homebranch, 'The transfer is initiated from the specified branch'); | 
            
              | 305 |     is( $to_branch, $library->branchcode, 'The transfer is initiated to the specified branch'); | 305 |     is( $transfer->tobranch, $library->branchcode, 'The transfer is initiated to the specified branch'); | 
        
          | 306 |  | 306 |  | 
        
          | 307 | }; | 307 | }; | 
            
              | 308 | -  |  |  |