Thema: Delphi Ersatz für DISTINCT ??

Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#1

Ersatz für DISTINCT ??

  Alt 3. Aug 2006, 17:31
Datenbank: FB • Version: 2.0 • Zugriff über: FIBplus
Hi,

Bin etwas am testen. Rückgabe einer stored Procedure liefert folgendes :

Delphi-Quellcode:
ID_OUT   MWSTSATZ_OUT   ABDATUM_OUT   MWSTWERT_OUT
4   0   01.01.1900   0
2   1   01.01.1980   7
5   2   01.01.1980   15
1   2   01.04.1998   16
3   2   01.01.2007   19
Die SP sieht so aus :

SQL-Code:
CREATE PROCEDURE ERMITTLE_ALLEMWSTSP (
    ABDATUM DATE)
RETURNS (
    ID_OUT INTEGER,
    MWSTSATZ_OUT INTEGER,
    ABDATUM_OUT DATE,
    MWSTWERT_OUT DECIMAL(15,2))
AS
begin
FOR
  SELECT ID,MWSTSATZ,ABDATUM, MWSTWERT FROM MWST WHERE ABDATUM <= :ABDATUM
  ORDER BY MWSTSATZ
  INTO :ID_OUT,:MWSTSATZ_OUT,:ABDATUM_OUT,:MWSTWERT_OUT
  DO
  SUSPEND;
end^
Siehe die letzten 3 Zeilen der Beispieldaten. Da steht jetzt 15,16,19, aber ich brauche nur den einen Wert, der zum Input-Parameter paßt. Das ist sicherlich einfach einzubauen, bloß wie ?
Gruß
Hansa
  Mit Zitat antworten Zitat