Revision a3e18a2a
Von Tamino Steinert vor mehr als 1 Jahr hinzugefügt
SL/DB/Reclamation.pm | ||
---|---|---|
281 | 281 |
closed => 0, |
282 | 282 |
delivered => 0, |
283 | 283 |
transdate => DateTime->today_local, |
284 |
reqdate => DateTime->today_local->next_workday(), |
|
285 | 284 |
); |
286 | 285 |
if ( $is_abbr_any->(qw(srsr prpr srpr prsr)) ) { #Reclamation |
287 | 286 |
map { $record_args{$_} = $source->$_ } # {{{ for vim folds |
... | ... | |
301 | 300 |
netamount |
302 | 301 |
notes |
303 | 302 |
payment_id |
303 |
reqdate |
|
304 | 304 |
salesman_id |
305 | 305 |
shippingpoint |
306 | 306 |
shipvia |
Auch abrufbar als: Unified diff
Model::Record: update_for_save_as_new implementiert