Revision 74fda0f4
Von Sven Schöling vor mehr als 1 Jahr hinzugefügt
| SL/DB/Invoice.pm | ||
|---|---|---|
|
use SL::DB::Helper::TransNumberGenerator;
|
||
|
use SL::DB::Helper::ZUGFeRD;
|
||
|
use SL::Locale::String qw(t8);
|
||
|
use SL::DB::CustomVariable;
|
||
|
|
||
|
__PACKAGE__->meta->add_relationship(
|
||
|
invoiceitems => {
|
||
| SL/DB/Part.pm | ||
|---|---|---|
|
use SL::DBUtils;
|
||
|
use SL::DB::MetaSetup::Part;
|
||
|
use SL::DB::Manager::Part;
|
||
|
use SL::DB::Chart;
|
||
|
use SL::DB::Helper::AttrHTML;
|
||
|
use SL::DB::Helper::AttrSorted;
|
||
|
use SL::DB::Helper::TransNumberGenerator;
|
||
| ... | ... | |
|
|
||
|
sub get_chart {
|
||
|
my ($self, %params) = @_;
|
||
|
require SL::DB::Chart;
|
||
|
|
||
|
my $type = (any { $_ eq $params{type} } qw(income expense inventory)) ? $params{type} : croak("Invalid 'type' parameter '$params{type}'");
|
||
|
my $taxzone = $params{ defined($params{taxzone}) ? 'taxzone' : 'taxzone_id' } * 1;
|
||
| SL/DB/ReclamationItem.pm | ||
|---|---|---|
|
|
||
|
use SL::DB::MetaSetup::ReclamationItem;
|
||
|
use SL::DB::Manager::ReclamationItem;
|
||
|
use SL::DB::ReclamationReason;
|
||
|
use SL::DB::Helper::ActsAsList;
|
||
|
use SL::DB::Helper::LinkedRecords;
|
||
|
use SL::DB::Helper::RecordItem;
|
||
| SL/DB/ShopOrder.pm | ||
|---|---|---|
|
use strict;
|
||
|
|
||
|
use SL::DBUtils;
|
||
|
use SL::DB::Shop;
|
||
|
use SL::DB::MetaSetup::ShopOrder;
|
||
|
use SL::DB::Manager::ShopOrder;
|
||
|
use SL::DB::PaymentTerm;
|
||
|
use SL::DB::Helper::LinkedRecords;
|
||
|
use SL::Locale::String qw(t8);
|
||
|
use Carp;
|
||
| ... | ... | |
|
require SL::DB::OrderItem;
|
||
|
require SL::DB::Part;
|
||
|
require SL::DB::Shipto;
|
||
|
require SL::DB::Shop;
|
||
|
my @error_report;
|
||
|
|
||
|
my @items = map{
|
||
Auch abrufbar als: Unified diff
fix: mehr SL::DB zirkuläre includes