574 lines
35 KiB
Plaintext
574 lines
35 KiB
Plaintext
@page "/einkauf"
|
|
@using System.Globalization
|
|
@using TrafagSalesExporter.Models
|
|
@using TrafagSalesExporter.Services
|
|
@inject TrafagSalesExporter.Services.IUiTextService UiText
|
|
@inject IJSRuntime JsRuntime
|
|
@inject IPurchasingDashboardService PurchasingDashboardService
|
|
|
|
<PageTitle>@T("Einkauf", "Purchasing")</PageTitle>
|
|
|
|
<MudText Typo="Typo.h4" Class="mb-1">@T("Einkauf", "Purchasing")</MudText>
|
|
<MudText Typo="Typo.body2" Class="mb-4 purchasing-muted">
|
|
@T("SAP-Einkaufsdashboard nach Power-BI-Vorlage x.pbix, vorbereitet fuer Spend, offene Bestellungen, Kontrakte und Lieferantenperformance.",
|
|
"SAP purchasing dashboard based on the Power BI template x.pbix, prepared for spend, open orders, contracts and supplier performance.")
|
|
</MudText>
|
|
|
|
<MudAlert Severity="Severity.Info" Variant="Variant.Outlined" Class="mb-4">
|
|
@PurchasingStatusText
|
|
</MudAlert>
|
|
|
|
<MudGrid Class="mb-4" Spacing="2">
|
|
@foreach (var card in KpiCards)
|
|
{
|
|
<MudItem xs="12" sm="6" lg="3">
|
|
<MudPaper Class="purchasing-kpi pa-3" Outlined="true">
|
|
<MudStack Row="true" AlignItems="AlignItems.Center" Spacing="2">
|
|
<MudIcon Icon="@card.Icon" Color="@card.Color" Size="Size.Large" />
|
|
<div>
|
|
<MudText Typo="Typo.caption" Class="purchasing-muted">@T(card.TitleDe, card.TitleEn)</MudText>
|
|
<MudText Typo="Typo.h6">@card.Value</MudText>
|
|
<MudText Typo="Typo.caption">@T(card.DetailDe, card.DetailEn)</MudText>
|
|
</div>
|
|
</MudStack>
|
|
</MudPaper>
|
|
</MudItem>
|
|
}
|
|
</MudGrid>
|
|
|
|
<MudTabs Elevation="1" Rounded="false" PanelClass="pt-4">
|
|
<MudTabPanel Text="@T("Uebersicht", "Overview")" Icon="@Icons.Material.Filled.Dashboard">
|
|
<MudGrid Spacing="2">
|
|
<MudItem xs="12" lg="7">
|
|
<MudPaper Class="pa-3" Outlined="true">
|
|
<MudText Typo="Typo.h6" Class="mb-2">@T("Analyseachsen", "Analysis axes")</MudText>
|
|
<MudTable Items="@AnalysisAxes" Dense="true" Hover="true">
|
|
<HeaderContent>
|
|
<MudTh>@T("Achse", "Axis")</MudTh>
|
|
<MudTh>@T("PBIX-Feld", "PBIX field")</MudTh>
|
|
<MudTh>@T("Verwendung", "Usage")</MudTh>
|
|
</HeaderContent>
|
|
<RowTemplate>
|
|
<MudTd>@T(context.LabelDe, context.LabelEn)</MudTd>
|
|
<MudTd><code>@context.Field</code></MudTd>
|
|
<MudTd>@T(context.UsageDe, context.UsageEn)</MudTd>
|
|
</RowTemplate>
|
|
</MudTable>
|
|
</MudPaper>
|
|
</MudItem>
|
|
<MudItem xs="12" lg="5">
|
|
<MudPaper Class="pa-3" Outlined="true">
|
|
<MudText Typo="Typo.h6" Class="mb-2">@T("SAP-Quellen aus PBIX", "SAP sources from PBIX")</MudText>
|
|
@foreach (var source in SapSources)
|
|
{
|
|
<div class="purchasing-source-row">
|
|
<MudIcon Icon="@Icons.Material.Filled.TableChart" Size="Size.Small" />
|
|
<span><strong>@source.Name</strong> @source.Description</span>
|
|
</div>
|
|
}
|
|
</MudPaper>
|
|
</MudItem>
|
|
</MudGrid>
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("Spend", "Spend")" Icon="@Icons.Material.Filled.Payments">
|
|
<PurchasingSection TitleDe="Spend total vergangen"
|
|
TitleEn="Historic total spend"
|
|
DescriptionDe="Beschaffungsvolumen in CHF nach Jahr, Lieferant, Warengruppe und Artikel. Spend-Werte brauchen EKPO; bis SAP Positionen liefert, ist die Ansicht als Simulation markiert."
|
|
DescriptionEn="Purchasing volume in CHF by year, supplier, material group and article. Spend values need EKPO; until SAP provides item rows, this view is marked as simulation."
|
|
ChartTitleDe="Spend-Verlauf nach Einkaufsdimension"
|
|
ChartTitleEn="Spend trend by purchasing dimension"
|
|
Kpis="@SpendKpis"
|
|
ChartRows="@SpendChartRows"
|
|
StatusRows="@SpendStatusRows"
|
|
DetailRows="@SpendDetailRows" />
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("Offene Bestellungen", "Open orders")" Icon="@Icons.Material.Filled.PendingActions">
|
|
<PurchasingSection TitleDe="Offene Bestellwerte und Mengen"
|
|
TitleEn="Open order values and quantities"
|
|
DescriptionDe="Live-Bestellkoepfe aus EKKO sind angebunden. Offene Werte und Mengen brauchen zusaetzlich EKPO/EKET."
|
|
DescriptionEn="Live purchase-order headers from EKKO are connected. Open values and quantities additionally need EKPO/EKET."
|
|
ChartTitleDe="Bestellaktivitaet und offene Positionen"
|
|
ChartTitleEn="Order activity and open items"
|
|
Kpis="@OpenOrderKpis"
|
|
ChartRows="@OpenOrderChartRows"
|
|
StatusRows="@OpenOrderStatusRows"
|
|
DetailRows="@OpenOrderDetailRows" />
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("Kontrakte", "Contracts")" Icon="@Icons.Material.Filled.Assignment">
|
|
<PurchasingSection TitleDe="Offene Verpflichtungen"
|
|
TitleEn="Open commitments"
|
|
DescriptionDe="Kontrakte und Restverpflichtungen werden auf EKPO/EKET aufgebaut. Der Reiter zeigt bereits die Zielkennzahlen und den aktuellen Ladezustand."
|
|
DescriptionEn="Contracts and remaining commitments are built on EKPO/EKET. This tab already shows the target KPIs and current load status."
|
|
ChartTitleDe="Kontrakt- und Verpflichtungsuebersicht"
|
|
ChartTitleEn="Contract and commitment overview"
|
|
Kpis="@ContractKpis"
|
|
ChartRows="@ContractChartRows"
|
|
StatusRows="@ContractStatusRows"
|
|
DetailRows="@ContractDetailRows" />
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("Lieferanten", "Suppliers")" Icon="@Icons.Material.Filled.Verified">
|
|
<PurchasingSection TitleDe="Lieferantenbewertung und Performance"
|
|
TitleEn="Supplier rating and performance"
|
|
DescriptionDe="Lieferantenbasis kommt live aus EKKO. Bewertung, Termintreue und Preisentwicklung brauchen spaeter EKPO/EKET und Reklamationsdaten."
|
|
DescriptionEn="The supplier base comes live from EKKO. Rating, delivery reliability and price development later need EKPO/EKET and claim data."
|
|
ChartTitleDe="Lieferantenbasis und Performance-Indikatoren"
|
|
ChartTitleEn="Supplier base and performance indicators"
|
|
Kpis="@SupplierKpis"
|
|
ChartRows="@SupplierChartRows"
|
|
StatusRows="@SupplierStatusRows"
|
|
DetailRows="@SupplierDetailRows" />
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("PBIX Vorlage", "PBIX template")" Icon="@Icons.Material.Filled.InsertChart">
|
|
<MudPaper Class="pa-3" Outlined="true">
|
|
<MudText Typo="Typo.h6" Class="mb-2">@T("Aus x.pbix uebernommene Seiten", "Pages derived from x.pbix")</MudText>
|
|
<MudTable Items="@PowerBiPages" Dense="true" Hover="true">
|
|
<HeaderContent>
|
|
<MudTh>@T("Power-BI-Seite", "Power BI page")</MudTh>
|
|
<MudTh>@T("Visuals", "Visuals")</MudTh>
|
|
<MudTh>@T("Kennzahl", "Measure")</MudTh>
|
|
<MudTh>@T("Dimensionen", "Dimensions")</MudTh>
|
|
</HeaderContent>
|
|
<RowTemplate>
|
|
<MudTd>@context.Page</MudTd>
|
|
<MudTd>@context.Visuals</MudTd>
|
|
<MudTd><code>@context.Measure</code></MudTd>
|
|
<MudTd>@context.Dimensions</MudTd>
|
|
</RowTemplate>
|
|
</MudTable>
|
|
</MudPaper>
|
|
</MudTabPanel>
|
|
|
|
<MudTabPanel Text="@T("3D Simulation", "3D simulation")" Icon="@Icons.Material.Filled.ViewInAr">
|
|
<MudPaper Class="pa-3 mb-3" Outlined="true">
|
|
<MudGrid Spacing="2">
|
|
<MudItem xs="12" md="3">
|
|
<MudSelect T="string" Value="_purchasing3dIndicator" ValueChanged="SetPurchasing3dIndicator" Label="@T("Indikator", "Indicator")" Dense="true">
|
|
@foreach (var option in Purchasing3dIndicators)
|
|
{
|
|
<MudSelectItem Value="@option.Key">@T(option.TitleDe, option.TitleEn)</MudSelectItem>
|
|
}
|
|
</MudSelect>
|
|
</MudItem>
|
|
<MudItem xs="12" md="2">
|
|
<MudSelect T="string" Value="_purchasing3dChartType" ValueChanged="SetPurchasing3dChartType" Label="@T("Grafik", "Chart")" Dense="true">
|
|
<MudSelectItem Value="@("bar")">@T("Balken", "Bars")</MudSelectItem>
|
|
<MudSelectItem Value="@("line")">@T("Linie", "Line")</MudSelectItem>
|
|
<MudSelectItem Value="@("surface")">@T("Flaeche", "Surface")</MudSelectItem>
|
|
<MudSelectItem Value="@("pie")">@T("Kreis", "Pie")</MudSelectItem>
|
|
</MudSelect>
|
|
</MudItem>
|
|
<MudItem xs="12" md="3">
|
|
<MudText Typo="Typo.caption">@T("Preis-/Wechselkurs-Szenario", "Price/exchange-rate scenario")</MudText>
|
|
<div class="finance-3d-range-row">
|
|
<MudButton Variant="Variant.Outlined" Size="Size.Small" OnClick="@(() => SetPurchasing3dFactorPreset(0.9d))">-10%</MudButton>
|
|
<input class="finance-3d-range"
|
|
type="range"
|
|
min="0.5"
|
|
max="1.5"
|
|
step="0.01"
|
|
value="@_purchasing3dFactor.ToString("0.00", CultureInfo.InvariantCulture)"
|
|
@oninput="SetPurchasing3dFactor" />
|
|
<MudText Typo="Typo.body2" Class="finance-3d-factor">@_purchasing3dFactor.ToString("0.00", CultureInfo.InvariantCulture)x</MudText>
|
|
</div>
|
|
<MudText Typo="Typo.caption">
|
|
@T("Delta", "Delta"): @FormatScenarioDelta()
|
|
</MudText>
|
|
</MudItem>
|
|
<MudItem xs="12" md="2">
|
|
<MudText Typo="Typo.caption">@T("Beschriftung", "Labels")</MudText>
|
|
<div class="finance-3d-range-row">
|
|
<input class="finance-3d-range"
|
|
type="range"
|
|
min="0.8"
|
|
max="2.5"
|
|
step="0.1"
|
|
value="@_purchasing3dLabelScale.ToString("0.0", CultureInfo.InvariantCulture)"
|
|
@oninput="SetPurchasing3dLabelScale" />
|
|
<MudText Typo="Typo.body2" Class="finance-3d-factor">@_purchasing3dLabelScale.ToString("0.0", CultureInfo.InvariantCulture)x</MudText>
|
|
</div>
|
|
</MudItem>
|
|
<MudItem xs="12" md="2">
|
|
<MudButton Variant="Variant.Outlined" Color="Color.Info" StartIcon="@Icons.Material.Filled.Refresh" OnClick="RenderPurchasing3dAsync">
|
|
@T("Neu zeichnen", "Redraw")
|
|
</MudButton>
|
|
</MudItem>
|
|
</MudGrid>
|
|
</MudPaper>
|
|
<MudPaper Class="pa-0 finance-3d-surface purchasing-3d-surface" Elevation="1">
|
|
<canvas @ref="_purchasing3dCanvas" class="finance-3d-canvas" style="display:block;width:100%;height:100%;touch-action:none;"></canvas>
|
|
</MudPaper>
|
|
</MudTabPanel>
|
|
</MudTabs>
|
|
|
|
@code {
|
|
private ElementReference _purchasing3dCanvas;
|
|
private PurchasingDashboardLiveState _liveState = new();
|
|
private bool _liveLoading = true;
|
|
private string _purchasing3dIndicator = "spend";
|
|
private string _purchasing3dChartType = "bar";
|
|
private double _purchasing3dFactor = 1d;
|
|
private double _purchasing3dLabelScale = 1.5d;
|
|
|
|
private IReadOnlyList<PurchasingKpiCard> KpiCards =>
|
|
[
|
|
new("Spend total", "Total spend", _liveState.EkpoLoaded ? "EKPO live" : T("wartet auf EKPO", "waiting for EKPO"), _liveState.EkpoLoaded ? "Positionsdaten verfuegbar" : "EKKO live, Positionswerte fehlen noch", _liveState.EkpoLoaded ? "Position data available" : "EKKO live, position values still missing", Icons.Material.Filled.Payments, Color.Primary),
|
|
new("Offene Bestellungen", "Open orders", _liveState.EkkoLoaded ? _liveState.PurchaseOrderCount.ToString("N0") : "-", _liveState.EkkoLoaded ? "EKKO-Belege seit Jahresbeginn" : "Noch nicht geladen", _liveState.EkkoLoaded ? "EKKO orders since start of year" : "Not loaded yet", Icons.Material.Filled.PendingActions, Color.Warning),
|
|
new("Kontrakte", "Contracts", _liveState.EketLoaded ? _liveState.ScheduleSampleCount.ToString("N0") : T("wartet auf EKET", "waiting for EKET"), _liveState.EketLoaded ? "Termin-/Einteilungsprobe verfuegbar" : "EKKO live, Terminwerte fehlen noch", _liveState.EketLoaded ? "Schedule sample available" : "EKKO live, schedule values still missing", Icons.Material.Filled.Assignment, Color.Info),
|
|
new("Lieferantenperformance", "Supplier performance", _liveState.EkkoLoaded ? _liveState.SupplierCount.ToString("N0") : "-", _liveState.EkkoLoaded ? "Lieferanten in EKKO-Liveprobe" : "Noch nicht geladen", _liveState.EkkoLoaded ? "Suppliers in EKKO live sample" : "Not loaded yet", Icons.Material.Filled.Verified, Color.Success)
|
|
];
|
|
|
|
private readonly List<PurchasingAxis> AnalysisAxes =
|
|
[
|
|
new("Jahr", "Year", "EKKOSet.Bedat", "Zeitfilter und Verlauf", "Time filter and trend"),
|
|
new("Lieferant", "Supplier", "Data.Name / Data.Lieferant", "Spend und Performance pro Lieferant", "Spend and performance by supplier"),
|
|
new("Warengruppe", "Material group", "Data (2).Warengruppe / WG komplett", "Spend nach Warengruppe", "Spend by material group"),
|
|
new("Artikel", "Article", "EKPOSet.Matnr / EKPOSet.Txz01", "Artikel- und Preisentwicklung", "Article and price development"),
|
|
new("Region", "Region", "Data.Laender-/Regionenschluessel", "Regionale Spend-Verteilung", "Regional spend distribution")
|
|
];
|
|
|
|
private readonly List<PurchasingSource> SapSources =
|
|
[
|
|
new("EKKOSet", "Bestellkopf: Datum, Lieferant, Einkaufsbeleg."),
|
|
new("EKPOSet", "Bestellposition: Artikel, Text, Netwr CHF, Preis pro Stueck."),
|
|
new("eketSet", "Einteilungen/Termine: Basis fuer offene Mengen und Liefertermine."),
|
|
new("Data", "Lieferanten-Mapping und Lieferantennamen."),
|
|
new("Data (2)", "Warengruppen-Mapping und Warengruppentexte.")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionKpi> SpendKpis =>
|
|
[
|
|
new("Spend CHF", "Spend CHF", _liveState.EkpoLoaded ? "EKPO live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.Spend)), _liveState.EkpoLoaded ? "aus SAP Positionen" : "Simulation bis EKPO liefert", _liveState.EkpoLoaded ? "from SAP item rows" : "simulation until EKPO delivers"),
|
|
new("Jahre", "Years", "2024-2026", "aus PBIX-Struktur", "from PBIX structure"),
|
|
new("Dimensionen", "Dimensions", "4", "Jahr, Lieferant, Warengruppe, Artikel", "year, supplier, material group, article"),
|
|
new("SAP Status", "SAP status", _liveState.EkpoLoaded ? "live" : "wartet", "EKPOSet fuer Spend notwendig", "EKPOSet required for spend")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionKpi> OpenOrderKpis =>
|
|
[
|
|
new("Bestellungen", "Orders", _liveState.EkkoLoaded ? _liveState.PurchaseOrderCount.ToString("N0") : "-", "EKKO live seit Jahresbeginn", "EKKO live since start of year"),
|
|
new("Lieferanten", "Suppliers", _liveState.EkkoLoaded ? _liveState.SupplierCount.ToString("N0") : "-", "aus EKKO-Liveprobe", "from EKKO live sample"),
|
|
new("Offener Wert", "Open value", _liveState.EkpoLoaded ? "EKPO live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.OpenValue)), _liveState.EkpoLoaded ? "aus SAP Positionen" : "Simulation bis EKPO liefert", _liveState.EkpoLoaded ? "from SAP item rows" : "simulation until EKPO delivers"),
|
|
new("Offene Menge", "Open quantity", _liveState.EkpoLoaded ? "EKPO live" : Purchasing3dBaseRows.Sum(x => x.OpenQuantity).ToString("N0"), _liveState.EkpoLoaded ? "aus SAP Positionen" : "Simulation bis EKPO liefert", _liveState.EkpoLoaded ? "from SAP item rows" : "simulation until EKPO delivers")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionKpi> ContractKpis =>
|
|
[
|
|
new("Restwert", "Remaining value", _liveState.EketLoaded ? "EKET live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.ContractValue)), _liveState.EketLoaded ? "aus SAP Einteilungen" : "Simulation bis EKET liefert", _liveState.EketLoaded ? "from SAP schedules" : "simulation until EKET delivers"),
|
|
new("Einteilungen", "Schedules", _liveState.EketLoaded ? _liveState.ScheduleSampleCount.ToString("N0") : "-", "EKET-Probe", "EKET sample"),
|
|
new("Abrufquote", "Consumption", "offen", "braucht Kontrakt- und Abrufdaten", "needs contract and call-off data"),
|
|
new("Faelligkeit", "Due date", _liveState.LatestOrderDate?.ToString("yyyy-MM-dd") ?? "-", "letztes bekanntes EKKO-Datum", "latest known EKKO date")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionKpi> SupplierKpis =>
|
|
[
|
|
new("Aktive Lieferanten", "Active suppliers", _liveState.EkkoLoaded ? _liveState.SupplierCount.ToString("N0") : "-", "EKKO live seit Jahresbeginn", "EKKO live since start of year"),
|
|
new("Performance Score", "Performance score", $"{Purchasing3dBaseRows.Average(x => x.SupplierScore):N1}%", "Simulation bis Bewertungsdaten kommen", "simulation until rating data arrives"),
|
|
new("Preisindikator", "Price indicator", _liveState.EkpoLoaded ? "EKPO live" : "wartet", "Netwr CHF/Stk braucht EKPO", "Netwr CHF/unit needs EKPO"),
|
|
new("Qualitaet", "Quality", "offen", "Reklamationsquelle noch nicht angebunden", "claim source not connected yet")
|
|
];
|
|
|
|
private readonly List<PowerBiPageInfo> PowerBiPages =
|
|
[
|
|
new("Besch.Volumen CHF/Lieferant", "Pivot, Slicer", "Sum(EKPOSet.Netwr CHF)", "Jahr, Lieferant, Warengruppe, Artikel"),
|
|
new("Eink.Vol. CHF / Lieferant Kuchen", "Pie, Slicer", "Sum(EKPOSet.Netwr CHF)", "Lieferant, Warengruppe, Jahr"),
|
|
new("Balken Vol./Lief/WG", "Column, Slicer", "Sum(EKPOSet.Netwr CHF)", "Lieferant, Warengruppe, Artikel"),
|
|
new("Diagramm Vol./WG", "Column, Slicer", "Sum(EKPOSet.Netwr CHF)", "Warengruppe, Jahr"),
|
|
new("Eink.Vol. CHF / Region", "Pie, Slicer", "Sum(EKPOSet.Netwr CHF)", "Region, Warengruppe, Jahr"),
|
|
new("Preisentwicklung CHF", "Pivot, Slicer", "Min(EKPOSet.Netwr CHF/Stk)", "Lieferant, Artikel, Jahr"),
|
|
new("Matrix Vol./WG", "Pivot, Slicer", "Sum(EKPOSet.Netwr CHF)", "Warengruppe, Lieferant, Artikel")
|
|
];
|
|
|
|
private readonly List<Purchasing3dIndicator> Purchasing3dIndicators =
|
|
[
|
|
new("spend", "Spend CHF", "Spend CHF", "CHF"),
|
|
new("openValue", "Offener Bestellwert", "Open order value", "CHF"),
|
|
new("openQuantity", "Offene Menge", "Open quantity", "Qty"),
|
|
new("contractValue", "Kontrakt-Restwert", "Contract remaining value", "CHF"),
|
|
new("supplierScore", "Lieferantenperformance", "Supplier performance", "%")
|
|
];
|
|
|
|
private readonly List<Purchasing3dBaseRow> Purchasing3dBaseRows =
|
|
[
|
|
new("Lieferant A", 2024, 1450000d, 260000d, 11800d, 420000d, 91d),
|
|
new("Lieferant A", 2025, 1680000d, 310000d, 13200d, 460000d, 93d),
|
|
new("Lieferant A", 2026, 1820000d, 335000d, 14100d, 490000d, 92d),
|
|
new("Lieferant B", 2024, 980000d, 190000d, 9300d, 260000d, 86d),
|
|
new("Lieferant B", 2025, 1120000d, 225000d, 10100d, 315000d, 88d),
|
|
new("Lieferant B", 2026, 1240000d, 250000d, 10800d, 350000d, 89d),
|
|
new("Warengruppe Sensorik", 2024, 760000d, 120000d, 6400d, 210000d, 94d),
|
|
new("Warengruppe Sensorik", 2025, 890000d, 145000d, 7100d, 230000d, 95d),
|
|
new("Warengruppe Sensorik", 2026, 940000d, 155000d, 7400d, 245000d, 94d),
|
|
new("Artikel Top 10", 2024, 520000d, 83000d, 2800d, 160000d, 90d),
|
|
new("Artikel Top 10", 2025, 610000d, 97000d, 3100d, 180000d, 91d),
|
|
new("Artikel Top 10", 2026, 680000d, 105000d, 3350d, 195000d, 92d)
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> SpendChartRows
|
|
=> BuildPurchasingChartRows(x => x.Spend, FormatChf);
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> OpenOrderChartRows
|
|
=> _liveState.EkkoLoaded
|
|
? BuildOpenOrderLiveChartRows()
|
|
: BuildPurchasingChartRows(x => x.OpenValue, FormatChf);
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> ContractChartRows
|
|
=> BuildPurchasingChartRows(x => x.ContractValue, FormatChf);
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> SupplierChartRows
|
|
=> BuildPurchasingChartRows(x => x.SupplierScore, value => $"{value:N1}%");
|
|
|
|
private IReadOnlyList<PurchasingSectionStatusRow> SpendStatusRows =>
|
|
[
|
|
BuildStatus("EKKO Bestellkoepfe", "EKKO purchase headers", _liveState.EkkoLoaded, _liveState.EkkoLoaded ? $"{_liveState.PurchaseOrderCount:N0}" : "-"),
|
|
BuildStatus("EKPO Positionen", "EKPO item rows", _liveState.EkpoLoaded, _liveState.EkpoLoaded ? $"{_liveState.PositionSampleCount:N0}" : "0"),
|
|
BuildStatus("Spend CHF", "Spend CHF", _liveState.EkpoLoaded, _liveState.EkpoLoaded ? "live" : "Simulation")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionStatusRow> OpenOrderStatusRows =>
|
|
[
|
|
BuildStatus("Bestellkoepfe", "Purchase headers", _liveState.EkkoLoaded, _liveState.EkkoLoaded ? "live" : "-"),
|
|
BuildStatus("Offene Werte", "Open values", _liveState.EkpoLoaded, _liveState.EkpoLoaded ? "live" : "wartet auf EKPO"),
|
|
BuildStatus("Faelligkeiten", "Due dates", _liveState.EketLoaded, _liveState.EketLoaded ? "live" : "wartet auf EKET")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionStatusRow> ContractStatusRows =>
|
|
[
|
|
BuildStatus("Kontraktkopf/-position", "Contract header/item", _liveState.EkpoLoaded, _liveState.EkpoLoaded ? "live" : "wartet auf EKPO"),
|
|
BuildStatus("Einteilungen", "Schedules", _liveState.EketLoaded, _liveState.EketLoaded ? $"{_liveState.ScheduleSampleCount:N0}" : "0"),
|
|
BuildStatus("Restverpflichtung", "Remaining commitment", _liveState.EkpoLoaded && _liveState.EketLoaded, _liveState.EkpoLoaded && _liveState.EketLoaded ? "live" : "Simulation")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionStatusRow> SupplierStatusRows =>
|
|
[
|
|
BuildStatus("Lieferantenbasis", "Supplier base", _liveState.EkkoLoaded, _liveState.EkkoLoaded ? $"{_liveState.SupplierCount:N0}" : "-"),
|
|
BuildStatus("Preisentwicklung", "Price trend", _liveState.EkpoLoaded, _liveState.EkpoLoaded ? "live" : "wartet auf EKPO"),
|
|
BuildStatus("Termintreue", "Delivery reliability", _liveState.EketLoaded, _liveState.EketLoaded ? "live" : "wartet auf EKET")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionDetailRow> SpendDetailRows =>
|
|
[
|
|
new("Spend nach Jahr", "Spend by year", _liveState.EkpoLoaded ? "SAP live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.Spend)), "EKKOSet.Bedat Jahr", _liveState.EkpoLoaded ? "SAP live" : "Simulation"),
|
|
new("Spend nach Lieferant", "Spend by supplier", TopSpendLabel, "Data.Name / EKKOSet.Lifnr", _liveState.EkpoLoaded ? "SAP live" : "Simulation"),
|
|
new("Spend nach Warengruppe", "Spend by material group", TopMaterialGroupLabel, "Data (2).Warengruppe", _liveState.EkpoLoaded ? "SAP live" : "Simulation"),
|
|
new("Spend nach Artikel", "Spend by article", TopArticleLabel, "EKPOSet.Matnr / Txz01", _liveState.EkpoLoaded ? "SAP live" : "Wartet auf SAP")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionDetailRow> OpenOrderDetailRows =>
|
|
[
|
|
new("Bestellungen seit Jahresbeginn", "Orders since start of year", _liveState.EkkoLoaded ? _liveState.PurchaseOrderCount.ToString("N0") : "-", "EKKOSet.Bedat", _liveState.EkkoLoaded ? "SAP live" : "Wartet auf SAP"),
|
|
new("Lieferanten mit Bestellung", "Suppliers with order", _liveState.EkkoLoaded ? _liveState.SupplierCount.ToString("N0") : "-", "EKKOSet.Lifnr", _liveState.EkkoLoaded ? "SAP live" : "Wartet auf SAP"),
|
|
new("Offener Bestellwert", "Open order value", _liveState.EkpoLoaded ? "SAP live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.OpenValue)), "EKPOSet.Netwr CHF", _liveState.EkpoLoaded ? "SAP live" : "Simulation"),
|
|
new("Faelligkeiten", "Due dates", _liveState.EketLoaded ? "SAP live" : "wartet auf EKET", "eketSet.Eindt", _liveState.EketLoaded ? "SAP live" : "Wartet auf SAP")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionDetailRow> ContractDetailRows =>
|
|
[
|
|
new("Restverpflichtung", "Remaining commitment", _liveState.EketLoaded ? "SAP live" : FormatChf(Purchasing3dBaseRows.Sum(x => x.ContractValue)), "EKPO/EKET", _liveState.EketLoaded ? "SAP live" : "Simulation"),
|
|
new("Mengenkontrakte", "Quantity contracts", _liveState.EkpoLoaded ? "SAP live" : "wartet auf EKPO", "EKPOSet.Menge", _liveState.EkpoLoaded ? "SAP live" : "Wartet auf SAP"),
|
|
new("Abrufquote", "Consumption rate", "offen", "Kontraktmenge / Abrufmenge", "Wartet auf SAP"),
|
|
new("Faellige Verpflichtungen", "Due commitments", _liveState.EketLoaded ? "SAP live" : "wartet auf EKET", "eketSet", _liveState.EketLoaded ? "SAP live" : "Wartet auf SAP")
|
|
];
|
|
|
|
private IReadOnlyList<PurchasingSectionDetailRow> SupplierDetailRows =>
|
|
[
|
|
new("Aktive Lieferanten", "Active suppliers", _liveState.EkkoLoaded ? _liveState.SupplierCount.ToString("N0") : "-", "EKKOSet.Lifnr", _liveState.EkkoLoaded ? "SAP live" : "Wartet auf SAP"),
|
|
new("Top Spend Lieferant", "Top spend supplier", TopSpendLabel, "Lieferant / Spend CHF", _liveState.EkpoLoaded ? "SAP live" : "Simulation"),
|
|
new("Preisentwicklung", "Price trend", _liveState.EkpoLoaded ? "SAP live" : "wartet auf EKPO", "Netwr CHF/Stk", _liveState.EkpoLoaded ? "SAP live" : "Wartet auf SAP"),
|
|
new("Liefertermintreue", "Delivery reliability", _liveState.EketLoaded ? "SAP live" : "wartet auf EKET", "Termin / Rueckstand", _liveState.EketLoaded ? "SAP live" : "Wartet auf SAP")
|
|
];
|
|
|
|
protected override async Task OnInitializedAsync()
|
|
{
|
|
_liveState = await PurchasingDashboardService.LoadAsync();
|
|
_liveLoading = false;
|
|
}
|
|
|
|
protected override async Task OnAfterRenderAsync(bool firstRender)
|
|
{
|
|
if (firstRender)
|
|
await RenderPurchasing3dAsync();
|
|
}
|
|
|
|
private string T(string german, string english) => UiText.Text(german, english);
|
|
private static string FormatChf(double value) => $"CHF {value:N0}";
|
|
private string TopSpendLabel => BuildTopLabel(x => x.Spend, FormatChf);
|
|
private string TopMaterialGroupLabel => BuildTopLabel(x => x.Spend, FormatChf, "Warengruppe");
|
|
private string TopArticleLabel => BuildTopLabel(x => x.Spend, FormatChf, "Artikel");
|
|
private string PurchasingStatusText
|
|
=> _liveLoading
|
|
? T("SAP-Einkaufsdaten werden geladen...", "Loading SAP purchasing data...")
|
|
: $"{_liveState.Message} {FormatLatestOrderDate()}";
|
|
|
|
private string FormatLatestOrderDate()
|
|
=> _liveState.LatestOrderDate.HasValue
|
|
? $"{T("Letztes EKKO-Datum", "Latest EKKO date")}: {_liveState.LatestOrderDate.Value:yyyy-MM-dd}."
|
|
: string.Empty;
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> BuildPurchasingChartRows(Func<Purchasing3dBaseRow, double> selector, Func<double, string> formatter)
|
|
{
|
|
var rows = Purchasing3dBaseRows
|
|
.Where(row => row.Year == 2026)
|
|
.Select((row, index) => new { row.Axis, Value = selector(row), Color = PurchasingPalette[index % PurchasingPalette.Length] })
|
|
.OrderByDescending(row => row.Value)
|
|
.Take(6)
|
|
.ToList();
|
|
var max = rows.Count == 0 ? 0d : rows.Max(row => row.Value);
|
|
return rows
|
|
.Select(row => new PurchasingSectionChartRow(row.Axis, formatter(row.Value), max <= 0 ? 0 : row.Value / max * 100d, row.Color))
|
|
.ToList();
|
|
}
|
|
|
|
private IReadOnlyList<PurchasingSectionChartRow> BuildOpenOrderLiveChartRows()
|
|
{
|
|
var simulatedRows = BuildPurchasingChartRows(x => x.OpenValue, FormatChf).ToList();
|
|
simulatedRows.Insert(0, new PurchasingSectionChartRow(T("EKKO Bestellungen live", "EKKO orders live"), _liveState.PurchaseOrderCount.ToString("N0"), 100d, "#2e7d32"));
|
|
simulatedRows.Insert(1, new PurchasingSectionChartRow(T("Lieferanten live", "Suppliers live"), _liveState.SupplierCount.ToString("N0"), _liveState.PurchaseOrderCount <= 0 ? 0 : Math.Min(100d, _liveState.SupplierCount / (double)_liveState.PurchaseOrderCount * 100d), "#1565c0"));
|
|
return simulatedRows.Take(6).ToList();
|
|
}
|
|
|
|
private PurchasingSectionStatusRow BuildStatus(string labelDe, string labelEn, bool ok, string value)
|
|
=> new(labelDe, labelEn, value, ok ? Icons.Material.Filled.CheckCircle : Icons.Material.Filled.Pending, ok ? Color.Success : Color.Warning);
|
|
|
|
private string BuildTopLabel(Func<Purchasing3dBaseRow, double> selector, Func<double, string> formatter, string? requiredPrefix = null)
|
|
{
|
|
var query = Purchasing3dBaseRows.Where(row => row.Year == 2026);
|
|
if (!string.IsNullOrWhiteSpace(requiredPrefix))
|
|
query = query.Where(row => row.Axis.StartsWith(requiredPrefix, StringComparison.OrdinalIgnoreCase));
|
|
|
|
var row = query.OrderByDescending(selector).FirstOrDefault();
|
|
return row is null ? "-" : $"{row.Axis}: {formatter(selector(row))}";
|
|
}
|
|
|
|
private static readonly string[] PurchasingPalette = ["#1565c0", "#2e7d32", "#ef6c00", "#6a1b9a", "#00838f", "#ad1457"];
|
|
|
|
private async Task SetPurchasing3dIndicator(string value)
|
|
{
|
|
_purchasing3dIndicator = value;
|
|
await RenderPurchasing3dAsync();
|
|
}
|
|
|
|
private async Task SetPurchasing3dChartType(string value)
|
|
{
|
|
_purchasing3dChartType = value;
|
|
await RenderPurchasing3dAsync();
|
|
}
|
|
|
|
private async Task SetPurchasing3dFactor(ChangeEventArgs args)
|
|
{
|
|
if (double.TryParse(Convert.ToString(args.Value, CultureInfo.InvariantCulture), NumberStyles.Number, CultureInfo.InvariantCulture, out var value))
|
|
{
|
|
_purchasing3dFactor = Math.Clamp(value, 0.5d, 1.5d);
|
|
await JsRuntime.InvokeVoidAsync("trafagFinance3d.updateFactor", _purchasing3dCanvas, ScenarioAffectsPurchasingValue ? _purchasing3dFactor : 1d);
|
|
}
|
|
}
|
|
|
|
private async Task SetPurchasing3dFactorPreset(double value)
|
|
{
|
|
_purchasing3dFactor = Math.Clamp(value, 0.5d, 1.5d);
|
|
await JsRuntime.InvokeVoidAsync("trafagFinance3d.updateFactor", _purchasing3dCanvas, ScenarioAffectsPurchasingValue ? _purchasing3dFactor : 1d);
|
|
}
|
|
|
|
private async Task SetPurchasing3dLabelScale(ChangeEventArgs args)
|
|
{
|
|
if (double.TryParse(Convert.ToString(args.Value, CultureInfo.InvariantCulture), NumberStyles.Number, CultureInfo.InvariantCulture, out var value))
|
|
{
|
|
_purchasing3dLabelScale = Math.Clamp(value, 0.8d, 2.5d);
|
|
await RenderPurchasing3dAsync();
|
|
}
|
|
}
|
|
|
|
private async Task RenderPurchasing3dAsync()
|
|
{
|
|
await JsRuntime.InvokeVoidAsync("trafagFinance3d.render", _purchasing3dCanvas, BuildPurchasing3dRows(), new
|
|
{
|
|
indicator = _purchasing3dIndicator,
|
|
title = ResolvePurchasing3dIndicatorLabel(),
|
|
chartType = _purchasing3dChartType,
|
|
xAxis = T("X: Lieferant / Warengruppe / Artikel", "X: supplier / material group / article"),
|
|
yAxis = T("Y: Wert / Menge / Score", "Y: value / quantity / score"),
|
|
zAxis = T("Z: Jahr / Zeit", "Z: year / time"),
|
|
pieAxis = T("Kreis: Anteil am aktuellen Indikator", "Pie: share of current indicator"),
|
|
labelScale = _purchasing3dLabelScale,
|
|
scenarioFactor = ScenarioAffectsPurchasingValue ? _purchasing3dFactor : 1d
|
|
});
|
|
}
|
|
|
|
private IReadOnlyList<object> BuildPurchasing3dRows()
|
|
=> Purchasing3dBaseRows
|
|
.Select(row => new
|
|
{
|
|
country = row.Axis,
|
|
year = row.Year,
|
|
value = ResolvePurchasing3dValue(row)
|
|
})
|
|
.Cast<object>()
|
|
.ToList();
|
|
|
|
private double ResolvePurchasing3dValue(Purchasing3dBaseRow row) => _purchasing3dIndicator switch
|
|
{
|
|
"openValue" => row.OpenValue,
|
|
"openQuantity" => row.OpenQuantity,
|
|
"contractValue" => row.ContractValue,
|
|
"supplierScore" => row.SupplierScore,
|
|
_ => row.Spend
|
|
};
|
|
|
|
private bool ScenarioAffectsPurchasingValue => _purchasing3dIndicator is "spend" or "openValue" or "contractValue";
|
|
|
|
private string ResolvePurchasing3dIndicatorLabel()
|
|
=> T(
|
|
Purchasing3dIndicators.FirstOrDefault(x => x.Key == _purchasing3dIndicator)?.TitleDe ?? "Spend CHF",
|
|
Purchasing3dIndicators.FirstOrDefault(x => x.Key == _purchasing3dIndicator)?.TitleEn ?? "Spend CHF");
|
|
|
|
private string FormatScenarioDelta()
|
|
{
|
|
if (!ScenarioAffectsPurchasingValue)
|
|
return T("nicht auf diesen Indikator angewendet", "not applied to this indicator");
|
|
|
|
var baseTotal = Purchasing3dBaseRows.Sum(ResolvePurchasing3dValue);
|
|
var delta = baseTotal * _purchasing3dFactor - baseTotal;
|
|
return $"{delta:N0} {Purchasing3dIndicators.First(x => x.Key == _purchasing3dIndicator).Unit}";
|
|
}
|
|
|
|
private sealed record PurchasingKpiCard(string TitleDe, string TitleEn, string Value, string DetailDe, string DetailEn, string Icon, Color Color);
|
|
private sealed record PurchasingAxis(string LabelDe, string LabelEn, string Field, string UsageDe, string UsageEn);
|
|
private sealed record PurchasingSource(string Name, string Description);
|
|
private sealed record PowerBiPageInfo(string Page, string Visuals, string Measure, string Dimensions);
|
|
private sealed record Purchasing3dIndicator(string Key, string TitleDe, string TitleEn, string Unit);
|
|
private sealed record Purchasing3dBaseRow(string Axis, int Year, double Spend, double OpenValue, double OpenQuantity, double ContractValue, double SupplierScore);
|
|
}
|
|
|
|
<style>
|
|
.purchasing-muted {
|
|
color: var(--mud-palette-text-secondary);
|
|
}
|
|
|
|
.purchasing-kpi {
|
|
min-height: 104px;
|
|
}
|
|
|
|
.purchasing-source-row {
|
|
display: grid;
|
|
grid-template-columns: 26px minmax(0, 1fr);
|
|
align-items: center;
|
|
gap: 8px;
|
|
padding: 7px 0;
|
|
border-bottom: 1px solid var(--mud-palette-lines-default);
|
|
}
|
|
|
|
.purchasing-source-row:last-child {
|
|
border-bottom: 0;
|
|
}
|
|
|
|
.purchasing-3d-surface {
|
|
height: calc(100vh - 300px);
|
|
min-height: 620px;
|
|
overflow: hidden;
|
|
}
|
|
</style>
|