Revision 434f88fb
Von Philip Reetz vor mehr als 15 Jahren hinzugefügt
bin/mozilla/do.pl | ||
---|---|---|
1232 | 1232 |
sub update { |
1233 | 1233 |
call_sub($form->{update_nextsub} || $form->{nextsub} || 'update_delivery_order'); |
1234 | 1234 |
} |
1235 |
|
|
1236 |
sub dispatcher { |
|
1237 |
foreach my $action (qw(update ship_to print e_mail save transfer_out transfer_in mark_closed save_as_new invoice delete)) { |
|
1238 |
if ($form->{"action_${action}"}) { |
|
1239 |
call_sub($action); |
|
1240 |
return; |
|
1241 |
} |
|
1242 |
} |
|
1243 |
|
|
1244 |
$form->error($locale->text('No action defined.')); |
|
1245 |
} |
Auch abrufbar als: Unified diff
Vorlage fuer Lieferscheine auf dispatcher Mechanismus umgestellt