From 2ecfde54bd40a15f430010faa28ec81383e4eec6 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Mon, 9 Nov 2015 15:28:58 +0100 Subject: [PATCH] GDPDU: statt acc_trans_id die trans_id exportieren --- SL/GDPDU.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/SL/GDPDU.pm b/SL/GDPDU.pm index 9c7fdb7eb..f96f73cf2 100644 --- a/SL/GDPDU.pm +++ b/SL/GDPDU.pm @@ -39,7 +39,7 @@ my %known_tables = ( ); my %datev_column_defs = ( - acc_trans_id => { type => 'Rose::DB::Object::Metadata::Column::Integer', text => t8('ID'), }, + trans_id => { type => 'Rose::DB::Object::Metadata::Column::Integer', text => t8('ID'), }, amount => { type => 'Rose::DB::Object::Metadata::Column::Numeric', text => t8('Amount'), }, credit_accname => { type => 'Rose::DB::Object::Metadata::Column::Text', text => t8('Credit Account Name'), }, credit_accno => { type => 'Rose::DB::Object::Metadata::Column::Text', text => t8('Credit Account'), }, @@ -61,7 +61,7 @@ my %datev_column_defs = ( ); my @datev_columns = qw( - acc_trans_id + trans_id customer_id vendor_id name vcnumber transdate invnumber amount @@ -415,7 +415,7 @@ sub do_datev_csv_export { tax => defined $amount->{net_amount} ? $::form->format_amount($myconfig, abs($amount->{amount}) - abs($amount->{net_amount}), 5) : 0, notes => $haben->{notes}, (map { ($_ => $tax->{$_}) } qw(taxkey tax_accname tax_accno taxdescription)), - (map { ($_ => ($haben->{$_} // $soll->{$_})) } qw(acc_trans_id invnumber name vcnumber transdate itime customer_id vendor_id)), + (map { ($_ => ($haben->{$_} // $soll->{$_})) } qw(trans_id invnumber name vcnumber transdate itime customer_id vendor_id)), ); _normalize_cell($_) for values %row; # see CAVEATS -- 2.20.1