[#20] MemberAdminWindow: Add MemberBusinessSharesAdminWindow to manage member shares

Elwig/Windows/AdministrationWindow.cs

@@ -164,10 +164,10 @@ namespace Elwig.Windows {
                 } else if (input is TextBox tb && tb.Text.Length == 0) {
                     ControlUtils.SetInputInvalid(input);
                     Valid[input] = false;
-                } else if (input is ComboBox cb && cb.SelectedItem == null && cb.ItemsSource != null && cb.ItemsSource.Cast<object>().Any()) {
+                } else if (input is ComboBox cb && cb.SelectedItem == null && cb.HasItems) {
                     ControlUtils.SetInputInvalid(input);
                     Valid[input] = false;
-                } else if (input is ListBox lb && lb.SelectedItem == null && lb.ItemsSource != null && lb.ItemsSource.Cast<object>().Any()) {
+                } else if (input is ListBox lb && lb.SelectedItem == null && lb.HasItems) {
                     ControlUtils.SetInputInvalid(input);
                     Valid[input] = false;
                 } else if (input is CheckBox ckb && ((ckb.IsThreeState && ckb.IsChecked == null) || (!ckb.IsThreeState && ckb.IsChecked != true))) {
@@ -285,8 +285,13 @@ namespace Elwig.Windows {
                 var binding = cb.GetBindingExpression(ComboBox.SelectedItemProperty);
                 binding?.UpdateSource();
             }
-            foreach (var lb in ListBoxInputs)
-                lb.SelectedItems.Clear();
+            foreach (var lb in ListBoxInputs) {
+                if (lb.SelectionMode == SelectionMode.Single) {
+                    lb.SelectedItem = null;
+                } else {
+                    lb.SelectedItems.Clear();
+                }
+            }
             foreach (var cb in CheckBoxInputs) {
                 cb.IsChecked = cb.IsThreeState ? null : false;
                 var binding = cb.GetBindingExpression(CheckBox.IsCheckedProperty);

Elwig/Windows/BaseDataWindow.xaml.cs

@@ -361,29 +361,29 @@ namespace Elwig.Windows {
 
         private async Task UpdateClientParameters(ClientParameters p) {
             p.Name = ClientNameInput.Text;
-            p.NameSuffix = string.IsNullOrEmpty(ClientNameSuffixInput.Text) ? null : ClientNameSuffixInput.Text;
+            p.NameSuffix = string.IsNullOrWhiteSpace(ClientNameSuffixInput.Text) ? null : ClientNameSuffixInput.Text;
             p.NameType = ClientNameTypeInput.Text;
             p.NameToken = ClientNameTokenInput.Text;
             p.NameShort = ClientNameShortInput.Text;
             p.Address = ClientAddressInput.Text;
             p.Plz = int.Parse(ClientPlzInput.Text);
             p.Ort = ClientOrtInput.Text;
-            p.Iban = string.IsNullOrEmpty(ClientIbanInput.Text) ? null : ClientIbanInput.Text;
-            p.Bic = string.IsNullOrEmpty(ClientBicInput.Text) ? null : ClientBicInput.Text;
-            p.UstIdNr = string.IsNullOrEmpty(ClientUstIdNrInput.Text) ? null : ClientUstIdNrInput.Text;
-            p.LfbisNr = string.IsNullOrEmpty(ClientLfbisNrInput.Text) ? null : ClientLfbisNrInput.Text;
-            p.OrganicAuthority = string.IsNullOrEmpty(ClientOrganicAuthorityInput.Text) ? null : ClientOrganicAuthorityInput.Text;
-            p.PhoneNr = string.IsNullOrEmpty(ClientPhoneNrInput.Text) ? null : ClientPhoneNrInput.Text;
-            p.FaxNr = string.IsNullOrEmpty(ClientFaxNrInput.Text) ? null : ClientFaxNrInput.Text;
-            p.EmailAddress = string.IsNullOrEmpty(ClientEmailAddressInput.Text) ? null : ClientEmailAddressInput.Text;
-            p.Website = string.IsNullOrEmpty(ClientWebsiteInput.Text) ? null : ClientWebsiteInput.Text;
+            p.Iban = string.IsNullOrWhiteSpace(ClientIbanInput.Text) ? null : ClientIbanInput.Text;
+            p.Bic = string.IsNullOrWhiteSpace(ClientBicInput.Text) ? null : ClientBicInput.Text;
+            p.UstIdNr = string.IsNullOrWhiteSpace(ClientUstIdNrInput.Text) ? null : ClientUstIdNrInput.Text;
+            p.LfbisNr = string.IsNullOrWhiteSpace(ClientLfbisNrInput.Text) ? null : ClientLfbisNrInput.Text;
+            p.OrganicAuthority = string.IsNullOrWhiteSpace(ClientOrganicAuthorityInput.Text) ? null : ClientOrganicAuthorityInput.Text;
+            p.PhoneNr = string.IsNullOrWhiteSpace(ClientPhoneNrInput.Text) ? null : ClientPhoneNrInput.Text;
+            p.FaxNr = string.IsNullOrWhiteSpace(ClientFaxNrInput.Text) ? null : ClientFaxNrInput.Text;
+            p.EmailAddress = string.IsNullOrWhiteSpace(ClientEmailAddressInput.Text) ? null : ClientEmailAddressInput.Text;
+            p.Website = string.IsNullOrWhiteSpace(ClientWebsiteInput.Text) ? null : ClientWebsiteInput.Text;
 
             p.ModeBusinessShares = ParameterBusinessShareModeInput.SelectedIndex;
             p.EnableMemberHistory = ParameterBusinessShareHistoryInput.IsChecked ?? false;
-            p.TextDeliveryNote = string.IsNullOrEmpty(TextElementDeliveryNote.Text) ? null : TextElementDeliveryNote.Text;
+            p.TextDeliveryNote = string.IsNullOrWhiteSpace(TextElementDeliveryNote.Text) ? null : TextElementDeliveryNote.Text;
             p.ModeDeliveryNoteStats = (ModeDeliveryNoteNone.IsChecked == true) ? 0 : (ModeDeliveryNoteGaOnly.IsChecked == true) ? 1 : (ModeDeliveryNoteShort.IsChecked == true) ? 2 : (ModeDeliveryNoteFull.IsChecked == true) ? 3 : 2;
-            p.TextDeliveryConfirmation = string.IsNullOrEmpty(TextElementDeliveryConfirmation.Text) ? null : TextElementDeliveryConfirmation.Text;
-            p.TextCreditNote = string.IsNullOrEmpty(TextElementCreditNote.Text) ? null : TextElementCreditNote.Text;
+            p.TextDeliveryConfirmation = string.IsNullOrWhiteSpace(TextElementDeliveryConfirmation.Text) ? null : TextElementDeliveryConfirmation.Text;
+            p.TextCreditNote = string.IsNullOrWhiteSpace(TextElementCreditNote.Text) ? null : TextElementCreditNote.Text;
 
             p.ExportEbicsVersion = ParameterExportEbicsVersion.SelectedIndex + 3;
             p.ExportEbicsAddress = ParameterExportEbicsAddress.SelectedIndex;

Elwig/Windows/DeliveryAdminWindow.xaml.cs

@@ -124,7 +124,8 @@ namespace Elwig.Windows {
 
         public DeliveryAdminWindow(int mgnr) :
             this() {
-            ViewModel.FilterMember = DeliveryService.GetMember(mgnr) ?? throw new ArgumentException("MgNr argument has invalid value");
+            using var ctx = new AppDbContext();
+            ViewModel.FilterMember = ctx.Members.Find(mgnr) ?? throw new ArgumentException("MgNr argument has invalid value");
             ViewModel.Title = $"Lieferungen - {ViewModel.FilterMember.AdministrativeName} - Elwig";
             ViewModel.EnableAllSeasons = true;
         }
@@ -482,7 +483,7 @@ namespace Elwig.Windows {
             await base.OnRenewContext(ctx);
 
             if (ViewModel.FilterMember != null) {
-                if (await DeliveryService.GetMemberAsync(ViewModel.FilterMember.MgNr) is not Member m) {
+                if (await ctx.FetchMembers(ViewModel.FilterMember.MgNr).SingleOrDefaultAsync() is not Member m) {
                     Close();
                     return;
                 }
@@ -1200,7 +1201,7 @@ namespace Elwig.Windows {
         }
 
         private async Task UpdateLsNr() {
-            if (string.IsNullOrEmpty(ViewModel.Date) || ViewModel.Branch == null) {
+            if (string.IsNullOrWhiteSpace(ViewModel.Date) || ViewModel.Branch == null) {
                 ViewModel.LsNr = "";
             } else {
                 try {

Elwig/Windows/MemberAdminWindow.xaml

@@ -233,7 +233,7 @@
                     </DataGridTextColumn>
                     <DataGridTextColumn Header="Nachname" Binding="{Binding Name}" Width="140"/>
                     <DataGridTextColumn Header="Vorname" Binding="{Binding GivenName}" Width="140"/>
-                    <DataGridTextColumn Header="GA" Binding="{Binding SharesTotal, StringFormat='{}{0} '}" Width="40">
+                    <DataGridTextColumn Header="GA" Binding="{Binding SharesActive, StringFormat='{}{0} '}" Width="40">
                         <DataGridTextColumn.CellStyle>
                             <Style>
                                 <Setter Property="TextBlock.TextAlignment" Value="Right"/>

Elwig/Windows/MemberAdminWindow.xaml.cs

@@ -205,14 +205,12 @@ namespace Elwig.Windows {
             if (rA > 0) a.Add((rA, Brushes.DarkRed));
             if (wA > 0) a.Add((wA, Brushes.DarkGreen));
             if (a.Count == 0) a.Add((0, null));
-            if (dA > 0) a.Add((dA, null));
 
             List<(int Count, Brush? Color)> b = [];
             if (stat.Shares > 0) b.Add((stat.Shares, null));
             if (stat.SharesRed > 0) b.Add((stat.SharesRed, Brushes.DarkRed));
             if (stat.SharesWhite > 0) b.Add((stat.SharesWhite, Brushes.DarkGreen));
             if (a.Count == 0) b.Add((0, null));
-            if (stat.SharesDormant > 0) b.Add((stat.SharesDormant, null));
 
             Run[] inlines = [
                 new("Geschäftsanteile: "),
@@ -605,8 +603,7 @@ namespace Elwig.Windows {
         }
 
         private void BusinessSharesButton_Click(object sender, RoutedEventArgs evt) {
-            // TODO
-            // App.FocusBusinessSharesWindow(ViewModel.SelectedMember!.MgNr);
+            App.FocusMemberBusinessSharesWindow(ViewModel.SelectedMember!.MgNr);
         }
 
         private void AreaCommitmentButton_Click(object sender, RoutedEventArgs evt) {
@@ -851,7 +848,7 @@ namespace Elwig.Windows {
             lastVisible = true;
             for (int i = 0; i < EmailAddressInputs.Length; i++) {
                 var input = EmailAddressInputs[i];
-                var vis = !string.IsNullOrEmpty(input.Address.Text) || (m?.EmailAddresses.Any(a => a.Nr - 1 == i) ?? false);
+                var vis = !string.IsNullOrWhiteSpace(input.Address.Text) || (m?.EmailAddresses.Any(a => a.Nr - 1 == i) ?? false);
                 var cVis = vis || (extra && lastVisible);
                 SetEmailAddressInputVisible(i, cVis, cVis ? num++ : null);
                 lastVisible = vis;
@@ -859,7 +856,7 @@ namespace Elwig.Windows {
             lastVisible = true;
             for (int i = 0; i < PhoneNrInputs.Length; i++) {
                 var input = PhoneNrInputs[i];
-                var vis = !string.IsNullOrEmpty(input.Number.Text) || (m?.TelephoneNumbers.Any(n => n.Nr - 1 == i) ?? false);
+                var vis = !string.IsNullOrWhiteSpace(input.Number.Text) || (m?.TelephoneNumbers.Any(n => n.Nr - 1 == i) ?? false);
                 var cVis = vis || (extra && lastVisible);
                 SetPhoneNrInputVisible(i, cVis, cVis ? num++ : null);
                 lastVisible = vis;
@@ -928,9 +925,9 @@ namespace Elwig.Windows {
 
                 var oldMember = await ctx.FetchMembers(mgnr).SingleAsync();
                 var newName = $"{ViewModel.Name?.Replace('ß', 'ẞ').ToUpper()} " +
-                    $"{ViewModel.Prefix}{(!string.IsNullOrEmpty(ViewModel.Prefix) ? " " : "")}" +
-                    $"{ViewModel.GivenName}{(!string.IsNullOrEmpty(ViewModel.GivenName) ? " " : "")}" +
-                    $"{ViewModel.Suffix}{(!string.IsNullOrEmpty(ViewModel.Suffix) ? " " : "")}";
+                    $"{ViewModel.Prefix}{(!string.IsNullOrWhiteSpace(ViewModel.Prefix) ? " " : "")}" +
+                    $"{ViewModel.GivenName}{(!string.IsNullOrWhiteSpace(ViewModel.GivenName) ? " " : "")}" +
+                    $"{ViewModel.Suffix}{(!string.IsNullOrWhiteSpace(ViewModel.Suffix) ? " " : "")}";
                 var d = new AreaComTransferDialog(oldMember.AdministrativeName, newName, areaComs.Count, areaComs.Sum(c => c.Area));
                 if (d.ShowDialog() != true)
                     return;

Elwig/Windows/MemberBusinessSharesAdminWindow.xaml

@@ -0,0 +1,214 @@
+<local:AdministrationWindow
+        x:Class="Elwig.Windows.MemberBusinessSharesAdminWindow"
+        xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
+        xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
+        xmlns:local="clr-namespace:Elwig.Windows"
+        xmlns:ctrl="clr-namespace:Elwig.Controls"
+        xmlns:vm="clr-namespace:Elwig.ViewModels"
+        Title="{Binding Title}" Height="450" Width="800" MinHeight="400" MinWidth="700">
+    <Window.DataContext>
+        <vm:MemberBusinessSharesViewModel/>
+    </Window.DataContext>
+    <Window.Resources>
+        <Style TargetType="Label">
+            <Setter Property="HorizontalAlignment" Value="Left"/>
+            <Setter Property="VerticalAlignment" Value="Top"/>
+            <Setter Property="Padding" Value="2,4,2,4"/>
+            <Setter Property="Height" Value="25"/>
+        </Style>
+        <Style TargetType="TextBox">
+            <Setter Property="HorizontalAlignment" Value="Stretch"/>
+            <Setter Property="VerticalAlignment" Value="Top"/>
+            <Setter Property="FontSize" Value="14"/>
+            <Setter Property="Padding" Value="2"/>
+            <Setter Property="Height" Value="25"/>
+            <Setter Property="TextWrapping" Value="NoWrap"/>
+        </Style>
+        <Style TargetType="ctrl:UnitTextBox">
+            <Setter Property="HorizontalAlignment" Value="Stretch"/>
+            <Setter Property="VerticalAlignment" Value="Top"/>
+            <Setter Property="FontSize" Value="14"/>
+            <Setter Property="Padding" Value="2"/>
+            <Setter Property="Height" Value="25"/>
+            <Setter Property="TextWrapping" Value="NoWrap"/>
+        </Style>
+        <Style TargetType="ComboBox">
+            <Setter Property="Height" Value="25"/>
+            <Setter Property="FontSize" Value="14"/>
+            <Setter Property="HorizontalAlignment" Value="Stretch"/>
+            <Setter Property="VerticalAlignment" Value="Top"/>
+        </Style>
+        <Style TargetType="Button">
+            <Setter Property="FontSize" Value="14"/>
+            <Setter Property="Padding" Value="9,3"/>
+            <Setter Property="Height" Value="27"/>
+        </Style>
+    </Window.Resources>
+    <Grid>
+        <Grid.ColumnDefinitions>
+            <ColumnDefinition Width="1*" MinWidth="300"/>
+            <ColumnDefinition Width="5"/>
+            <ColumnDefinition Width="1*" MinWidth="350"/>
+        </Grid.ColumnDefinitions>
+
+        <Grid Margin="5,0,0,0">
+            <Grid.RowDefinitions>
+                <RowDefinition Height="*"/>
+                <RowDefinition Height="42"/>
+            </Grid.RowDefinitions>
+            <Grid.ColumnDefinitions>
+                <ColumnDefinition Width="*"/>
+                <ColumnDefinition Width="*"/>
+                <ColumnDefinition Width="*"/>
+            </Grid.ColumnDefinitions>
+
+            <ListBox x:Name="MemberHistoryList" Margin="5,10,5,0" Grid.ColumnSpan="3"
+                     ItemsSource="{Binding History, Mode=TwoWay}" SelectedItem="{Binding SelectedHistoryEntry, Mode=TwoWay}"
+                     SelectionChanged="MemberHistoryList_SelectionChanged">
+                <ListBox.ItemTemplate>
+                    <DataTemplate>
+                        <StackPanel Orientation="Horizontal">
+                            <TextBlock Text="{Binding DateNotice, StringFormat='{}{0:dd.MM.yy}'}" Width="55" TextAlignment="Left" Margin="0,0,0,0"/>
+                            <TextBlock Text="{Binding DateEffective, StringFormat='{}{0:dd.MM.yy}'}" Width="55" TextAlignment="Left" Margin="0,0,0,0"/>
+                            <TextBlock Text="{Binding Shares, StringFormat='{}{0:N0}'}" Width="15" TextAlignment="Right" Margin="0,0,10,0"/>
+                            <TextBlock Text="{Binding PoVReasonPhrase}" TextAlignment="Left" Margin="0,0,0,0"/>
+                        </StackPanel>
+                    </DataTemplate>
+                </ListBox.ItemTemplate>
+            </ListBox>
+
+            <Button x:Name="NewHistoryButton" Content="Neu" Visibility="{Binding ControlButtonsVisibility}"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="5,5,2.5,10" Grid.Column="0" Grid.Row="2"
+                    Click="NewHistoryButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Alt+Einfg</TextBlock>
+                </Button.ToolTip>
+            </Button>
+            <Button x:Name="EditHistoryButton" Content="Bearbeiten" IsEnabled="False" Visibility="{Binding ControlButtonsVisibility}"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="2.5,5,2.5,10" Grid.Column="1" Grid.Row="2"
+                    Click="EditHistoryButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Strg+B</TextBlock>
+                </Button.ToolTip>
+            </Button>
+            <Button x:Name="DeleteHistoryButton" Content="Löschen" IsEnabled="False" Visibility="{Binding ControlButtonsVisibility}"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="2.5,5,5,10" Grid.Column="2" Grid.Row="2"
+                    Click="DeleteHistoryButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Alt+Entf</TextBlock>
+                </Button.ToolTip>
+            </Button>
+
+            <Button x:Name="SaveButton" Content="Speichern" IsEnabled="False" Visibility="{Binding EditingButtonsVisibility}"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="5,5,2.5,10" Grid.Column="0" Grid.Row="2"
+                    Click="SaveButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Strg+S</TextBlock>
+                </Button.ToolTip>
+            </Button>
+            <Button x:Name="ResetButton" Content="Zurücksetzen" IsEnabled="False" Visibility="{Binding EditingButtonsVisibility}"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="2.5,5,2.5,10" Grid.Column="1" Grid.Row="2"
+                    Click="ResetButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Strg+Z</TextBlock>
+                </Button.ToolTip>
+            </Button>
+            <Button x:Name="CancelButton" Content="Abbrechen" IsEnabled="False" Visibility="{Binding EditingButtonsVisibility}" IsCancel="True"
+                    HorizontalAlignment="Stretch" VerticalAlignment="Bottom" Margin="2.5,5,5,10" Grid.Column="2" Grid.Row="2"
+                    Click="CancelButton_Click">
+                <Button.ToolTip>
+                    <TextBlock FontWeight="Bold">Esc</TextBlock>
+                </Button.ToolTip>
+            </Button>
+        </Grid>
+
+        <GridSplitter Grid.Column="1" HorizontalAlignment="Stretch" VerticalAlignment="Stretch"/>
+
+        <Grid Grid.Column="2">
+            <Grid.RowDefinitions>
+                <RowDefinition Height="*"/>
+                <RowDefinition Height="95"/>
+            </Grid.RowDefinitions>
+
+            <GroupBox Header="Geschäftsanteilbewegung" Margin="5,10,5,5">
+                <Grid>
+                    <Grid.ColumnDefinitions>
+                        <ColumnDefinition Width="110"/>
+                        <ColumnDefinition Width="*"/>
+                    </Grid.ColumnDefinitions>
+
+                    <Label Content="Grund:" Margin="10,10,0,0" Grid.Column="0"/>
+                    <ComboBox x:Name="ReasonInput" SelectedValue="{Binding Reason, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                              Margin="0,10,10,0" Grid.Column="1"
+                              SelectedValuePath="Tag"
+                              SelectionChanged="ReasonInput_SelectionChanged">
+                        <ComboBoxItem Tag="purchase">Kauf</ComboBoxItem>
+                        <ComboBoxItem Tag="transfer_to">Übertragung an...</ComboBoxItem>
+                        <ComboBoxItem Tag="transfer_from">Übertragung von...</ComboBoxItem>
+                        <ComboBoxItem Tag="prescription">Vorschreibung</ComboBoxItem>
+                        <ComboBoxItem Tag="exclusion">Ausschluss</ComboBoxItem>
+                        <ComboBoxItem Tag="deceased">Tod</ComboBoxItem>
+                        <ComboBoxItem Tag="retirement">Kündigung</ComboBoxItem>
+                        <ComboBoxItem Tag="payout">Auszahlung</ComboBoxItem>
+                    </ComboBox>
+
+                    <Label Content="Anderes Mitgl.:" Margin="10,40,0,0" Grid.Column="0"/>
+                    <TextBox x:Name="OtherMgNrInput" Text="{Binding OtherMgNrString, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                             Width="48" Grid.Column="1" Margin="0,40,0,0" HorizontalAlignment="Left" TextAlignment="Right"
+                             TextChanged="OtherMgNrInput_TextChanged" LostFocus="OtherMgNrInput_LostFocus"/>
+                    <ComboBox x:Name="OtherMemberInput"
+                              Grid.Column="1" Margin="53,40,40,10" IsEditable="True"
+                              ItemTemplate="{StaticResource MemberAdminNameTemplate}" TextSearch.TextPath="AdministrativeName"
+                              SelectionChanged="OtherMemberInput_SelectionChanged"/>
+                    <Button x:Name="OtherMemberReferenceButton" Grid.Column="1" Height="25" Width="25" FontFamily="Segoe MDL2 Assets" Content="&#xEE35;" Padding="0,0,0,0"
+                            Margin="10,40,10,10" VerticalAlignment="Top" HorizontalAlignment="Right" ToolTip="Zu Mitglied springen"
+                            Click="OtherMemberReferenceButton_Click"/>
+
+                    <Label Content="Anmerkung:" Margin="10,70,0,0" Grid.Column="0"/>
+                    <TextBox x:Name="CommentInput" Text="{Binding Comment, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                             Margin="0,70,10,0" Grid.Column="1"/>
+
+                    <Label Content="Meldung:" Margin="10,100,0,0" Grid.Column="0"/>
+                    <TextBox x:Name="DateNoticeInput" Text="{Binding DateNoticeString, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                             Margin="0,100,10,0" Width="78" Grid.Column="1" HorizontalAlignment="Left" TextAlignment="Right"
+                             TextChanged="DateNoticeInput_TextChanged" LostFocus="DateInput_LostFocus"/>
+
+                    <CheckBox x:Name="HasMemberSignedInput" IsChecked="{Binding MemberHasSigned, Mode=TwoWay}" Content="Von Mg. unterfertigt"
+                              Margin="88,105,10,0" Grid.Column="1" HorizontalAlignment="Left" VerticalAlignment="TOp"
+                              Checked="CheckBox_Changed" Unchecked="CheckBox_Changed"/>
+
+                    <Label Content="Wirksam:" Margin="10,130,0,0" Grid.Column="0"/>
+                    <TextBox x:Name="DateEffeciveInput" Text="{Binding DateEffectiveString, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                             Margin="0,130,10,0" Width="78" Grid.Column="1" HorizontalAlignment="Left" TextAlignment="Right"
+                             TextChanged="DateInput_TextChanged" LostFocus="DateInput_LostFocus"/>
+
+                    <Label Content="Geschäftsanteile:" Margin="10,160,0,0" Grid.Column="0"/>
+                    <TextBox x:Name="SharesInput" Text="{Binding SharesString, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}"
+                             Margin="0,160,10,0" Width="32" Grid.Column="1" HorizontalAlignment="Left" TextAlignment="Right"
+                             TextChanged="SharesInput_TextChanged"/>
+
+                    <CheckBox x:Name="DeductInput" IsChecked="{Binding Deduct, Mode=TwoWay}"
+                              Margin="42,165,10,0" Grid.Column="1" HorizontalAlignment="Left" VerticalAlignment="TOp"
+                              Checked="CheckBox_Changed" Unchecked="CheckBox_Changed">
+                        <TextBlock>
+                            bei Auszahlung <Run Text="{Binding DeductYearString}"/> abziehen
+                        </TextBlock>
+                    </CheckBox>
+
+                    <Label Content="Betrag:" Margin="10,190,0,10"/>
+                    <ctrl:UnitTextBox x:Name="ValuePerShareInput" Text="{Binding ValuePerShareString, Mode=TwoWay, UpdateSourceTrigger=PropertyChanged}" Unit="€/GA" TextChanged="AmountPerShareInput_TextChanged"
+                                      Grid.Column="1" Width="76" Margin="0,190,10,10" HorizontalAlignment="Left" VerticalAlignment="Top"/>
+                    <ctrl:UnitTextBox x:Name="TotalAmountInput" Text="{Binding TotalAmount}" Unit="€" IsEnabled="False"
+                                      Grid.Column="1" Width="77" Margin="81,190,10,10" HorizontalAlignment="Left" VerticalAlignment="Top"/>
+                </Grid>
+            </GroupBox>
+
+            <GroupBox Header="Mitglied" Grid.Row="1" Margin="5,5,5,10">
+                <Grid>
+                    <TextBlock x:Name="MemberInfo" Text="Name (1234)"
+                               FontSize="14" Margin="10,10,10,10"/>
+                </Grid>
+            </GroupBox>
+        </Grid>
+    </Grid>
+</local:AdministrationWindow>

Elwig/Windows/MemberBusinessSharesAdminWindow.xaml.cs

@@ -0,0 +1,347 @@
+using Elwig.Helpers;
+using Elwig.Models.Entities;
+using Elwig.Services;
+using Elwig.ViewModels;
+using Microsoft.EntityFrameworkCore;
+using System;
+using System.Linq;
+using System.Threading.Tasks;
+using System.Windows;
+using System.Windows.Controls;
+using System.Windows.Input;
+
+namespace Elwig.Windows {
+    public partial class MemberBusinessSharesAdminWindow : AdministrationWindow {
+
+        public MemberBusinessSharesViewModel ViewModel => (MemberBusinessSharesViewModel)DataContext;
+
+        public MemberBusinessSharesAdminWindow(int mgnr) {
+            InitializeComponent();
+            using var ctx = new AppDbContext();
+            ViewModel.FilterMember = ctx.Members.Find(mgnr) ?? throw new ArgumentException("MgNr argument has invalid value");
+            ViewModel.Title = $"Geschäftsanteilbewegungen - {ViewModel.FilterMember.AdministrativeName} - Elwig";
+            ExemptInputs = [
+                MemberHistoryList, TotalAmountInput
+            ];
+            RequiredInputs = [
+                ReasonInput, DateNoticeInput, DateEffeciveInput, SharesInput
+           ];
+        }
+
+        public void FocusMemberHistory(int histnr) {
+            if (IsEditing || IsCreating) return;
+            var item = ViewModel.History.FirstOrDefault(h => h.HistNr == histnr);
+            if (item != null) {
+                ControlUtils.SelectItem(MemberHistoryList, item);
+            }
+        }
+
+        private async Task RefreshList() {
+            var vm = ViewModel;
+            var cursor = Mouse.OverrideCursor != null;
+            if (!cursor) Mouse.OverrideCursor = Cursors.Wait;
+            var history = await Task.Run(async () => {
+                using var ctx = new AppDbContext();
+                return await ctx.MemberHistory
+                    .Where(h => h.FromMgNr == vm.FilterMember.MgNr || h.ToMgNr == vm.FilterMember.MgNr)
+                    .OrderBy(h => h.DateNoticeString).ThenBy(h => h.HistNr)
+                    .ToListAsync();
+            });
+            if (!cursor) Mouse.OverrideCursor = null;
+            history.ForEach(h => h.PoVMgNr = vm.FilterMember.MgNr);
+
+            ControlUtils.RenewItemsSource(MemberHistoryList, history,
+                MemberHistoryList_SelectionChanged, ControlUtils.RenewSourceDefault.None);
+            RefreshInputs();
+        }
+
+
+        private void RefreshInputs(bool validate = false) {
+            ClearInputStates();
+            if (ViewModel.SelectedHistoryEntry is MemberHistory h) {
+                EditHistoryButton.IsEnabled = true;
+                DeleteHistoryButton.IsEnabled = true;
+                FillInputs(h);
+            } else {
+                EditHistoryButton.IsEnabled = false;
+                DeleteHistoryButton.IsEnabled = false;
+                ClearOriginalValues();
+                ClearDefaultValues();
+                ClearInputs(validate);
+                ClearInputStates();
+            }
+            GC.Collect();
+        }
+
+        private void FillInputs(MemberHistory h) {
+            ClearOriginalValues();
+            ClearDefaultValues();
+            ViewModel.FillInputs(h);
+            ReasonInput.SelectedValue = h.Reason + (h.Reason == MemberHistory.REASON_TRANSFER ? $"_{(h.FromMgNr == ViewModel.FilterMember.MgNr ? "to" : "from")}" : "");
+            FinishInputFilling();
+        }
+
+        private async Task InitInputs() {
+            ClearOriginalValues();
+            ClearDefaultValues();
+            await ViewModel.InitInputs();
+            SetDefaultValue(DateNoticeInput);
+            if (ViewModel.ValuePerShare != null)
+                SetDefaultValue(ValuePerShareInput);
+            ValidateRequiredInputs();
+        }
+
+        new protected void ClearInputs(bool validate = false) {
+            ViewModel.ClearInputs();
+            base.ClearInputs(validate);
+        }
+
+        override protected void UpdateButtons() {
+            if (!IsEditing && !IsCreating) return;
+            bool ch = HasChanged, v = IsValid;
+            ResetButton.IsEnabled = ch;
+            SaveButton.IsEnabled = v && ch;
+        }
+
+        protected override async Task OnRenewContext(AppDbContext ctx) {
+            await base.OnRenewContext(ctx);
+
+            if (await ctx.FetchMembers(ViewModel.FilterMember.MgNr).SingleOrDefaultAsync() is not Member m) {
+                Close();
+                return;
+            }
+            ViewModel.FilterMember = m;
+            ViewModel.Title = $"Geschäftsanteilbewegungen - {ViewModel.FilterMember.AdministrativeName} - Elwig";
+
+            ControlUtils.RenewItemsSource(OtherMemberInput, await ctx.FetchMembers(includeNotActive: true).ToListAsync());
+
+            MemberInfo.Text = $"{m.FullAdministrativeName}\nGA: {m.Shares:N0} (normal) / {m.SharesRed:N0} (rot) / {m.SharesWhite:N0} (weiß) / {m.SharesDormant:N0} (ruhend)";
+
+            await RefreshList();
+        }
+
+        private void MemberHistoryList_SelectionChanged(object? sender, SelectionChangedEventArgs? evt) {
+            RefreshInputs();
+        }
+
+        protected override void ShortcutNew() {
+            if (!NewHistoryButton.IsEnabled || NewHistoryButton.Visibility != Visibility.Visible)
+                return;
+            NewHistoryButton_Click(null, null);
+        }
+
+        private async void NewHistoryButton_Click(object? sender, RoutedEventArgs? evt) {
+            IsCreating = true;
+            MemberHistoryList.IsEnabled = false;
+            ViewModel.SelectedHistoryEntry = null;
+            HideNewEditDeleteButtons();
+            ShowSaveResetCancelButtons();
+            UnlockInputs();
+            await InitInputs();
+            DeductInput.IsEnabled = false;
+            OtherMgNrInput.IsEnabled = false;
+            OtherMemberInput.IsEnabled = false;
+        }
+
+        protected override void ShortcutEdit() {
+            if (!EditHistoryButton.IsEnabled || EditHistoryButton.Visibility != Visibility.Visible)
+                return;
+            EditHistoryButton_Click(null, null);
+        }
+
+        private void EditHistoryButton_Click(object? sender, RoutedEventArgs? evt) {
+            if (ViewModel.SelectedHistoryEntry == null) return;
+
+            IsEditing = true;
+            MemberHistoryList.IsEnabled = false;
+
+            HideNewEditDeleteButtons();
+            ShowSaveResetCancelButtons();
+            UnlockInputs();
+
+            DeductInput.IsEnabled = ViewModel.Reason == MemberHistory.REASON_PURCHASE || ViewModel.Reason == MemberHistory.REASON_PRESCRIPTION;
+            OtherMgNrInput.IsEnabled = ViewModel.Reason?.StartsWith(MemberHistory.REASON_TRANSFER) ?? false;
+            OtherMemberInput.IsEnabled = OtherMgNrInput.IsEnabled;
+        }
+
+        protected override void ShortcutDelete() {
+            if (!DeleteHistoryButton.IsEnabled || DeleteHistoryButton.Visibility != Visibility.Visible)
+                return;
+            DeleteHistoryButton_Click(null, null);
+        }
+
+        private async void DeleteHistoryButton_Click(object? sender, RoutedEventArgs? evt) {
+            if (ViewModel.SelectedHistoryEntry is not MemberHistory h)
+                return;
+
+            if (InteractionService.AskContinueYesNo("Geschäftsanteilbewegung löschen", $"Soll die Geschäftsanteilbewegung wirklich unwiderruflich\ngelöscht werden?\n\nFalls ja:\nSoll die Änderung der aktuellen GA wieder rückgängig gemacht werden?") is bool enableTriggers) {
+                Mouse.OverrideCursor = Cursors.Wait;
+                try {
+                    await MemberBusinessSharesService.DeleteMemberHistory(h.HistNr, enableTriggers);
+                    App.HintContextChange();
+                } catch (Exception exc) {
+                    InteractionService.ShowDbException("Geschäftsanteilbewegung löschen", exc);
+                }
+                Mouse.OverrideCursor = null;
+            }
+        }
+
+        protected override void ShortcutSave() {
+            if (!SaveButton.IsEnabled || SaveButton.Visibility != Visibility.Visible)
+                return;
+            SaveButton_Click(null, null);
+        }
+
+        private async void SaveButton_Click(object? sender, RoutedEventArgs? evt) {
+            Mouse.OverrideCursor = Cursors.Wait;
+            SaveButton.IsEnabled = false;
+
+            int mgnr;
+            try {
+                mgnr = await ViewModel.UpdateMemberHistory(ViewModel.SelectedHistoryEntry?.HistNr, IsEditing || ViewModel.DateNotice >= DateOnly.FromDateTime(Utils.Today).AddDays(-14));
+                App.HintContextChange();
+            } catch (Exception exc) {
+                InteractionService.ShowDbException("Geschäftsanteilbewegung aktualisieren", exc);
+                SaveButton.IsEnabled = true;
+                Mouse.OverrideCursor = null;
+                return;
+            }
+
+            IsEditing = false;
+            IsCreating = false;
+            MemberHistoryList.IsEnabled = true;
+            OtherMgNrInput.IsEnabled = true;
+            HideSaveResetCancelButtons();
+            ShowNewEditDeleteButtons();
+            LockInputs();
+            FinishInputFilling();
+            await EnsureContextRenewed();
+            Mouse.OverrideCursor = null;
+            if (mgnr is int m)
+                FocusMemberHistory(m);
+        }
+
+        protected override void ShortcutReset() {
+            if (!ResetButton.IsEnabled || ResetButton.Visibility != Visibility.Visible)
+                return;
+            ResetButton_Click(null, null);
+        }
+
+        private async void ResetButton_Click(object? sender, RoutedEventArgs? evt) {
+            if (IsEditing) {
+                RefreshInputs();
+            } else if (IsCreating) {
+                ClearInputs();
+                await InitInputs();
+            }
+            UpdateButtons();
+        }
+
+        private void CancelButton_Click(object sender, RoutedEventArgs evt) {
+            IsEditing = false;
+            IsCreating = false;
+            MemberHistoryList.IsEnabled = true;
+            OtherMgNrInput.IsEnabled = true;
+            HideSaveResetCancelButtons();
+            ShowNewEditDeleteButtons();
+            RefreshInputs();
+            LockInputs();
+        }
+
+        private void ShowSaveResetCancelButtons() {
+            SaveButton.IsEnabled = false;
+            ResetButton.IsEnabled = false;
+            CancelButton.IsEnabled = true;
+            ViewModel.EditingButtonsVisibility = Visibility.Visible;
+        }
+
+        private void HideSaveResetCancelButtons() {
+            SaveButton.IsEnabled = false;
+            ResetButton.IsEnabled = false;
+            CancelButton.IsEnabled = false;
+            ViewModel.EditingButtonsVisibility = Visibility.Hidden;
+        }
+
+        private void ShowNewEditDeleteButtons() {
+            NewHistoryButton.IsEnabled = true;
+            EditHistoryButton.IsEnabled = ViewModel.SelectedHistoryEntry != null;
+            DeleteHistoryButton.IsEnabled = ViewModel.SelectedHistoryEntry != null;
+            ViewModel.ControlButtonsVisibility = Visibility.Visible;
+        }
+
+        private void HideNewEditDeleteButtons() {
+            NewHistoryButton.IsEnabled = false;
+            EditHistoryButton.IsEnabled = false;
+            DeleteHistoryButton.IsEnabled = false;
+            ViewModel.ControlButtonsVisibility = Visibility.Hidden;
+        }
+
+        private void OtherMgNrInput_TextChanged(object sender, TextChangedEventArgs evt) {
+            var valid = InputTextChanged((TextBox)sender, Validator.CheckMgNr);
+            var text = OtherMgNrInput.Text;
+            var caret = OtherMgNrInput.CaretIndex;
+            ControlUtils.SelectItemWithPk(OtherMemberInput, valid ? ViewModel.OtherMgNr : null);
+            OtherMgNrInput.Text = text;
+            OtherMgNrInput.CaretIndex = caret;
+        }
+
+        private void OtherMgNrInput_LostFocus(object sender, RoutedEventArgs evt) {
+            var valid = InputLostFocus((TextBox)sender, Validator.CheckMgNr);
+            ControlUtils.SelectItemWithPk(OtherMemberInput, valid ? ViewModel.OtherMgNr : null);
+        }
+
+        private void OtherMemberInput_SelectionChanged(object? sender, SelectionChangedEventArgs? evt) {
+            var m = OtherMemberInput.SelectedItem as Member;
+            ViewModel.OtherMgNr = m?.MgNr;
+        }
+
+        private void OtherMemberReferenceButton_Click(object sender, RoutedEventArgs evt) {
+            if (OtherMemberInput.SelectedItem is not Member m) return;
+            App.FocusMember(m.MgNr);
+        }
+
+        private void ReasonInput_SelectionChanged(object sender, RoutedEventArgs evt) {
+            ComboBox_SelectionChanged(sender, evt);
+            if (!IsEditing && !IsCreating) return;
+            if (ViewModel.DateNotice is not DateOnly d) return;
+            if (ViewModel.Reason == MemberHistory.REASON_EXCLUSION || ViewModel.Reason == MemberHistory.REASON_DECEASED || ViewModel.Reason == MemberHistory.REASON_RETIREMENT) {
+                ViewModel.DateEffectiveString = $"31.12.{d.Year + 1}";
+            } else {
+                ViewModel.DateEffectiveString = ViewModel.DateNoticeString;
+            }
+            DeductInput.IsEnabled = ViewModel.Reason == MemberHistory.REASON_PURCHASE || ViewModel.Reason == MemberHistory.REASON_PRESCRIPTION;
+            if (!DeductInput.IsEnabled) DeductInput.IsChecked = false;
+            OtherMgNrInput.IsEnabled = ViewModel.Reason?.StartsWith(MemberHistory.REASON_TRANSFER) ?? false;
+            OtherMemberInput.IsEnabled = OtherMgNrInput.IsEnabled;
+            if (!OtherMgNrInput.IsEnabled) OtherMgNrInput.Text = "";
+        }
+
+        private void DateNoticeInput_TextChanged(object sender, TextChangedEventArgs evt) {
+            DateInput_TextChanged(sender, evt);
+            if (!IsEditing && !IsCreating) return;
+            if (ViewModel.DateNotice is not DateOnly d) return;
+            ViewModel.DeductYear = d.Year;
+            if (ViewModel.DateEffective == null && ViewModel.Reason != null) {
+                if (ViewModel.Reason == MemberHistory.REASON_EXCLUSION || ViewModel.Reason == MemberHistory.REASON_DECEASED || ViewModel.Reason == MemberHistory.REASON_RETIREMENT) {
+                    ViewModel.DateEffectiveString = $"31.12.{d.Year + 1}";
+                } else {
+                    ViewModel.DateEffectiveString = ViewModel.DateNoticeString;
+                }
+            }
+        }
+
+        private void UpdateAmount() {
+            ViewModel.TotalAmount = $"{ViewModel.Shares * ViewModel.ValuePerShare:N2}";
+        }
+
+        private void SharesInput_TextChanged(object sender, TextChangedEventArgs evt) {
+            IntegerInput_TextChanged(sender, evt);
+            UpdateAmount();
+        }
+
+        private void AmountPerShareInput_TextChanged(object sender, TextChangedEventArgs evt) {
+            InputTextChanged((TextBox)sender, Validator.CheckDecimal((TextBox)sender, false, 3, 2));
+            UpdateAmount();
+        }
+    }
+}