Revision 166e72f1
Von Tamino Steinert vor mehr als 2 Jahren hinzugefügt
| SL/IS.pm | ||
|---|---|---|
| 990 | 990 |
dbh => $dbh); |
| 991 | 991 |
} |
| 992 | 992 |
# link previous items with invoice items |
| 993 |
foreach (qw(delivery_order_items orderitems invoice)) {
|
|
| 993 |
foreach (qw(delivery_order_items orderitems invoice reclamation_items)) {
|
|
| 994 | 994 |
if (!$form->{useasnew} && $form->{"converted_from_${_}_id_$i"}) {
|
| 995 | 995 |
RecordLinks->create_links('dbh' => $dbh,
|
| 996 | 996 |
'mode' => 'ids', |
| ... | ... | |
| 1529 | 1529 |
|
| 1530 | 1530 |
Common::webdav_folder($form); |
| 1531 | 1531 |
|
| 1532 |
if ($form->{convert_from_ar_ids}) {
|
|
| 1533 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 1534 |
'mode' => 'ids', |
|
| 1535 |
'from_table' => 'ar', |
|
| 1536 |
'from_ids' => $form->{convert_from_ar_ids},
|
|
| 1537 |
'to_table' => 'ar', |
|
| 1538 |
'to_id' => $form->{id},
|
|
| 1539 |
); |
|
| 1540 |
delete $form->{convert_from_ar_ids};
|
|
| 1541 |
} |
|
| 1542 |
|
|
| 1543 | 1532 |
# Link this record to the records it was created from. |
| 1544 |
if ($form->{convert_from_oe_ids}) {
|
|
| 1545 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 1546 |
'mode' => 'ids', |
|
| 1547 |
'from_table' => 'oe', |
|
| 1548 |
'from_ids' => $form->{convert_from_oe_ids},
|
|
| 1549 |
'to_table' => 'ar', |
|
| 1550 |
'to_id' => $form->{id},
|
|
| 1533 |
foreach (qw(oe ar reclamations)) {
|
|
| 1534 |
if ($form->{"convert_from_${_}_ids"}) {
|
|
| 1535 |
RecordLinks->create_links('dbh' => $dbh,
|
|
| 1536 |
'mode' => 'ids', |
|
| 1537 |
'from_table' => $_, |
|
| 1538 |
'from_ids' => $form->{"convert_from_${_}_ids"},
|
|
| 1539 |
'to_table' => 'ar', |
|
| 1540 |
'to_id' => $form->{id},
|
|
| 1551 | 1541 |
); |
| 1552 |
delete $form->{convert_from_oe_ids};
|
|
| 1542 |
delete $form->{"convert_from_${_}_ids"};
|
|
| 1543 |
} |
|
| 1553 | 1544 |
} |
| 1554 | 1545 |
|
| 1555 | 1546 |
my @convert_from_do_ids = map { $_ * 1 } grep { $_ } split m/\s+/, $form->{convert_from_do_ids};
|
Auch abrufbar als: Unified diff
Workflow: sales_reclamation → credit_note