FUNKTION XEN_Klassifikation_belastetes_Objekt(AI_Belastung_ID belId, AI_Stichtag_Datum repDate, AI_Mandant MA, AI_Kons_ID konsId) ifrsKz = SELEKTIERE MO.MO04_IFRS_Kennzeichen VON MO_Meldeobjekt gf = SELEKTIERE BE.AI_Geschaeftsfall_ID VON BE_Belastung sk = SELEKTIERE BE.AI_Sachkonto_ID VON BE_Belastung st = SELEKTIERE BE.AI_Sicherheiten_ID VON BE_Belastung WENN(NICHT(ISTLEER(gf))) DANN typ = SELEKTIERE GK.GKA07_Typ_des_belasteten_Objekts_Code VON GK_Geschaeftsfall_Konsolidierungssicht MIT GK.AI_Geschaeftsfall_ID ISTGLEICH gf geschaeftsfallkategorie = SELEKTIERE GF.GF00_Geschaeftsfallkategorie_Code VON GF_Geschaeftsfall MIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf urlfzt = SELEKTIERE GF.GFA83_Ursprungslaufzeit_Code VON GF_Geschaeftsfall MIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf WENN(ifrsKz ISTGLEICH WAHR) DANN bilpo = SELEKTIERE GF.GF152_Bilanzposition_IFRS_Code VON GF_Geschaeftsfall MIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf hfs = SELEKTIERE GK.GK04_Zur_Veraeusserung_gehalten_Kennzeichen VON GK_Geschaeftsfall_Konsolidierungssicht VON GF_GeschaeftsfallMIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf SONST bilpo = SELEKTIERE GF.GKA12_Bilanzposition_FinRep_NGAAP_Code VON GK_Geschaeftsfall_Konsolidierungssicht VON GF_Geschaeftsfall MIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf hfs = FALSCH ENDE wertpapierklassifikation = SELEKTIERE WM.WMA28_Wertpapierklassifikation_Code VON WM_Wertpapier_MS VON GF_Geschaeftsfall MIT GF.AI_Geschaeftsfall_ID ISTGLEICH gf WENN(typ ISTGLEICH "Vermögenswert (VW)", "Geliehener Geschäftsfall (GG)") DANN WENN(bilpo ISTGLEICH "Beteiligungen an Tochter-, Gemeinschafts- und assoziierten Unternehmen (ATGAU)" ODER hfs ISTGLEICH WAHR) DANN rValue = "Other assets / collateral received (OA)" SONST WENN(geschaeftsfallkategorie 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)")) DANN WENN (urlfzt ISTLGLEICH "keine Frist (KF)") DANN rValue = "Loans on demand (LD)" SONST rValue = "Loans other than on demand (LO)" ENDE SONST WENN(geschaeftsfallkategorie ISTGLEICH "Wertpapiere (H)") DANN WENN (wertpapierklassifikation ENTHAELT ("Aktien (AKT)", "Partizipationsscheine (PART)", "Sonstige Wertpapiere (SONS)")) DANN rValue = "Equity instruments (EI)" SONST rValue = "Debt securities (DS)" ENDE SONST WENN (geschaeftsfallkategorie ENTHAELT ("Investmentfonds (I)", "Anteilsrechte nicht in Form von Wertpapieren (K)")) DANN rValue = "Equity instruments (EI)" SONST WENN (geschaeftsfallkategorie ENTHAELT ("Verbriefung (J)")) DANN rValue = "Debt securities (DS)" SONST rValue = "Other assets / collateral received (OA)" ENDE SONST WENN(typ ISTGLEICH "Vermögenswert (nur Zinsabgrenzung) (VZ)") DANN rValue = "Other assets / collateral received (OA)" ENDE SONST WENN(NICHT(ISTLEER(sk))) DANN rValue = "Other assets / collateral received (OA)" SONST WENN(NICHT(ISTLEER(st))) DANN sicherheitenkategorie = SELEKTIERE ST.ST03_Sicherheitenkategorie_Code VON ST_Sicherheiten_Stammdaten MIT ST.AI_Sicherheiten_ID ISTGLEICH st auf_anforderung = SELEKTIERE ST.ST20_Kredit_auf_Anforderung_Kennzeichen VON ST_Sicherheiten_Stammdaten MIT ST.AI_Sicherheiten_ID ISTLGEICH st WENN(sicherheitenkategorie ENTHAELT ("Bareinlage oder bargeldähnliche Instrumente (BG)", "Kredite (KR)", "Forderungen aus Warenlieferungen und Dienstleistungen (FW)")) DANN WENN(auf_anforderung ISTGLEICH WAHR) DANN rValue = "Loans on demand (LD)" SONST rValue = "Loans other than on demand (LO)" ENDE SONST WENN(sicherheitenkategorie ISTGLEICH "Anteilsrechte und Investmentfondsanteile (VF)") DANN rValue = "Equity instruments (EI)" SONST WENN(sicherheitenkategorie ISTGLEICH "Wertpapiere (exklusive Anteilsrechte und Investmentfondanteile) (WA)") rValue = "Debt securities (DS)" SONST rValue = "Other assets / collateral received (OA)" ENDE ENDE RUECKGABE rValue FUNKTIONSENDE | 