use strict;
use Exporter 'import';
-our @EXPORT_OK = qw(store_pdf append_general_pdf_attachments);
+our @EXPORT_OK = qw(store_pdf append_general_pdf_attachments doc_storage_enabled);
our %EXPORT_TAGS = (all => \@EXPORT_OK,);
use SL::File;
+sub doc_storage_enabled {
+ return 0 unless $::instance_conf->get_doc_storage;
+ return 1 if $::instance_conf->get_doc_storage_for_documents eq 'Filesystem' && $::instance_conf->get_doc_files;
+ return 1 if $::instance_conf->get_doc_storage_for_documents eq 'Webdav' && $::instance_conf->get_doc_webdav;
+ return 0;
+}
+
sub store_pdf {
my ($self, $form) = @_;
- return unless $::instance_conf->get_doc_storage;
+ return unless $self->doc_storage_enabled;
my $type = $form->{type};
- $type = $form->{formname} if $form->{formname} && !$form->{type};
+ $type = $form->{formname} if $form->{formname} && !$form->{type};
+ $type = $form->{attachment_type} if $form->{attachment_type};
my $id = $form->{id};
$id = $form->{attachment_id} if $form->{attachment_id} && !$form->{id};
return if !$id || !$type;
- my $prefix = $form->get_number_prefix_for_type();
+
SL::File->save(
- object_id => $id,
- object_type => $type,
- mime_type => 'application/pdf',
- source => 'created',
- file_type => 'document',
- file_name => $form->{attachment_filename},
- file_path => $form->{tmpfile},
- file_number => $form->{"${prefix}number"},
+ object_id => $id,
+ object_type => $type,
+ mime_type => 'application/pdf',
+ source => 'created',
+ file_type => 'document',
+ file_name => $form->{attachment_filename},
+ file_path => $form->{tmpfile},
+ print_variant => $form->{formname},
);
}
SL::Helper::File - Helper for $::Form to store generated PDF-Documents
-
=head1 SYNOPSIS
# This Helper is used by SL::Form to store new generated PDF-Files and append general attachments to this documents.
$self->store_pdf($self);
- $self->append_general_pdf_attachments($self) if ( $ext_for_format eq 'pdf' );
+ $self->append_general_pdf_attachments(filepath => $pdf_filename, type => $form->{type}) if ( $ext_for_format eq 'pdf' );
+
+#It is also used in MassPrint Helper
+#
=head1 DESCRIPTION
=cut
-