- $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)) ];
+# 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)) ];