From 2a4ad354455f28cba2e42fe71ea1d1e93a0c69d0 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Fri, 4 May 2007 15:04:20 +0000 Subject: [PATCH] =?utf8?q?Umstellung=20der=20Filtermaske=20f=C3=BCr=20neue?= =?utf8?q?=20Mahnungen=20auf=20das=20HTML-Vorlagensystem.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- bin/mozilla/dn.pl | 124 ++------------------- locale/de/all | 1 + locale/de/dn | 2 - templates/webpages/dunning/add_de.html | 97 ++++++++++++++++ templates/webpages/dunning/add_master.html | 97 ++++++++++++++++ 5 files changed, 203 insertions(+), 118 deletions(-) create mode 100644 templates/webpages/dunning/add_de.html create mode 100644 templates/webpages/dunning/add_master.html diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl index a81d9452e..65b3bc36f 100644 --- a/bin/mozilla/dn.pl +++ b/bin/mozilla/dn.pl @@ -60,132 +60,24 @@ sub edit_config { sub add { $lxdebug->enter_sub(); + # setup customer selection $form->all_vc(\%myconfig, "customer", "AR"); DN->get_config(\%myconfig, \%$form); - if (@{ $form->{all_customer} }) { - map { $customer .= "\n" - } (@{ $form->{DUNNING} }); - } - $dunning_level = qq| - - | . $locale->text('Next Dunning Level') . qq| - - - | if $form->{selectdunning_level}; + $form->{SHOW_CUSTOMER_SELECTION} = $form->{all_customer} && scalar @{ $form->{all_customer} }; + $form->{SHOW_DUNNING_LEVEL_SELECTION} = $form->{DUNNING} && scalar @{ $form->{DUNNING} }; + $form->{SHOW_DEPARTMENT_SELECTION} = $form->{all_departments} && scalar @{ $form->{all_departments} }; - # departments - if (@{ $form->{all_departments} }) { - $form->{selectdepartment} = "