Revision ce36e8eb
Von Moritz Bunkus vor etwa 7 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
|
$ref = selectfirst_hashref_query($form, $dbh, $query, @values);
|
||
|
|
||
|
delete $ref->{salesman_id} if !$ref->{salesman_id};
|
||
|
delete $ref->{payment_id} if $form->{payment_id};
|
||
|
delete $ref->{payment_id} if !$ref->{payment_id};
|
||
|
|
||
|
map { $form->{$_} = $ref->{$_} } keys %$ref;
|
||
|
|
||
Auch abrufbar als: Unified diff
Zahlungsbedingungen bei Kundenwechsel aus Stammdaten holen
`IS::get_customer` kann die Entscheidung, ob die Zahlungsbedingungen
überschrieben werden sollen oder nicht, gar nicht treffen, weil es
nicht genug Informationen hat. Nur der Aufrufer hat die, und daher
muss `IS::get_customer` den Wert immer aus den Kundestammndaten
übernehmen.