projekt kivitendo

  $self->export_letter_to_form($letter);

  $::form->{formname} = "letter";

  my $language_saved      = $::form->{language_id};

  my $greeting_saved      = $::form->{greeting};

  my $cp_id_saved         = $::form->{cp_id};

  IS->customer_details(\%::myconfig, $::form);

  if (!$cp_id_saved) {

      my $file = IO::File->new($pdf_file_name, 'r') || croak("Cannot open file '$pdf_file_name'");

      my $size = -s $pdf_file_name;

      my $content_type    =  'application/pdf';

      my $attachment_name =  $::form->generate_attachment_filename;

      $attachment_name    =~ s:.*//::g;