View | Details | Raw Unified | Return to bug 34529
Collapse All | Expand All

(-)a/C4/Circulation.pm (-1 / +3 lines)
Lines 4104-4109 sub ProcessOfflineIssue { Link Here
4104 
    my $operation = shift;
 4104 
    my $operation = shift;
4105 

          4105
          

        

        

          4106
          
    my $patron = Koha::Patrons->find( { cardnumber => $operation->{cardnumber} } );

          4106
          
    my $patron = Koha::Patrons->find( { cardnumber => $operation->{cardnumber} } );

        

            

              
              
              4107
              
    $patron ||= Koha::Patrons->find( { userid => $operation->{cardnumber} } );

            

        

          4107
          

          4108
          

        

        

          4108
          
    if ( $patron ) {

          4109
          
    if ( $patron ) {

        

        

          4109
          
        my $item = Koha::Items->find({ barcode => $operation->{barcode} });

          4110
          
        my $item = Koha::Items->find({ barcode => $operation->{barcode} });

        

  

    
      
            Lines 4137-4143
          sub ProcessOfflineIssue {
      
      
        Link Here
      
    
  

        

          4137
          
sub ProcessOfflinePayment {

          4138
          
sub ProcessOfflinePayment {

        

        

          4138
          
    my $operation = shift;

          4139
          
    my $operation = shift;

        

        

          4139
          

          4140
          

        

          
            

              4140
              
    my $patron = Koha::Patrons->find({ cardnumber => $operation->{cardnumber} });


              4141
              
    my $patron = Koha::Patrons->find( { cardnumber => $operation->{cardnumber} } );

            

            

              
              

              4142
              
    $patron ||= Koha::Patrons->find( { userid => $operation->{cardnumber} } );

            

        

          4141
          

          4143
          

        

        

          4142
          
    $patron->account->pay(

          4144
          
    $patron->account->pay(

        

        

          4143
          
        {

          4145
          
        {

        



(-)a/offline_circ/list.pl
      (-2 / +7 lines)




  

    
      
            Lines 48-54
          for (@$operations) {
      
      
        Link Here
      
    
  

        

          48
          
        $_->{'bibliotitle'}    = $biblio->title;

          48
          
        $_->{'bibliotitle'}    = $biblio->title;

        

        

          49
          
        $_->{'biblionumber'}   = $biblio->biblionumber;

          49
          
        $_->{'biblionumber'}   = $biblio->biblionumber;

        

        

          50
          
    }

          50
          
    }

        

          
            

              51
              
    my $patron             = $_->{cardnumber} ? Koha::Patrons->find( { cardnumber => $_->{cardnumber} } ) : undef;


              51
              

            

            

              
              

              52
              
    my $patron =

            

            


              53
              
        $_->{cardnumber}

            

            


              54
              
        ? Koha::Patrons->find( { cardnumber => $_->{cardnumber} } )

            

            


              55
              
        || Koha::Patrons->find( { userid => $_->{cardnumber} } )

            

            


              56
              
        : undef;

            

            


              57
              

            

        

          52
          
    if ($patron) {

          58
          
    if ($patron) {

        

        

          53
          
        $_->{'borrowernumber'} = $patron->borrowernumber;

          59
          
        $_->{'borrowernumber'} = $patron->borrowernumber;

        

        

          54
          
        $_->{'borrower'}       = ($patron->firstname ? $patron->firstname:'').' '.$patron->surname;

          60
          
        $_->{'borrower'}       = ($patron->firstname ? $patron->firstname:'').' '.$patron->surname;

        

            

              55
              
- 

              
              
            






  

  Return to bug 34529