Revision 40c2f024
Von Tamino Steinert vor fast 3 Jahren hinzugefügt
| SL/DB/Shipto.pm | ||
|---|---|---|
|
my $module = $type =~ m{::Order$} ? 'OE'
|
||
|
: $type =~ m{::DeliveryOrder$} ? 'DO'
|
||
|
: $type =~ m{::Invoice$} ? 'AR'
|
||
|
: $type =~ m{::Reclamation$} ? 'RC'
|
||
|
: $type =~ m{::(?:Customer|Vendor)$} ? 'CT'
|
||
|
: croak "Unsupported target class '$type'";
|
||
|
|
||
Auch abrufbar als: Unified diff
Reclamation: Controller and Templates created