Belegvorlagen: Anzeigen, Umbenennen, Löschen

[kivitendo-erp.git] / SL / DB / RecordTemplate.pm

diff --git a/SL/DB/RecordTemplate.pm b/SL/DB/RecordTemplate.pm
index f7cad09..1360c95 100644 (file)
--- a/SL/DB/RecordTemplate.pm
+++ b/SL/DB/RecordTemplate.pm
@@ -3,6 +3,7 @@ package SL::DB::RecordTemplate;
 use strict;
 
 use DateTime::Format::Strptime;
+use List::Util qw(first);
 
 use SL::DB::MetaSetup::RecordTemplate;
 use SL::DB::Manager::RecordTemplate;
@@ -112,6 +113,12 @@ sub substitute_variables {
   }
 }
 
+sub template_name_to_use {
+  my ($self, @names) = @_;
+
+  return first { ($_ // '') ne '' } (@names, $self->template_name, $::locale->text('unnamed record template'));
+}
+
 1;
 __END__