AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Datenbanken (SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)
Thema durchsuchen
Ansicht
Themen-Optionen

(SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)

Ein Thema von mjustin · begonnen am 25. Aug 2022 · letzter Beitrag vom 1. Sep 2022
Antwort Antwort
Benutzerbild von TigerLilly
TigerLilly

Registriert seit: 24. Mai 2017
Ort: Wien, Österreich
1.251 Beiträge
 
Delphi 12 Athens
 
#1

AW: (SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)

  Alt 26. Aug 2022, 10:22
Ist zwar off-topic:
Irgendwann wirst du aber mit SQL an die Grenzen stoßen, was die textliche Zusammenstellung von Rezepten und Zutatenliste anbelangt. Ich würde SQL verwenden, um die Basisdaten abzuholen und alles weitere im Code machen. Das ist einfacher.
  Mit Zitat antworten Zitat
mjustin

Registriert seit: 14. Apr 2008
3.011 Beiträge
 
Delphi 2009 Professional
 
#2

AW: (SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)

  Alt 26. Aug 2022, 10:38
Ist zwar off-topic:
Irgendwann wirst du aber mit SQL an die Grenzen stoßen, was die textliche Zusammenstellung von Rezepten und Zutatenliste anbelangt. Ich würde SQL verwenden, um die Basisdaten abzuholen und alles weitere im Code machen. Das ist einfacher.
Ja, im Code würde einiges mehr mit wenig Aufwand machbar sein. Im konkreten Anwendungsfall brauche ich diese 'Zutatenliste' wiederum in einer SQL-View, als 'virtuelles Feld', in dem via 'Rezept-ID' für jeden Datensatz die Zutatenliste angezeigt wird. Aus Anwendersicht ist das also ein select <viele Daten> from <Rezept-View>.
Michael Justin
  Mit Zitat antworten Zitat
Jumpy

Registriert seit: 9. Dez 2010
Ort: Mönchengladbach
1.740 Beiträge
 
Delphi 6 Enterprise
 
#3

AW: (SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)

  Alt 26. Aug 2022, 10:51
Nochmal in einer List_Agg = Group-Concat Version, wir aber dadurch auch nicht schöner

SQL-Code:
select rezept.bezeichnung,
  CONCAT(
  Case When zutat_opt.bezeichnung is null Then null else Concat(zutat_opt.bezeichnung,' ') END,
  String_Agg(zutat.bezeichnung, ' ') WITHIN GROUP (order by lfdnr)
  ) as Zutatenliste
from rezept
left join zutaten on rezept.rezeptid = zutaten.rezeptid
  and (zutaten.zutatid<>rezept.optionalezutatid or rezept.optionalezutatid is Null)
left join zutat on zutat.zutatid = zutaten.zutatid
left join zutat zutat_opt on zutat_opt.zutatid=rezept.optionalezutatid
where lfdnr=(select min(lfdnr) from zutaten z where z.rezeptid=zutaten.rezeptid and z.zutatid=zutaten.zutatid)
Group By rezept.bezeichnung, zutat_opt.bezeichnung
Ralph
  Mit Zitat antworten Zitat
mjustin

Registriert seit: 14. Apr 2008
3.011 Beiträge
 
Delphi 2009 Professional
 
#4

AW: (SQL) Kochrezept: Zutatenliste nach erster Verwendung (jede Zutat nur einmal)

  Alt 1. Sep 2022, 07:14
Nachtrag: hier ist eine leicht korrigierte Version http://sqlfiddle.com/#!18/bb18e/28/0

spot the bug

Code:
create table rezept (
  rezeptid int,
  optionalezutatid int,
  bezeichnung nvarchar(80)
);
 
create table zutat (
  zutatid int,
  bezeichnung nvarchar(80)
);
 
create table zutaten (
rezeptid int,
zutatid int,
lfdnr int
);

insert into rezept values(111, null, 'Schokokuchen');
insert into rezept values(222, 6, 'Nusskuchen');

insert into zutat values (1,'Mehl');
insert into zutat values (2,'Schokoflocken');
insert into zutat values (3,'Butter');
insert into zutat values (4,'Zucker');
insert into zutat values (5,'Nüsse');
insert into zutat values (6,'Ahornsirup');

insert into zutaten values (111,1,1);
insert into zutaten values (111,2,2);
insert into zutaten values (111,3,3);
insert into zutaten values (111,4,4);
insert into zutaten values (111,2,5);

insert into zutaten values (222,1,1);
insert into zutaten values (222,5,2);
insert into zutaten values (222,3,3);
insert into zutaten values (222,4,4);
insert into zutaten values (222,5,5);
insert into zutaten values (222,6,6);
Code:
with CTE as (
select rezept.rezeptid, 'O' as optional, null as lfdnr, zutat.bezeichnung as bezeichnung
from rezept
join zutat on zutat.zutatid = rezept.optionalezutatid
union all
select rezept.rezeptid, 'P' as optional, zutaten.lfdnr, zutat.bezeichnung as bezeichnung
from zutaten
join zutat on zutat.zutatid = zutaten.zutatid
join rezept on rezept.rezeptid = zutaten.rezeptid
where lfdnr=(select min(lfdnr) from zutaten z where z.rezeptid=zutaten.rezeptid and z.zutatid=zutaten.zutatid)
and (rezept.optionalezutatid is null or zutaten.zutatid <> rezept.optionalezutatid)
)
  select rezept.rezeptid,
    (select concat(bezeichnung, ' ')
     from cte
     where cte.rezeptid = rezept.rezeptid
     order by optional, lfdnr
     for xml path(''))
  from rezept
Alternativ mit string_agg:

Code:
with CTE as (
select rezept.rezeptid, 'O' as optional, null as lfdnr, zutat.bezeichnung as bezeichnung
from rezept
join zutat on zutat.zutatid = rezept.optionalezutatid
union all
select rezept.rezeptid, 'P' as optional, zutaten.lfdnr, zutat.bezeichnung as bezeichnung
from zutaten
join zutat on zutat.zutatid = zutaten.zutatid
join rezept on rezept.rezeptid = zutaten.rezeptid
where lfdnr=(select min(lfdnr) from zutaten z where z.rezeptid=zutaten.rezeptid and z.zutatid=zutaten.zutatid)
and (rezept.optionalezutatid is null or zutaten.zutatid <> rezept.optionalezutatid)
)
  select rezept.rezeptid,
  string_agg(cte.bezeichnung, ' ')
  within group (order by optional, lfdnr)
  from rezept
  join cte on cte.rezeptid = rezept.rezeptid
  group by rezept.rezeptid

http://sqlfiddle.com/#!18/bb18e/37/0

(ab MS SQL 2017)
Michael Justin

Geändert von mjustin ( 1. Sep 2022 um 07:25 Uhr) Grund: Variante mit string_agg ergänzt
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:20 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz