KalkÜbersicht für Rezepturen bei EKPreisänderungen

ALTER procedure [dbo].[UserQueryInRezepturKalk] (@Artikel#ArtikelNr varchar(20)) AS Select InRezArt.Kurztext , InRezArt.ArtikelNr , Einheit.Kürzel AS RezEinheit , InRezArt.EKPRez , InRezArt.LetzteÄnderung , InRezArt.Artikel , Einheit2.Kürzel AS UEinheit , CONVERT(money,InRezArt.RezMenge) AS RezMenge , InRezArt.EKP , CONVERT(money,InRezArt.EKWert) AS EKWert , CONVERT(money,InRezArt.EKPNeu) AS EKPNeu , CONVERT(money,InRezArt.EKWertNeu) AS EKWertNeu , CONVERT(money,(InRezArt.EKWertNeu/ EKWert*100)-100) AS AbwProz , CONVERT(money,InRezArt.EKWertNeu-EKWert) AS AbwAbs , CONVERT(money,InRezArt.EKPRez+(InRezArt.EKWertNeu-EKWert)) AS EKPRezNeu , AFS.Periode , AFS.VerkaufMenge , AFS.VerkaufBetrag , CONVERT(money,AFS.VerkaufBetrag - (AFS.VerkaufMenge*InRezArt.EKPRez)) AS Rohertrag , CONVERT(money,AFS.VerkaufMenge*(InRezArt.EKWertNeu-EKWert)*-1) AS AendRE , CASE WHEN COALESCE(AFS.VerkaufBetrag,0) = 0 THEN '' ELSE CONVERT(money,(AFS.VerkaufBetrag - (AFS.VerkaufMenge*InRezArt.EKPRez)) / AFS.VerkaufBetrag * 100) END AS SpanneIst , CASE WHEN COALESCE(AFS.VerkaufBetrag,0) = 0 THEN '' ELSE CONVERT(money,(AFS.VerkaufBetrag - (AFS.VerkaufMenge*(InRezArt.EKPRez+(InRezArt.EKWertNeu-EKWert))))/ AFS.VerkaufBetrag * 100) END AS SpanneNEU FROM ( SELECT dbo.Artikel.Kurztext , dbo.Stückliste.ArtikelNr , Stückliste.Einheit AS RezEinheit , dbo.UserFunktionEKPreis(0,dbo.Stückliste.ArtikelNr,Stückliste.Einheit,0,'NULL') AS EKPRez , LetzteÄnderung , Stückliste.UArtikelNr AS Artikel , Stückliste.UEinheit , dbo.Stückliste.Menge AS RezMenge , dbo.UserFunktionEKPreis(0,@Artikel#ArtikelNr,Stückliste.UEinheit,0,'NULL') AS EKP , dbo.Stückliste.Menge*dbo.UserFunktionEKPreis(0,@Artikel#ArtikelNr,Stückliste.UEinheit,0,'NULL') AS EKWert , CONVERT(money,REPLACE(AHM208.Inhalt,',','.'))/CASE WHEN Umrechnung.Umrechnungsfaktor is NULL THEN 1 ELSE Umrechnung.Umrechnungsfaktor END AS EKPNeu , dbo.Stückliste.Menge*CONVERT(money,REPLACE(AHM208.Inhalt,',','.'))/CASE WHEN Umrechnung.Umrechnungsfaktor is NULL THEN 1 ELSE Umrechnung.Umrechnungsfaktor END AS EKWertNeu FROM Stückliste Left Join Artikel ON Stückliste.ArtikelNr = Artikel.ArtikelNr LEFT JOIN (Select * FROM ArtikelHatMultiFeld WHERE Feldnummer = 208) AHM208 ON Stückliste.UArtikelNr = AHM208.ArtikelNr LEFT JOIN Umrechnung ON Umrechnung.ArtikelNr = Stückliste.UArtikelNr AND Umrechnung.VonEinheit = Stückliste.UEinheit WHERE (UArtikelNr = @Artikel#ArtikelNr) AND Stückliste.Einheit = Artikel.StdEinheit UNION SELECT dbo.Artikel.Kurztext , dbo.Stückliste.ArtikelNr , Stückliste.Einheit AS RezEinheit , dbo.UserFunktionEKPreis(0,dbo.Stückliste.ArtikelNr,Stückliste.Einheit,0,'NULL') AS EKPRez , LetzteÄnderung , Hilfe_1.Artikel AS Artikel , Hilfe_1.UEinheit AS UEinheit , dbo.Stückliste.Menge/CASE WHEN UmrechnungInRez.Umrechnungsfaktor is NULL THEN 1 ELSE UmrechnungInRez.Umrechnungsfaktor END * Hilfe_1.Menge AS RezMenge , dbo.UserFunktionEKPreis(0,@Artikel#ArtikelNr,Hilfe_1.UEinheit,0,'NULL') AS EKP , (dbo.Stückliste.Menge/CASE WHEN UmrechnungInRez.Umrechnungsfaktor is NULL THEN 1 ELSE UmrechnungInRez.Umrechnungsfaktor END) * Hilfe_1.Menge*dbo.UserFunktionEKPreis(0,@Artikel#ArtikelNr,Hilfe_1.UEinheit,0,'NULL') AS EKWert , CONVERT(money,REPLACE(AHM208.Inhalt,',','.'))/CASE WHEN Umrechnung.Umrechnungsfaktor is NULL THEN 1 ELSE Umrechnung.Umrechnungsfaktor END AS EKPNeu , (dbo.Stückliste.Menge/UmrechnungInRez.Umrechnungsfaktor * Hilfe_1.Menge)*CONVERT(money,REPLACE(AHM208.Inhalt,',','.'))/CASE WHEN Umrechnung.Umrechnungsfaktor is NULL THEN 1 ELSE Umrechnung.Umrechnungsfaktor END AS EKWertNeu FROM Stückliste Left Join Artikel ON Stückliste.ArtikelNr = Artikel.ArtikelNr LEFT JOIN Umrechnung UmrechnungInRez ON UmrechnungInRez.ArtikelNr = UArtikelNr AND UmrechnungInRez.VonEinheit = UEinheit INNER JOIN ( SELECT dbo.Stückliste.ArtikelNr , Stückliste.Einheit , @Artikel#ArtikelNr AS Artikel , Stückliste.UEinheit , dbo.Stückliste.Menge , dbo.Stückliste.Menge*dbo.UserFunktionEKPreis(0,@Artikel#ArtikelNr,Stückliste.UEinheit,0,'NULL') AS EKWert FROM Stückliste Left Join Artikel ON Stückliste.ArtikelNr = Artikel.ArtikelNr WHERE (UArtikelNr = @Artikel#ArtikelNr) AND Stückliste.Einheit = Artikel.StdEinheit ) AS Hilfe_1 ON Stückliste.UArtikelNr = Hilfe_1.ArtikelNr AND UmrechnungInRez.InEinheit = Hilfe_1.Einheit LEFT JOIN (Select * FROM ArtikelHatMultiFeld WHERE Feldnummer = 208) AHM208 ON AHM208.ArtikelNr = Hilfe_1.Artikel LEFT JOIN Umrechnung ON Umrechnung.ArtikelNr = Hilfe_1.Artikel AND Umrechnung.VonEinheit = Hilfe_1.UEinheit WHERE UArtikelNr in (SELECT dbo.Stückliste.ArtikelNr FROM Stückliste Left Join Artikel ON Stückliste.ArtikelNr = Artikel.ArtikelNr INNER JOIN Einheit ON Stückliste.UEinheit = Einheit.Einheit WHERE (UArtikelNr = @Artikel#ArtikelNr) AND Stückliste.Einheit = Artikel.StdEinheit) AND Stückliste.Einheit = Artikel.StdEinheit ) InRezArt INNER JOIN Einheit ON InRezArt.RezEinheit = Einheit.Einheit INNER JOIN Einheit Einheit2 ON InRezArt.UEinheit = Einheit2.Einheit --Auslesen Periode LEFT JOIN (Select * FROM ArtikelHatMultiFeld WHERE Feldnummer = 209) AHM209 ON InRezArt.Artikel = AHM209.ArtikelNr --AbsatzMenge einer Periode LEFT JOIN (Select ArtikelFilialStatistik.* FROM ArtikelFilialStatistik WHERE FilialNummer = 0) AS AFS ON AFS.ArtikelNr = InRezArt.ArtikelNr AND AFS.Einheit = InRezArt.RezEinheit AND AFS.Periode = AHM209.Inhalt ORDER BY InRezArt.ArtikelNr DESC