Revision bcdeb6ec
Von Tamino Steinert vor fast 2 Jahren hinzugefügt
bin/mozilla/io.pl | ||
---|---|---|
1109 | 1109 |
quotation(); |
1110 | 1110 |
} |
1111 | 1111 |
|
1112 |
sub sales_reclamation { |
|
1113 |
my $id = $::form->{id}; |
|
1114 |
|
|
1115 |
require SL::Controller::Reclamation; |
|
1116 |
my $c = SL::Controller::Reclamation->new(); |
|
1117 |
$c->redirect_to( |
|
1118 |
controller => 'Reclamation', |
|
1119 |
action => 'add_from_sales_invoice', |
|
1120 |
from_id => $id, |
|
1121 |
type => 'sales_reclamation', |
|
1122 |
); |
|
1123 |
} |
|
1124 |
|
|
1125 |
sub purchase_reclamation { |
|
1126 |
my $id = $::form->{id}; |
|
1127 |
|
|
1128 |
require SL::Controller::Reclamation; |
|
1129 |
my $c = SL::Controller::Reclamation->new(); |
|
1130 |
$c->redirect_to( |
|
1131 |
controller => 'Reclamation', |
|
1132 |
action => 'add_from_purchase_invoice', |
|
1133 |
from_id => $id, |
|
1134 |
type => 'purchase_reclamation', |
|
1135 |
); |
|
1136 |
} |
|
1137 |
|
|
1112 | 1138 |
sub print_options { |
1113 | 1139 |
$::lxdebug->enter_sub(); |
1114 | 1140 |
|
Auch abrufbar als: Unified diff
Workflow: (sales/purchase) invoice → reclamation