Revision d57a4596
Von Sven Schöling vor etwa 1 Jahr hinzugefügt
SL/DB/DeliveryOrder.pm | ||
---|---|---|
12 | 12 |
use SL::DB::Helper::AttrSorted; |
13 | 13 |
use SL::DB::Helper::FlattenToForm; |
14 | 14 |
use SL::DB::Helper::LinkedRecords; |
15 |
use SL::DB::Helper::TypeDataProxy; |
|
15 | 16 |
use SL::DB::Helper::TransNumberGenerator; |
16 | 17 |
use SL::DB::Helper::RecordLink qw(RECORD_ID RECORD_TYPE_REF); |
17 | 18 |
|
... | ... | |
427 | 428 |
$self->date->to_kivitendo; |
428 | 429 |
} |
429 | 430 |
|
431 |
sub type_data { |
|
432 |
SL::DB::Helper::TypeDataProxy->new(ref $_[0], $_[0]->type); |
|
433 |
} |
|
434 |
|
|
430 | 435 |
1; |
431 | 436 |
__END__ |
432 | 437 |
|
Auch abrufbar als: Unified diff
TypeData: proxy um $record->type_data benutzen zu können