X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/18da4a96827fd65559a6f64334c3d8a313884f84..2ef21b8f2aaae439a9408977458bdeb9b0fd9e25:/bin/mozilla/dn.pl diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl index d1dac5e3e..749c25b26 100644 --- a/bin/mozilla/dn.pl +++ b/bin/mozilla/dn.pl @@ -70,13 +70,11 @@ sub edit_config { } } - $form->{title} = $locale->text('Edit Dunning Process Config'); - $form->{callback} ||= build_std_url("action=edit_config"); - $form->{rowcount} = 1 + scalar @{ $form->{DUNNING} }; - $form->{rowcount_odd} = $form->{rowcount} % 2; + $form->{title} = $locale->text('Edit Dunning Process Config'); + $form->{callback} ||= build_std_url("action=edit_config"); $form->header(); - print $form->parse_html_template("dunning/edit_config"); + print $form->parse_html_template2("dunning/edit_config"); $lxdebug->leave_sub(); } @@ -126,11 +124,11 @@ sub show_invoices { $form->{jsscript} = 1; $form->{callback} ||= build_std_url("action=show_invoices", qw(login password customer invnumber ordnumber groupinvoices minamount dunning_level notes)); - $form->{PRINT_OPTIONS} = print_options({ 'inline' => 1, - 'no_queue' => 1, - 'no_postscript' => 1, - 'no_html' => 1, - 'no_opendocument' => 1, }); + $form->{PRINT_OPTIONS} = print_options('inline' => 1, + 'no_queue' => 1, + 'no_postscript' => 1, + 'no_html' => 1, + 'no_opendocument' => 1,); $form->header(); print $form->parse_html_template("dunning/show_invoices"); @@ -284,11 +282,11 @@ sub show_dunning { 'languages' => 'languages'); $form->{type} = 'dunning'; - $form->{PRINT_OPTIONS} = print_options({ 'inline' => 1, - 'no_queue' => 1, - 'no_postscript' => 1, - 'no_html' => 1, - 'no_opendocument' => 1, }); + $form->{PRINT_OPTIONS} = print_options('inline' => 1, + 'no_queue' => 1, + 'no_postscript' => 1, + 'no_html' => 1, + 'no_opendocument' => 1,); $form->{title} = $locale->text('Dunning overview'); my $report = SL::ReportGenerator->new(\%myconfig, $form);