FUNKTION XEN_Sektor_FinRep(AI_Mandant MA, AI_Einheitennummer_ID emId, AI_Stichtag_Datum repDate) esvg_sektor = SELEKTIERE EM.EMA49_Sektor_fuer_Meldezwecke_Code VON EM_Einheit_MS internat_org = SELEKTIERE EO.EO40_Internationale_Organisation_OS_Code VON EO_Einheit_OS VON EM_Einheit_MS ki_gem_finrep = SELEKTIERE EM.EMA41_Kreditinstitut_gem_FinRep_Kennzeichen VON EM_Einheit_MS WENN(esvg_sektor ISTGLEICH "Zentralbank (1210)" UND NICHT(internat_org ENTHAELT ("Bank für Internationalen Zahlungsausgleich (5B)", "Internationaler Währungsfonds (1C)"))) DANN rValue = "Central banks (1)" SONST WENN(esvg_sektor ENTHAELT ("Zentralstaat (1311)", "Länder (inkl. Landeskammern, Landesfonds) (1312)", "Gemeinden (inkl. Gemeindefonds und -verbände) (1313)", "Sozialversicherung (1314)", "Staat nicht zuordenbar (1300Z)") ODER internat_org ENTHAELT ("sonstigeInternationaleOrg_GR")) DANN rValue = "General governments (2)" SONST WENN(ki_gem_finrep ISTGLEICH WAHR) DANN rValue = "Credit institutions (3)" SONST WENN(esvg_sektor ENTHAELT ("sonstigeFinanzUnternehmen_GR") UND internat_org ISTGLEICH NULL) DANN rValue = "Financial corporations other than credit institutions (4)" SONST WENN(esvg_sektor ISTGLEICH "Nicht-finanzielle Unternehmen (1100)") DANN rValue = "Non-financial corporations (5)" SONST WENN(esvg_sektor ENTHAELT ("Selbständigenhaushalte (mit u. ohne Arbeitnehmer) (1400A)", "sonstige private Haushalte (1400B)", "private Haushalte nicht zuordenbar (1400Z)", "private Organisationen ohne Erwerbszweck (1500)")) DANN rValue = "Households (6)" ENDE RUECKGABE rValue FUNKTIONSENDE |