Do ##class(vhConsistency.ConsistencyCheck).VoerUit(1,1,"vhConsistency.Checks.ProdResControle") vhConsistency.Check %Status 0) { Do ..VoegMeldingToe("") Do ..VoegMeldingToe("Mogelijks werden deze problemen opgelost door de consistency checks op de events") Quit $$$ERROR($$$GeneralError,"Tralala") } Else { Quit $$$OK } ]]> VerwachteUitvoerID:%String VerwachteInvoerID:%String