Gelöst Stichtagsbezogene Lagerbewertung [WAWI-37044, WAWI-37043, WAWI-33817, WAWI-32600, WAWI-8316]

[overfl0w23]

Hier ein Beispiel:

SQL-Server: IPADRESSE,PORT\INSTANZ
Datenbank: eazybusiness
SQL Benutzername: (Hier reicht ein Nutzer mit Lesezugriff)
Passwort: Passwort vom Benutzer darüber.


LG

 

[overfl0w23]

Moin Zusammen, ich habe ein wenig Zeit gehabt und eine komplett neue Version gebaut. Wie immer dennoch Beta und ich übernehme keine Gewähr für irgendwas.
Über Feedback oder eine kleine Spende würde ich mich freuen.




Download nach wie vor unter: https://schadeit.de/stockscope/

LG

 

[Kissenoutlet24.de]

Moin Zusammen, ich habe ein wenig Zeit gehabt und eine komplett neue Version gebaut. Wie immer dennoch Beta und ich übernehme keine Gewähr für irgendwas.
Über Feedback oder eine kleine Spende würde ich mich freuen.


Den Anhang 117352 betrachten

Download nach wie vor unter: https://schadeit.de/stockscope/

LG

Hallo,
wir haben gerade mal das Tool getestet,
es scheint ein Bestandsproblem zu geben.
Bei manchen Artikeln, kommt es uns vor als würde das Tool 1 und 7 verwechseln.
Also aktueller Bestand 11 in der WaWi und im Tool Bestand 77, ein weiterer Artikel Bestand 100 in der WaWi im Tool 700.

 

[Kissenoutlet24.de]

Ich habe jetzt nochmal etwas an der ersten Abfrage geändert und dies als v0.3b hochgeladen.
Die SQL Abfrage sieht nun so aus:

Spoiler: SQL Abfrage für die erste Methode

-- Deklarieren der Parameter für den Stichtag und das Lager
DECLARE @Stichtag AS DATE = @date;
DECLARE @warenlager INT = @warehouse;

-- Hauptabfrage zur Berechnung der Lagerbewertung
SELECT
tArtikel.cArtNr AS Artikelnummer,
MAX(tArtikelBeschreibung.cName) AS Artikelname,
tWarenLager.cName AS Lager,

-- Berechnung des Bestands zum Stichtag
SUM(
ISNULL(tWarenLagerEingang.fAnzahl, 0.0) -- Summe der Wareneingänge bis zum Stichtag
- ISNULL(Warenausgang.fAnzahl, 0.0) -- Abzüglich der Warenausgänge bis zum Stichtag
) AS Bestand,

-- Berechnung des Gesamt-EK-Werts zum Stichtag
SUM(
(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) -- Summe der Wareneingänge
- ISNULL(Warenausgang.fAnzahl, 0.0)) -- Abzüglich der Warenausgänge
* ISNULL(tWarenLagerEingang.fEKEinzel, 0.0) -- Multipliziert mit dem Einzel-EK-Preis
) AS EKGesamt,

-- Ermittlung des letzten Lieferdatums
MAX(tWarenLagerEingang.dGeliefertAm) AS LetztesLieferdatum,

-- Bestimmung der Abwertungsstufe basierend auf dem letzten Lieferdatum
CASE
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag) THEN 'dieses Jahr 100%'
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag) - 1 THEN 'Letztes Jahr 90%'
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag) - 2 THEN 'Vorletztes Jahr 80%'
ELSE 'älter als vor 2 Jahren 50%'
END AS Abwertung,

