From f4ec95cdca98ecc495c258803a7248dea213ea74 Mon Sep 17 00:00:00 2001
From: Lorenz Stechauner <lorenz.stechauner@necronda.net>
Date: Thu, 16 Nov 2023 17:42:01 +0100
Subject: [PATCH] AreaComAdminWindow: Allow users to create new reeds inline

---
 Elwig/App.xaml.cs                         | 50 +++++++++++++++++++++++
 Elwig/Helpers/AppDbContext.cs             |  7 ++++
 Elwig/Windows/AdministrationWindow.cs     |  8 ++++
 Elwig/Windows/AreaComAdminWindow.xaml     | 19 ++++++---
 Elwig/Windows/AreaComAdminWindow.xaml.cs  | 29 ++++++++++++-
 Elwig/Windows/BaseDataWindow.xaml         |  2 +-
 Elwig/Windows/DeliveryAdminWindow.xaml.cs |  4 +-
 Elwig/Windows/MainWindow.xaml             |  2 +-
 Elwig/Windows/MainWindow.xaml.cs          | 15 ++++---
 Elwig/Windows/MemberAdminWindow.xaml      |  5 ++-
 Elwig/Windows/MemberAdminWindow.xaml.cs   |  6 +--
 Elwig/Windows/SeasonFinishWindow.xaml.cs  |  3 +-
 12 files changed, 128 insertions(+), 22 deletions(-)

diff --git a/Elwig/App.xaml.cs b/Elwig/App.xaml.cs
index 6cea706..23d2767 100644
--- a/Elwig/App.xaml.cs
+++ b/Elwig/App.xaml.cs
@@ -13,10 +13,15 @@ using System.Threading;
 using System.Windows.Markup;
 using System.Reflection;
 using Elwig.Helpers.Printing;
+using Elwig.Windows;
+using Elwig.Dialogs;
 
 namespace Elwig {
     public partial class App : Application {
 
+        protected static App CurrentApp;
+        public static int NumWindows => CurrentApp.Windows.Count;
+
         public static readonly string DataPath = @"C:\ProgramData\Elwig\";
         public static readonly string ExePath = @"C:\Program Files\Elwig\";
         public static readonly string TempPath = Path.Combine(Path.GetTempPath(), "Elwig");
@@ -56,6 +61,7 @@ namespace Elwig {
             Directory.CreateDirectory(DataPath);
             MainDispatcher = Dispatcher;
             Scales = Array.Empty<IScale>();
+            CurrentApp = this;
         }
 
         protected override void OnStartup(StartupEventArgs evt) {
@@ -168,5 +174,49 @@ namespace Elwig {
                 }
             }
         }
+
+        private static T FocusWindow<T>(Func<T> constructor, Predicate<T>? selector = null) where T : Window {
+            foreach (Window w in CurrentApp.Windows) {
+                if (w is T t && (selector == null || selector(t))) {
+                    if (t.WindowState == WindowState.Minimized)
+                        t.WindowState = WindowState.Normal;
+                    t.Activate();
+                    return t;
+                }
+            }
+            var n = constructor();
+            n.Show();
+            return n;
+        }
+
+        public static DeliveryAdminWindow FocusReceipt() {
+            return FocusWindow<DeliveryAdminWindow>(() => new(true), w => w.IsReceipt);
+        }
+
+        public static DeliveryAdminWindow FocusMemberDeliveries(int mgnr) {
+            return FocusWindow<DeliveryAdminWindow>(() => new(mgnr), w => w.MgNr == mgnr);
+        }
+
+        public static AreaComAdminWindow FocusMemberAreaComs(int mgnr) {
+            return FocusWindow<AreaComAdminWindow>(() => new(mgnr), w => w.MgNr == mgnr);
+        }
+
+        public static BaseDataWindow FocusBaseData() {
+            return FocusWindow<BaseDataWindow>(() => new());
+        }
+
+        public static BaseDataWindow FocusBaseDataAreaComType() {
+            var w = FocusBaseData();
+            w.AreaCommitmentTypes.Focus();
+            return w;
+        }
+
+        public static SeasonFinishWindow FocusSeasonFinish() {
+            return FocusWindow<SeasonFinishWindow>(() => new());
+        }
+
+        public static DeliveryConfirmationsWindow FocusDeliveryConfirmations(int year) {
+            return FocusWindow<DeliveryConfirmationsWindow>(() => new(year), w => w.Year == year);
+        }
     }
 }
