Revision 854d733e
Von Tamino Steinert vor etwa 1 Jahr hinzugefügt
| bin/mozilla/do.pl | ||
|---|---|---|
| 1366 | 1366 |
|
| 1367 | 1367 |
sub save_and_reclamation {
|
| 1368 | 1368 |
my $form = $main::form; |
| 1369 |
my $id = $form->{id};
|
|
| 1369 | 1370 |
my $type = $form->{type};
|
| 1370 | 1371 |
|
| 1371 | 1372 |
# save the delivery order |
| ... | ... | |
| 1375 | 1376 |
$type eq 'sales_delivery_order' ? 'sales_reclamation' |
| 1376 | 1377 |
: 'purchase_reclamation'; |
| 1377 | 1378 |
$form->{callback} =
|
| 1378 |
'controller.pl?action=Reclamation/add_from_delivery_order' . |
|
| 1379 |
'&type=' . $to_reclamation_type . |
|
| 1380 |
'&from_id=' . $form->escape($form->{id});
|
|
| 1379 |
'controller.pl?action=Reclamation/add_from_record' |
|
| 1380 |
. '&type=' . $to_reclamation_type |
|
| 1381 |
. '&from_id=' . $form->escape($id) |
|
| 1382 |
. '&from_type=' . $form->escape($type) |
|
| 1383 |
; |
|
| 1381 | 1384 |
$form->redirect; |
| 1382 | 1385 |
} |
| 1383 | 1386 |
|
Auch abrufbar als: Unified diff
Records: Workflow-Methoden angepasst und vereinheitlicht