-- Berechnung des wertberichtigten EK-Werts basierend auf der Abwertung
COALESCE(
CASE
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag)
THEN SUM((ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
- ISNULL(Warenausgang.fAnzahl, 0.0))
* ISNULL(tWarenLagerEingang.fEKEinzel, 0.0))
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag) - 1
THEN SUM((ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
- ISNULL(Warenausgang.fAnzahl, 0.0))
* ISNULL(tWarenLagerEingang.fEKEinzel, 0.0) * 0.9)
WHEN YEAR(MAX(tWarenLagerEingang.dGeliefertAm)) = YEAR(@Stichtag) - 2
THEN SUM((ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
- ISNULL(Warenausgang.fAnzahl, 0.0))
* ISNULL(tWarenLagerEingang.fEKEinzel, 0.0) * 0.8)
ELSE SUM((ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
- ISNULL(Warenausgang.fAnzahl, 0.0))
* ISNULL(tWarenLagerEingang.fEKEinzel, 0.0) * 0.5)
END
, 0.0) AS Wertberichtigt
FROM dbo.tWarenLagerPlatz
LEFT JOIN dbo.tWarenLagerEingang
ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
AND tWarenLagerEingang.dErstellt <= @Stichtag -- Nur Wareneingänge bis zum Stichtag
JOIN dbo.tWarenLager
ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
LEFT JOIN dbo.tArtikel
ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel
LEFT JOIN dbo.tSpracheUsed
ON dbo.tSpracheUsed.nStandard = 1
LEFT JOIN dbo.tArtikelBeschreibung
ON tArtikel.kArtikel = tArtikelBeschreibung.kArtikel
AND dbo.tSpracheUsed.kSprache = tArtikelBeschreibung.kSprache

-- Subquery zur Berechnung der Warenausgänge bis zum Stichtag
LEFT JOIN
(
SELECT
SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
tWarenLagerAusgang.kWarenLagerEingang
FROM dbo.tWarenLagerAusgang
WHERE tWarenLagerAusgang.dErstellt <= @Stichtag -- Nur Warenausgänge bis zum Stichtag
GROUP BY tWarenLagerAusgang.kWarenLagerEingang
) AS Warenausgang
ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang

-- Filtern nach dem ausgewählten Lager
WHERE tWarenLager.kWarenLager = @warenlager

-- Gruppieren nach Lagername und Artikelnummer
GROUP BY tWarenLager.cName, tArtikel.cArtNr

-- Sortieren nach Artikelnummer
ORDER BY tArtikel.cArtNr;

Ich hab das ganze mal ordentlich kommentiert und hoffe, dass ich keinen Denkfehler drin habe.
Würde mich über Feedback freuen.

Hi,
danke für deine Abfrage, leider kommt beim Export folgender Fehler.

 

[overfl0w23]

Schaue ich mir schnellstmöglich an. Danke fürs Feedback. Nochmal kurz zum Verständnis:

- Der Fehler kommt beim v0.3b?
- Bestandsproblem bsp: 11 wird zu 77 bei Version 0.4b?

Ich würde mich nur um die neue Version kümmern. Ich hatte keine Fehler bei mir und versuche es nachzustellen bzw den Fehler zu finden.

lg

 

[Kissenoutlet24.de]

Schaue ich mir schnellstmöglich an. Danke fürs Feedback. Nochmal kurz zum Verständnis:

- Der Fehler kommt beim v0.3b?
- Bestandsproblem bsp: 11 wird zu 77 bei Version 0.4b?

Ich würde mich nur um die neue Version kümmern. Ich hatte keine Fehler bei mir und versuche es nachzustellen bzw den Fehler zu finden.

lg

Haben die Version 0.4b getestet.

 

[overfl0w23]

- Fehler behoben, bei dem Bestände in manchen Fällen zu hoch waren (z. B. 77 statt 11).
- Ursache: Mehrfache JOINs auf tArtikelBeschreibung führten zu Vervielfachung.
- Lösung: DISTINCT-Join in der Standard- und Mit-Abwertung-SQL-Abfrage eingeführt, damit jeder Artikel nur einmal gejoint wird. Funktion bleibt unverändert, liefert nun aber korrekte Werte.

Version 0.41b

Kissenoutlet24.de würde mich freuen wenn Du mir nen Feedback gibst ​

 

[Kissenoutlet24.de]

- Fehler behoben, bei dem Bestände in manchen Fällen zu hoch waren (z. B. 77 statt 11).
- Ursache: Mehrfache JOINs auf tArtikelBeschreibung führten zu Vervielfachung.
- Lösung: DISTINCT-Join in der Standard- und Mit-Abwertung-SQL-Abfrage eingeführt, damit jeder Artikel nur einmal gejoint wird. Funktion bleibt unverändert, liefert nun aber korrekte Werte.

Version 0.41b

Kissenoutlet24.de würde mich freuen wenn Du mir nen Feedback gibst ​

Hallo,

