Lines 901-907
elsif ($phase eq 'Export'){
Link Here
|
901 |
$content .= join("\t", header_cell_values($sth)) . "\n"; |
901 |
$content .= join("\t", header_cell_values($sth)) . "\n"; |
902 |
$content = Encode::decode('UTF-8', $content); |
902 |
$content = Encode::decode('UTF-8', $content); |
903 |
while (my $row = $sth->fetchrow_arrayref()) { |
903 |
while (my $row = $sth->fetchrow_arrayref()) { |
904 |
$content .= join("\t", @$row) . "\n"; |
904 |
$content .= join("\t", map { $_ // '' } @$row) . "\n"; |
905 |
} |
905 |
} |
906 |
} else { |
906 |
} else { |
907 |
my $delimiter = C4::Context->preference('delimiter') || ','; |
907 |
my $delimiter = C4::Context->preference('delimiter') || ','; |
908 |
- |
|
|