diff --git a/Elwig/Helpers/AppDbContext.cs b/Elwig/Helpers/AppDbContext.cs
index 8f000a0..cb28a14 100644
--- a/Elwig/Helpers/AppDbContext.cs
+++ b/Elwig/Helpers/AppDbContext.cs
@@ -163,6 +163,13 @@ namespace Elwig.Helpers {
             return c + 1;
         }
 
+        public async Task<int> NextRdNr(int kgnr) {
+            int c = 0;
+            (await WbRde.Where(r => r.KgNr == kgnr).Select(r => r.RdNr).ToListAsync())
+                .ForEach(a => { if (a <= c + 100) c = a; });
+            return c + 1;
+        }
+
         public async Task<WineQualLevel> GetWineQualityLevel(double kmw) {
             return await WineQualityLevels
                 .Where(q => !q.IsPredicate && (q.MinKmw == null || q.MinKmw <= kmw))
diff --git a/Elwig/Windows/AdministrationWindow.cs b/Elwig/Windows/AdministrationWindow.cs
index ad899e5..a946daa 100644
--- a/Elwig/Windows/AdministrationWindow.cs
+++ b/Elwig/Windows/AdministrationWindow.cs
@@ -572,5 +572,13 @@ namespace Elwig.Windows {
         protected void UpperCaseInput_LostFocus(object sender, RoutedEventArgs evt) {
             InputLostFocus((TextBox)sender, Validator.CheckUpperCase);
         }
+
+        protected void KgDetailsButton_Click(object sender, RoutedEventArgs evt) {
+            // TODO open origin window
+        }
+
+        protected void AreaComTypeDetailsButton_Click(object sender, RoutedEventArgs evt) {
+            App.FocusBaseDataAreaComType();
+        }
     }
 }
diff --git a/Elwig/Windows/AreaComAdminWindow.xaml b/Elwig/Windows/AreaComAdminWindow.xaml
index 88e64d8..ca9f945 100644
--- a/Elwig/Windows/AreaComAdminWindow.xaml
+++ b/Elwig/Windows/AreaComAdminWindow.xaml
@@ -144,7 +144,10 @@
 
                     <Label Content="Vertragsart:" Margin="10,70,0,0" Grid.Column="0" Grid.ColumnSpan="2"/>
                     <ComboBox x:Name="AreaComTypeInput" DisplayMemberPath="DisplayName" TextSearch.TextPath="DisplayName"
-                              HorizontalAlignment="Stretch" Margin="0,70,10,0" Grid.Column="1" Grid.ColumnSpan="3"/>
+                              HorizontalAlignment="Stretch" Margin="0,70,40,10" Grid.Column="1" Grid.ColumnSpan="3"/>
+                    <Button x:Name="AreaComTypeDetailsButton" Content="&#xE712;" FontFamily="Segoe MDL2 Assets" FontSize="14" Padding="0,1,0,0"
+                            Click="AreaComTypeDetailsButton_Click"
+                            Grid.Column="3" VerticalAlignment="Top" HorizontalAlignment="Right" Width="25" Height="25" Margin="10,70,10,10"/>
 
                     <Label Content="Bewirt.-Art:" Margin="10,100,0,0" Grid.Column="0" Grid.ColumnSpan="2"/>
                     <ComboBox x:Name="WineCultivationInput" DisplayMemberPath="Name" TextSearch.TextPath="Name"
@@ -165,13 +168,19 @@
 
                     <Label Content="KG:" Margin="10,10,0,0" Grid.Column="0"/>
                     <ComboBox x:Name="KgInput" ItemTemplate="{StaticResource KgNrTemplate}" TextSearch.TextPath="Name"
