Index: vhConsistency/Checks/vhUSER.cls.xml
===================================================================
diff -u -r34491 -r41437
--- vhConsistency/Checks/vhUSER.cls.xml	(.../vhUSER.cls.xml)	(revision 34491)
+++ vhConsistency/Checks/vhUSER.cls.xml	(.../vhUSER.cls.xml)	(revision 41437)
@@ -37,12 +37,13 @@
 	While (ResultSet.Next())
 	{
 		Set Status = $$$ERROR($$$GeneralError,"vhUSER zonder NaamIntern")
+		Set $Piece( ^vhUSER("D", ResultSet.Data("ID1")), "\", 2 ) = ResultSet.Data("Naam")
 		Do ..VoegMeldingToe("vhUSER account zonder NaamIntern: ID='" _ResultSet.Data("ID1") _ "', Naam='" _ResultSet.Data("Naam") _ "'.")
 	}
 	
 	If (..GeefAantalMeldingen() > 0)
 	{
-		Do ..VoegMeldingToe("Vul de NaamIntern gewoon in piece 2 in, via de Global Data view in de Caché Portal, voor deze Admin-accounts.")
+		Do ..VoegMeldingToe("Naam is bij deze automatisch ingevuld in piece 2.")
 	}
 	
 	Quit Status