Einzelnen Beitrag anzeigen

bcvs

Registriert seit: 16. Jun 2011
668 Beiträge
 
Delphi 12 Athens
 
#1

Select für Projekte mit Unterprojekten

  Alt 13. Sep 2019, 11:51
Datenbank: ElevateDB • Version: 2.31 • Zugriff über: direkt
Hallo SQL-Spezialisten,

ich habe eine Datenbanktabelle für eine hierarchische Struktur von Projekten. In der Tabelle gibt es ein Feld für die eigene Projektnummer (PROJ_NR) und ein Feld für die Nummer des übergeordneten Projektes (VORG).

Die Nummern können beliebig sein, d.h. anhand der Projektnummer lässt sich die Zugehörigkeit zu einem bestimmten Projektzweig nicht feststellen.

Jetzt brauche ich ein Select, das mir alle Projekte in einem Nummernbereich der oberen Ebene einschließlich aller Unterprojekte liefert.

Beispiel:
Code:
1000
  - aaaa
      - 12345
      - 67890
  - bbbb
  - cccc
2000
  - xxxx
  - yyyy
      - bla
      - blub
  - zzzz
Ein Select von 1000 bis 2000 soll jetzt alle diese Projekte liefern. Ich habe das momentan mit Hilfe einer serverseitigen Funktion gelöst, die zu einer Projektnummer die Nummer des Hauptprojekts auf der oberen Ebene zurückgibt:

Code:
CREATE FUNCTION "MainVorg" (IN "aPrjNr" VARCHAR COLLATE "ANSI")
RETURNS VARCHAR COLLATE "ANSI"
BEGIN
  DECLARE Vorg Varchar;
  DECLARE MainPrjNr VarChar;
  DECLARE ProjCursor CURSOR FOR stmtProj;
  PREPARE stmtProj FROM 'Select Vorg From Projekte Where PROJ_NR = ?';

  Set Vorg = aPrjNr;
  Repeat
    Set MainPrjNr = Vorg;
    OPEN ProjCursor USING MainPrjNr;
    IF (ROWCOUNT(ProjCursor) > 0) THEN
       FETCH FIRST FROM ProjCursor ('Vorg') INTO Vorg;
    ELSE
       Set Vorg = '';
    END IF;
    CLOSE ProjCursor;

  Until (Vorg='') or (Vorg is NULL) End Repeat;
  Return MainPrjNr;
END
Diese Funktion wird dann beispielsweise folgendermaßen verwendet:

Code:
SELECT Projekte.PROJ_NR
FROM Projekte
WHERE (MainVorg(Projekte.PROJ_NR) >= '1000') and (MainVorg(Projekte.PROJ_NR) <= '2000')
Das funktioniert auch, ist allerdings bei größeren Datenmengen etwas langsam. Habt ihr irgendwelche Ideen, wie man das optimieren könnte?
  Mit Zitat antworten Zitat