X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/989d9edd06037394e67e5c5965c4bcc89c947cf1..8f35ef1f31e9ffefdc1d6a094d5470dfb37063e4:/bin/mozilla/rc.pl diff --git a/bin/mozilla/rc.pl b/bin/mozilla/rc.pl index 3d93be781..df360adee 100644 --- a/bin/mozilla/rc.pl +++ b/bin/mozilla/rc.pl @@ -33,25 +33,38 @@ use SL::RC; +require "bin/mozilla/common.pl"; + +use strict; + 1; # end of main sub reconciliation { - $lxdebug->enter_sub(); + $main::lxdebug->enter_sub(); + + my $form = $main::form; + my %myconfig = %main::myconfig; + my $locale = $main::locale; + + $main::auth->assert('cash'); RC->paymentaccounts(\%myconfig, \%$form); - $selection = ""; + my $selection = ""; map { $selection .= "