Index: vhConsistency/Checks/Email.cls.xml
===================================================================
diff -u -r2435 -r2440
--- vhConsistency/Checks/Email.cls.xml	(.../Email.cls.xml)	(revision 2435)
+++ vhConsistency/Checks/Email.cls.xml	(.../Email.cls.xml)	(revision 2440)
@@ -101,13 +101,14 @@
 	Set sc = rset.Execute()
 	While (rset.Next(.sc)){
 		Set Email = $ZSTRIP(rset.Data("Email"),"<>W")		
+		Set GlobalNode = $ZSTRIP(rset.Data("GlobalNode"),"<>W")		
 		Set Teller = Teller + 1
 		if $p(Teller/100,".",2)="" w Teller,!
 		Set ValidMail = ##class(TECH.Mail).Check(Email, ..#DoeNsLookUp,..#CacheNsLookUp)
 		If ('ValidMail){
 			Set Feedback = $P($$ParseStatus^vhLib(ValidMail),":",2)
 			Set TellerNotValid = TellerNotValid + 1
-			Do ..VoegMeldingToe($C(9)_"'"_$$LCVT^vhLib(Email)_"' niet correct door "_Feedback_" voor : "_rset.Data("Melding"))
+			Do ..VoegMeldingToe($C(9)_"'"_$$LCVT^vhLib(Email)_"' niet correct door "_Feedback_" voor : "_rset.Data("Melding")_", GlobalNode : "_GlobalNode)
 			Set Status = $$$ERROR($$$GeneralError,"Geen correct email door "_Feedback_": "_Email)
 		}		
 	}
@@ -176,17 +177,17 @@
 
 <Query name="GeefDerdeEcToegang">
 <Type>%SQLQuery</Type>
-<SqlQuery>	Select ID || " " || UserNaam AS Melding, EmailAdres AS Email From Derde_EC.Toegang where EmailAdres IS NOT NULL</SqlQuery>
+<SqlQuery>	Select "KlantID:" || Klanten || ", UserNaam:" || UserNaam AS Melding, ID  AS GlobalNode, EmailAdres AS Email From Derde_EC.Toegang where EmailAdres IS NOT NULL</SqlQuery>
 </Query>
 
 <Query name="GeefResInternePersonen">
 <Type>%SQLQuery</Type>
-<SqlQuery>	Select eMail AS Email,ID || " " || Naam As Melding From Res.InternePersoon where eMail IS NOT NULL</SqlQuery>
+<SqlQuery>	Select eMail AS Email, ID  AS GlobalNode, ID || " " || Naam As Melding From Res.InternePersoon where eMail IS NOT NULL</SqlQuery>
 </Query>
 
 <Query name="GeefDerdeAgendaEindgebruiker">
 <Type>%SQLQuery</Type>
-<SqlQuery>	Select EmailAdres As Email, ID || " " || Adres_Naam As Melding From Derde_Agenda.Eindgebruiker where EmailAdres IS NOT NULL</SqlQuery>
+<SqlQuery>	Select EmailAdres As Email,  ID  AS GlobalNode, Adres_Naam As Melding From Derde_Agenda.Eindgebruiker where EmailAdres IS NOT NULL</SqlQuery>
 </Query>
 </Class>
 </Export>