vielen Dank für die schnelle Umsetzung.
Leider haben wir mit der neuen Version noch keine Lösung.
Bei der neuen Version 0.41 haben wir bei einem Artikel 600 Stück, in der Version 0.4 waren es 700 Stück in der Wawi sind es aber 100 Stück

 

[overfl0w23]

Okay, ich schaue es mir nochmal genauer an.
Sobald ich den Fehler habe schreibe ich es hier.
Ich werde ausgiebiger testen.

Danke ebenfalls für die rasche Rückmeldung.

 

[overfl0w23]

Kissenoutlet24.de Magst Du folgende SQLs mal testen bitte?​

Wenn es nun stimmt würde ich das einmal als neue Version veröffentlichen.

Standard:

-- Hauptabfrage zur Berechnung der Lagerbewertung 0.42b
SELECT
    tArtikel.cArtNr AS Artikelnummer,
    MAX(artDesc.cName) AS Artikelname,                 -- Nur 1 Beschreibung pro Artikel
    AVG(tWarenLagerEingang.fEKEinzel) AS [Durchschnittlicher Einkaufspreis],
    SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
        - ISNULL(Warenausgang.fAnzahl, 0.0)) AS Bestand,
    SUM(
        (ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
         - ISNULL(Warenausgang.fAnzahl, 0.0))
        * ISNULL(tWarenLagerEingang.fEKEinzel, 0.0)
    ) AS [Einkaufspreis Gesamt],
    tWarenLager.cName AS Lagerplatz,
    MAX(tWarenLagerEingang.dGeliefertAm) AS [Letztes Lieferdatum]
FROM dbo.tWarenLagerPlatz
LEFT JOIN dbo.tWarenLagerEingang
    ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
    AND tWarenLagerEingang.dErstellt <= @date -- Nur Wareneingänge bis zum Stichtag
JOIN dbo.tWarenLager
    ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
LEFT JOIN dbo.tArtikel
    ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel

-- Subquery für Artikelbeschreibung (nur 1 Datensatz pro Artikel; Standard-Sprache)
LEFT JOIN
(
    SELECT
        ab.kArtikel,
        ab.cName
    FROM dbo.tArtikelBeschreibung ab
    INNER JOIN dbo.tSpracheUsed su
        ON su.nStandard = 1
        AND su.kSprache = ab.kSprache

    GROUP BY ab.kArtikel, ab.cName
) AS artDesc
    ON tArtikel.kArtikel = artDesc.kArtikel

-- Subquery zur Berechnung der Warenausgänge bis zum Stichtag
LEFT JOIN
(
    SELECT
        SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
        tWarenLagerAusgang.kWarenLagerEingang
    FROM dbo.tWarenLagerAusgang
    WHERE tWarenLagerAusgang.dErstellt <= @date
    GROUP BY tWarenLagerAusgang.kWarenLagerEingang
) AS Warenausgang
    ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang

WHERE tWarenLager.kWarenLager = @warehouse

GROUP BY
    tArtikel.cArtNr,
    tWarenLager.cName

ORDER BY
    tArtikel.cArtNr;

Mit Abwertung:

