From: Moritz Bunkus Date: Tue, 3 Apr 2007 14:46:25 +0000 (+0000) Subject: Vergessen, einen Spaltennamen mit umzubenennen. X-Git-Tag: release-2.4.3^2~534 X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/commitdiff_plain/6968d2572f6ab7b0f1b2f61672f38833417037d7?ds=inline Vergessen, einen Spaltennamen mit umzubenennen. --- diff --git a/SL/IS.pm b/SL/IS.pm index 310dcbb59..6523d243b 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -1705,7 +1705,7 @@ sub get_customer { map { $form->{$_} = $ref->{$_} } keys %$ref; my $query = qq|SELECT dnn.dunning_description AS max_dunning_level FROM dunning_config dnn - WHERE id in (SELECT dunning_config_id from ar WHERE paid < amount AND customer_id = ? AND dunning_id IS NOT NULL) + WHERE id in (SELECT dunning_config_id from ar WHERE paid < amount AND customer_id = ? AND dunning_config_id IS NOT NULL) ORDER BY dunning_level DESC LIMIT 1|; $ref = selectfirst_hashref_query($form, $dbh, $query, $form->{customer_id}); map { $form->{$_} = $ref->{$_} } keys %$ref;