Revision 325263e0
Von Jan Büren vor mehr als 12 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 2549 | 2549 |
my ($count) = selectrow_query($self, $dbh, $query); |
| 2550 | 2550 |
|
| 2551 | 2551 |
# build selection list |
| 2552 |
if ($count <= $myconfig->{vclimit}) {
|
|
| 2552 |
# Hotfix f?r Bug 1837 - Besser w?re es alte Buchungsbelege |
|
| 2553 |
# OHNE Auswahlliste (reines Textfeld) zu laden. Hilft aber auch |
|
| 2554 |
# nicht f?r ver?nderbare Belege (oe, do, ...) |
|
| 2555 |
my $obsolete = "WHERE NOT obsolete" unless $self->{id};
|
|
| 2556 |
if ($count < $myconfig->{vclimit}) {
|
|
| 2553 | 2557 |
$query = qq|SELECT id, name, salesman_id |
| 2554 |
FROM $table WHERE NOT obsolete
|
|
| 2558 |
FROM $table $obsolete
|
|
| 2555 | 2559 |
ORDER BY name|; |
| 2556 | 2560 |
$self->{"all_$table"} = selectall_hashref_query($self, $dbh, $query);
|
| 2557 | 2561 |
} |
Auch abrufbar als: Unified diff
Bugfix 1837 - Für alte Belege auch ungǘltige Lieferanten / Kunden anzeigen
Entsprechend nochmal kommentiert. Offen: _get_customer und _get_vendor
verwendet dennoch immer den Filter.