Implementiert Ticket 1897 Zukunftsbuchungen vermeiden

[kivitendo-erp.git] / bin / mozilla / ustva.pl
diff --git a/bin/mozilla/ustva.pl b/bin/mozilla/ustva.pl

index a3c4642..8d77a31 100644 (file)
--- a/bin/mozilla/ustva.pl
+++ b/bin/mozilla/ustva.pl
@@ -1,5 +1,5 @@
  #=====================================================================
-# Lx-Office ERP
+# kivitendo ERP
  # Copyright (c) 2004 by Udo Spallek, Aachen
  #
  #  Author: Udo Spallek
@@ -776,7 +776,7 @@ sub generate_ustva {
          dec_places  => '2',
      });
  
-    push @category_cent, qw(83  Z43  Z45  Z53  Z62  Z65  Z67);
+    push @category_cent, qw(Z43  Z45  Z53  Z62  Z65  Z67);
  
      my @category_euro = $ustva->report_variables({
          myconfig    => \%myconfig,
@@ -855,9 +855,9 @@ sub generate_ustva {
  
        my $temp_numberformat = $myconfig{numberformat};
  
-      # Numberformat must be '1000.00' for Winston
+      # Numberformat must be '1000,00' for Winston
  
-      $myconfig{numberformat} = '1000.00';
+      $myconfig{numberformat} = '1000,00';
  
        foreach my $number (@category_cent) {
          $form->{$number} = ( $form->{$number} !=0 ) ? $form->format_amount(\%myconfig, $form->{$number}, '2', '') : '';
@@ -1177,10 +1177,6 @@ sub config_step2 {
  
    $form->header();
  
-#  print qq|
-#    <body>
-#  |;
-
    my $elsterland         = '';
    my $elster_amt         = '';
    my $elsterFFFF         = '';
@@ -1222,11 +1218,7 @@ sub config_step2 {
      create_steuernummer();
  
      # rebuild elster_amt
-    my $amt = '';
-    foreach $amt (keys %{ $elster_init{ $form->{elsterland} } }) {
-      $elster_amt = $amt
-        if ($elster_init{ $form->{elsterland}{$amt} eq $form->{elsterFFFF} });
-    }
+    my $amt = $elster_init{$elsterFFFF};
  
      # load the predefined hash data into the FA_* Vars
      my @variables = qw(FA_Name FA_Strasse FA_PLZ FA_Ort
@@ -1434,4 +1426,3 @@ sub back {
    call_sub($::form->{"lastsub"});
    $::lxdebug->leave_sub();
  }
-