Die Überbleibsel für die Druckfunktion aus dem HTML-Kode entfernt und ferner die...
[kivitendo-erp.git] / bin / mozilla / ustva.pl
index 80e1b14..e255717 100644 (file)
@@ -1,4 +1,3 @@
-#!/bin/perl
 #=====================================================================
 # Lx-Office ERP
 # Copyright (c) 2004 by Udo Spallek, Aachen
@@ -916,7 +915,7 @@ sub generate_ustva {
       } else {
         $form->header;
         USTVA::error( $locale->text('Wrong Period' ));
-        exit(0);
+        ::end_of_request();
       }
 
       my $tax_office           = first { $_->{name} eq $form->{elsterland} } @{ $ustva->{tax_office_information} };
@@ -984,12 +983,12 @@ sub generate_ustva {
     } elsif ( $form->{format} eq '' ){ # No format error.
       $form->header;
       USTVA::error( $locale->text('Application Error. No Format given' ) . "!");
-      exit(0);
+      ::end_of_request();
 
     } else { # All other Formats are wrong
       $form->header;
       USTVA::error( $locale->text('Application Error. Wrong Format') . ": " . $form->{format} );
-      exit(0);
+      ::end_of_request();
     }
 
 
@@ -1067,6 +1066,8 @@ sub config_step1 {
 
   $auth->assert('advance_turnover_tax_return');
 
+$form->{title} = $locale->text('Tax Office Preferences');
+
   # edit all taxauthority prefs
 
   $form->header;