| 
      
            Lines 120-125
          for my $date ( qw(startdate enddate firstacquidate histstartdate histenddate) )
      
      
        Link Here
      
     | 
  
        
          | 120 | 
          my $av = Koha::AuthorisedValues->search({ category => 'LOC', authorised_value => $subs->{location} }); | 
          120 | 
          my $av = Koha::AuthorisedValues->search({ category => 'LOC', authorised_value => $subs->{location} }); | 
        
        
          | 121 | 
          $subs->{location} = $av->count ? $av->next->lib : ''; | 
          121 | 
          $subs->{location} = $av->count ? $av->next->lib : ''; | 
        
        
          | 122 | 
          $subs->{abouttoexpire}  = abouttoexpire($subs->{subscriptionid}); | 
          122 | 
          $subs->{abouttoexpire}  = abouttoexpire($subs->{subscriptionid}); | 
        
            
               | 
               | 
              123 | 
              $subs->{has_expired_already}  = dt_from_string($subs->{enddate})->compare(dt_from_string); | 
            
        
          | 123 | 
          $template->param(%{ $subs }); | 
          124 | 
          $template->param(%{ $subs }); | 
        
        
          | 124 | 
          $template->param(biblionumber_for_new_subscription => $subs->{bibnum}); | 
          125 | 
          $template->param(biblionumber_for_new_subscription => $subs->{bibnum}); | 
        
        
          | 125 | 
          my @irregular_issues = split /;/, $subs->{irregularity}; | 
          126 | 
          my @irregular_issues = split /;/, $subs->{irregularity}; | 
        
            
              | 126 | 
              -   | 
               | 
               |