| Lines 23-29
          use CGI qw ( -utf8 );
      
      
        Link Here | 
        
          | 23 |  | 23 |  | 
        
          | 24 | use C4::Auth; | 24 | use C4::Auth; | 
        
          | 25 | use C4::Output; | 25 | use C4::Output; | 
            
              | 26 | use C4::Context; |  |  | 
        
          | 27 |  | 26 |  | 
        
          | 28 | use Koha::Biblios; | 27 | use Koha::Biblios; | 
        
          | 29 | use Koha::Patrons; | 28 | use Koha::Patrons; | 
  
    | Lines 40-46
          my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
      
      
        Link Here | 
        
          | 40 |  | 39 |  | 
        
          | 41 | my $action = $cgi->param('action') || q{}; | 40 | my $action = $cgi->param('action') || q{}; | 
        
          | 42 | my $biblionumber = $cgi->param('biblionumber'); | 41 | my $biblionumber = $cgi->param('biblionumber'); | 
            
              | 43 | my $homebranch = C4::Context->userenv->{'branch'} || ""; |  |  | 
        
          | 44 |  | 42 |  | 
        
          | 45 | if ( $action eq 'create' ) { | 43 | if ( $action eq 'create' ) { | 
        
          | 46 |     my $branchcode = $cgi->param('branchcode'); | 44 |     my $branchcode = $cgi->param('branchcode'); | 
            
              | 47 | -  |  |  |