Revision 2cbd0263
Von Sven Schöling vor fast 3 Jahren hinzugefügt
| SL/DB/DeliveryOrder.pm | ||
|---|---|---|
| 17 | 17 |
use SL::DB::Part; |
| 18 | 18 |
use SL::DB::Unit; |
| 19 | 19 |
|
| 20 |
use SL::Controller::DeliveryOrder::TypeData;
|
|
| 20 |
use SL::DB::DeliveryOrder::TypeData qw(:types);
|
|
| 21 | 21 |
|
| 22 | 22 |
use SL::Helper::Number qw(_format_total _round_total); |
| 23 | 23 |
|
| ... | ... | |
| 326 | 326 |
# use type_data cusomtervendor and transfer direction instead |
| 327 | 327 |
sub is_sales {
|
| 328 | 328 |
if ($_[0]->order_type) {
|
| 329 |
return SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
|
| 329 |
return SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer");
|
|
| 330 | 330 |
} |
| 331 | 331 |
return $_[0]{is_sales};
|
| 332 | 332 |
} |
| 333 | 333 |
|
| 334 | 334 |
sub customervendor {
|
| 335 |
SL::Controller::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
|
| 335 |
SL::DB::DeliveryOrder::TypeData::get3($_[0]->order_type, "properties", "is_customer") ? $_[0]->customer : $_[0]->vendor;
|
|
| 336 | 336 |
} |
| 337 | 337 |
|
| 338 | 338 |
sub convert_to_invoice {
|
Auch abrufbar als: Unified diff
DeliveryOrder: TypeData aus SL::DB, nicht aus SL::Controller