Brieffunktion: WebDAV-Verzeichnisinhalt anzeigen

diff --git a/SL/Controller/Letter.pm b/SL/Controller/Letter.pm
index 14922a77a33220ff8541bcab8e6b8c11d303aa9d..7905cb759161a7dd4cf30b90665c7159e7fdbf83 100644 (file)
--- a/SL/Controller/Letter.pm
+++ b/SL/Controller/Letter.pm
@@ -23,7 +23,7 @@ use SL::Webdav;
 use SL::Webdav::File;
 
 use Rose::Object::MakeMethods::Generic (
 use SL::Webdav::File;
 
 use Rose::Object::MakeMethods::Generic (

-  'scalar --get_set_init' => [ qw(letter all_employees models) ],
+  'scalar --get_set_init' => [ qw(letter all_employees models webdav_objects) ],

 );
 
 __PACKAGE__->run_before('check_auth_edit');
 );
 
 __PACKAGE__->run_before('check_auth_edit');


@@ -598,6 +598,27 @@ sub init_all_employees {
   SL::DB::Manager::Employee->get_all(query => [ deleted => 0 ]);
 }
 
   SL::DB::Manager::Employee->get_all(query => [ deleted => 0 ]);
 }
 

+sub init_webdav_objects {
+  my ($self) = @_;
+
+  return [] if !$self->letter || !$self->letter->letternumber || !$::instance_conf->get_webdav;
+
+  my $webdav = SL::Webdav->new(
+    type     => 'letter',
+    number   => $self->letter->letternumber,
+  );
+
+  my $webdav_path = $webdav->webdav_path;
+  my @all_objects = $webdav->get_all_objects;
+
+  return [ map {
+    +{ name => $_->filename,
+       type => t8('File'),
+       link => File::Spec->catdir($webdav_path, $_->filename),
+     }
+  } @all_objects ];
+}
+

 sub check_auth_edit {
   $::auth->assert('sales_letter_edit');
 }
 sub check_auth_edit {
   $::auth->assert('sales_letter_edit');
 }

diff --git a/templates/webpages/letter/edit.html b/templates/webpages/letter/edit.html
index de10fd425e95f75566ef68663620577fe932bd4e..239c841832d043a47144bf26dcf1ebda7596ddfc 100644 (file)
--- a/templates/webpages/letter/edit.html
+++ b/templates/webpages/letter/edit.html
@@ -3,6 +3,7 @@
 [%- USE L %]
 [%- USE P %]
 [%- USE LxERP %]
 [%- USE L %]
 [%- USE P %]
 [%- USE LxERP %]

+[%- SET WEBDAV = SELF.webdav_objects %]

 <h1>[% title | html %]</h1>
 
 <form action='controller.pl' method='POST'>
 <h1>[% title | html %]</h1>
 
 <form action='controller.pl' method='POST'>


@@ -16,6 +17,9 @@
    <ul>
     <li><a href="#ui-tabs-letter">[% LxERP.t8("Letter") %]</a></li>
 [%- IF letter.id %]
    <ul>
     <li><a href="#ui-tabs-letter">[% LxERP.t8("Letter") %]</a></li>
 [%- IF letter.id %]

+ [%- IF INSTANCE_CONF.get_webdav %]
+     <li><a href="#ui-tabs-webdav">[% LxERP.t8('WebDAV') %]</a></li>
+ [%- END %]

     <li><a href="controller.pl?action=RecordLinks/ajax_list&object_model=Letter&object_id=[% HTML.url(letter.id) %]">[% LxERP.t8("Linked Records") %]</a></li>
 [%- END %]
    </ul>
     <li><a href="controller.pl?action=RecordLinks/ajax_list&object_model=Letter&object_id=[% HTML.url(letter.id) %]">[% LxERP.t8("Linked Records") %]</a></li>
 [%- END %]
    </ul>


@@ -136,6 +140,7 @@
 </table>
 
  </div>
 </table>
 
  </div>

+ [% PROCESS 'webdav/_list.html' %]

  <div id="ui-tabs-1">
   [%- LxERP.t8("Loading...") %]
  </div>
  <div id="ui-tabs-1">
   [%- LxERP.t8("Loading...") %]
  </div>