ActionBar: Verwendung bei »System« → »Korrekturen im Hauptbuch«
authorMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 24 Mar 2017 13:47:45 +0000 (14:47 +0100)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Fri, 24 Mar 2017 13:54:03 +0000 (14:54 +0100)
bin/mozilla/acctranscorrections.pl
locale/de/all
templates/webpages/acctranscorrections/analyze_filter.html

index 6ee397f..c0e325e 100644 (file)
@@ -1,5 +1,6 @@
 use SL::AccTransCorrections;
 use SL::Form;
+use SL::Locale::String qw(t8);
 use SL::User;
 use Data::Dumper;
 use YAML;
@@ -14,6 +15,8 @@ sub analyze_filter {
   my $form     = $main::form;
   my $locale   = $main::locale;
 
+  setup_analyze_filter_action_bar();
+
   $form->{title}    = $locale->text('General ledger corrections');
   $form->header();
   print $form->parse_html_template('acctranscorrections/analyze_filter');
@@ -47,6 +50,8 @@ sub analyze {
     return;
   }
 
+  setup_analyze_action_bar();
+
   $form->header();
   print $form->parse_html_template('acctranscorrections/analyze_overview',
                                    { 'PROBLEMS' => \@problems,
@@ -251,4 +256,31 @@ sub dispatcher {
   $form->error($locale->text('No action defined.'));
 }
 
+sub setup_analyze_filter_action_bar {
+  my %params = @_;
+
+  for my $bar ($::request->layout->get('actionbar')) {
+    $bar->add(
+      action => [
+        t8('Analyze'),
+        submit    => [ '#form' ],
+        accesskey => 'enter',
+      ],
+    );
+  }
+}
+
+sub setup_analyze_action_bar {
+  my %params = @_;
+
+  for my $bar ($::request->layout->get('actionbar')) {
+    $bar->add(
+      action => [
+        t8('Back'),
+        call => [ 'kivi.history_back' ],
+      ],
+    );
+  }
+}
+
 1;
index 1d4c9a9..a0b2178 100755 (executable)
@@ -281,6 +281,7 @@ $self->{texts} = {
   'An invalid character was used (invalid characters: #1).' => 'Ein ungültiges Zeichen wurde benutzt (ungültige Zeichen: #1).',
   'An invalid character was used (valid characters: #1).' => 'Ein ungültiges Zeichen wurde benutzt (gültige Zeichen: #1).',
   'An upper-case character is required.' => 'Ein Großbuchstabe ist vorgeschrieben.',
+  'Analyze'                     => 'Analysieren',
   'Annotations'                 => 'Anmerkungen',
   'Any stock contents containing a best before date will be impossible to stock out otherwise.' => 'Sonst können Artikel, bei denen ein Mindesthaltbarkeitsdatum gesetzt ist, nicht mehr ausgelagert werden.',
   'Ap aging on %s'              => 'Offene Verbindlichkeiten an %s',
@@ -2723,7 +2724,6 @@ $self->{texts} = {
   'Split entry detected. The values you have entered will result in an entry with more than one position on both debit and credit. Due to known problems involving accounting software kivitendo does not allow these.' => 'Splitbuchung! Die eingebenen Werte würden eine Buchung auslösen, die jeweils mehr als eine Position auf Soll und Haben hätte. Um Kompatibilität mit DATEV zu gewährleisten erlaubt kivitendo keine Splitbuchungen.',
   'Spoolfile'                   => 'Druckdatei',
   'Start Dunning Process'       => 'Mahnprozess starten',
-  'Start analysis'              => 'Analyse beginnen',
   'Start date'                  => 'Startdatum',
   'Start of year'               => 'Jahresanfang',
   'Start process'               => 'Prozess starten',
index 91a193b..11c6136 100644 (file)
@@ -9,7 +9,7 @@
   [% 'This module can help you identify and correct such entries by analyzing the general ledger and presenting you likely solutions but also allowing you to fix problems yourself.' | $T8 %]
  </p>
 
- <form name="filter" method="post" action="acctranscorrections.pl">
+ <form name="filter" method="post" action="acctranscorrections.pl" id="form">
 
   <p>[% 'Time period for the analysis:' | $T8 %]</p>
 
@@ -33,9 +33,5 @@
    </table>
   </p>
 
-  <p>
-   <input type="submit" value="[% 'Start analysis' | $T8 %]">
-  </p>
-
   <input type="hidden" name="action" value="analyze">
  </form>