-- Diese SQL-Abfrage berechnet die Lagerbewertung für Artikel in einem Lager
-- inkl. Abwertung nach Lagerdauer 0.42b
WITH LagerBewertung AS
(
    SELECT
        tArtikel.cArtNr AS Artikelnummer,
        MAX(artDesc.cName) AS Artikelname,   -- Nur 1 Beschreibung pro Artikel
        AVG(tWarenLagerEingang.fEKEinzel) AS [Durchschnittlicher Einkaufspreis],
        SUM(
            ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
            - ISNULL(Warenausgang.fAnzahl, 0.0)
        ) AS Bestand,
        SUM(
            (ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
             - ISNULL(Warenausgang.fAnzahl, 0.0))
            * ISNULL(tWarenLagerEingang.fEKEinzel, 0.0)
        ) AS [Einkaufspreis Gesamt],
        tWarenLager.cName AS Lagerplatz,
        MAX(tWarenLagerEingang.dGeliefertAm) AS [Letztes Lieferdatum],
        DATEDIFF(YEAR, MAX(tWarenLagerEingang.dGeliefertAm), @date) AS [Lagerdauer in Jahren]
    FROM dbo.tWarenLagerPlatz
    LEFT JOIN dbo.tWarenLagerEingang
        ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
        AND tWarenLagerEingang.dErstellt <= @date
    JOIN dbo.tWarenLager
        ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
    LEFT JOIN dbo.tArtikel
        ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel

    -- Subquery für Artikelbeschreibung (nur 1 Datensatz pro Artikel; Standard-Sprache)
    LEFT JOIN
    (
        SELECT
            ab.kArtikel,
            ab.cName
        FROM dbo.tArtikelBeschreibung ab
        INNER JOIN dbo.tSpracheUsed su
            ON su.nStandard = 1
            AND su.kSprache = ab.kSprache

        GROUP BY ab.kArtikel, ab.cName
    ) AS artDesc
        ON tArtikel.kArtikel = artDesc.kArtikel

    -- Subquery zur Berechnung der Warenausgänge bis zum Stichtag
    LEFT JOIN
    (
        SELECT
            SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
            tWarenLagerAusgang.kWarenLagerEingang
        FROM dbo.tWarenLagerAusgang
        WHERE tWarenLagerAusgang.dErstellt <= @date
        GROUP BY tWarenLagerAusgang.kWarenLagerEingang
    ) AS Warenausgang
        ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang

    WHERE tWarenLager.kWarenLager = @warehouse

    GROUP BY
        tArtikel.cArtNr,
        tWarenLager.cName
)
SELECT
    Artikelnummer,
    Artikelname,
    [Durchschnittlicher Einkaufspreis],
    Bestand,
    [Einkaufspreis Gesamt],
    Lagerplatz,
    [Letztes Lieferdatum],
    [Lagerdauer in Jahren],
    CASE
        WHEN [Lagerdauer in Jahren] >= 3 THEN 0.5  -- 50% Abwertung nach 3 Jahren
        WHEN [Lagerdauer in Jahren] = 2 THEN 0.8   -- 20% Abwertung nach 2 Jahren
        WHEN [Lagerdauer in Jahren] = 1 THEN 0.9   -- 10% Abwertung nach 1 Jahr
        ELSE 1.0                                   -- Kein Wertverlust innerhalb des ersten Jahres
    END AS Abwertungsfaktor,
    [Einkaufspreis Gesamt] *
    CASE
        WHEN [Lagerdauer in Jahren] >= 3 THEN 0.5
        WHEN [Lagerdauer in Jahren] = 2 THEN 0.8
        WHEN [Lagerdauer in Jahren] = 1 THEN 0.9
        ELSE 1.0
    END AS [Abgewerteter Gesamtwert]
FROM LagerBewertung
ORDER BY Artikelnummer;

*** EDIT ***
Ich schaffe es nicht den Fehler zu reproduzieren. Bei mir wird alles richtig angezeigt.
Dieses SQL sollte die Fehler dennoch eigentl. ausschließen.

 

[arich001]

Ich hab das mal getestet. Leider unterscheidet sich das Ergebniss massiv von der normalen Lagerbewertung.

 

[overfl0w23]

So ich habe es alles einmal überarbeitet und sobald ich Zuhause bin schiebe ich das als finale Version hoch.
Hier die SQL Abfragen, die ihr bis dahin einfach im Programm anlegen könnt:

Finale SQL Abfragen"]Standardabfrage welche Artikel mit dem Zustand brauchbar, defekt und verpackung nicht mit einbezieht:

/*
    Hinweis:
    Standardabfrage welche die folgenden Zustände NICHT mit einbezieht:
    
    -- AND tArtikel.cArtNr NOT LIKE '%brauchbar'
    -- AND tArtikel.cArtNr NOT LIKE '%defekt'
    -- AND tArtikel.cArtNr NOT LIKE '%verpackung'
*/

