Lines 395-400
if (defined $input->param('CSVexport') && $input->param('CSVexport') eq 'on'){
Link Here
|
395 |
push @line, "change item status"; |
395 |
push @line, "change item status"; |
396 |
} elsif ($item->{problem} eq 'not_scanned' ) { |
396 |
} elsif ($item->{problem} eq 'not_scanned' ) { |
397 |
push @line, "item not scanned"; |
397 |
push @line, "item not scanned"; |
|
|
398 |
} elsif ($item->{problem} eq 'out_of_order' ) { |
399 |
push @line, "possibly out of order"; |
398 |
} |
400 |
} |
399 |
} |
401 |
} |
400 |
$csv->combine(@line); |
402 |
$csv->combine(@line); |
401 |
- |
|
|