Compare commits
	
		
			31 Commits
		
	
	
		
			v0.13.3
			...
			3161351a30
		
	
	| Author | SHA1 | Date | |
|---|---|---|---|
| 3161351a30 | |||
| aa98909c0a | |||
| 775bb08e95 | |||
| fe0a7dab2a | |||
| 138dae715e | |||
| 28af7f8dd3 | |||
| 7cc2f75e7c | |||
| c7a2f2241d | |||
| bd4ebb8c35 | |||
| 6d88c5645c | |||
| 5d017cc8ea | |||
| 0b8a1b321f | |||
| 95927c3f1a | |||
| f7297d313a | |||
| 80fec4473a | |||
| 95ccb2627c | |||
| 20e3e2a76b | |||
| b83df45e8f | |||
| c24b1ca2b9 | |||
| 5e53d864b1 | |||
| 633b560a67 | |||
| c9e483ba9d | |||
| c484d27520 | |||
| 6c7f10cb26 | |||
| 4a10e94d71 | |||
| 338f9fe092 | |||
| 3b97c2243a | |||
| 6ba2aa7143 | |||
| a99a23fd08 | |||
| 70e01849be | |||
| c3a2f983d5 | 
							
								
								
									
										106
									
								
								CHANGELOG.md
									
									
									
									
									
								
							
							
						
						
									
										106
									
								
								CHANGELOG.md
									
									
									
									
									
								
							@@ -3,20 +3,106 @@ Changelog
 | 
			
		||||
