projekt kivitendo

  $self->from($params{from});

  $self->to($params{to});

  my $fromto = $self->fromto;

  # not all last month ar ap gl booking have an entry -> rent ?

  my $query = qq|

  left join files on files.object_id=trans_id

  where $fromto

  and object_id is null

  and trans_id not in (select id from gl)

  LIMIT 1|;

  $data{documents} = $::form->{documents};

  $data{transaction_type} = $::form->{transaction_type};

    $::form->error(t8("Cannot export with documents because some transactions don't have a PDF document attached."));

  }

  my $datev = SL::DATEV->new(%data);