projekt kivitendo

use SL::Webdav;

use SL::File;

use SL::Util qw(trim);

use SL::DB::Order;

use SL::DB::Default;

use SL::DB::Unit;

                 email_body                 => $::form->{email_body},

               };

  my $status = $self->get_periodic_invoices_status($config);

  $order->assign_attributes(%{$::form->{order}});

    my $periodic_invoices_config = $order->periodic_invoices_config || $order->periodic_invoices_config(SL::DB::PeriodicInvoicesConfig->new);

    $periodic_invoices_config->assign_attributes(%$periodic_invoices_config_attrs);

  }

  my ($yaml_config) = @_;

  return if !$yaml_config;

  return if 'HASH' ne ref $attr;

  return SL::DB::PeriodicInvoicesConfig->new(%$attr);

}