X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdn.pl;h=f8a05aa96eddd24bfc617a98b34eef343b8fa291;hb=652397fced242d39ff1b5700c7fce1cbbaa37d5a;hp=e79283a6dde98b0eb41e2faaa37b28642e825665;hpb=54e4131e091831e00a861fe2c4f53e344b87ddca;p=kivitendo-erp.git
diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl
index e79283a6d..f8a05aa96 100644
--- a/bin/mozilla/dn.pl
+++ b/bin/mozilla/dn.pl
@@ -207,14 +207,7 @@ sub edit_config {
{password}>
|;
-
- if ($form->{menubar}) {
- require "$form->{path}/menu.pl";
- &menubar;
- }
-
- print qq|
+ . $locale->text('Save') . qq|">
@@ -448,7 +441,7 @@ sub show_invoices {
-
@@ -586,7 +572,6 @@ sub save_dunning {
for my $i (1 .. $form->{rowcount}) {
$form->{"active_$i"} *= 1;
$lastcustomer = $form->{"customer_id_$i"} unless ($lastcustomer);
- #print(STDERR qq|LASTCUSTOMER $lastcustomer AKTUELL $form->{"customer_id_$i"} ACTIVE? $form->{"active_$i"} active $active\n Zeile $i|);
if ($form->{"active_$i"} && ($form->{"customer_id_$i"} == $lastcustomer)) {
if ($form->{inv_ids}) {
$form->{inv_ids} .= qq|,$form->{"inv_id_$i"}|;
@@ -604,8 +589,7 @@ sub save_dunning {
}
if ($form->{inv_ids} ne "") {
$form->{inv_ids} .= ")";
- #print(STDERR "Rufe save_dunning_auf für Zeile $form->{inv_ids} von Kunde $lastcustomer\n");
- DN->save_dunning(\%myconfig, \%$form, \@rows, $userspath,$spool, $sendmail);
+ DN->save_dunning(\%myconfig, \%$form, \@rows, $userspath,$spool, $sendmail);
}
}
} else {
@@ -614,12 +598,10 @@ sub save_dunning {
@rows = ();
$form->{inv_ids} = qq|($form->{"inv_id_$i"})|;
push(@rows, $i);
- #print(STDERR "Rufe save_dunning_auf für Zeile $i\n");
DN->save_dunning(\%myconfig, \%$form, \@rows, $userspath,$spool, $sendmail);
}
}
}
- #print(STDERR Dumper($form->{DUNNING_PDFS}));
if($form->{DUNNING_PDFS}) {
DN->melt_pdfs(\%myconfig, \%$form,$spool);
}
@@ -960,14 +942,6 @@ sub show_dunning {
{path}>
{login}>
{password}>
-|;
-
- if ($form->{menubar}) {
- require "$form->{path}/menu.pl";
- &menubar;
- }
-
- print qq|