XEN_Anteil_Emission_im_Inland_gehalten

In diesem Algorithmus wird der entsprechende Geschäftsfall über die Entität GI_Geschaeftsfall_Investor (per AI_Einheitennummer_ID) mit EM_Einheit_MS_Textgejoint.

Es sind alle Datensätze auf GI_Geschaeftsfall_Investor zu selektieren, für die die verknüpfte Einheit den Sitz im Inland hat (exkl. Internationaler Organisationen). Als Rückgabe dient die Summe der Wertarten "gehaltener Anteil der Emission (GAE)".

Im Fall eines unbekannten Investors wird die Wertart "gehaltener Anteil der Emission (GAE)" mit der Wertart "im Inland gehaltener Anteil des Teils der Emission, dessen Investor unbekannt ist (GAEUI)" multipliziert und ebenfalls zum Rückgabewert addiert.

FUNKTION XEN_Anteil_Emission_im_Inland_gehalten(AI_Geschaeftsfall_ID gfId, AI_Mandant MA, AI_Stichtag_Datum repDate)

rValue = 0

gaeui = SELEKTIERE GFW.Wert VON GFW_Geschaeftsfall_Wert MIT GFW.AI_Wertart_Code ISTGLEICH "im Inland gehaltener Anteil des Teils der Emission, dessen Investor unbekannt ist (GAEUI)" VON GF_Geschaeftsfall

investoren = SELEKTIERE ALLE GI.AI_Geschaeftsfall_Investor_ID VON GI_Geschaeftsfall_Investor VON GF_Geschaeftsfall

ITERIERE investor_id VON 0, Max(investoren)

gae = SELEKTIERE GIW.Wert VON GIW_Geschaeftsfall_Investor_Wert MIT (GIW.AI_Wertart_Code ISTGLEICH "gehaltener Anteil der Emission (GAE)" UND GIW.AI_Geschaeftsfall_Investor_ID ISTGLEICH investor_id)

einheit = SELEKTIERE GI.AI_Einheitennummer_ID VON GI_Geschaeftsfall_Investor MIT GI.AI_Geschaeftsfall_Investor_ID ISTGLEICH investor_id

WENN(NICHT(ISTLEER(einheit))) DANN

land = SELEKTIERE EM.EMA48_Land_fuer_Meldezwecke_Code VON EM_Einheit_MS MIT EM.AI_Einheitennummer_ID ISTGLEICH einheit

int_org = SELEKTIERE EO.EO40_Internationale_Organisation_OS_Code VON EO_Einheit_OS VON EM_Einheit_MS MIT EM.AI_Einheitennummer_ID ISTGLEICH einheit

WENN(land ISTGLEICH "Österreich (AT)" UND ISTLEER(int_org)) DANN

rValue = rValue + gae

ENDE

SONST

rValue = rValue + gae * gaeui / 100

ENDE

ITERATION ENDE

RUECKGABE rValue

FUNKTIONSENDE