XUB_Schuldner_Identnummer_der_Hauptanstalt

Dieser Algorithmus befüllt das SC-Attribut SC_OeNB_Identnummer_Schuldner_Hauptanstalt mit der entsprechenden OeNB-Identnummer. Wenn Counterpart (=Kreditnehmer, Wertpapieremittent: "Kontoinhaber") eine Zweiganstalt ist, dann schreibe die Identnummer der zugehörigen Hauptanstalt hinein, sonst leer. Der Algorithmus erfolgt folgendermaßen:

(1) Ermittlung der zum betrachteten Geschäftsfall zugeordneten Einheit über WM_Wertpapier_MS

(2) Ermittlung, ob zur in (1) identifizierten Einheit eine OeNB-Identnummer existiert

(3) Ermittlung der Hauptanstalt-OeNB-Identnummer (EO41_Identnummer_Hauptanstalt) zur in (2) ermittelten OeNB-Identnummer

(4) sollte zur in (1) identifizierten Einheit keine Hauptanstalt-OeNB-Identnummer existieren, werden Einheitenzusammenfassung mit der in (1) identifizierten Einheit verwendet, um die Hauptanstalt zu ermitteln

(5) Existiert zu dieser (über die Entität EZ_Einheiten_Zusammenfassung_MS) eine Hauptanstalt, so wird die Identnummer dieser Hauptanstalt als Rückgabewert verwendet

FUNKTION XUB_Schuldner_Identnummer_der_Hauptanstalt (AI_Mandant, AI_Geschaeftsfall_ID, AI_Stichtag_Datum)  

//(1) Selektion der zum Geschäftsfall zugehörigen Einheit

Einheit = SELEKTIERE EM.AI_Einheitennummer_ID VON WM_Wertpapier_MS VON GF_Geschaeftsfall

//(2) Selektion der OeNB-Identnummer zur identifizierten Einheit

OeNB_ID = SELEKTIERE AI_OeNB_IdentNr VON EM_Einheit_MS MIT (EM.AI_Einheitennummer_ID ISTGLEICH Einheit)

//(3) Selektion der Hauptanstalt-OeNB-Identnummer (EO41_Identnummer_Hauptanstalt) zur ermittelten OeNB-Identnummer

Hauptanstalt_OeNB_ID = SELEKTIERE EO41_Identnummer_Hauptanstalt VON EO_Einheit_OS MIT (EO.AI_OeNB_IdentNr ISTGLEICH OeNB_ID)

WENN (ISTLEER(Hauptanstalt_OeNB_ID)) DANN

//zum Geschäftspartner existiert keine Hauptanstalt-OeNB-Identnummer

//(4) Selektion jener Einheitenzusammenfassungen, welche die identifizierte Einheit enthalten

Hauptanstalt = SELEKTIERE AI_Gruppen_Einheitennummer_ID VON EZ_Einheiten_Zusammenfassung_MS MIT (EZ.AI_Einheitennummer_ID ISTGLEICH Einheit UND EZ.AI_Zusammenfassungstyp_Code ISTGLEICH "Hauptanstalt-Zweiganstalt Beziehung (HZ)")

WENN (ISTLEER(Hauptanstalt)) DANN

//zur identifizierten Einheit existiert keine Hauptanstalt

Hauptanstalt_OeNB_ID = NULL

SONST

//(5) Identnummer der (über die Entität EZ_Einheiten_Zusammenfassung_MS) identifizierten Hauptanstalt wird als Rückgabewert verwendet

Hauptanstalt_OeNB_ID = SELEKTIERE AI_OeNB_IdentNr VON EM_Einheit_MS MIT (EM.AI_Einheitennummer_ID ISTGLEICH Hauptanstalt)

ENDE

ENDE

RUECKGABE Hauptanstalt_OeNB_ID

FUNKTIONSENDE