X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fustva.pl;h=f88fce524ec094f040058b838ada24e38efc01d9;hb=96ab68a31bb2e33769aeccea9b7e51b23b65f59a;hp=435117ed355ebb23a2ae931dcfe8819dd34e26cb;hpb=ce221150ba701f1f73aed607c40ac894e58e70cc;p=kivitendo-erp.git diff --git a/bin/mozilla/ustva.pl b/bin/mozilla/ustva.pl index 435117ed3..f88fce524 100644 --- a/bin/mozilla/ustva.pl +++ b/bin/mozilla/ustva.pl @@ -196,7 +196,7 @@ sub report { # Which COA is in use? - $ustva->get_coa($form, \%myconfig); + $ustva->get_coa($form); # fetches coa and modifies some form variables my $template_ref = { openings => $openings, @@ -818,12 +818,12 @@ sub generate_ustva { } elsif ( $form->{format} eq '' ){ # No format error. $form->header; USTVA::error( $locale->text('Application Error. No Format given' ) . "!"); - ::end_of_request(); + $::dispatcher->end_request; } else { # All other Formats are wrong $form->header; USTVA::error( $locale->text('Application Error. Wrong Format') . ": " . $form->{format} ); - ::end_of_request(); + $::dispatcher->end_request; } @@ -960,7 +960,7 @@ $::form->{title} = $::locale->text('Tax Office Preferences'); # Which COA is in use? - $ustva->get_coa($::form, \%::myconfig); + $ustva->get_coa($::form); # fetches coa and modifies some form variables # hä? kann die weg? my $steuernummer_new = ''; @@ -1066,7 +1066,7 @@ sub config_step2 { $form->{FA_Oeffnungszeiten} =~ s/\\\\n/\n/g; - $ustva->get_coa($form, \%myconfig); + $ustva->get_coa($form); # fetches coa and modifies some form variables my $input_steuernummer = $ustva->steuernummer_input( $form->{elsterland}, @@ -1168,7 +1168,7 @@ sub save { $::auth->assert('advance_turnover_tax_return'); - my $filename = "$::form->{login}_$::form->{filename}"; + my $filename = "$::myconfig{login}_$::form->{filename}"; $filename =~ s|.*/||; #zuerst die steuernummer aus den part, parts_X_Y und delimiter herstellen