X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/8f1fb2d695599019da043422cc3314b2a3f4fede..55e9890a:/bin/mozilla/dn.pl diff --git a/bin/mozilla/dn.pl b/bin/mozilla/dn.pl index 872919cfc..a72ab89ea 100644 --- a/bin/mozilla/dn.pl +++ b/bin/mozilla/dn.pl @@ -284,7 +284,8 @@ sub search { $main::auth->assert('dunning_edit'); $form->get_lists("customers" => "ALL_CUSTOMERS", - "departments" => "ALL_DEPARTMENTS"); + "departments" => "ALL_DEPARTMENTS", + "salesmen" => "ALL_SALESMEN"); DN->get_config(\%myconfig, \%$form); @@ -295,6 +296,7 @@ sub search { $form->{jsscript} = 1; $form->{title} = $locale->text('Dunnings'); $form->{fokus} = "search.customer"; + $form->{salesman_labels} = sub { $_[0]->{"name"} || $_[0]->{"login"} }; $form->header(); @@ -319,7 +321,7 @@ sub show_dunning { $main::auth->assert('dunning_edit'); my @filter_field_list = qw(customer_id customer dunning_level department_id invnumber ordnumber - transdatefrom transdateto dunningfrom dunningto notes showold salesman); + transdatefrom transdateto dunningfrom dunningto notes showold l_salesman salesman_id); report_generator_set_default_sort('customername', 1); @@ -358,13 +360,9 @@ sub show_dunning { 'dunning_duedate' => { 'text' => $locale->text('Dunning Duedate') }, 'fee' => { 'text' => $locale->text('Total Fees') }, 'interest' => { 'text' => $locale->text('Interest') }, + 'salesman' => { 'text' => $locale->text('Salesperson'), 'visible' => $form->{l_salesman} ? 1 : 0 }, ); - if ($form->{l_salesman}) { - # Show salesman column - $column_defs{'salesman'} = ( { 'text' => $locale->text('Salesperson') } ); - } - $report->set_columns(%column_defs); $report->set_column_order(qw(checkbox dunning_description customername invnumber transdate duedate amount dunning_date dunning_duedate fee interest salesman));