X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fam.pl;h=0aac5a17fa4b2b24e94787d8cc98fab5de02878b;hb=1043d7f814fccf5864e677b1e38577d0a150026c;hp=2394118405ff9d1d6545537b7bb937c625fc1bba;hpb=77230cde1f9588050247a8a094d2f8bbbb42d563;p=kivitendo-erp.git diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl index 239411840..0aac5a17f 100644 --- a/bin/mozilla/am.pl +++ b/bin/mozilla/am.pl @@ -2397,6 +2397,7 @@ sub edit_defaults { # get defaults for account numbers and last numbers AM->defaultaccounts(\%myconfig, \%$form); + $form->{ALL_UNITS} = AM->convertible_units(AM->retrieve_all_units(), 'g'); map { $form->{"defaults_${_}"} = $form->{defaults}->{$_} } keys %{ $form->{defaults} }; @@ -2855,7 +2856,7 @@ sub show_am_history { ( $form->{'searchid'} ? qq| WHERE snumbers = '| . $searchNo{$form->{'what2search'}} . qq|_| . $form->{'searchid'} . qq|'| : qq| WHERE snumbers ~ '^| . $searchNo{$form->{'what2search'}} . qq|'|); - my @ids = selectall_array_query($form, $dbh, $query); + my @ids = grep { $_ * 1 } selectall_array_query($form, $dbh, $query); my $daten .= shift @ids; $daten .= join '', map { " OR trans_id = $_" } @ids;