SELECT
    tArtikel.cArtNr AS Artikelnummer,
    MAX(tArtikelBeschreibung.cName) AS Artikelname,

    -- Einkaufspreis Gesamt
    SUM(
        (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        * ISNULL(tArtikel.fEKNetto, 0.0)
    ) AS [Einkaufspreis Gesamt],
    
    -- Durchschnittlicher EK pro Stück
    CASE
        WHEN SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) <> 0
        THEN
            SUM(
                (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
                * ISNULL(tArtikel.fEKNetto, 0.0)
            )
            /
            SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        ELSE 0
    END AS [Durchschnittlicher EK Einzel],

    -- Bestand
    SUM(
        ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
        - ISNULL(Warenausgang.fAnzahl, 0.0)
    ) AS Bestand,

    tWarenLager.cName AS Lager,
    MAX(tWarenLagerEingang.dGeliefertAm) AS [Letztes Lieferdatum]

FROM dbo.tWarenLagerPlatz
JOIN dbo.tWarenLager
    ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
LEFT JOIN dbo.tWarenLagerEingang
    ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
    AND tWarenLagerEingang.dErstellt < DATEADD(dd, +1, @date)
LEFT JOIN dbo.tArtikel
    ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel
LEFT JOIN dbo.tSpracheUsed
    ON dbo.tSpracheUsed.nStandard = 1
LEFT JOIN
(
    SELECT DISTINCT kArtikel, cName, kSprache, kPlattform
    FROM dbo.tArtikelBeschreibung
) AS tArtikelBeschreibung
    ON tArtikel.kArtikel = tArtikelBeschreibung.kArtikel
    AND dbo.tSpracheUsed.kSprache = tArtikelBeschreibung.kSprache
    AND tArtikelBeschreibung.kPlattform = 1  -- Wichtig!

LEFT JOIN
(
    SELECT
        SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
        tWarenLagerAusgang.kWarenLagerEingang
    FROM dbo.tWarenLagerAusgang
    WHERE ISNULL(tWarenLagerAusgang.dErstellt, GETDATE()) < DATEADD(dd, +1, @date)
    GROUP BY tWarenLagerAusgang.kWarenLagerEingang
) AS Warenausgang
    ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang

WHERE
    tWarenLager.kWarenLager = @warehouse
    AND tArtikel.cArtNr NOT LIKE '%brauchbar'
    AND tArtikel.cArtNr NOT LIKE '%defekt'
    AND tArtikel.cArtNr NOT LIKE '%verpackung'
GROUP BY
    tArtikel.cArtNr,
    tWarenLager.cName
HAVING
    -- Nur Bestände > 0, analog zur SMSS-Abfrage
    SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) > 0
ORDER BY tArtikel.cArtNr;

Standardabfrage welche Artikel mit dem Zustand brauchbar, defekt und verpackung MIT einbezieht:

/*
    Hinweis:
    Standardabfrage welche die folgenden Zustände MIT einbezieht:
    
    -- AND tArtikel.cArtNr NOT LIKE '%brauchbar'
    -- AND tArtikel.cArtNr NOT LIKE '%defekt'
    -- AND tArtikel.cArtNr NOT LIKE '%verpackung'
*/

SELECT
    tArtikel.cArtNr AS Artikelnummer,
    MAX(tArtikelBeschreibung.cName) AS Artikelname,

    -- Einkaufspreis Gesamt
    SUM(
        (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        * ISNULL(tArtikel.fEKNetto, 0.0)
    ) AS [Einkaufspreis Gesamt],
    
    -- Durchschnittlicher EK pro Stück
    CASE
        WHEN SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) <> 0
        THEN
            SUM(
                (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
                * ISNULL(tArtikel.fEKNetto, 0.0)
            )
            /
            SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        ELSE 0
    END AS [Durchschnittlicher EK Einzel],

    -- Bestand
    SUM(
        ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
        - ISNULL(Warenausgang.fAnzahl, 0.0)
    ) AS Bestand,

    tWarenLager.cName AS Lager,
    MAX(tWarenLagerEingang.dGeliefertAm) AS [Letztes Lieferdatum]

FROM dbo.tWarenLagerPlatz
JOIN dbo.tWarenLager
    ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
LEFT JOIN dbo.tWarenLagerEingang
    ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
    AND tWarenLagerEingang.dErstellt < DATEADD(dd, +1, @date)
LEFT JOIN dbo.tArtikel
    ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel
LEFT JOIN dbo.tSpracheUsed
    ON dbo.tSpracheUsed.nStandard = 1
LEFT JOIN
(
    SELECT DISTINCT kArtikel, cName, kSprache, kPlattform
    FROM dbo.tArtikelBeschreibung
) AS tArtikelBeschreibung
    ON tArtikel.kArtikel = tArtikelBeschreibung.kArtikel
    AND dbo.tSpracheUsed.kSprache = tArtikelBeschreibung.kSprache
    AND tArtikelBeschreibung.kPlattform = 1  -- Wichtig!

LEFT JOIN
(
    SELECT
        SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
        tWarenLagerAusgang.kWarenLagerEingang
    FROM dbo.tWarenLagerAusgang
    WHERE ISNULL(tWarenLagerAusgang.dErstellt, GETDATE()) < DATEADD(dd, +1, @date)
    GROUP BY tWarenLagerAusgang.kWarenLagerEingang
) AS Warenausgang
    ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang

WHERE
    tWarenLager.kWarenLager = @warehouse
    /*
    -- Die folgenden Zeilen sind auskommentiert, damit Artikel mit
    -- 'brauchbar', 'defekt' oder 'verpackung' in der ArtNr auch berücksichtigt werden.
    -- AND tArtikel.cArtNr NOT LIKE '%brauchbar'
    -- AND tArtikel.cArtNr NOT LIKE '%defekt'
    -- AND tArtikel.cArtNr NOT LIKE '%verpackung'
    */
GROUP BY
    tArtikel.cArtNr,
    tWarenLager.cName
HAVING
    -- Nur Bestände > 0
    SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) > 0
