X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fam.pl;h=fe9199ef0fba6f2b5b879f6cb810a2d99bab7dc7;hb=54ea08cdb34a06dec0cb5575dc96f3d652637cc9;hp=3cb5ac3d819a28b752c940ff6fa1abc0ce51f4fe;hpb=9bd3030a376850c427c102c6e0c54f19bd19332e;p=kivitendo-erp.git
diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl
index 3cb5ac3d8..fe9199ef0 100644
--- a/bin/mozilla/am.pl
+++ b/bin/mozilla/am.pl
@@ -1107,6 +1107,7 @@ sub list_business {
$form->{title} = $locale->text('Type of Business');
my @column_index = qw(description discount customernumberinit);
+ push @column_index, 'salesman' if $::vertreter;
my %column_header;
$column_header{description} =
qq|
|
@@ -1120,6 +1121,10 @@ sub list_business {
qq| | |
. $locale->text('Customernumberinit')
. qq| | |;
+ $column_header{salesman} =
+ qq||
+ . $locale->text('Representative')
+ . qq| | |;
$form->header;
@@ -1159,6 +1164,7 @@ sub list_business {
$column_data{discount} = qq|$discount | |;
$column_data{customernumberinit} =
qq|$ref->{customernumberinit} | |;
+ $column_data{salesman} = '' . ($ref->{salesman} ? $::locale->text('Yes') : $::locale->text('No')) . ' | ';
map { print "$column_data{$_}\n" } @column_index;
@@ -1213,6 +1219,18 @@ sub business_header {
$form->{discount} =
$form->format_amount(\%myconfig, $form->{discount} * 100);
+ my $salesman_code;
+ if ($::vertreter) {
+ $salesman_code = qq|
+
+ | . $locale->text('Representative') . qq| |
+ | . $::cgi->checkbox(-name => "salesman", -value => 1, -label => '', 'checked' => $form->{salesman} ? 1 : 0) . qq| |
+
+|;
+ } else {
+ $salesman_code = $::cgi->hidden(-name => 'salesman', -value => $form->{salesman} ? 1 : 0);
+ }
+
$form->header;
print qq|
@@ -1240,6 +1258,7 @@ sub business_header {
| . $locale->text('Customernumberinit') . qq| |
{customernumberinit}> |
+$salesman_code
|