| Lines 333-345
          sub import_batches_list {
      
      
        Link Here | 
        
          | 333 |             # check if there is at least 1 line still staged | 333 |             # check if there is at least 1 line still staged | 
        
          | 334 |             my $stagedList=GetImportRecordsRange($batch->{'import_batch_id'}, undef, undef, 'staged'); | 334 |             my $stagedList=GetImportRecordsRange($batch->{'import_batch_id'}, undef, undef, 'staged'); | 
        
          | 335 |             if (scalar @$stagedList) { | 335 |             if (scalar @$stagedList) { | 
            
              | 336 |                 my ($staged_date, $staged_hour) = split (/ /, $batch->{'upload_timestamp'}); |  |  | 
        
          | 337 |                 push @list, { | 336 |                 push @list, { | 
        
          | 338 |                         import_batch_id => $batch->{'import_batch_id'}, | 337 |                         import_batch_id => $batch->{'import_batch_id'}, | 
        
          | 339 |                         num_biblios => $batch->{'num_biblios'}, | 338 |                         num_biblios => $batch->{'num_biblios'}, | 
        
          | 340 |                         num_items => $batch->{'num_items'}, | 339 |                         num_items => $batch->{'num_items'}, | 
          
            
              | 341 |                         staged_date => $staged_date, | 340 |                         staged_date => $batch->{'upload_timestamp'}, | 
            
              | 342 |                         staged_hour => $staged_hour, |  |  | 
        
          | 343 |                         import_status => $batch->{'import_status'}, | 341 |                         import_status => $batch->{'import_status'}, | 
        
          | 344 |                         file_name => $batch->{'file_name'}, | 342 |                         file_name => $batch->{'file_name'}, | 
        
          | 345 |                         comments => $batch->{'comments'}, | 343 |                         comments => $batch->{'comments'}, |