-                              HorizontalAlignment="Stretch" Margin="0,10,10,0" Grid.Column="1"
+                              HorizontalAlignment="Stretch" Margin="0,10,40,10" Grid.Column="1"
                               SelectionChanged="KgInput_SelectionChanged"/>
+                    <Button x:Name="KgDetailsButton" Content="&#xE712;" FontFamily="Segoe MDL2 Assets" FontSize="14" Padding="0,1,0,0"
+                            Click="KgDetailsButton_Click"
+                            Grid.Column="1" VerticalAlignment="Top" HorizontalAlignment="Right" Width="25" Height="25" Margin="10,10,10,10"/>
 
                     <Label Content="Ried:" Margin="10,40,0,0" Grid.Column="0"/>
-                    <ComboBox x:Name="RdInput" DisplayMemberPath="Name" TextSearch.TextPath="Name"
-                              HorizontalAlignment="Stretch" Margin="0,40,10,0" Grid.Column="1"/>
-
+                    <ComboBox x:Name="RdInput" DisplayMemberPath="Name" TextSearch.TextPath="Name" IsEditable="True"
+                              HorizontalAlignment="Stretch" Margin="0,40,40,10" Grid.Column="1"
+                              SelectionChanged="RdInput_SelectionChanged"/>
+                    <Button x:Name="RdAddButton" Content="&#xE73E;" FontFamily="Segoe MDL2 Assets" FontSize="16" Padding="0,0,0,0" IsEnabled="False"
+                            Click="RdAddButton_Click"
+                            Grid.Column="1" VerticalAlignment="Top" HorizontalAlignment="Right" Width="25" Height="25" Margin="10,40,10,10"/>
 
                     <Label Content="Parzelle(n):" Margin="10,70,0,0" Grid.Column="0"/>
                     <TextBox x:Name="GstNrInput" Margin="0,70,10,0" Grid.Column="1" HorizontalAlignment="Stretch"
