X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fis.pl;h=51f3762533cb9574ba48226ec119235e4b5c6c75;hb=a143b82a56e889cfda60c2d42fe7d0bdaf73aa83;hp=85e03c15070bd30892beec50b8deff10bea0ed33;hpb=615121a5115247f50140fb7f892fa2b43947e20a;p=kivitendo-erp.git diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl index 85e03c150..51f376253 100644 --- a/bin/mozilla/is.pl +++ b/bin/mozilla/is.pl @@ -121,6 +121,7 @@ sub invoice_links { if ($form->{all_customer}) { unless ($form->{customer_id}) { $form->{customer_id} = $form->{all_customer}->[0]->{id}; + $form->{salesman_id} = $form->{all_customer}->[0]->{salesman_id}; } } @@ -367,7 +368,8 @@ sub form_header { "shipto" => "ALL_SHIPTO", "projects" => { "key" => "ALL_PROJECTS", "all" => 0, - "old_id" => \@old_project_ids }); + "old_id" => \@old_project_ids }, + "employees" => "ALL_SALESMEN"); my (%labels, @values); foreach my $item (@{ $form->{"ALL_CONTACTS"} }) { @@ -405,6 +407,22 @@ sub form_header { '-labels' => \%labels, '-default' => $form->{"globalproject_id"})); + %labels = (); + @values = (""); + foreach my $item (@{ $form->{ALL_SALESMEN} }) { + push(@values, $item->{id}); + $labels{$item->{id}} = $item->{name} ne "" ? $item->{name} : $item->{login}; + } + + $salesman = + qq| + | . $locale->text('Salesman') . qq| + | . + NTI($cgi->popup_menu('-name' => 'salesman_id', '-default' => $form->{salesman_id}, + '-values' => \@values, '-labels' => \%labels)) + . qq| + |; + # set option selected foreach $item (qw(AR customer currency department employee)) { $form->{"select$item"} =~ s/ selected//; @@ -717,7 +735,9 @@ print qq| - |; + + $salesman +|; if ($form->{type} eq "credit_note") { print qq| | . $locale->text('Credit Note Number') . qq| @@ -1647,10 +1667,7 @@ sub yes { sub e_mail { $lxdebug->enter_sub(); - $form->{postasnew} = 1; - $print_post = 1; - - map { delete $form->{$_} } qw(printed emailed queued); + $print_post = 1; &post;