From 468e86a69732eb57bd0a358ddecb6f80b8fb6b31 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Thu, 3 Jan 2008 09:58:58 +0000 Subject: [PATCH] =?utf8?q?Es=20muss=20beim=20Bearbeiten=20von=20Konten=20m?= =?utf8?q?=C3=B6glich=20sein,=20einen=20Steuerschl=C3=BCssel=20auf=20"0"?= =?utf8?q?=20anzulegen,=20weil=20das=20intern=20=C3=BCberall=20gemacht=20w?= =?utf8?q?ird,=20wo=20keine=20Steuerautomatik=20vorhanden=20ist.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/AM.pm | 8 +------- 1 file changed, 1 insertion(+), 7 deletions(-) diff --git a/SL/AM.pm b/SL/AM.pm index 4eddb74bd..a2b6ff9bc 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -332,12 +332,6 @@ sub save_account { next READTAXKEYS; } - # check if there is at least one relation to pos_ustva or tax_id - if ( $form->{"taxkey_pos_ustva_$tk_count"} eq '' && $form->{"taxkey_tax_$tk_count"} == 0 ) { - $tk_count++; - next READTAXKEYS; - } - # Add valid taxkeys into the array push @taxkeys , { @@ -345,7 +339,7 @@ sub save_account { tax_id => conv_i($form->{"taxkey_tax_$tk_count"}), startdate => conv_date($form->{"taxkey_startdate_$tk_count"}), chart_id => conv_i($form->{"id"}), - pos_ustva => $form->{"taxkey_pos_ustva_$tk_count"}, + pos_ustva => conv_i($form->{"taxkey_pos_ustva_$tk_count"}), delete => ( $form->{"taxkey_del_$tk_count"} eq 'delete' ) ? '1' : '', }; -- 2.20.1