-# edit: cp_greeting wurde entfernt, wird durch cp_gender ersetzt
-# $query =
-# qq|SELECT DISTINCT(cp_greeting) | .
-# qq|FROM contacts | .
-# qq|WHERE cp_greeting ~ '[a-zA-Z]' | .
-# qq|ORDER BY cp_greeting|;
-# $form->{GREETINGS} = [ selectall_array_query($form, $dbh, $query) ];
-#
-# $query =
-# qq|SELECT DISTINCT(greeting) | .
-# qq|FROM customer | .
-# qq|WHERE greeting ~ '[a-zA-Z]' | .
-# qq|UNION | .
-# qq|SELECT DISTINCT(greeting) | .
-# qq|FROM vendor | .
-# qq|WHERE greeting ~ '[a-zA-Z]' | .
-# qq|ORDER BY greeting|;
-# my %tmp;
-# map({ $tmp{$_} = 1; } selectall_array_query($form, $dbh, $query));
-# $form->{COMPANY_GREETINGS} = [ sort(keys(%tmp)) ];
+ $query =
+ qq|SELECT DISTINCT(greeting) | .
+ qq|FROM customer | .
+ qq|WHERE greeting ~ '[a-zA-Z]' | .
+ qq|UNION | .
+ qq|SELECT DISTINCT(greeting) | .
+ qq|FROM vendor | .
+ qq|WHERE greeting ~ '[a-zA-Z]' | .
+ qq|ORDER BY greeting|;
+
+ map({ $tmp{$_} = 1; } selectall_array_query($form, $dbh, $query));
+ $form->{COMPANY_GREETINGS} = [ sort(keys(%tmp)) ];