1 vhConsistency.Check %String ICT_meldingen@vanhoecke.be Do ##class(vhConsistency.ConsistencyCheck).VoerUit(1,1,"vhConsistency.Checks.VhisieToegang") %Status 1 %Status Toegang:Derde.EC.Toegang 1 Toegang:Derde.EC.Toegang 1 0 ) && ( '$length(Toegang.InternePersoon) ) { do ..VoegMeldingToe(Toegang.GetNaam()_" "_Toegang.GetEmail()_" heeft regio's en is niet gedefineerd als interne persoon") set ..Status = $$$ERROR(5001,"Tis mis") } ]]>