GDPDU: korrekte delimiter angeben

diff --git a/SL/GDPDU.pm b/SL/GDPDU.pm
index c9650f7..7ba9b74 100644 (file)
--- a/SL/GDPDU.pm
+++ b/SL/GDPDU.pm
@@ -180,6 +180,9 @@ sub table {
     ->tag('DecimalSymbol', '.')
     ->tag('DigitGroupingSymbol', '|')     # see CAVEATS in documentation
     ->tag('VariableLength', sub { $self
+      ->tag('ColumnDelimiter', ',')
+      ->tag('RecordDelimiter', '&x0A;')
+      ->tag('TextEncapsulator', '"')
       ->columns($table)
       ->foreign_keys($table)
     })