Revision 40dbbd16
Von Sven Schöling vor etwa 3 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
|
use SL::DB::Contact;
|
||
|
use SL::DB::Currency;
|
||
|
use SL::DB::Customer;
|
||
|
use SL::DB::DeliveryOrder::TypeData qw();
|
||
|
use SL::DB::Default;
|
||
|
use SL::DB::Language;
|
||
|
use SL::DB::Printer;
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
$obj->items(@items) if @items;
|
||
|
$obj->is_sales(!!$obj->customer_id) if $class eq 'SL::DB::DeliveryOrder';
|
||
|
|
||
|
if ($class eq 'SL::DB::DeliveryOrder' && !$obj->order_type) {
|
||
|
$obj->order_type(SL::DB::DeliveryOrder::TypeData::validate_type($::form->{type}));
|
||
|
}
|
||
|
|
||
|
if ($class eq 'SL::DB::Invoice') {
|
||
|
my $paid = $factor *
|
||
Auch abrufbar als: Unified diff
DeliveryOrder: _make_record für den alten Controller