=========
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.8][v0.13.8] (2025-02-21) {#v0.13.8}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#v0.13.8-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Details im Lieferungen-Fenster (`DeliveryAdminWindow`) für die WG Weinland richtiggestellt (Lesweagen, Verhalten bei _Gerebelt gewogen_). (138dae715e, aa98909c0a)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#v0.13.8-misc}
 | 
			
		||||
 | 
			
		||||
* Abhängigkeiten aktualisiert. (fe0a7dab2a, 775bb08e95)
 | 
			
		||||
 | 
			
		||||
[v0.13.8]: https://git.necronda.net/winzer/elwig/releases/tag/v0.13.8
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.7][v0.13.7] (2025-01-21) {#v0.13.7}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#v0.13.7-bugfixes}
 | 
			
		||||
 | 
			
		||||
* In seltenen Fällen konnten im Auszahlungsvariante-Fenster (`ChartWindow`) manche (Sorten-/Attribut-/Bewirtschaftungsart-)Zuordnungen zu Kurven nicht richtig gespeichert werden. (0b8a1b321f)
 | 
			
		||||
* Beim Öffnen des Ausgangs-Protokoll-Fensters (`MailLogWindow`) kam es zu einem Absturz. (5d017cc8ea)
 | 
			
		||||
* Im Auszahlungsvarianten-Fenster (`PaymentVariantsWindow`) war es nicht möglich die Überweisungsdaten zu exportieren, sofern mindestens eine Traubengutschrift einen negativen Betrag aufwies.
 | 
			
		||||
  Jetzt wird der Benutzer nur gewarnt und es ist möglich alle anderen Gutschriften zu exportieren. (6d88c5645c, c7a2f2241d)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#v0.13.7-misc}
 | 
			
		||||
 | 
			
		||||
* Im Auszahlungsvarianten-Fenster (`PaymentVariantsWindow`) ist es nun möglich das Datum einer Auszahlungsvariante zu ändern. (bd4ebb8c35)
 | 
			
		||||
 | 
			
		||||
[v0.13.7]: https://git.necronda.net/winzer/elwig/releases/tag/v0.13.7
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.6][v0.13.6] (2025-01-14) {#v0.13.6}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#v0.13.6-bugfixes}
 | 
			
		||||
 | 
			
		||||
* In seltenen Fällen konnten im Auszahlungsvariante-Fenster (`ChartWindow`) manche (Sorten-/Attribut-/Bewirtschaftungsart-)Zuordnungen zu Kurven nicht richtig gespeichert werden.
 | 
			
		||||
  Berechnungen basierend auf diesen (evtl. falschen) Zuordnungen wurden immer richtig ausgeführt, eine nachträgliche Überprüfung ist daher möglich. (20e3e2a76b)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#v0.13.6-misc}
 | 
			
		||||
 | 
			
		||||
* Abhängigkeiten aktualisiert. (95ccb2627c, 80fec4473a)
 | 
			
		||||
 | 
			
		||||
[v0.13.6]: https://git.necronda.net/winzer/elwig/releases/tag/v0.13.6
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.5][v0.13.5] (2025-01-02) {#v0.13.5}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Neue Funktionen {#v0.13.5-features}
 | 
			
		||||
 | 
			
		||||
* Im Mitglieder-Fenster (`MemberAdminWindow`) Filter `aktiv` und `!aktiv` hinzugefügt. (5e53d864b1)
 | 
			
		||||
* Im Lieferungen Fenster (`DeliveryAdminWindow`) Menüpunkt _Statistik_ mitsamt _Qualitätsstatistik_ und _Lieferstatistik pro Ort_ hinzugefügt. (c24b1ca2b9)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#v0.13.5-misc}
 | 
			
		||||
 | 
			
		||||
* Abhängigkeiten aktualisiert. (c9e483ba9d, 633b560a67)
 | 
			
		||||
 | 
			
		||||
[v0.13.5]: https://git.necronda.net/winzer/elwig/releases/tag/v0.13.5
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.4][v0.13.4] (2024-11-25) {#v0.13.4}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#v0.13.4-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Bei _Unter-/Überlieferungen lt. gez. GA_ waren seit [v0.10.6](#v0.10.6) (2023-08-30) Nicht-Lieferanten nicht aufgeführt. (6ba2aa7143)
 | 
			
		||||
* Bei _Unterlieferungen laut Flächenbindungen_ wurden nur Mitglieder berücksichtigt, die zum Zeitpunkt des Exports aktiv waren. (3b97c2243a, 338f9fe092)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#v0.13.4-misc}
 | 
			
		||||
 | 
			
		||||
* Abhängigkeiten aktualisiert. (c3a2f983d5, 70e01849be, a99a23fd08, 4a10e94d71, 6c7f10cb26)
 | 
			
		||||
 | 
			
		||||
[v0.13.4]: https://git.necronda.net/winzer/elwig/releases/tag/v0.13.4
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
[v0.13.3][v0.13.3] (2024-11-13) {#v0.13.3}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Neue Funktionen {#0.13.3-features}
 | 
			
		||||
### Neue Funktionen {#v0.13.3-features}
 | 
			
		||||
 | 
			
		||||
* Im Haupt-Fenster (`MainWindow`) unter _Leseabschluss_ eine Statistik-Tabelle (Gebunden/Ungeb., Mitglieder/Gewicht/Fläche) hinzugefügt. (54deccf021)
 | 
			
		||||
* Im Haupt-Fenster (`MainWindow`) unter _Leseabschluss_ zwei Exportmöglichkeiten (_Flächenbindungen_, _Liefermenge/Ertrag_) hinzugefügt. (c5453c2fe6)
 | 
			
		||||
* Ausgangs-Protokoll-Fenster (`MailLogWindow`) zum Ansehen aller ausgehenden E-Mails oder ausgedruckten Rundschreiben hinzugefügt (_Rundschreiben_ -> _Hilfe_). (2ee0d56dcc)
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#0.13.3-bugfixes}
 | 
			
		||||
### Behobene Fehler {#v0.13.3-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Im Rundschreiben-Fenster (`MailWindow`) kleinere Fehler behoben und alle Einstellungen werden nun gespeichert. (0a9731af09)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#0.13.3-misc}
 | 
			
		||||
### Sonstiges {#v0.13.3-misc}
 | 
			
		||||
 | 
			
		||||
* In allen Fenstern an passenden Stellen Symbole/Icons hinzugefügt. (f4fa549130)
 | 
			
		||||
* Im Mitglieder-Fenster (`MemberAdminWindow`) Filter `Flächenbindung` (Mitglieder mit irgendeiner aktiven Flächenbindung) hinzugefügt. (a1d84dd988)
 | 
			
		||||
@@ -30,17 +116,17 @@ Changelog
 | 
			
		||||
[v0.13.2][v0.13.2] (2024-10-13) {#v0.13.2}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Neue Funktionen {#0.13.2-features}
 | 
			
		||||
### Neue Funktionen {#v0.13.2-features}
 | 
			
		||||
 | 
			
		||||
* Im Lieferungen-Fenster den Menüpunkt _Abwertungsliste_ (`DeliveryDepreciationList`) hinzugefügt. (3cbffdbf27)
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#0.13.2-bugfixes}
 | 
			
		||||
### Behobene Fehler {#v0.13.2-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Fehler im Waagenprotokoll `Avery-Async` (L320) behoben. (8680e51052)
 | 
			
		||||
* Hausnummern in der BKI Traubentransportscheinliste werden in Excel richtig angezeigt. (86f7f693a0)
 | 
			
		||||
* Beim Ändern der Identifikatoren von Attributen/Bewirtschaftungsarten wurden diese in Auszahlungsvarianten nicht aktualisiert. (d1f67dc57d)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#0.13.2-misc}
 | 
			
		||||
### Sonstiges {#v0.13.2-misc}
 | 
			
		||||
 | 
			
		||||
* Weitere automatisierte Tests hinzugefügt. ([#11][i11])
 | 
			
		||||
* Namenszusätze bei Gemeinden (z.B. an, bei, im, am) genauer angegeben. (65498dd18f)
 | 
			
		||||
@@ -56,15 +142,15 @@ Changelog
 | 
			
		||||
[v0.13.1][v0.13.1] (2024-09-29) {#v0.13.1}
 | 
			
		||||
------------------------------------------
 | 
			
		||||
 | 
			
		||||
### Neue Funktionen {#0.13.1-features}
 | 
			
		||||
### Neue Funktionen {#v0.13.1-features}
 | 
			
		||||
 | 
			
		||||
* Das Extrahieren/Abwerten/Aufteilen von (Teil-)Lieferungen wurde grundlegend überarbeitet und funktioniert ab jetzt in einem einzigen, übersichtlicheren Dialog. (c62947dacd, c185437b9a)
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#0.13.1-bugfixes}
 | 
			
		||||
### Behobene Fehler {#v0.13.1-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Im Mitglieder-Fenster (`MemberAdminWinodw`) wurden bei `Anlieferungsbestätigung -> speichern (PDF)` und `Traubengutschrift -> speichern (PDF)` E-Mails verschickt, anstatt ein PDF gespeichert. (6ba1973087, a2315e84bd)
 | 
			
		||||
 | 
			
		||||
### Sonstiges {#0.13.1-misc}
 | 
			
		||||
### Sonstiges {#v0.13.1-misc}
 | 
			
		||||
 | 
			
		||||
* Abhängigkeiten aktualisiert. (b6ae1f5675)
 | 
			
		||||
 | 
			
		||||
@@ -79,7 +165,7 @@ Changelog
 | 
			
		||||
> [!NOTE]
 | 
			
		||||
> Ab dieser Version verhält sich die Berechnung der Unterlieferungen bei Flächenbindungen anders.
 | 
			
		||||
 | 
			
		||||
### Behobene Fehler {#0.13.0-bugfixes}
 | 
			
		||||
### Behobene Fehler {#v0.13.0-bugfixes}
 | 
			
		||||
 | 
			
		||||
* Im Lieferungen-Fenster (`DeliveryAdminWindow`) war das Extrahieren in eine neue Lieferung seit ca. 6 Monaten (98688168b8) nicht mehr möglich. (8a61747538)
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
@@ -7,7 +7,7 @@
 | 
			
		||||
    <UseWPF>true</UseWPF>
 | 
			
		||||
    <PreserveCompilationContext>true</PreserveCompilationContext>
 | 
			
		||||
    <ApplicationIcon>Resources\Images\Elwig.ico</ApplicationIcon>
 | 
			
		||||
    <Version>0.13.3</Version>
 | 
			
		||||
    <Version>0.13.8</Version>
 | 
			
		||||
    <SatelliteResourceLanguages>de-AT</SatelliteResourceLanguages>
 | 
			
		||||
    <AllowUnsafeBlocks>true</AllowUnsafeBlocks>
 | 
			
		||||
    <ApplicationManifest>app.manifest</ApplicationManifest>
 | 
			
		||||
@@ -25,21 +25,21 @@
 | 
			
		||||
  </Target>
 | 
			
		||||
 | 
			
		||||
  <ItemGroup>
 | 
			
		||||
    <PackageReference Include="CommunityToolkit.Mvvm" Version="8.3.2" />
 | 
			
		||||
    <PackageReference Include="LinqKit" Version="1.3.0" />
 | 
			
		||||
    <PackageReference Include="MailKit" Version="4.8.0" />
 | 
			
		||||
    <PackageReference Include="Microsoft.AspNetCore.Razor.Language" Version="6.0.33" />
 | 
			
		||||
    <PackageReference Include="Microsoft.EntityFrameworkCore.Proxies" Version="8.0.8" />
 | 
			
		||||
    <PackageReference Include="Microsoft.EntityFrameworkCore.Sqlite" Version="8.0.8" />
 | 
			
		||||
    <PackageReference Include="Microsoft.Extensions.Configuration.Ini" Version="8.0.0" />
 | 
			
		||||
    <PackageReference Include="Microsoft.Web.WebView2" Version="1.0.2792.45" />
 | 
			
		||||
    <PackageReference Include="NJsonSchema" Version="11.0.2" />
 | 
			
		||||
    <PackageReference Include="CommunityToolkit.Mvvm" Version="8.4.0" />
 | 
			
		||||
    <PackageReference Include="LinqKit" Version="1.3.8" />
 | 
			
		||||
    <PackageReference Include="MailKit" Version="4.10.0" />
 | 
			
		||||
    <PackageReference Include="Microsoft.AspNetCore.Razor.Language" Version="6.0.36" />
 | 
			
		||||
    <PackageReference Include="Microsoft.EntityFrameworkCore.Proxies" Version="9.0.2" />
 | 
			
		||||
    <PackageReference Include="Microsoft.EntityFrameworkCore.Sqlite" Version="9.0.2" />
 | 
			
		||||
    <PackageReference Include="Microsoft.Extensions.Configuration.Ini" Version="9.0.2" />
 | 
			
		||||
    <PackageReference Include="Microsoft.Web.WebView2" Version="1.0.3065.39" />
 | 
			
		||||
    <PackageReference Include="NJsonSchema" Version="11.1.0" />
 | 
			
		||||
    <PackageReference Include="PdfiumViewer" Version="2.13.0" />
 | 
			
		||||
    <PackageReference Include="PdfiumViewer.Native.x86_64.no_v8-no_xfa" Version="2018.4.8.256" />
 | 
			
		||||
    <PackageReference Include="RazorLight" Version="2.3.1" />
 | 
			
		||||
    <PackageReference Include="ScottPlot.WPF" Version="5.0.39" />
 | 
			
		||||
    <PackageReference Include="System.IO.Ports" Version="8.0.0" />
 | 
			
		||||
    <PackageReference Include="System.Text.Encoding.CodePages" Version="8.0.0" />
 | 
			
		||||
    <PackageReference Include="ScottPlot.WPF" Version="5.0.54" />
 | 
			
		||||
    <PackageReference Include="System.IO.Ports" Version="9.0.2" />
 | 
			
		||||
    <PackageReference Include="System.Text.Encoding.CodePages" Version="9.0.2" />
 | 
			
		||||
  </ItemGroup>
 | 
			
		||||
 | 
			
		||||
</Project>
 | 
			
		||||
 
 | 
			
		||||
@@ -299,22 +299,30 @@ namespace Elwig.Helpers.Billing {
 | 
			
		||||
            return (rev1, rev2);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        protected static void CollapsePaymentData(JsonObject data, IEnumerable<RawVaribute> vaributes, bool useDefault = true) {
 | 
			
		||||
        protected static void CollapsePaymentData(JsonObject data, JsonObject originalData, IEnumerable<RawVaribute> vaributes, bool useDefault = true) {
 | 
			
		||||
            var (rev1, rev2) = GetReverseKeys(data);
 | 
			
		||||
            if (!data.ContainsKey("default")) {
 | 
			
		||||
                foreach (var (v, ks) in rev1) {
 | 
			
		||||
                    if ((ks.Count >= vaributes.Count() * 0.5 && useDefault) || ks.Count == vaributes.Count()) {
 | 
			
		||||
                        foreach (var k in ks) data.Remove(k);
 | 
			
		||||
                    if ((ks.Count > vaributes.Count() * 0.5 && useDefault) || ks.Count == vaributes.Count()) {
 | 
			
		||||
                        foreach (var k in ks) {
 | 
			
		||||
                            if (!(originalData[$"{k[..2]}/"]?.AsValue().TryGetValue<string>(out var o) ?? false) || o == v)
 | 
			
		||||
                                if (!(originalData[k.Split('-')[0]]?.AsValue().TryGetValue<string>(out var o2) ?? false) || o2 == v)
 | 
			
		||||
                                    data.Remove(k);
 | 
			
		||||
                        }
 | 
			
		||||
                        data["default"] = v;
 | 
			
		||||
                        CollapsePaymentData(data, vaributes, useDefault);
 | 
			
		||||
                        CollapsePaymentData(data, originalData, vaributes, useDefault);
 | 
			
		||||
                        return;
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
                foreach (var (v, ks) in rev2) {
 | 
			
		||||
                    if ((ks.Count >= vaributes.Count() * 0.5 && useDefault) || ks.Count == vaributes.Count()) {
 | 
			
		||||
                        foreach (var k in ks) data.Remove(k);
 | 
			
		||||
                    if ((ks.Count > vaributes.Count() * 0.5 && useDefault) || ks.Count == vaributes.Count()) {
 | 
			
		||||
                        foreach (var k in ks) {
 | 
			
		||||
                            if (!(originalData[$"{k[..2]}/"]?.AsValue().TryGetValue<decimal>(out var o) ?? false) || o == v)
 | 
			
		||||
                                if (!(originalData[k.Split('-')[0]]?.AsValue().TryGetValue<decimal>(out var o2) ?? false) || o2 == v)
 | 
			
		||||
                                    data.Remove(k);
 | 
			
		||||
                        }
 | 
			
		||||
                        data["default"] = v;
 | 
			
		||||
                        CollapsePaymentData(data, vaributes, useDefault);
 | 
			
		||||
                        CollapsePaymentData(data, originalData, vaributes, useDefault);
 | 
			
		||||
                        return;
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
@@ -330,16 +338,26 @@ namespace Elwig.Helpers.Billing {
 | 
			
		||||
                var len = vaributes.Count(e => $"{e.AttrId}{(e.CultId != null && e.CultId != "" ? "-" : "")}{e.CultId}" == idx);
 | 
			
		||||
                foreach (var (v, ks) in rev1) {
 | 
			
		||||
                    var myKs = ks.Where(k => k.EndsWith($"/{idx}")).ToList();
 | 
			
		||||
                    if (myKs.Count > 1 && ((myKs.Count >= len * 0.5 && useDefault) || myKs.Count == len)) {
 | 
			
		||||
                    if (myKs.Count > 1 && ((myKs.Count > len * 0.5 && useDefault) || myKs.Count == len)) {
 | 
			
		||||
                        foreach (var k in myKs) data.Remove(k);
 | 
			
		||||
                        data[(idx.StartsWith('-') && !useDefault ? "" : "/") + idx] = v;
 | 
			
		||||
                        var discr = (idx.StartsWith('-') && !useDefault ? "" : "/") + idx;
 | 
			
		||||
                        data[discr] = v;
 | 
			
		||||
                        foreach (var (k, o) in originalData) {
 | 
			
		||||
                            if (o!.AsValue().TryGetValue<string>(out var o2) && o2 != v && k.Contains(discr))
 | 
			
		||||
                                data[k] = o2;
 | 
			
		||||
                        }
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
                foreach (var (v, ks) in rev2) {
 | 
			
		||||
                    var myKs = ks.Where(k => k.EndsWith($"/{idx}")).ToList();
 | 
			
		||||
                    if (myKs.Count > 1 && ((myKs.Count >= len * 0.5 && useDefault) || myKs.Count == len)) {
 | 
			
		||||
                    if (myKs.Count > 1 && ((myKs.Count > len * 0.5 && useDefault) || myKs.Count == len)) {
 | 
			
		||||
                        foreach (var k in myKs) data.Remove(k);
 | 
			
		||||
                        data[(idx.StartsWith('-') && !useDefault ? "" : "/") + idx] = v;
 | 
			
		||||
                        var discr = (idx.StartsWith('-') && !useDefault ? "" : "/") + idx;
 | 
			
		||||
                        data[discr] = v;
 | 
			
		||||
                        foreach (var (k, o) in originalData) {
 | 
			
		||||
                            if (o!.AsValue().TryGetValue<decimal>(out var o2) && o2 != v && k.Contains(discr))
 | 
			
		||||
                                data[k] = o2;
 | 
			
		||||
                        }
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
@@ -355,13 +373,22 @@ namespace Elwig.Helpers.Billing {
 | 
			
		||||
                } else if (k.Contains("/-")) {
 | 
			
		||||
                    data.Remove(k, out var val);
 | 
			
		||||
                    data.Add(k.Replace("/-", "-"), val);
 | 
			
		||||
                    if (k[0] == '/' || k.Contains('-')) {
 | 
			
		||||
                        foreach (var (k2, o) in originalData) {
 | 
			
		||||
                            if (!data.ContainsKey(k2) && k2.Contains('-') && k2.Contains("-" + k.Split('-')[1]) && !k2.Contains("/-")
 | 
			
		||||
                                && (!k2.Contains('/') || k2.Length <= 4 || !data.ContainsKey(k2[2..])))
 | 
			
		||||
                            {
 | 
			
		||||
                                data[k2] = o?.DeepClone();
 | 
			
		||||
                            }
 | 
			
		||||
                        }
 | 
			
		||||
                    }
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            (rev1, rev2) = GetReverseKeys(data, false);
 | 
			
		||||
            var keyVaributes = data
 | 
			
		||||
                .Select(e => e.Key.Split('-')[0])
 | 
			
		||||
                .Where(e => e.Length > 0 && e != "default")
 | 
			
		||||
                .Select(e => e.Key)
 | 
			
		||||
                .Where(e => e.Length > 0 && !e.Contains('-') && e != "default")
 | 
			
		||||
                .Distinct()
 | 
			
		||||
                .ToList();
 | 
			
		||||
            foreach (var idx in keyVaributes) {
 | 
			
		||||
@@ -419,8 +446,8 @@ namespace Elwig.Helpers.Billing {
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            CollapsePaymentData(payment, vaributes ?? payment.Select(e => new RawVaribute(e.Key)).ToList(), useDefaultPayment);
 | 
			
		||||
            CollapsePaymentData(qualityWei, vaributes ?? qualityWei.Select(e => new RawVaribute(e.Key)).ToList(), useDefaultQuality);
 | 
			
		||||
            CollapsePaymentData(payment, payment.DeepClone().AsObject(), vaributes ?? payment.Select(e => new RawVaribute(e.Key)).ToList(), useDefaultPayment);
 | 
			
		||||
            CollapsePaymentData(qualityWei, qualityWei.DeepClone().AsObject(), vaributes ?? qualityWei.Select(e => new RawVaribute(e.Key)).ToList(), useDefaultQuality);
 | 
			
		||||
 | 
			
		||||
            var data = new JsonObject {
 | 
			
		||||
                ["mode"] = "elwig",
 | 
			
		||||
 
 | 
			
		||||
@@ -46,14 +46,14 @@ namespace Elwig.Helpers.Billing {
 | 
			
		||||
                           m.mgnr,
 | 
			
		||||
                           v.avnr,
 | 
			
		||||
                           ROUND(p.amount / POW(10, s.precision - 2)) AS net_amount,
 | 
			
		||||
                           ROUND(lp.amount / POW(10, s.precision - 2)) AS prev_amount,
 | 
			
		||||
                           IIF(lc.amount >= 0, ROUND(lp.amount / POW(10, s.precision - 2)), 0) AS prev_net_amount,
 | 
			
		||||
                           IIF(m.buchführend, s.vat_normal, s.vat_flatrate) AS vat,
 | 
			
		||||
                           ROUND(IIF({Data.ConsiderTotalPenalty}, COALESCE(b.total_penalty, 0), 0) / POW(10, s.precision - 2)) +
 | 
			
		||||
                           ROUND(IIF({Data.ConsiderContractPenalties}, COALESCE(u.total_penalty, 0), 0) / POW(10, 4 - 2)) +
 | 
			
		||||
                           ROUND(IIF({Data.ConsiderAutoBusinessShares}, -COALESCE(a.total_amount, 0), 0) / POW(10, s.precision - 2)) +
 | 
			
		||||
                           IIF({Data.ConsiderCustomModifiers}, COALESCE(x.amount, 0), 0)
 | 
			
		||||
                           AS modifiers,
 | 
			
		||||
                           lc.modifiers AS prev_modifiers
 | 
			
		||||
                           IIF(lc.amount >= 0, lc.modifiers, 0) AS prev_modifiers
 | 
			
		||||
                    FROM season s
 | 
			
		||||
                        JOIN payment_variant v ON v.year = s.year
 | 
			
		||||
                        LEFT JOIN payment_variant l ON l.year = s.year
 | 
			
		||||
 
 | 
			
		||||
@@ -23,6 +23,10 @@ namespace Elwig.Helpers {
 | 
			
		||||
        public bool HasNetWeighing(Branch? b) => HasNetWeighing(b?.ZwstId);
 | 
			
		||||
        public bool HasNetWeighing() => HasNetWeighing(App.ZwstId);
 | 
			
		||||
 | 
			
		||||
        public bool HasBoxWeighing(string? zwstId) => IsWinzerkeller && (zwstId != "W");
 | 
			
		||||
        public bool HasBoxWeighing(Branch? b) => HasBoxWeighing(b?.ZwstId);
 | 
			
		||||
        public bool HasBoxWeighing() => HasBoxWeighing(App.ZwstId);
 | 
			
		||||
 | 
			
		||||
        public string NameToken;
 | 
			
		||||
        public string NameShort;
 | 
			
		||||
        public string Name;
 | 
			
		||||
 
 | 
			
		||||
@@ -301,6 +301,7 @@ namespace Elwig.Helpers.Export {
 | 
			
		||||
                if (units != null && units.Length > 0) {
 | 
			
		||||
                    int n = -1;
 | 
			
		||||
                    switch (units[0]) {
 | 
			
		||||
                        case "#": n = 0; data = $"{v:N0}"; break;
 | 
			
		||||
                        case "%": n = 1; data = $"{v:N1}"; break;
 | 
			
		||||
                        case "€": n = 2; data = $"{v:N2}"; break;
 | 
			
		||||
                        case "€/kg": n = 4; data = $"{v:N4}"; break;
 | 
			
		||||
 
 | 
			
		||||
@@ -45,7 +45,7 @@ namespace Elwig.Models.Dtos {
 | 
			
		||||
                        LEFT JOIN AT_plz_dest p ON p.id = m.postal_dest
 | 
			
		||||
                        LEFT JOIN AT_ort o ON o.okz = p.okz
 | 
			
		||||
                        JOIN v_under_delivery u ON (u.mgnr, u.bucket, u.year) = (m.mgnr, c.bucket, c.year)
 | 
			
		||||
                    WHERE c.year = {year} AND m.active = 1
 | 
			
		||||
                    WHERE c.year = {year}
 | 
			
		||||
                    ORDER BY m.mgnr, c.bucket
 | 
			
		||||
                    """).ToListAsync();
 | 
			
		||||
        }
 | 
			
		||||
@@ -1,5 +1,4 @@
 | 
			
		||||
using Microsoft.EntityFrameworkCore;
 | 
			
		||||
using System;
 | 
			
		||||
using System.Collections.Generic;
 | 
			
		||||
using System.ComponentModel.DataAnnotations.Schema;
 | 
			
		||||
using System.Linq;
 | 
			
		||||
 
 | 
			
		||||
@@ -33,14 +33,13 @@ namespace Elwig.Models.Dtos {
 | 
			
		||||
                       m.business_shares * s.min_kg_per_bs AS min_kg,
 | 
			
		||||
                       m.business_shares * s.max_kg_per_bs AS max_kg,
 | 
			
		||||
                       COALESCE(SUM(d.weight), 0) AS sum
 | 
			
		||||
                FROM v_delivery d
 | 
			
		||||
                    LEFT JOIN member m ON m.mgnr = d.mgnr
 | 
			
		||||
                FROM season s, member m
 | 
			
		||||
                    LEFT JOIN AT_plz_dest p ON p.id = m.postal_dest
 | 
			
		||||
                    LEFT JOIN AT_ort o ON o.okz = p.okz
 | 
			
		||||
                    LEFT JOIN season s ON s.year = d.year
 | 
			
		||||
                    LEFT JOIN v_delivery d ON (d.year, d.mgnr) = (s.year, m.mgnr)
 | 
			
		||||
                WHERE s.year = {year} AND (m.active = TRUE OR d.weight > 0)
 | 
			
		||||
                GROUP BY d.year, m.mgnr
 | 
			
		||||
                ORDER BY 100.0 * sum / max_kg, m.mgnr;
 | 
			
		||||
                GROUP BY s.year, m.mgnr
 | 
			
		||||
                ORDER BY 100.0 * sum / max_kg, m.mgnr
 | 
			
		||||
                """).ToListAsync();
 | 
			
		||||
            return new OverUnderDeliveryData(rows, year);
 | 
			
		||||
        }
 | 
			
		||||
 
 | 
			
		||||
@@ -15,7 +15,7 @@ namespace Elwig.Models.Dtos {
 | 
			
		||||
 | 
			
		||||
        public static IEnumerable<Transaction> FromPaymentVariant(PaymentVar variant) {
 | 
			
		||||
            return variant.Credits
 | 
			
		||||
                .Where(c => c.Member.Iban != null)
 | 
			
		||||
                .Where(c => c.Member.Iban != null && c.Amount > 0)
 | 
			
		||||
                .OrderBy(c => c.TgNr)
 | 
			
		||||
                .Select(c => new Transaction(c))
 | 
			
		||||
                .ToList();
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										60
									
								
								Elwig/Models/Dtos/WineLocalityStatisticsData.cs
									
									
									
									
									
										Normal file
									
								
							
							
						
						
									
										60
									
								
								Elwig/Models/Dtos/WineLocalityStatisticsData.cs
									
									
									
									
									
										Normal file
									
								
							@@ -0,0 +1,60 @@
 | 
			
		||||
using Elwig.Helpers;
 | 
			
		||||
using Elwig.Models.Entities;
 | 
			
		||||
using Microsoft.EntityFrameworkCore;
 | 
			
		||||
using System;
 | 
			
		||||
using System.Collections.Generic;
 | 
			
		||||
using System.Linq;
 | 
			
		||||
using System.Threading.Tasks;
 | 
			
		||||
using static Elwig.Models.Dtos.WineLocalityStatisticsData;
 | 
			
		||||
 | 
			
		||||
namespace Elwig.Models.Dtos {
 | 
			
		||||
    class WineLocalityStatisticsData : DataTable<StatisticsRow> {
 | 
			
		||||
 | 
			
		||||
        private static readonly (string, string, string?, int?)[] FieldNames = [
 | 
			
		||||
            ("Branch", "Zwst.", null, 30),
 | 
			
		||||
            ("KgNr", "KgNr.", null, 15),
 | 
			
		||||
            ("Name", "Katastralgemeinde", null, 50),
 | 
			
		||||
            ("Members", "Mitgl.", "#", 15),
 | 
			
		||||
            ("Deliveries", "Lfrg.", "#", 15),
 | 
			
		||||
            ("Parts", "Teill.", "#", 15),
 | 
			
		||||
            ("Weight", "Gewicht", "kg", 20),
 | 
			
		||||
            ("Gradation", "Gradation", "°Oe|°KMW", 30),
 | 
			
		||||
        ];
 | 
			
		||||
 | 
			
		||||
        public record struct StatisticsRow(
 | 
			
		||||
            string Branch,
 | 
			
		||||
            int? KgNr,
 | 
			
		||||
            string? Name,
 | 
			
		||||
            int Members,
 | 
			
		||||
            int Deliveries,
 | 
			
		||||
            int Parts,
 | 
			
		||||
            int Weight,
 | 
			
		||||
            (double Oe, double Kmw) Gradation
 | 
			
		||||
        );
 | 
			
		||||
 | 
			
		||||
        public WineLocalityStatisticsData(IEnumerable<StatisticsRow> rows, List<string> filterNames) :
 | 
			
		||||
            base("Lieferstatistik pro Ort", "Lieferstatistik pro Ort", string.Join(" / ", filterNames), rows, FieldNames) {
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        public static async Task<WineLocalityStatisticsData> FromQuery(IQueryable<DeliveryPart> query, List<string> filterNames) {
 | 
			
		||||
            return new((await query
 | 
			
		||||
                .GroupBy(p => new {
 | 
			
		||||
                    Branch = p.Delivery.Branch.Name,
 | 
			
		||||
                    p.Kg!.KgNr,
 | 
			
		||||
                    Kg = p.Kg!.AtKg.Name,
 | 
			
		||||
                }, (k, g) => new {
 | 
			
		||||
                    k.Branch,
 | 
			
		||||
                    KgNr = (int?)k.KgNr,
 | 
			
		||||
                    Kg = (string?)k.Kg,
 | 
			
		||||
                    Members = g.Select(p => p.Delivery.Member).Distinct().Count(),
 | 
			
		||||
                    Deliveries = g.Select(p => p.Delivery).Distinct().Count(),
 | 
			
		||||
                    Parts = g.Count(),
 | 
			
		||||
                    Weight = g.Sum(p => p.Weight),
 | 
			
		||||
                    Kmw = g.Sum(p => p.Kmw * p.Weight) / g.Sum(p => p.Weight),
 | 
			
		||||
                })
 | 
			
		||||
                .OrderByDescending(g => g.Weight)
 | 
			
		||||
                .ThenBy(g => g.KgNr)
 | 
			
		||||
                .ToListAsync()).Select(g => new StatisticsRow(g.Branch, g.KgNr, g.Kg, g.Members, g.Deliveries, g.Parts, g.Weight, (Utils.KmwToOe(g.Kmw), Math.Round(g.Kmw, 1)))), filterNames);
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
@@ -809,6 +809,38 @@ namespace Elwig.Services {
 | 
			
		||||
            Mouse.OverrideCursor = null;
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        public static async Task GenerateLocalityStatistics(this DeliveryAdminViewModel vm, ExportSubject subject) {
 | 
			
		||||
            using var ctx = new AppDbContext();
 | 
			
		||||
            IQueryable<DeliveryPart> query;
 | 
			
		||||
            List<string> filterNames = [];
 | 
			
		||||
            if (subject == ExportSubject.FromFilters) {
 | 
			
		||||
                var (f, _, q, _, _) = await vm.GetFilters(ctx);
 | 
			
		||||
                query = q;
 | 
			
		||||
                filterNames.AddRange(f);
 | 
			
		||||
 | 
			
		||||
            } else {
 | 
			
		||||
                throw new ArgumentException("Invalid value for ExportSubject");
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            var d = new SaveFileDialog() {
 | 
			
		||||
                FileName = $"Lieferstatistik-{vm.FilterSeason ?? Utils.CurrentLastSeason}.ods",
 | 
			
		||||
                DefaultExt = "ods",
 | 
			
		||||
                Filter = "OpenDocument Format Spreadsheet (*.ods)|*.ods",
 | 
			
		||||
                Title = $"Lieferstatistik pro Ort speichern unter - Elwig"
 | 
			
		||||
            };
 | 
			
		||||
            if (d.ShowDialog() == true) {
 | 
			
		||||
                Mouse.OverrideCursor = Cursors.AppStarting;
 | 
			
		||||
                try {
 | 
			
		||||
                    using var ods = new OdsFile(d.FileName);
 | 
			
		||||
                    var tbl = await WineLocalityStatisticsData.FromQuery(query, filterNames);
 | 
			
		||||
                    await ods.AddTable(tbl);
 | 
			
		||||
                } catch (Exception exc) {
 | 
			
		||||
                    MessageBox.Show(exc.Message, "Fehler", MessageBoxButton.OK, MessageBoxImage.Error);
 | 
			
		||||
                }
 | 
			
		||||
                Mouse.OverrideCursor = null;
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        public static async Task GenerateDeliveryDepreciationList(this DeliveryAdminViewModel vm, ExportSubject subject, ExportMode mode) {
 | 
			
		||||
            using var ctx = new AppDbContext();
 | 
			
		||||
            IQueryable<DeliveryPart> query;
 | 
			
		||||
 
 | 
			
		||||
@@ -224,7 +224,15 @@ namespace Elwig.Services {
 | 
			
		||||
                for (int i = 0; i < filter.Count; i++) {
 | 
			
		||||
                    var e = filter[i];
 | 
			
		||||
 | 
			
		||||
                    if (e.Length >= 5 && e.Length <= 10 && "funktionär".StartsWith(e, StringComparison.CurrentCultureIgnoreCase)) {
 | 
			
		||||
                    if (e.Equals("aktiv", StringComparison.CurrentCultureIgnoreCase)) {
 | 
			
		||||
                        memberQuery = memberQuery.Where(m => m.IsActive);
 | 
			
		||||
                        filter.RemoveAt(i--);
 | 
			
		||||
                        filterNames.Add("aktive Mitglieder");
 | 
			
		||||
                    } else if (e.Equals("!aktiv", StringComparison.CurrentCultureIgnoreCase)) {
 | 
			
		||||
                        memberQuery = memberQuery.Where(m => !m.IsActive);
 | 
			
		||||
                        filter.RemoveAt(i--);
 | 
			
		||||
                        filterNames.Add("inaktive Mitglieder");
 | 
			
		||||
                    } else if (e.Length >= 5 && e.Length <= 10 && "funktionär".StartsWith(e, StringComparison.CurrentCultureIgnoreCase)) {
 | 
			
		||||
                        memberQuery = memberQuery.Where(m => m.IsFunktionär);
 | 
			
		||||
                        filter.RemoveAt(i--);
 | 
			
		||||
                        filterNames.Add("Funktionäre");
 | 
			
		||||
 
 | 
			
		||||
@@ -10,7 +10,6 @@ using Elwig.Helpers.Billing;
 | 
			
		||||
using Elwig.Models.Entities;
 | 
			
		||||
using ScottPlot.Plottables;
 | 
			
		||||
using ScottPlot;
 | 
			
		||||
using ScottPlot.Control;
 | 
			
		||||
 | 
			
		||||
namespace Elwig.Windows {
 | 
			
		||||
    public partial class ChartWindow : ContextWindow {
 | 
			
		||||
@@ -226,30 +225,8 @@ namespace Elwig.Windows {
 | 
			
		||||
            DataPlot.Color = ColorUngebunden;
 | 
			
		||||
            DataPlot.MarkerStyle = new MarkerStyle(MarkerShape.FilledCircle, 9, ColorUngebunden);
 | 
			
		||||
 | 
			
		||||
            OechslePricePlot.Interaction.Enable(new PlotActions() {
 | 
			
		||||
                ZoomIn = StandardActions.ZoomIn,
 | 
			
		||||
                ZoomOut = StandardActions.ZoomOut,
 | 
			
		||||
                PanUp = StandardActions.PanUp,
 | 
			
		||||
                PanDown = StandardActions.PanDown,
 | 
			
		||||
                PanLeft = StandardActions.PanLeft,
 | 
			
		||||
                PanRight = StandardActions.PanRight,
 | 
			
		||||
                DragPan = StandardActions.DragPan,
 | 
			
		||||
                DragZoom = StandardActions.DragZoom,
 | 
			
		||||
                DragZoomRectangle = StandardActions.DragZoomRectangle,
 | 
			
		||||
                ZoomRectangleClear = StandardActions.ZoomRectangleClear,
 | 
			
		||||
                ZoomRectangleApply = StandardActions.ZoomRectangleApply,
 | 
			
		||||
                AutoScale = StandardActions.AutoScale,
 | 
			
		||||
            });
 | 
			
		||||
 | 
			
		||||
            //OechslePricePlot.Plot.XAxis.ManualTickSpacing(1);
 | 
			
		||||
            //OechslePricePlot.Plot.YAxis.ManualTickSpacing(0.1);
 | 
			
		||||
            OechslePricePlot.Plot.Axes.SetLimits(Math.Min(GraphEntry.MinX, GraphEntry.MinXGeb) - 1, GraphEntry.MaxX + 1, -0.1, 1.5);
 | 
			
		||||
 | 
			
		||||
            //OechslePricePlot.Plot.Layout(padding: 0);
 | 
			
		||||
            //OechslePricePlot.Plot.XAxis2.Layout(padding: 0);
 | 
			
		||||
            //OechslePricePlot.Plot.YAxis.Layout(padding: 0);
 | 
			
		||||
            //OechslePricePlot.Plot.YAxis2.Layout(padding: 0);
 | 
			
		||||
 | 
			
		||||
            HighlightedPointPlot = OechslePricePlot.Plot.Add.Marker(0, 0, MarkerShape.OpenCircle, 10, Colors.Red);
 | 
			
		||||
            HighlightedPointPlot.IsVisible = false;
 | 
			
		||||
 | 
			
		||||
 
 | 
			
		||||
@@ -110,32 +110,6 @@
 | 
			
		||||
                <MenuItem x:Name="Menu_DeliveryJournal_PrintToday" Header="...von heute drucken"
 | 
			
		||||
                          Click="Menu_DeliveryJournal_PrintToday_Click" InputGestureText="Strg+J"/>
 | 
			
		||||
            </MenuItem>
 | 
			
		||||
            <MenuItem Header="Qualitätsstatistik" x:Name="Menu_WineQualityStatistics">
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ShowFilters" Header="...aus Filtern anzeigen (PDF)"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_ShowFilters_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_SavePdfFilters" Header="...aus Filtern speichern... (PDF)"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_SavePdfFilters_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_PrintFilters" Header="...aus Filtern drucken"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_PrintFilters_Click"/>
 | 
			
		||||
                <Separator/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ShowToday" Header="...von heute anzeigen (PDF)"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_ShowToday_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_SavePdfToday" Header="...von heute speichern... (PDF)"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_SavePdfToday_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_PrintToday" Header="...von heute drucken"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_PrintToday_Click" InputGestureText="Strg+Q"/>
 | 
			
		||||
                <Separator/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ModeOe" Header="...nach °Oe aufschlüsseln" IsCheckable="True" IsChecked="True"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_Mode_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ModeKmw10" Header="...nach °KMW aufschlüsseln (⅒)" IsCheckable="True"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_Mode_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ModeKmw5" Header="...nach °KMW aufschlüsseln (⅕)" IsCheckable="True"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_Mode_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ModeKmw2" Header="...nach °KMW aufschlüsseln (½)" IsCheckable="True"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_Mode_Click"/>
 | 
			
		||||
                <MenuItem x:Name="Menu_WineQualityStatistics_ModeKmw1" Header="...nach °KMW aufschlüsseln (ganze)" IsCheckable="True"
 | 
			
		||||
                          Click="Menu_WineQualityStatistics_Mode_Click"/>
 | 
			
		||||
            </MenuItem>
 | 
			
		||||
            <MenuItem Header="Abwertungsliste" x:Name="Menu_DeliveryDepreciationList">
 | 
			
		||||
                <MenuItem x:Name="Menu_DeliveryDepreciationList_SaveFilters" Header="...aus Filtern speichern... (Excel)"
 | 
			
		||||
                          Click="Menu_DeliveryDepreciationList_SaveFilters_Click"/>
 | 
			
		||||
@@ -155,6 +129,38 @@
 | 
			
		||||
                <MenuItem x:Name="Menu_DeliveryDepreciationList_PrintSeason" Header="...von Saison drucken"
 | 
			
		||||
                          Click="Menu_DeliveryDepreciationList_PrintSeason_Click"/>
 | 
			
		||||
            </MenuItem>
 | 
			
		||||
            <MenuItem Header="Statistik" x:Name="Menu_Statistics">
 | 
			
		||||
                <MenuItem Header="Qualitätsstatistik..." x:Name="Menu_Statistics_WineQuality">
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ShowFilters" Header="...aus Filtern anzeigen (PDF)"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_ShowFilters_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_SavePdfFilters" Header="...aus Filtern speichern... (PDF)"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_SavePdfFilters_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_PrintFilters" Header="...aus Filtern drucken"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_PrintFilters_Click"/>
 | 
			
		||||
                    <Separator/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ShowToday" Header="...von heute anzeigen (PDF)"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_ShowToday_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_SavePdfToday" Header="...von heute speichern... (PDF)"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_SavePdfToday_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_PrintToday" Header="...von heute drucken"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_PrintToday_Click" InputGestureText="Strg+Q"/>
 | 
			
		||||
                    <Separator/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ModeOe" Header="...nach °Oe aufschlüsseln" IsCheckable="True" IsChecked="True"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_Mode_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ModeKmw10" Header="...nach °KMW aufschlüsseln (⅒)" IsCheckable="True"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_Mode_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ModeKmw5" Header="...nach °KMW aufschlüsseln (⅕)" IsCheckable="True"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_Mode_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ModeKmw2" Header="...nach °KMW aufschlüsseln (½)" IsCheckable="True"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_Mode_Click"/>
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistics_WineQuality_ModeKmw1" Header="...nach °KMW aufschlüsseln (ganze)" IsCheckable="True"
 | 
			
		||||
                              Click="Menu_Statistics_WineQuality_Mode_Click"/>
 | 
			
		||||
                </MenuItem>
 | 
			
		||||
                <MenuItem x:Name="Menu_Statistics_Locality" Header="Lieferstatistik pro Ort...">
 | 
			
		||||
                    <MenuItem x:Name="Menu_Statistic_Locality_SaveFilters" Header="...aus Filtern speichern... (Excel)"
 | 
			
		||||
                              Click="Menu_Statistic_Locality_SaveFilters_Click"/>
 | 
			
		||||
                </MenuItem>
 | 
			
		||||
            </MenuItem>
 | 
			
		||||
            <MenuItem Header="BKI">
 | 
			
		||||
                <MenuItem x:Name="Menu_Bki_SaveList" Header="Traubentransportscheinliste speichern..."/>
 | 
			
		||||
            </MenuItem>
 | 
			
		||||
 
 | 
			
		||||
@@ -41,7 +41,7 @@ namespace Elwig.Windows {
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlP, Menu_DeliveryNote_Show_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlO, Menu_DeliveryJournal_ShowFilters_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlJ, Menu_DeliveryJournal_PrintToday_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlQ, Menu_WineQualityStatistics_PrintToday_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlQ, Menu_Statistics_WineQuality_PrintToday_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlShiftP, Menu_DeliveryNote_Print_Click));
 | 
			
		||||
            CommandBindings.Add(new CommandBinding(CtrlShiftO, Menu_DeliveryJournal_PrintFilters_Click));
 | 
			
		||||
            RequiredInputs = [
 | 
			
		||||
@@ -97,17 +97,17 @@ namespace Elwig.Windows {
 | 
			
		||||
                WeighingDButton.Visibility = Visibility.Hidden;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            Menu_WineQualityStatistics_ModeOe.IsChecked = false;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw1.IsChecked = false;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw2.IsChecked = false;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw5.IsChecked = false;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw10.IsChecked = false;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeOe.IsChecked = false;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw1.IsChecked = false;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw2.IsChecked = false;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw5.IsChecked = false;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw10.IsChecked = false;
 | 
			
		||||
            switch (App.Client.OrderingMemberList) {
 | 
			
		||||
                case 0: Menu_WineQualityStatistics_ModeOe.IsChecked = true; break;
 | 
			
		||||
                case 1: Menu_WineQualityStatistics_ModeKmw1.IsChecked = true; break;
 | 
			
		||||
                case 2: Menu_WineQualityStatistics_ModeKmw2.IsChecked = true; break;
 | 
			
		||||
                case 3: Menu_WineQualityStatistics_ModeKmw5.IsChecked = true; break;
 | 
			
		||||
                case 4: Menu_WineQualityStatistics_ModeKmw10.IsChecked = true; break;
 | 
			
		||||
                case 0: Menu_Statistics_WineQuality_ModeOe.IsChecked = true; break;
 | 
			
		||||
                case 1: Menu_Statistics_WineQuality_ModeKmw1.IsChecked = true; break;
 | 
			
		||||
                case 2: Menu_Statistics_WineQuality_ModeKmw2.IsChecked = true; break;
 | 
			
		||||
                case 3: Menu_Statistics_WineQuality_ModeKmw5.IsChecked = true; break;
 | 
			
		||||
                case 4: Menu_Statistics_WineQuality_ModeKmw10.IsChecked = true; break;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            Menu_Export_UploadFilters.IsEnabled = App.Config.SyncUrl != null;
 | 
			
		||||
@@ -218,40 +218,44 @@ namespace Elwig.Windows {
 | 
			
		||||
            await ViewModel.GenerateDeliveryJournal(DeliveryService.ExportSubject.FromSeasonAndBranch, ExportMode.Upload);
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private async void Menu_WineQualityStatistics_ShowToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_ShowToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromToday, ExportMode.Show);
 | 
			
		||||
        private async void Menu_WineQualityStatistics_SavePdfToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_SavePdfToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromToday, ExportMode.SavePdf);
 | 
			
		||||
        private async void Menu_WineQualityStatistics_PrintToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_PrintToday_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromToday, ExportMode.Print);
 | 
			
		||||
        private async void Menu_WineQualityStatistics_ShowFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_ShowFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromFilters, ExportMode.Show);
 | 
			
		||||
        private async void Menu_WineQualityStatistics_SavePdfFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_SavePdfFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromFilters, ExportMode.SavePdf);
 | 
			
		||||
        private async void Menu_WineQualityStatistics_PrintFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_PrintFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateWineQualityStatistics(DeliveryService.ExportSubject.FromFilters, ExportMode.Print);
 | 
			
		||||
 | 
			
		||||
        private async void Menu_WineQualityStatistics_Mode_Click(object sender, RoutedEventArgs evt) {
 | 
			
		||||
            Menu_WineQualityStatistics.IsSubmenuOpen = true;
 | 
			
		||||
            if (sender == Menu_WineQualityStatistics_ModeOe) {
 | 
			
		||||
        private async void Menu_Statistics_WineQuality_Mode_Click(object sender, RoutedEventArgs evt) {
 | 
			
		||||
            Menu_Statistics.IsSubmenuOpen = true;
 | 
			
		||||
            Menu_Statistics_WineQuality.IsSubmenuOpen = true;
 | 
			
		||||
            if (sender == Menu_Statistics_WineQuality_ModeOe) {
 | 
			
		||||
                App.Client.OrderingMemberList = 0;
 | 
			
		||||
            } else if (sender == Menu_WineQualityStatistics_ModeKmw1) {
 | 
			
		||||
            } else if (sender == Menu_Statistics_WineQuality_ModeKmw1) {
 | 
			
		||||
                App.Client.OrderingMemberList = 1;
 | 
			
		||||
            } else if (sender == Menu_WineQualityStatistics_ModeKmw2) {
 | 
			
		||||
            } else if (sender == Menu_Statistics_WineQuality_ModeKmw2) {
 | 
			
		||||
                App.Client.OrderingMemberList = 2;
 | 
			
		||||
            } else if (sender == Menu_WineQualityStatistics_ModeKmw5) {
 | 
			
		||||
            } else if (sender == Menu_Statistics_WineQuality_ModeKmw5) {
 | 
			
		||||
                App.Client.OrderingMemberList = 3;
 | 
			
		||||
            } else if (sender == Menu_WineQualityStatistics_ModeKmw10) {
 | 
			
		||||
            } else if (sender == Menu_Statistics_WineQuality_ModeKmw10) {
 | 
			
		||||
                App.Client.OrderingMemberList = 4;
 | 
			
		||||
            }
 | 
			
		||||
            Menu_WineQualityStatistics_ModeOe.IsChecked = App.Client.OrderingMemberList == 0;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw1.IsChecked = App.Client.OrderingMemberList == 1;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw2.IsChecked = App.Client.OrderingMemberList == 2;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw5.IsChecked = App.Client.OrderingMemberList == 3;
 | 
			
		||||
            Menu_WineQualityStatistics_ModeKmw10.IsChecked = App.Client.OrderingMemberList == 4;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeOe.IsChecked = App.Client.OrderingMemberList == 0;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw1.IsChecked = App.Client.OrderingMemberList == 1;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw2.IsChecked = App.Client.OrderingMemberList == 2;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw5.IsChecked = App.Client.OrderingMemberList == 3;
 | 
			
		||||
            Menu_Statistics_WineQuality_ModeKmw10.IsChecked = App.Client.OrderingMemberList == 4;
 | 
			
		||||
            await App.Client.UpdateValues();
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private async void Menu_Statistic_Locality_SaveFilters_Click(object sender, RoutedEventArgs evt)=>
 | 
			
		||||
            await ViewModel.GenerateLocalityStatistics(DeliveryService.ExportSubject.FromFilters);
 | 
			
		||||
 | 
			
		||||
        private async void Menu_DeliveryDepreciationList_SaveFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
            await ViewModel.GenerateDeliveryDepreciationList(DeliveryService.ExportSubject.FromFilters, ExportMode.SaveList);
 | 
			
		||||
        private async void Menu_DeliveryDepreciationList_ShowFilters_Click(object sender, RoutedEventArgs evt) =>
 | 
			
		||||
@@ -306,19 +310,23 @@ namespace Elwig.Windows {
 | 
			
		||||
                UnsetDefaultValue(GerebeltGewogenInput);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (!App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
            if (App.Client.HasBoxWeighing(ViewModel.Branch)) {
 | 
			
		||||
                LesewagenInput.IsEnabled = false;
 | 
			
		||||
                SetDefaultValue(LesewagenInput, false);
 | 
			
		||||
                HandPickedInput.IsThreeState = false;
 | 
			
		||||
                UnsetDefaultValue(HandPickedInput);
 | 
			
		||||
            } else {
 | 
			
		||||
                LesewagenInput.IsEnabled = true;
 | 
			
		||||
                UnsetDefaultValue(LesewagenInput);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (!App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
                HandPickedInput.IsThreeState = false;
 | 
			
		||||
                UnsetDefaultValue(HandPickedInput);
 | 
			
		||||
            } else {
 | 
			
		||||
                HandPickedInput.IsThreeState = true;
 | 
			
		||||
                SetDefaultValue(HandPickedInput, null);
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            if (App.Client.IsMatzen || App.Client.IsWinzerkeller) {
 | 
			
		||||
            if (App.Client.IsMatzen || App.Client.IsWinzerkeller || App.Client.IsBaden || App.Client.IsWeinland) {
 | 
			
		||||
                GebundenInput.IsEnabled = false;
 | 
			
		||||
                SetDefaultValue(GebundenInput, null);
 | 
			
		||||
            } else {
 | 
			
		||||
@@ -1376,7 +1384,7 @@ namespace Elwig.Windows {
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private void GerebeltGewogenInput_Changed(object sender, RoutedEventArgs evt) {
 | 
			
		||||
            if (!App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
            if ((IsEditing || IsCreating) && !App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
                HandPickedInput.IsChecked = !GerebeltGewogenInput.IsChecked;
 | 
			
		||||
            }
 | 
			
		||||
            if (!ViewModel.IsReceipt || App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
@@ -1386,7 +1394,7 @@ namespace Elwig.Windows {
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private void HandPickedInput_Changed(object sender, RoutedEventArgs evt) {
 | 
			
		||||
            if (!App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
            if ((IsEditing || IsCreating) && !App.Client.HasNetWeighing(ViewModel.Branch)) {
 | 
			
		||||
                GerebeltGewogenInput.IsChecked = !HandPickedInput.IsChecked;
 | 
			
		||||
            }
 | 
			
		||||
            CheckBox_Changed(sender, evt);
 | 
			
		||||
 
 | 
			
		||||
@@ -19,6 +19,7 @@ namespace Elwig.Windows {
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private async void TimeSpanInput_SelectionChanged(object sender, RoutedEventArgs evt) {
 | 
			
		||||
            if (!IsLoaded) return;
 | 
			
		||||
            DateTime? fromDate = DateTime.Now;
 | 
			
		||||
            if (TimeSpanInput.SelectedIndex == 0) {
 | 
			
		||||
                fromDate = fromDate.Value.AddDays(-7);
 | 
			
		||||
@@ -50,6 +51,7 @@ namespace Elwig.Windows {
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private void ApplyFilters() {
 | 
			
		||||
            if (!IsLoaded) return;
 | 
			
		||||
            var filters = FilterInput.Text.Split(' ');
 | 
			
		||||
            IEnumerable<Row> data = Data;
 | 
			
		||||
            switch (TypeInput.SelectedIndex) {
 | 
			
		||||
 
 | 
			
		||||
@@ -194,6 +194,7 @@
 | 
			
		||||
                        <Bold>Stammgemeinde</Bold>: z.B. matzen, Wolkersdorf, ...<LineBreak/>
 | 
			
		||||
                        <Bold>UID</Bold>: z.B. ATU12345678, ...<LineBreak/>
 | 
			
		||||
                        <Bold>Betriebs-Nr.</Bold>: z.B. 0123456, ...<LineBreak/>
 | 
			
		||||
                        <Bold>Aktiv</Bold>: aktiv, !Aktiv (nicht-aktiv)<LineBreak/>
 | 
			
		||||
                        <Bold>Bio-Betrieb</Bold>: BIO, !bio (ausgenommen Bio)<LineBreak/>
 | 
			
		||||
                        <Bold>Buchführend</Bold>: buchf[ührend], Pauschal[iert], !buchf[ührend]<LineBreak/>
 | 
			
		||||
                        <Bold>Volllieferant</Bold>: voll[lieferant], !Voll[lieferant] (nicht-Volllieferant)<LineBreak/>
 | 
			
		||||
 
 | 
			
		||||
@@ -140,8 +140,9 @@
 | 
			
		||||
            <TextBox x:Name="CommentInput" Grid.Column="1" HorizontalAlignment="Stretch" Margin="0,40,10,0"
 | 
			
		||||
                     TextChanged="CommentInput_TextChanged"/>
 | 
			
		||||
 | 
			
		||||
            <Label Content="Erstellt am:" Margin="10,70,0,0" Grid.Column="0"/>
 | 
			
		||||
            <TextBox x:Name="DateInput" Grid.Column="1" Width="77" HorizontalAlignment="Left" Margin="0,70,10,0" IsReadOnly="True"/>
 | 
			
		||||
            <Label Content="Datum:" Margin="10,70,0,0" Grid.Column="0"/>
 | 
			
		||||
            <TextBox x:Name="DateInput" Grid.Column="1" Width="77" HorizontalAlignment="Left" Margin="0,70,10,0"
 | 
			
		||||
                     TextChanged="DateInput_TextChanged"/>
 | 
			
		||||
 | 
			
		||||
            <Label Content="Überwiesen am:" Margin="10,100,0,0" Grid.Column="0"/>
 | 
			
		||||
            <TextBox x:Name="TransferDateInput" Grid.Column="1" Width="77" HorizontalAlignment="Left" Margin="0,100,10,0"
 | 
			
		||||
 
 | 
			
		||||
@@ -19,7 +19,7 @@ namespace Elwig.Windows {
 | 
			
		||||
 | 
			
		||||
        public readonly int Year;
 | 
			
		||||
        public readonly bool SeasonLocked;
 | 
			
		||||
        private bool DataValid, DataChanged, NameChanged, CommentChanged, TransferDateValid, TransferDateChanged;
 | 
			
		||||
        private bool DataValid, DataChanged, NameChanged, CommentChanged, DateValid, DateChanged, TransferDateValid, TransferDateChanged;
 | 
			
		||||
        private BillingData? BillingData;
 | 
			
		||||
        private bool WeightModifierChanged = false;
 | 
			
		||||
 | 
			
		||||
@@ -175,6 +175,7 @@ namespace Elwig.Windows {
 | 
			
		||||
        private void UpdateSaveButton() {
 | 
			
		||||
            SaveButton.IsEnabled = PaymentVariantList.SelectedItem != null &&
 | 
			
		||||
                ((DataChanged && DataValid) || NameChanged || CommentChanged ||
 | 
			
		||||
                (DateChanged && DateValid) ||
 | 
			
		||||
                (TransferDateChanged && TransferDateValid) ||
 | 
			
		||||
                (ConsiderModifiersInput.IsChecked != BillingData?.ConsiderDelieryModifiers) ||
 | 
			
		||||
                (ConsiderPenaltiesInput.IsChecked != BillingData?.ConsiderContractPenalties) ||
 | 
			
		||||
@@ -433,10 +434,16 @@ namespace Elwig.Windows {
 | 
			
		||||
 | 
			
		||||
            var withoutIban = v.Credits.Count(c => c.Member.Iban == null);
 | 
			
		||||
            if (withoutIban > 0) {
 | 
			
		||||
                var r = MessageBox.Show($"Achtung: Für {withoutIban} Mitglieder ist kein IBAN hinterlegt.\nDiese werden NICHT exportiert.",
 | 
			
		||||
                var r = MessageBox.Show($"Achtung: Für {withoutIban:N0} Mitglieder ist kein IBAN hinterlegt.\n\nDiese werden NICHT exportiert.",
 | 
			
		||||
                    "Mitglieder ohne IBAN", MessageBoxButton.OKCancel, MessageBoxImage.Warning, MessageBoxResult.Cancel);
 | 
			
		||||
                if (r != MessageBoxResult.OK) return;
 | 
			
		||||
            }
 | 
			
		||||
            var withNegAmount = v.Credits.Count(c => c.Amount <= 0);
 | 
			
		||||
            if (withNegAmount > 0) {
 | 
			
		||||
                var r = MessageBox.Show($"Achtung: Es gibt {withNegAmount:N0} Traubengutschriften mit negativem Betrag.\n\nDiese werden NICHT exportiert.",
 | 
			
		||||
                    "Traubengutschriften mit negativem Betrag", MessageBoxButton.OKCancel, MessageBoxImage.Warning, MessageBoxResult.OK);
 | 
			
		||||
                if (r != MessageBoxResult.OK) return;
 | 
			
		||||
            }
 | 
			
		||||
 | 
			
		||||
            var d = new SaveFileDialog() {
 | 
			
		||||
                FileName = $"{App.Client.NameToken}-Überweisungsdaten-{v.Year}-{v.Name.Trim().Replace(' ', '-')}.{Ebics.FileExtension}",
 | 
			
		||||
@@ -489,6 +496,7 @@ namespace Elwig.Windows {
 | 
			
		||||
            try {
 | 
			
		||||
                v.Name = NameInput.Text;
 | 
			
		||||
                v.Comment = (CommentInput.Text != "") ? CommentInput.Text : null;
 | 
			
		||||
                v.DateString = string.Join("-", DateInput.Text.Split(".").Reverse());
 | 
			
		||||
                v.TransferDateString = (TransferDateInput.Text != "") ? string.Join("-", TransferDateInput.Text.Split(".").Reverse()) : null;
 | 
			
		||||
                var d = App.Config.Debug ? BillingData.FromJson(DataInput.Text) : BillingData;
 | 
			
		||||
                d.ConsiderDelieryModifiers = ConsiderModifiersInput.IsChecked ?? false;
 | 
			
		||||
@@ -557,6 +565,27 @@ namespace Elwig.Windows {
 | 
			
		||||
            UpdateSaveButton();
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private void DateInput_TextChanged(object sender, TextChangedEventArgs evt) {
 | 
			
		||||
            if (PaymentVariantList.SelectedItem is not PaymentVar v) {
 | 
			
		||||
                ControlUtils.ClearInputState(DateInput);
 | 
			
		||||
                return;
 | 
			
		||||
            }
 | 
			
		||||
            var res = Validator.CheckDate(DateInput, true);
 | 
			
		||||
            if (!res.IsValid) {
 | 
			
		||||
                ControlUtils.SetInputInvalid(DateInput);
 | 
			
		||||
                DateValid = false;
 | 
			
		||||
            } else if (DateInput.Text != $"{v.Date:dd.MM.yyyy}") {
 | 
			
		||||
                ControlUtils.SetInputChanged(DateInput);
 | 
			
		||||
                DateValid = true;
 | 
			
		||||
                DateChanged = true;
 | 
			
		||||
            } else {
 | 
			
		||||
                ControlUtils.ClearInputState(DateInput);
 | 
			
		||||
                DateValid = true;
 | 
			
		||||
                DateChanged = false;
 | 
			
		||||
            }
 | 
			
		||||
            UpdateSaveButton();
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private void TransferDateInput_TextChanged(object sender, TextChangedEventArgs evt) {
 | 
			
		||||
            if (PaymentVariantList.SelectedItem is not PaymentVar v) {
 | 
			
		||||
                ControlUtils.ClearInputState(TransferDateInput);
 | 
			
		||||
 
 | 
			
		||||
@@ -13,7 +13,7 @@
 | 
			
		||||
  </Target>
 | 
			
		||||
  <ItemGroup>
 | 
			
		||||
    <ProjectReference Include="..\Installer\Installer.wixproj" />
 | 
			
		||||
    <PackageReference Include="WixToolset.Bal.wixext" Version="5.0.1" />
 | 
			
		||||
    <PackageReference Include="WixToolset.Util.wixext" Version="5.0.1" />
 | 
			
		||||
    <PackageReference Include="WixToolset.Bal.wixext" Version="5.0.2" />
 | 
			
		||||
    <PackageReference Include="WixToolset.Util.wixext" Version="5.0.2" />
 | 
			
		||||
  </ItemGroup>
 | 
			
		||||
</Project>
 | 
			
		||||
@@ -1,6 +1,5 @@
 | 
			
		||||
using Elwig.Helpers;
 | 
			
		||||
using Elwig.Helpers.Billing;
 | 
			
		||||
using Elwig.Models.Entities;
 | 
			
		||||
using System.Text.Json;
 | 
			
		||||
 | 
			
		||||
namespace Tests.HelperTests {
 | 
			
		||||
@@ -452,7 +451,7 @@ namespace Tests.HelperTests {
 | 
			
		||||
                   [73] = 0.5m,
 | 
			
		||||
                   [83] = 1.0m
 | 
			
		||||
               }, null), GetSelection(["GV/-"]))
 | 
			
		||||
           ];
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -476,14 +475,14 @@ namespace Tests.HelperTests {
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_04_Simple() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
               new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                   [73] = 0.5m,
 | 
			
		||||
                   [84] = 1.0m
 | 
			
		||||
               }, null), GetSelection(["GV/-", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.5m,
 | 
			
		||||
                    [84] = 1.0m
 | 
			
		||||
                }, null), GetSelection(["GV/-", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(10, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.75m,
 | 
			
		||||
                }, null), GetSelection(["WR/-"]))
 | 
			
		||||
           ];
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -510,18 +509,18 @@ namespace Tests.HelperTests {
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_05_Attribute() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
               new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                   [73] = 0.5m,
 | 
			
		||||
                   [84] = 1.0m
 | 
			
		||||
               }, null), GetSelection(["GV/K-", "ZW/K-"])),
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.5m,
 | 
			
		||||
                    [84] = 1.0m
 | 
			
		||||
                }, null), GetSelection(["GV/K-", "ZW/K-"])),
 | 
			
		||||
                new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.75m,
 | 
			
		||||
                }, null), GetSelection(["WR/-", "BL/-", "RR/-", "FV/-"])),
 | 
			
		||||
                }, null), GetSelection(["WR/-", "BL/-", "RR/-", "FV/-", "GV/-"])),
 | 
			
		||||
                new GraphEntry(4, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.65m,
 | 
			
		||||
                    [84] = 1.2m
 | 
			
		||||
                }, null), GetSelection(["BP/-", "SA/-"]))
 | 
			
		||||
           ];
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -564,12 +563,12 @@ namespace Tests.HelperTests {
 | 
			
		||||
                }, null), GetSelection(["GV/-B", "ZW/-B"])),
 | 
			
		||||
                new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.75m,
 | 
			
		||||
                }, null), GetSelection(["WR/-", "BL/-", "RR/-", "FV/-"])),
 | 
			
		||||
                }, null), GetSelection(["WR/-", "BL/-", "RR/-", "FV/-", "GV/-"])),
 | 
			
		||||
                new GraphEntry(4, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.65m,
 | 
			
		||||
                    [84] = 1.2m
 | 
			
		||||
                }, null), GetSelection(["BP/-", "SA/-"]))
 | 
			
		||||
           ];
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -616,7 +615,7 @@ namespace Tests.HelperTests {
 | 
			
		||||
                 new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.8m,
 | 
			
		||||
                }, null), GetSelection(["BP/-", "BP/-B"])),
 | 
			
		||||
           ];
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -653,8 +652,8 @@ namespace Tests.HelperTests {
 | 
			
		||||
                }, null), GetSelection(["BP/-B", "ZW/-B", "FV/-B"])),
 | 
			
		||||
                 new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.8m,
 | 
			
		||||
                }, null), GetSelection(["BP/-", "ZW/-", "FV/-", "WR/-", "BL/-"])),
 | 
			
		||||
           ];
 | 
			
		||||
                }, null), GetSelection(["BP/-", "ZW/-", "FV/-", "WR/-", "BL/-", "RR/-"])),
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
@@ -711,5 +710,329 @@ namespace Tests.HelperTests {
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_10_QualityLevel() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["ZW/-"]))
 | 
			
		||||
            ];
 | 
			
		||||
            entries[0].Abgewertet = true;
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": 0.2,
 | 
			
		||||
                  "quality": {
 | 
			
		||||
                    "WEI": 0.1
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_11_MixedCultivation_1() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "WR/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["GV/-B"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "GV-B": 0.2
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_12_MixedCultivation_2() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "ZW/-", "WR/-", "FV/-", "RR/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["GV/-B", "FV/-B"])),
 | 
			
		||||
                new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.3m,
 | 
			
		||||
                }, null), GetSelection(["ZW/-B", "WR/-B"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "GV-B": 0.2,
 | 
			
		||||
                    "FV-B": 0.2,
 | 
			
		||||
                    "ZW-B": 0.3,
 | 
			
		||||
                    "WR-B": 0.3
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_13_DefaultCultivation_1() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "GV/-B"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["WR/-B"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "WR-B": 0.2
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_14_DefaultCultivation_2() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "GV/-B", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["WR/-B", "ZW/-B"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "-B": 0.2,
 | 
			
		||||
                    "GV-B": 0.1
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_15_DefaultCultivation_3() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "GV/-B", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["GV/S-", "GV/S-B", "ZW/S-"])),
 | 
			
		||||
                new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.3m,
 | 
			
		||||
                }, null), GetSelection(["WR/S-B", "ZW/S-B"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "GV/S-B": 0.2,
 | 
			
		||||
                    "/S": 0.2,
 | 
			
		||||
                    "/S-B": 0.3,
 | 
			
		||||
                    "GV": 0.1,
 | 
			
		||||
                    "ZW": 0.1
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_16_DefaultCultivation_4() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "RR/-B", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["RR/-"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "RR-B": 0.1,
 | 
			
		||||
                    "RR": 0.2
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_17_DefaultCultivation_5() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "RR/-B", "ZW/-", "SW/-", "SO/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["GV/K-", "RR/K-B", "ZW/K-"])),
 | 
			
		||||
                new GraphEntry(2, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.3m,
 | 
			
		||||
                }, null), GetSelection(["RR/K-"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "RR/K-B": 0.2,
 | 
			
		||||
                    "RR/K": 0.3,
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "/K": 0.2
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_18_DefaultAttribute_1() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "GV/S-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["WR/S-"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "WR/S": 0.2,
 | 
			
		||||
                    "default": 0.1
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestWrite_19_DefaultAttribute_2() {
 | 
			
		||||
            List<GraphEntry> entries = [
 | 
			
		||||
                new GraphEntry(0, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.1m,
 | 
			
		||||
                }, null), GetSelection(["GV/-", "GV/S-", "ZW/-"])),
 | 
			
		||||
                new GraphEntry(1, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = 0.2m,
 | 
			
		||||
                }, null), GetSelection(["WR/S-", "ZW/S-"]))
 | 
			
		||||
            ];
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            Assert.That(data.ToJsonString(JsonOpts), Is.EqualTo("""
 | 
			
		||||
                {
 | 
			
		||||
                  "mode": "elwig",
 | 
			
		||||
                  "version": 1,
 | 
			
		||||
                  "payment": {
 | 
			
		||||
                    "default": 0.1,
 | 
			
		||||
                    "/S": 0.2,
 | 
			
		||||
                    "GV/S": 0.1
 | 
			
		||||
                  },
 | 
			
		||||
                  "curves": []
 | 
			
		||||
                }
 | 
			
		||||
                """));
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private static IEnumerable<List<T>> GetPermutations<T>(T[] input) {
 | 
			
		||||
            if (input.Length <= 1)
 | 
			
		||||
                yield return [..input];
 | 
			
		||||
            for (int i = 0; i < input.Length; i++) {
 | 
			
		||||
                yield return [input[i]];
 | 
			
		||||
                foreach (var p in GetPermutations(input.Where((_, j) => j != i).ToArray())) {
 | 
			
		||||
                    p.Insert(0, input[i]);
 | 
			
		||||
                    yield return p;
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private static IEnumerable<List<HashSet<RawVaribute>>> GetCurves(RawVaribute[] vaributes, int minNumCurves = 1, int maxNumCurves = 10) {
 | 
			
		||||
            foreach (var p in GetPermutations(vaributes)) {
 | 
			
		||||
                for (int nCurves = minNumCurves; nCurves <= Math.Min(maxNumCurves, p.Count); nCurves++) {
 | 
			
		||||
                    yield return Enumerable.Range(0, nCurves)
 | 
			
		||||
                        .Select(n => p.Where((v, idx) => idx % nCurves == n).ToHashSet())
 | 
			
		||||
                        .ToList();
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        private readonly HashSet<string> TestedCurves = [];
 | 
			
		||||
 | 
			
		||||
        private void TestCollapse(List<HashSet<RawVaribute>> curves) {
 | 
			
		||||
            var str = string.Join("\n", curves.Select(c => string.Join("  ", c.Select(v => v.ToString().PadRight(6)).Order())).Order().Select((c, n) => $"{n + 1}: [ " + c + " ]"));
 | 
			
		||||
            if (!TestedCurves.Add(str))
 | 
			
		||||
                return;
 | 
			
		||||
            var vaributes = curves.SelectMany(v => v).ToList();
 | 
			
		||||
            List<GraphEntry> entries = curves
 | 
			
		||||
                .Select((l, n) => new GraphEntry(n, 4, new BillingData.Curve(BillingData.CurveMode.Oe, new() {
 | 
			
		||||
                    [73] = n + 1,
 | 
			
		||||
                }, null), GetSelection(l.Select(v => v.ToString()))))
 | 
			
		||||
                .ToList();
 | 
			
		||||
            var data = BillingData.FromGraphEntries(entries);
 | 
			
		||||
            var test = PaymentBillingData.FromJson(data.ToJsonString(), vaributes);
 | 
			
		||||
            for (int i = 0; i < curves.Count; i++) {
 | 
			
		||||
                foreach (var v in curves[i]) {
 | 
			
		||||
                    var val = test.CalculatePrice(v.SortId!, v.AttrId, v.CultId, "QUW", false, 73.0, 15.0);
 | 
			
		||||
                    var actualCurve = (int)val;
 | 
			
		||||
                    Assert.That(actualCurve, Is.EqualTo(i + 1), $"Invalid: {v} (Curve {i + 1} -> {actualCurve})\n\n{str}\n\n{data.ToJsonString(JsonOpts)}\n");
 | 
			
		||||
                }
 | 
			
		||||
            }
 | 
			
		||||
        }
 | 
			
		||||
 | 
			
		||||
        [Test]
 | 
			
		||||
        public void TestCollapse_01_Permutations() {
 | 
			
		||||
            RawVaribute[][] configurations = [
 | 
			
		||||
                [new("GV/-"), new("WR/-"), new("ZW/-"), new("GV/K-"), new("WR/K-"), new("ZW/K-")],
 | 
			
		||||
                [new("GV/-"), new("WR/-"), new("GV/K-"), new("WR/K-"), new("GV/S-"), new("WR/S-")],
 | 
			
		||||
                [new("GV/-"), new("WR/-"), new("ZW/-"), new("GV/-B"), new("WR/-B"), new("ZW/-B")],
 | 
			
		||||
                [new("GV/-"), new("WR/-"), new("GV/-B"), new("WR/-B"), new("GV/-KIP"), new("WR/-KIP")],
 | 
			
		||||
                [new("GV/-"), new("GV/K-"), new("ZW/-"), new("ZW/K-"), new("GV/-B"), new("GV/K-B"), new("ZW/-B"), new("ZW/K-B")],
 | 
			
		||||
            ];
 | 
			
		||||
            Assert.Multiple(() => {
 | 
			
		||||
                foreach (var config in configurations) {
 | 
			
		||||
                    foreach (var c in GetCurves(config))
 | 
			
		||||
                        TestCollapse(c);
 | 
			
		||||
                }
 | 
			
		||||
            });
 | 
			
		||||
        }
 | 
			
		||||
    }
 | 
			
		||||
}
 | 
			
		||||
 
 | 
			
		||||
@@ -19,16 +19,16 @@
 | 
			
		||||
  </Target>
 | 
			
		||||
 | 
			
		||||
  <ItemGroup>
 | 
			
		||||
    <PackageReference Include="Microsoft.NET.Test.Sdk" Version="17.11.1" />
 | 
			
		||||
    <PackageReference Include="Microsoft.NET.Test.Sdk" Version="17.13.0" />
 | 
			
		||||
    <PackageReference Include="Appium.WebDriver" Version="4.4.5" />
 | 
			
		||||
    <PackageReference Include="NReco.PdfRenderer" Version="1.5.4" />
 | 
			
		||||
    <PackageReference Include="NUnit" Version="4.2.2" />
 | 
			
		||||
    <PackageReference Include="NUnit3TestAdapter" Version="4.6.0" />
 | 
			
		||||
    <PackageReference Include="NUnit.Analyzers" Version="4.3.0">
 | 
			
		||||
    <PackageReference Include="NReco.PdfRenderer" Version="1.6.0" />
 | 
			
		||||
    <PackageReference Include="NUnit" Version="4.3.2" />
 | 
			
		||||
    <PackageReference Include="NUnit3TestAdapter" Version="5.0.0" />
 | 
			
		||||
    <PackageReference Include="NUnit.Analyzers" Version="4.6.0">
 | 
			
		||||
      <PrivateAssets>all</PrivateAssets>
 | 
			
		||||
      <IncludeAssets>runtime; build; native; contentfiles; analyzers; buildtransitive</IncludeAssets>
 | 
			
		||||
    </PackageReference>
 | 
			
		||||
    <PackageReference Include="coverlet.collector" Version="6.0.2">
 | 
			
		||||
    <PackageReference Include="coverlet.collector" Version="6.0.4">
 | 
			
		||||
      <PrivateAssets>all</PrivateAssets>
 | 
			
		||||
      <IncludeAssets>runtime; build; native; contentfiles; analyzers; buildtransitive</IncludeAssets>
 | 
			
		||||
    </PackageReference>
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user