projekt kivitendo

  $form->{title}               = $locale->text('Edit Preferences for #1', $::myconfig{login});

  $form->{follow_up_notify_by_email} = $myconfig{follow_up_notify_by_email};

  setup_am_config_action_bar();

  $form->header();

  $form->{"title"} = $locale->text("Set eMail text");

  $form->header(

    no_layout       => 1,

  );

  print($form->parse_html_template("dunning/set_email"));

  $form->{follow_up_trans_info} = $form->{donumber} .'('. $form->{VC_OBJ}->name .')' if $form->{VC_OBJ};

  $form->{longdescription_dialog_size_percentage} = SL::Helper::UserPreferences::DisplayPreferences->new()->get_longdescription_dialog_size_percentage();

  setup_do_action_bar();

  setup_generictranslations_edit_email_strings_action_bar();

  $form->{title} = $locale->text('Edit preset email strings');

  $form->header();

  print $form->parse_html_template('generictranslations/edit_email_strings',{ 'MAIL_STRINGS' => \%mail_strings });

  $TMPL_VAR->{payment_terms_obj} = get_payment_terms_for_invoice();

  $form->{duedate}             = $TMPL_VAR->{payment_terms_obj}->calc_date(reference_date => $form->{invdate}, due_date => $form->{duedate})->to_kivitendo if $TMPL_VAR->{payment_terms_obj};

  setup_ir_action_bar($TMPL_VAR);

  ), @custom_hiddens,

  map { $_.'_rate', $_.'_description', $_.'_taxnumber', $_.'_tax_id' } split / /, $form->{taxaccounts}];

  $TMPL_VAR{payment_terms_obj} = get_payment_terms_for_invoice();

  $form->{duedate}             = $TMPL_VAR{payment_terms_obj}->calc_date(reference_date => $form->{invdate}, due_date => $form->{duedate})->to_kivitendo if $TMPL_VAR{payment_terms_obj};

    }

  }

  # original snippets:

  my $locale   = $main::locale;

  my $cgi      = $::request->{cgi};

  my $report = SL::ReportGenerator->new(\%myconfig, $form);

  my @columns = qw(statement ct invnumber transdate duedate amount open datepaid current_open type);