Revision 3171c378
Von Jan Büren vor etwa 10 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 2159 | 2159 |
|
| 2160 | 2160 |
$key = "all_taxzones" unless ($key); |
| 2161 | 2161 |
my $tzfilter = ""; |
| 2162 |
$tzfilter = "WHERE obsolete is FALSE" if $key eq 'ALL_ACTIVE_TAXZONES';
|
|
| 2162 |
$tzfilter = "WHERE obsolete is FALSE" if $key eq 'ALL_ACTIVE_TAXZONES'; |
|
| 2163 | 2163 |
|
| 2164 | 2164 |
my $query = qq|SELECT * FROM tax_zones $tzfilter ORDER BY sortkey|; |
| 2165 | 2165 |
|
Auch abrufbar als: Unified diff
Whitespace entfernt