Registriert seit: 27. Nov 2017
2.508 Beiträge
Delphi 7 Professional
|
AW: ADOQuery berechnetes Feld
6. Jun 2019, 11:45
Ist jetzt nur geraten.
Sinngemäß in etwa sowas?
SQL-Code:
SELECT
Materialrollen.[Mat-Nr],
sum((Materialrollen.[Arb-Breite] / 1000) * Materialrollen.lfm) as BESTAND,
[Material-Stamm].Bezeichnung,
Aufgebraucht
from (
SELECT
Materialrollen.[Mat-Nr],
Materialrollen.[Arb-Breite],
Materialrollen.lfm,
[Material-Stamm].Bezeichnung,
'nein' as Aufgebraucht
FROM Materialrollen
LEFT JOIN [Material-Stamm] ON Materialrollen.[Mat-Nr] = [Material-Stamm].[Mat-Nr]
WHERE (
([Material-Stamm].[Lieferanten-Nr] = ' + Lieferantennr.Text + ')
AND ([Material-Stamm].aktuell= -1)
AND (Materialrollen.DatumAb is NULL)
AND (Materialrollen.[Arb-Breite] > 179)
)
UNION ALL
SELECT
Materialrollen.[Mat-Nr],
Materialrollen.[Arb-Breite],
Materialrollen.lfm,
[Material-Stamm].Bezeichnung,
'ja' as Aufgebraucht
FROM Materialrollen
LEFT JOIN [Material-Stamm] ON Materialrollen.[Mat-Nr] = [Material-Stamm].[Mat-Nr]
WHERE (
([Material-Stamm].[Lieferanten-Nr] = ' + Lieferantennr.Text + ')
AND ([Material-Stamm].aktuell= -1)
AND (Materialrollen.DatumAb is not NULL)
AND (Materialrollen.[Arb-Breite] > 179)
)
)
group by
Materialrollen.[Mat-Nr],
[Material-Stamm].Bezeichnung
Aufgebraucht
Die aufgebrauchten Materialien sollten nun in der Spalte "Aufgebraucht" einen entsprechenden Hinweise, bestehend aus den Wörten 'ja' bzw. 'nein', stehen haben.
Geändert von Delphi.Narium ( 6. Jun 2019 um 16:30 Uhr)
Grund: von TE gefundenen Fehler behoben.
|
|
Zitat
|