Revision dc28e1c2
Von Tamino Steinert vor fast 2 Jahren hinzugefügt
| SL/DB/Reclamation.pm | ||
|---|---|---|
| 353 | 353 |
map { $record_args{$_} = $source->$_ } # {{{ for vim folds
|
| 354 | 354 |
qw( |
| 355 | 355 |
amount |
| 356 |
billing_address_id |
|
| 356 | 357 |
contact_id |
| 357 | 358 |
currency_id |
| 358 | 359 |
customer_id |
| ... | ... | |
| 379 | 380 |
map { $record_args{$_} = $source->$_ } # {{{ for vim folds
|
| 380 | 381 |
qw( |
| 381 | 382 |
amount |
| 383 |
billing_address_id |
|
| 382 | 384 |
currency_id |
| 383 | 385 |
customer_id |
| 384 | 386 |
delivery_term_id |
| ... | ... | |
| 405 | 407 |
} elsif ( $is_abbr_any->(qw(sdsr pdpr)) ) { #DeliveryOrder
|
| 406 | 408 |
map { $record_args{$_} = $source->$_ } # {{{ for vim folds
|
| 407 | 409 |
qw( |
| 410 |
billing_address_id |
|
| 408 | 411 |
currency_id |
| 409 | 412 |
customer_id |
| 410 | 413 |
delivery_term_id |
| ... | ... | |
| 430 | 433 |
map { $record_args{$_} = $source->$_ } # {{{ for vim folds
|
| 431 | 434 |
qw( |
| 432 | 435 |
amount |
| 436 |
billing_address_id |
|
| 433 | 437 |
currency_id |
| 434 | 438 |
customer_id |
| 435 | 439 |
delivery_term_id |
| ... | ... | |
| 477 | 481 |
|
| 478 | 482 |
if ( ($from_to->{from} =~ m{sales}) && ($from_to->{to} =~ m{purchase}) ) {
|
| 479 | 483 |
$record_args{customer_id} = undef;
|
| 484 |
$record_args{billing_address_id} = undef;
|
|
| 480 | 485 |
$record_args{salesman_id} = undef;
|
| 481 | 486 |
$record_args{payment_id} = undef;
|
| 482 | 487 |
$record_args{delivery_term_id} = undef;
|
Auch abrufbar als: Unified diff
Reclamation: add billing_address_id to reclamation