ORDER BY tArtikel.cArtNr;

Die Werte Stimmen bei mir einwandfrei nach wirklich viel testen überein.

 

[overfl0w23]

Version 0.5stable ist zum Download verfügbar
https://schadeit.de/stockscope/

 

[arich001]

Version 0.5stable ist zum Download verfügbar
https://schadeit.de/stockscope/

Super, jetzt passen die Daten auch mit der Lagerbewertung überein.
Jedoch sieht er beim Mandantenwechsel keine Lager des nächsten Mandanten.....gibts dafür etl. eine Lösung?😭😭😢

PS: Welche Uhrzeit wird bei dem gewählten Stichtag eigentlich genutzt ?

 

[overfl0w23]

Hallo arich,
danke für deine Rückmeldung. Kannst Du das etwas genauer definieren? Wenn Du einen anderen Mandanten wählst nach einem Durchlauf findet er keine Läger? Hast Du nochmal auf Verbindung testen geklickt? Kann sein, dass ich da was vergessen habe zu implementieren da ich es nur mit einem Mandanten getestet habe.

LG

 

[arich001]

Hallo arich,
danke für deine Rückmeldung. Kannst Du das etwas genauer definieren? Wenn Du einen anderen Mandanten wählst nach einem Durchlauf findet er keine Läger? Hast Du nochmal auf Verbindung testen geklickt? Kann sein, dass ich da was vergessen habe zu implementieren da ich es nur mit einem Mandanten getestet habe.

LG

Der Hauptmandant steht ja als erstes in der Liste, bei Lager stehen alle zugehörigen Lager. Wechsle ich jetzt auf einen anderen Mandanten ändert sich unter Lager absolut nix....da sind weiterhin nur die Läger vom ersten Mandanten zu sehen. Bei neu Verbinden springt die Ansicht wieder auf den ersten Mandanten, die Lagerauswahl bleibt auch beim erneuten Mandantenwechseln so stehen.

 

[overfl0w23]

Schaue ich mir an 👍🏻

 

[overfl0w23]

Die Abfrage wird um 00:00h gemacht.
Ich habe dir eine PN geschrieben. Magst Du die überarbeitete Version einmal testen? Dann brauchen wir hier nicht alles zuspammen und ich kann die Version hochladen sobald sie funktioniert.

 

[overfl0w23]

Version 0.6stable released. Das Problem mit mehreren Mandanten ist jetzt behoben.
Aktuell sind keine Bugs mehr bekannt und alles funktioniert einwandfrei.

https://schadeit.de/stockscope/

 

[eck1]

angepasste SQL Abfrage mit Erweiterung um Inventurwert

Der Inventurwert wird hilfsweise als Eigenes Feld angelegt [Wert 1 - 100]:

