X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/1d089d50f0f504b227dabbae611d9f028cc47656..9e06d0e40cb328336d6e7604ec06387a0e3b1ea7:/bin/mozilla/am.pl diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl index ee2b0e648..537151561 100644 --- a/bin/mozilla/am.pl +++ b/bin/mozilla/am.pl @@ -2524,12 +2524,6 @@ sub audit_control { AM->closedto(\%myconfig, \%$form); - if ($form->{revtrans}) { - $checked{Y} = "checked"; - } else { - $checked{N} = "checked"; - } - $form->header; print qq| @@ -2543,15 +2537,6 @@ sub audit_control { - - - @@ -2585,17 +2570,12 @@ sub doclose { AM->closebooks(\%myconfig, \%$form); - if ($form->{revtrans}) { + if ($form->{closedto}) { $form->redirect( - $locale->text('Transaction reversal enforced for all dates')); + $locale->text('Books closed up to') . " " + . $locale->date(\%myconfig, $form->{closedto}, 1)); } else { - if ($form->{closedto}) { - $form->redirect( - $locale->text('Transaction reversal enforced up to') . " " - . $locale->date(\%myconfig, $form->{closedto}, 1)); - } else { - $form->redirect($locale->text('Books are open')); - } + $form->redirect($locale->text('Books are open')); } $lxdebug->leave_sub();
| - . $locale->text('Enforce transaction reversal for all dates') . qq| - | - . $locale->text('Yes') - . qq| | - . $locale->text('No') - . qq|
| . $locale->text('Close Books up to') . qq| {closedto}>