projekt kivitendo

use SL::Webdav;

use SL::Locale::String qw(t8);

use SL::Helper::GlAttachments qw(count_gl_attachments);

require "bin/mozilla/common.pl";

require "bin/mozilla/reportgenerator.pl";

  $template->substitute_variables;

  my $payment_suggestion =  $::form->{form_defaults}->{amount_1};

  # Clean the current $::form before rebuilding it from the template.

  my $form_defaults = delete $::form->{form_defaults};

  delete @{ $::form }{ grep { !m{^(?:script|login)$}i } keys %{ $::form } };