FA_FOLDERNAME_ID

Prozeduren

FA_FOLDERNAME_ID_EX

Eingabeparameter

Parameter	Typ	Beschreibung
FOLDERNAME	VARCHAR(254)	Der gesuchte Fachname (punktgetrennt) um die FAID zu erhalten.
FAIDUEBER	INTEGER	Das Root Fach von wo der Fachname gilt. Bei einem Event Base Fach ist dieser Wert 0.
RINDEX	INTEGER	Wird als Index für den gesuchten Fachnamen verwendet. Hier muss der Wert 0 übergeben werden.

Ausgabeparameter

Parameter	Typ	Beschreibung
FAID	INTEGER	Damit erhält man den Primary Key Wert von der FAECHER Tabelle zum gesuchten Fachnamen.

Beschreibung

Hilfsfunktion für die FA_FOLDERNAME_ID Stored Procedure.

Definition

CREATE PROCEDURE FA_FOLDERNAME_ID_EX(
    FOLDERNAME VARCHAR(254),
    FAIDUEBER INTEGER,
    RINDEX INTEGER)
RETURNS (
    FAID INTEGER)
AS
  DECLARE VARIABLE FANAME CHAR(30); 
  DECLARE VARIABLE FOUND_FAID Integer; 
BEGIN
  FAID = NULL;
  RINDEX = RINDEX + 1;
  IF ((FOLDERNAME IS NOT NULL) AND (RTRIM255(FOLDERNAME) != '') AND (FAIDUEBER IS NOT NULL)) THEN BEGIN
    FANAME = f_WordNum(FOLDERNAME, RINDEX, '.', 0);
    IF ((FANAME IS NOT NULL) AND (RTRIM255(FANAME) != '')) THEN BEGIN
      FOR
        SELECT FAID FROM FAECHER
        WHERE (FANAME = :FANAME) AND (FAIDUEBER = :FAIDUEBER)
        INTO :FOUND_FAID
      DO
      BEGIN
        EXECUTE PROCEDURE FA_FOLDERNAME_ID_EX(FOLDERNAME, FOUND_FAID, RINDEX)
        RETURNING_VALUES :FOUND_FAID;
        IF (FOUND_FAID IS NOT NULL) THEN BEGIN
          FAID = FOUND_FAID;
        END
      END
    END
    ELSE BEGIN
      FAID = FAIDUEBER;
    END
  END
END