| Lines 405-418
          sub PrepareSerialsData {
      
      
        Link Here | 
        
          | 405 |     my $first; | 405 |     my $first; | 
        
          | 406 |     my $previousnote = ""; | 406 |     my $previousnote = ""; | 
        
          | 407 |  | 407 |  | 
          
            
              | 408 |     foreach my $subs (@$lines) { | 408 |     foreach my $subs (@{$lines}) { | 
            
              | 409 |         $subs->{'publisheddate'} = ( | 409 |         for my $datefield ( qw(publisheddate planneddate) ) { | 
            
              | 410 |             $subs->{'publisheddate'} | 410 |             # handle both undef and undef returned as 0000-00-00 | 
            
              | 411 |             ? format_date( $subs->{'publisheddate'} ) | 411 |             if (!defined $subs->{$datefield} or $subs->{$datefield}=~m/^00/) { | 
            
              | 412 |             : "XXX" | 412 |                 $subs->{$datefield} = 'XXX'; | 
            
              | 413 |         ); | 413 |             } | 
            
              |  |  | 414 |             else { | 
            
              | 415 |                 $subs->{$datefield} = format_date( $subs->{$datefield}  ); | 
            
              | 416 |             } | 
            
              | 417 |         } | 
        
          | 414 |         $subs->{'branchname'} = GetBranchName( $subs->{'branchcode'} ); | 418 |         $subs->{'branchname'} = GetBranchName( $subs->{'branchcode'} ); | 
            
              | 415 |         $subs->{'planneddate'}                  = format_date( $subs->{'planneddate'} ); |  |  | 
        
          | 416 |         $subs->{ "status" . $subs->{'status'} } = 1; | 419 |         $subs->{ "status" . $subs->{'status'} } = 1; | 
        
          | 417 |         $subs->{"checked"}                      = $subs->{'status'} =~ /1|3|4|7/; | 420 |         $subs->{"checked"}                      = $subs->{'status'} =~ /1|3|4|7/; | 
        
          | 418 |  | 421 |  | 
            
              | 419 | -  |  |  |