FUNKTION XEN_Ausserbilanzielle_Risikoposition_Wert(AI_Mandant MA, AI_Stichtag_Datum repDate, AI_Geschaeftsfall_ID gfID) gfKategorie = SELEKTIERE GF.GF00_Geschaeftsfallkategorie_Code VON GF_Geschaeftsfall abilKategorie = SELEKTIERE GF.GF114_Ausserbilanzielle_Geschaefte_Code VON GF_Geschaeftsfall derivattyp = SELEKTIERE GF.GF42_Derivattyp_Code VON GF_Geschaeftsfall underlyingKlasse = SELEKTIERE GF.GF43_Underlying_Klasse_Code VON GF_Geschaeftsfall mandant_sicherungsgeber = SELEKTIERE GF.GFA162_Mandant_Sicherungsgeber_Kennzeichen VON GF_Geschaeftsfall agbfixiert = SELEKTIERE GF.GF116_Allgemeine_Geschaeftsbedingungen_fixiert_Kennzeichen VON GF_Geschaeftsfall bilanzseite = SELEKTIERE GK.GKA01_Bilanzseite_Code VON GK_Geschaeftsfall_Konsolidierungssicht VON GF_Geschaeftsfall treuhand = SELEKTIERE GF.GF15_Treuhandvermoegen_Code VON GF_Geschaeftsfall nn = SELEKTIERE GFW.Wert VON GFW_Geschaeftsfall_Wert MIT GFW.AI_Wertart_Code ISTGLEICH "Nominale (NN)" VON GF_Geschaeftsfall nar = SELEKTIERE GFW.Wert VON GFW_Geschaeftsfall_Wert MIT GFW.AI_Wertart_Code ISTGLEICH "Nicht ausgenutzter Rahmen (NAR)" VON GF_Geschaeftsfall ona = SELEKTIERE GFW.Wert VON GFW_Geschaeftsfall_Wert MIT GFW.AI_Wertart_Code ISTGLEICH "Ausstehender Nominalwert (ONA)" VON GF_Geschaeftsfall WENN (gfKategorie ENTHAELT ("Wechselkredit (B)", "Kreditkartenkredit (C)", "Barvorlagen (E)", "Operating Leasing (F)", "Finance Leasing (G)", "Revolvierender Kredit (exkl. Überziehungskredit) (V)", "Überziehungskredit (W)", "Einmalkredit (exkl. Kreditlinie) (X)", "Kreditlinie (Y)", "Sonstige Forderungen (AB)") ODER (gfKategorie ENTHAELT ("Sonstige Aktiva/Passiva aus Zwischenkonten (T)", "Sonstige Aktiva/Passiva aus Schwebender Verrechnung (U)") UND bilanzseite ENTHAELT ("Aktiv in der Bilanz (AKT)", "Aktiv unter der Bilanz (AUB)"))) DANN WENN(treuhand ISTGLEICH "Treuhandvermögen mit Aussonderungsrecht (B)" UND bilanzseite ENTHAELT ("Aktiv unter der Bilanz (AUB)", "Nicht in der Bilanz (NIB)", "Passiv unter der Bilanz (PUB)")) DANN rValue = ona + nar SONST rValue = nar ENDE SONST WENN (gfKategorie ISTGLEICH "Außerbilanzielle Geschaefte gem. Anhang I CRR (exkl. Kreditderivate, Kreditzusagen) (P)") DANN WENN(abilKategorie ISTGLEICH "Akzepte (AZ)") DANN rValue = nar SONST WENN(abilKategorie ISTGLEICH "Einlagentermingeschäfte ("Forward Deposits") (EL)") DANN rValue = nn SONST WENN(abilKategorie ENTHAELT ("Sonstige Garantien, die den Charakter eines Kreditsubstituts haben (XG)", "„Unwiderrufliche Kreditsicherungsgarantien“ (standby letters of credit), die den Charakter eines Kreditsubstituts haben. (UK)") UND nn > 0) DANN rValue = nn SONST rValue = nn + nar ENDE SONST WENN(gfKategorie ISTGLEICH "Derivate (Q)" UND derivattyp ISTGLEICH "Swap (SWAP)" UND underlyingKlasse ENTHAELT ("Credit Default (CD)", "Total Return (TR)") UND mandant_sicherungsgeber ISTGLEICH WAHR) DANN rValue = nn ENDE RUECKGABE rValue FUNKTIONSENDE |