Revision a3844d90
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