Revision 74fda0f4
Von Sven Schöling vor etwa 1 Jahr hinzugefügt
SL/DB/Invoice.pm | ||
---|---|---|
21 | 21 |
use SL::DB::Helper::TransNumberGenerator; |
22 | 22 |
use SL::DB::Helper::ZUGFeRD; |
23 | 23 |
use SL::Locale::String qw(t8); |
24 |
use SL::DB::CustomVariable; |
|
25 | 24 |
|
26 | 25 |
__PACKAGE__->meta->add_relationship( |
27 | 26 |
invoiceitems => { |
SL/DB/Part.pm | ||
---|---|---|
12 | 12 |
use SL::DBUtils; |
13 | 13 |
use SL::DB::MetaSetup::Part; |
14 | 14 |
use SL::DB::Manager::Part; |
15 |
use SL::DB::Chart; |
|
16 | 15 |
use SL::DB::Helper::AttrHTML; |
17 | 16 |
use SL::DB::Helper::AttrSorted; |
18 | 17 |
use SL::DB::Helper::TransNumberGenerator; |
... | ... | |
319 | 318 |
|
320 | 319 |
sub get_chart { |
321 | 320 |
my ($self, %params) = @_; |
321 |
require SL::DB::Chart; |
|
322 | 322 |
|
323 | 323 |
my $type = (any { $_ eq $params{type} } qw(income expense inventory)) ? $params{type} : croak("Invalid 'type' parameter '$params{type}'"); |
324 | 324 |
my $taxzone = $params{ defined($params{taxzone}) ? 'taxzone' : 'taxzone_id' } * 1; |
SL/DB/ReclamationItem.pm | ||
---|---|---|
8 | 8 |
|
9 | 9 |
use SL::DB::MetaSetup::ReclamationItem; |
10 | 10 |
use SL::DB::Manager::ReclamationItem; |
11 |
use SL::DB::ReclamationReason; |
|
12 | 11 |
use SL::DB::Helper::ActsAsList; |
13 | 12 |
use SL::DB::Helper::LinkedRecords; |
14 | 13 |
use SL::DB::Helper::RecordItem; |
SL/DB/ShopOrder.pm | ||
---|---|---|
6 | 6 |
use strict; |
7 | 7 |
|
8 | 8 |
use SL::DBUtils; |
9 |
use SL::DB::Shop; |
|
10 | 9 |
use SL::DB::MetaSetup::ShopOrder; |
11 | 10 |
use SL::DB::Manager::ShopOrder; |
12 |
use SL::DB::PaymentTerm; |
|
13 | 11 |
use SL::DB::Helper::LinkedRecords; |
14 | 12 |
use SL::Locale::String qw(t8); |
15 | 13 |
use Carp; |
... | ... | |
51 | 49 |
require SL::DB::OrderItem; |
52 | 50 |
require SL::DB::Part; |
53 | 51 |
require SL::DB::Shipto; |
52 |
require SL::DB::Shop; |
|
54 | 53 |
my @error_report; |
55 | 54 |
|
56 | 55 |
my @items = map{ |
Auch abrufbar als: Unified diff
fix: mehr SL::DB zirkuläre includes