X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/a14a3ff56b00e22c39a2cfb0e465f8c7764a4cd4..2ef21b8f2aaae439a9408977458bdeb9b0fd9e25:/bin/mozilla/datev.pl
diff --git a/bin/mozilla/datev.pl b/bin/mozilla/datev.pl
index 9944abfba..063933767 100644
--- a/bin/mozilla/datev.pl
+++ b/bin/mozilla/datev.pl
@@ -35,7 +35,9 @@ use SL::DATEV;
# end of main
-sub continue { &{ $form->{nextsub} } }
+require "bin/mozilla/common.pl";
+
+sub continue { call_sub($form->{"nextsub"}); }
sub export {
$lxdebug->enter_sub();
@@ -80,7 +82,7 @@ sub export {
| . $locale->text("Mandantennummer") . qq| |
|
- | . $locale->text("Datenträgernummer") . qq| |
+ | . $locale->text("Medium Number") . qq| |
|
@@ -111,7 +113,6 @@ sub export {
-{path}>
{login}>
{password}>
@@ -246,7 +247,6 @@ sub export_bewegungsdaten {
-{path}>
{login}>
{password}>
@@ -312,7 +312,6 @@ sub export_stammdaten {
-{path}>
{login}>
{password}>
@@ -334,7 +333,7 @@ sub export3 {
DATEV->save_datev_stamm(\%myconfig, \%$form);
my $link = $form->{"script"} . "?";
- map({ $link .= "${_}=" . $form->escape($form->{$_}) . "&"; } qw(path login password));
+ map({ $link .= "${_}=" . $form->escape($form->{$_}) . "&"; } qw(login password));
$link .= "action=download";
if ($form->{kne}) {