diff --git a/Elwig/Windows/AreaComAdminWindow.xaml.cs b/Elwig/Windows/AreaComAdminWindow.xaml.cs
index bb0e959..a8d191e 100644
--- a/Elwig/Windows/AreaComAdminWindow.xaml.cs
+++ b/Elwig/Windows/AreaComAdminWindow.xaml.cs
@@ -12,6 +12,9 @@ using Xceed.Wpf.Toolkit.Primitives;
 
 namespace Elwig.Windows {
     public partial class AreaComAdminWindow : AdministrationWindow {
+
+        public int MgNr => Member.MgNr;
+
         private readonly Member Member;
         private List<string> TextFilter = new();
 
@@ -165,6 +168,7 @@ namespace Elwig.Windows {
 
             FbNrInput.Text = (await Context.NextFbNr()).ToString();
             MgNrInput.Text = Member.MgNr.ToString();
+            YearFromInput.Text = DateTime.Now.Year.ToString();
 
             SetDefaultValue(FbNrInput);
             ValidateRequiredInputs();
@@ -231,11 +235,21 @@ namespace Elwig.Windows {
 
             EntityEntry<AreaCom>? tr = null;
             try {
+                if (RdInput.SelectedItem is WbRd wbRd) {
+                    a.RdNr = wbRd.RdNr;
+                    var e = Context.Entry(wbRd);
+                    if (e.State == EntityState.Detached) {
+                        await Context.AddAsync(wbRd);
+                    }
+                } else {
+                    a.RdNr = null;
+                }
+
                 if (IsEditing) {
                     tr = Context.Update(a);
                 } else if (IsCreating) {
                     a.FbNr = newFbNr;
-                    tr = (await Context.AddAsync(a));
+                    tr = await Context.AddAsync(a);
                 } else {
                     throw new Exception();
                 }
@@ -387,6 +401,19 @@ namespace Elwig.Windows {
             ComboBox_SelectionChanged(sender, evt);
         }
 
+        private void RdInput_SelectionChanged(object sender, SelectionChangedEventArgs evt) {
+            RdAddButton.IsEnabled = RdInput.SelectedIndex == -1;
+        }
+
+        private async void RdAddButton_Click(object sender, RoutedEventArgs evt) {
+            if (KgInput.SelectedItem is not AT_Kg kg) return;
+            string name = RdInput.Text.Trim();
+            if (name.Length == 0) return;
+            var s = RdInput.ItemsSource.Cast<object?>();
+            RdInput.ItemsSource = s.Append(new WbRd() { KgNr = kg.KgNr, Name = name, RdNr = await Context.NextRdNr(kg.KgNr)});
+            RdInput.SelectedIndex = s.Count();
+        }
+
         protected void InputTextChanged(TextBox input, Func<TextBox, bool, AppDbContext, AreaCom?, ValidationResult> checker) {
             InputTextChanged(input, checker(input, SenderIsRequired(input), Context, (AreaCom)AreaCommitmentList.SelectedItem));
         }
diff --git a/Elwig/Windows/BaseDataWindow.xaml b/Elwig/Windows/BaseDataWindow.xaml
index c7cc8b6..805fa97 100644
--- a/Elwig/Windows/BaseDataWindow.xaml
+++ b/Elwig/Windows/BaseDataWindow.xaml
@@ -309,7 +309,7 @@
                 </Grid>
             </TabItem>
 
-            <TabItem Header="Flächenbindungsverträge">
+            <TabItem Header="Flächenbindungsverträge" x:Name="AreaCommitmentTypes">
                 <Grid>
                     <Grid.ColumnDefinitions>
                         <ColumnDefinition Width="260"/>
diff --git a/Elwig/Windows/DeliveryAdminWindow.xaml.cs b/Elwig/Windows/DeliveryAdminWindow.xaml.cs
index 435dddc..420981b 100644
--- a/Elwig/Windows/DeliveryAdminWindow.xaml.cs
+++ b/Elwig/Windows/DeliveryAdminWindow.xaml.cs
@@ -19,8 +19,10 @@ using Xceed.Wpf.Toolkit.Primitives;
 namespace Elwig.Windows {
     public partial class DeliveryAdminWindow : AdministrationWindow {
 
+        public readonly bool IsReceipt = false;
+        public int? MgNr => Member?.MgNr;
+
         private bool IsUpdatingGradation = false;
-        private readonly bool IsReceipt = false;
         private Member? Member = null;
         private readonly DispatcherTimer Timer;
         private List<string> TextFilter = new();
diff --git a/Elwig/Windows/MainWindow.xaml b/Elwig/Windows/MainWindow.xaml
index 002ec6a..5461d7a 100644
--- a/Elwig/Windows/MainWindow.xaml
+++ b/Elwig/Windows/MainWindow.xaml
@@ -5,7 +5,7 @@
         xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006"
         xmlns:local="clr-namespace:Elwig.Windows"
         Title="Elwig" MinHeight="400" MinWidth="325" Height="450" Width="800" ResizeMode="CanResize"
-        Loaded="Window_Loaded">
+        Loaded="Window_Loaded" Closing="Window_Closing">
     <Window.Resources>
         <Style TargetType="Button">
             <Setter Property="VerticalAlignment" Value="Top"/>
diff --git a/Elwig/Windows/MainWindow.xaml.cs b/Elwig/Windows/MainWindow.xaml.cs
index c0106fa..177b0ff 100644
--- a/Elwig/Windows/MainWindow.xaml.cs
+++ b/Elwig/Windows/MainWindow.xaml.cs
@@ -1,3 +1,4 @@
+using System.ComponentModel;
 using System.Reflection;
 using System.Windows;
 
@@ -16,6 +17,11 @@ namespace Elwig.Windows {
 
         private void Window_Loaded(object sender, RoutedEventArgs evt) { }
 
+        private void Window_Closing(object sender, CancelEventArgs evt) {
+            if (App.NumWindows > 1)
+                evt.Cancel = true;
+        }
+
         private void MemberAdminButton_Click(object sender, RoutedEventArgs evt) {
             var w = new MemberAdminWindow();
             w.Show();
@@ -27,8 +33,7 @@ namespace Elwig.Windows {
         }
 
         private void ReceiptButton_Click(object sender, RoutedEventArgs evt) {
-            var w = new DeliveryAdminWindow(true);
-            w.Show();
+            App.FocusReceipt();
         }
 
         private void DeliveryAdminButton_Click(object sender, RoutedEventArgs evt) {
@@ -51,13 +56,11 @@ namespace Elwig.Windows {
         }
 
         private void BaseDataButton_Click(object sender, RoutedEventArgs evt) {
-            var w = new BaseDataWindow();
-            w.Show();
+            App.FocusBaseData();
         }
 
         private void SeasonFinishButton_Click(object sender, RoutedEventArgs e) {
-            var w = new SeasonFinishWindow();
-            w.Show();
+            App.FocusSeasonFinish();
         }
     }
 }
diff --git a/Elwig/Windows/MemberAdminWindow.xaml b/Elwig/Windows/MemberAdminWindow.xaml
index e696ac2..22d0948 100644
--- a/Elwig/Windows/MemberAdminWindow.xaml
+++ b/Elwig/Windows/MemberAdminWindow.xaml
@@ -381,7 +381,10 @@
 
                     <Label Content="Stammgemeinde:" Margin="10,160,0,0" Grid.Column="0"/>
                     <ComboBox x:Name="DefaultKgInput" DisplayMemberPath="Name" TextSearch.TextPath="Name"
-                              Margin="0,160,10,0" Grid.Column="1" Grid.ColumnSpan="2"/>
+                              Margin="0,160,40,10" Grid.Column="1" Grid.ColumnSpan="2"/>
+                    <Button x:Name="KgDetailsButton" Content="&#xE712;" FontFamily="Segoe MDL2 Assets" FontSize="14" Padding="0,1,0,0"
+                            Click="KgDetailsButton_Click"
+                            Grid.Column="2" VerticalAlignment="Top" HorizontalAlignment="Right" Width="25" Height="25" Margin="10,160,10,10"/>
 
                     <Label Content="Anmerkung:" Margin="10,190,0,0" Grid.Column="0"/>
                     <TextBox x:Name="CommentInput" Margin="0,190,10,0" Grid.Column="1" Grid.ColumnSpan="2"
diff --git a/Elwig/Windows/MemberAdminWindow.xaml.cs b/Elwig/Windows/MemberAdminWindow.xaml.cs
index 90ae7d1..0f5629e 100644
--- a/Elwig/Windows/MemberAdminWindow.xaml.cs
+++ b/Elwig/Windows/MemberAdminWindow.xaml.cs
@@ -257,13 +257,11 @@ namespace Elwig.Windows {
         }
 
         private void AreaCommitmentButton_Click(object sender, RoutedEventArgs evt) {
-            var w = new AreaComAdminWindow(((Member)MemberList.SelectedItem).MgNr);
-            w.Show();
+            App.FocusMemberAreaComs(((Member)MemberList.SelectedItem).MgNr);
         }
 
         private void DeliveryButton_Click(object sender, RoutedEventArgs evt) {
-            var w = new DeliveryAdminWindow(((Member)MemberList.SelectedItem).MgNr);
-            w.Show();
+            App.FocusMemberDeliveries(((Member)MemberList.SelectedItem).MgNr);
         }
 
         private async void SearchInput_TextChanged(object sender, RoutedEventArgs evt) {
diff --git a/Elwig/Windows/SeasonFinishWindow.xaml.cs b/Elwig/Windows/SeasonFinishWindow.xaml.cs
index 127e011..c36e11c 100644
--- a/Elwig/Windows/SeasonFinishWindow.xaml.cs
+++ b/Elwig/Windows/SeasonFinishWindow.xaml.cs
@@ -51,8 +51,7 @@ namespace Elwig.Windows {
         private void DeliveryConfirmationButton_Click(object sender, RoutedEventArgs evt) {
             if (SeasonInput.Value is not int year)
                 return;
-            var w = new DeliveryConfirmationsWindow(year);
-            w.Show();
+            App.FocusDeliveryConfirmations(year);
         }
 
         private async void OverUnderDeliveryButton_Click(object sender, RoutedEventArgs evt) {