From ee23f6e0a13418cf83d8f70063e2a0de5f5ea66b Mon Sep 17 00:00:00 2001
From: Bernd Blessmann <bibi@online.de>
Date: Thu, 6 Oct 2011 13:53:11 +0200
Subject: [PATCH] =?utf8?q?=C3=84nderungen=20f=C3=BCr=20die=20Aufklappmen?=
 =?utf8?q?=C3=BCs=20Forderungen=20und=20Verbindlichkeiten=20verhindern,=20?=
 =?utf8?q?...?=
MIME-Version: 1.0
Content-Type: text/plain; charset=utf8
Content-Transfer-Encoding: 8bit

... bei schon bebuchten Konten. Siehe auch Bug 1640.
---
 bin/mozilla/am.pl                        |  2 ++
 locale/de/all                            |  1 +
 locale/en/all                            |  1 +
 templates/webpages/am/edit_accounts.html | 16 ++++++++++------
 4 files changed, 14 insertions(+), 6 deletions(-)

diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl
index 368a62716..111e14e94 100644
--- a/bin/mozilla/am.pl
+++ b/bin/mozilla/am.pl
@@ -347,11 +347,13 @@ sub account_header {
   }
 
   my $ChartTypeIsAccount = ($form->{charttype} eq "A") ? "1":"";
+  my $AccountIsPosted = ($form->{orphaned} ) ? "":"1";
 
   $form->header();
 
   my $parameters_ref = {
     ChartTypeIsAccount         => $ChartTypeIsAccount,
+    AccountIsPosted            => $AccountIsPosted,
     select_category            => $select_category,
     select_charttype           => $select_charttype,
     select_bwa                 => $select_bwa,
diff --git a/locale/de/all b/locale/de/all
index ab51f5756..5bd9658ae 100644
--- a/locale/de/all
+++ b/locale/de/all
@@ -369,6 +369,7 @@ $self->{texts} = {
   'Cc'                          => 'Cc',
   'Change Lx-Office installation settings (all menu entries beneath \'System\')' => 'Ver&auml;ndern der Lx-Office-Installationseinstellungen (Men&uuml;punkte unterhalb von \'System\')',
   'Change representative to'    => 'Vertreter ändern in',
+  'Changes to Receivables and Payables are only possible if no transactions to this account are posted yet.' => 'Änderungen bei Forderungen oder Verbindlichkeiten sind nur möglich, wenn dieses Konto noch nicht bebucht wurde.',
   'Charge Number'               => 'Chargennummer',
   'Charge number'               => 'Chargennummer',
   'Charset'                     => 'Zeichensatz',
diff --git a/locale/en/all b/locale/en/all
index 7627741aa..879d1ac07 100644
--- a/locale/en/all
+++ b/locale/en/all
@@ -360,6 +360,7 @@ $self->{texts} = {
   'Cc'                          => '',
   'Change Lx-Office installation settings (all menu entries beneath \'System\')' => '',
   'Change representative to'    => '',
+  'Changes to Receivables and Payables are only possible if no transactions to this account are posted yet.' => '',
   'Charge Number'               => '',
   'Charge number'               => '',
   'Chart'                       => '',
diff --git a/templates/webpages/am/edit_accounts.html b/templates/webpages/am/edit_accounts.html
index 6252ee169..c55e08f1d 100644
--- a/templates/webpages/am/edit_accounts.html
+++ b/templates/webpages/am/edit_accounts.html
@@ -80,9 +80,13 @@ window.onload = function() {
     &nbsp;[% 'Inventory' | $T8 %]
 </fieldset>
 
+[% IF AccountIsPosted %]
+[%- SET DIS = ' disabled="disabled"' %]
+[% END %]
 <fieldset class="DEPENDS ON charttype BEING A">
   <legend>[% 'Include in drop-down menus' | $T8 %]</legend>
   <p style='font-weight:normal'>[% 'These will only be effective if the account is NOT a summary account AND there exists at least one taxkey. Setting the account as a summary account will erase these settings.' | $T8 %]</p>
+  <p style='font-weight:normal'>[% 'Changes to Receivables and Payables are only possible if no transactions to this account are posted yet.' | $T8 %]</p>
   <table width="100%">
     <tr>
       <th align="left">[% 'Receivables' | $T8 %]</th>
@@ -93,24 +97,24 @@ window.onload = function() {
     <tr>
       <td>
         <input name="AR_amount" type="checkbox" class="checkbox" value="AR_amount"
-          [% HTML.escape(AR_amount) %]>&nbsp;
+          [% HTML.escape(AR_amount)%][% DIS %]>&nbsp;
         [% 'Revenue' | $T8 %] <br>
         <input name="AR_paid" type="checkbox" class="checkbox" value="AR_paid"
-          [% HTML.escape(AR_paid) %]>&nbsp;
+          [% HTML.escape(AR_paid) %][% DIS %]>&nbsp;
         [% 'Receipt' | $T8 %] <br>
         <input name="AR_tax" type="checkbox" class="checkbox" value="AR_tax"
-          [% HTML.escape(AR_tax) %]>&nbsp;
+          [% HTML.escape(AR_tax) %][% DIS %]>&nbsp;
         [% 'Tax' | $T8 %]
       </td>
       <td>
         <input name="AP_amount" type="checkbox" class="checkbox" value="AP_amount"
-          [% HTML.escape(AP_amount) %]>&nbsp;
+          [% HTML.escape(AP_amount) %][% DIS %]>&nbsp;
         [% 'Expense/Asset' | $T8 %] <br>
         <input name="AP_paid" type="checkbox" class="checkbox" value="AP_paid"
-          [% HTML.escape(AP_paid) %]>&nbsp;
+          [% HTML.escape(AP_paid) %][% DIS %]>&nbsp;
         [% 'Payment' | $T8 %] <br>
         <input name="AP_tax" type="checkbox" class="checkbox" value="AP_tax"
-            [% HTML.escape(AP_tax) %]>&nbsp;
+            [% HTML.escape(AP_tax) %][% DIS %]>&nbsp;
         [% 'Tax' | $T8 %]
       </td>
       <td>
-- 
2.20.1