Revision 718eaa6d
Von Sven Schöling vor fast 3 Jahren hinzugefügt
| bin/mozilla/io.pl | ||
|---|---|---|
| 58 | 58 |
use SL::DB::Contact; |
| 59 | 59 |
use SL::DB::Currency; |
| 60 | 60 |
use SL::DB::Customer; |
| 61 |
use SL::DB::DeliveryOrder::TypeData qw(); |
|
| 61 | 62 |
use SL::DB::Default; |
| 62 | 63 |
use SL::DB::Language; |
| 63 | 64 |
use SL::DB::Printer; |
| ... | ... | |
| 1999 | 2000 |
} |
| 2000 | 2001 |
|
| 2001 | 2002 |
$obj->items(@items) if @items; |
| 2002 |
$obj->is_sales(!!$obj->customer_id) if $class eq 'SL::DB::DeliveryOrder'; |
|
| 2003 |
|
|
| 2004 |
if ($class eq 'SL::DB::DeliveryOrder' && !$obj->order_type) {
|
|
| 2005 |
$obj->order_type(SL::DB::DeliveryOrder::TypeData::validate_type($::form->{type}));
|
|
| 2006 |
} |
|
| 2003 | 2007 |
|
| 2004 | 2008 |
if ($class eq 'SL::DB::Invoice') {
|
| 2005 | 2009 |
my $paid = $factor * |
Auch abrufbar als: Unified diff
DeliveryOrder: _make_record für den alten Controller