SELECT
    tArtikel.cArtNr AS Artikelnummer,
    MAX(tArtikelBeschreibung.cName) AS Artikelname,
    SUM(
        (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        * ISNULL(tArtikel.fEKNetto, 0.0)
    ) AS [Einkaufspreis Gesamt],
    CASE
        WHEN SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) <> 0
        THEN
            SUM(
                (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
                * ISNULL(tArtikel.fEKNetto, 0.0)
            )
            /
            SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        ELSE 0
    END AS [Durchschnittlicher EK Einzel],
    SUM(
        ISNULL(tWarenLagerEingang.fAnzahl, 0.0)
        - ISNULL(Warenausgang.fAnzahl, 0.0)
    ) AS Bestand,
    tWarenLager.cName AS Lager,
    MAX(tWarenLagerEingang.dGeliefertAm) AS [Letztes Lieferdatum],
    COALESCE(Inventur.Inventurwert, 100) AS Inventurwert,
    SUM(
        (ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0))
        * ISNULL(tArtikel.fEKNetto, 0.0)
    ) * COALESCE(Inventur.Inventurwert, 100) / 100 AS [Gesamt Inventurwert]
FROM dbo.tWarenLagerPlatz
JOIN dbo.tWarenLager
    ON tWarenLagerPlatz.kWarenLager = tWarenLager.kWarenLager
LEFT JOIN dbo.tWarenLagerEingang
    ON tWarenLagerPlatz.kWarenLagerPlatz = tWarenLagerEingang.kWarenLagerPlatz
    AND tWarenLagerEingang.dErstellt < DATEADD(dd, +1, @date)
LEFT JOIN dbo.tArtikel
    ON tWarenLagerEingang.kArtikel = tArtikel.kArtikel
LEFT JOIN dbo.tSpracheUsed
    ON dbo.tSpracheUsed.nStandard = 1
LEFT JOIN
(
    SELECT DISTINCT kArtikel, cName, kSprache, kPlattform
    FROM dbo.tArtikelBeschreibung
) AS tArtikelBeschreibung
    ON tArtikel.kArtikel = tArtikelBeschreibung.kArtikel
    AND dbo.tSpracheUsed.kSprache = tArtikelBeschreibung.kSprache
    AND tArtikelBeschreibung.kPlattform = 1
LEFT JOIN
(
    SELECT
        SUM(ISNULL(tWarenLagerAusgang.fAnzahl, 0.0)) AS fAnzahl,
        tWarenLagerAusgang.kWarenLagerEingang
    FROM dbo.tWarenLagerAusgang
    WHERE ISNULL(tWarenLagerAusgang.dErstellt, GETDATE()) < DATEADD(dd, +1, @date)
    GROUP BY tWarenLagerAusgang.kWarenLagerEingang
) AS Warenausgang
    ON tWarenLagerEingang.kWarenLagerEingang = Warenausgang.kWarenLagerEingang
LEFT JOIN
(
    SELECT
        attr.kArtikel,
        tArtikelAttributSprache.nWertInt AS Inventurwert
    FROM tArtikelAttribut AS attr
    LEFT JOIN tArtikelAttributSprache
        ON tArtikelAttributSprache.kArtikelAttribut = attr.kArtikelAttribut
    WHERE attr.kAttribut = 277
) AS Inventur
    ON tArtikel.kArtikel = Inventur.kArtikel
WHERE
    tWarenLager.kWarenLager = @warehouse
    AND tArtikel.cArtNr NOT LIKE '%brauchbar'
    AND tArtikel.cArtNr NOT LIKE '%defekt'
    AND tArtikel.cArtNr NOT LIKE '%verpackung'
GROUP BY
    tArtikel.cArtNr,
    tWarenLager.cName,
    COALESCE(Inventur.Inventurwert, 100)
HAVING
    SUM(ISNULL(tWarenLagerEingang.fAnzahl, 0.0) - ISNULL(Warenausgang.fAnzahl, 0.0)) > 0
ORDER BY tArtikel.cArtNr;

Ihr müsst die ID des Eigenen Felds/Attributs auslesen, dies macht Ihr mit dem Code (hier Beispiel Ìnventurwert):

SELECT kAttribut FROM tAttributSprache where cName = 'Inventurwert'

Daher ist im Code der Wert kAttribut nach der gesuchten Attributs ID zu ändern.
Im Beispiel ID 277.



SELECT
attr.kArtikel,
tArtikelAttributSprache.nWertInt AS Inventurwert
FROM tArtikelAttribut AS attr
LEFT JOIN tArtikelAttributSprache
ON tArtikelAttributSprache.kArtikelAttribut = attr.kArtikelAttribut
WHERE attr.kAttribut = 277
) AS Inventur