Index: vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml
===================================================================
diff -u -r55512 -r55515
--- vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 55512)
+++ vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 55515)
@@ -14,6 +14,7 @@
 	Set Aanmelding.LoginCode = "1234"
 	
 	Set AanmeldingRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.AanmeldingRepository).%New()
+	Do AanmeldingRepositoryMock.IndienMethodCall("ZoekViaLoginCode","1234").DanReturn(..EmptyIterator())
 	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",..Matches.Object(Aanmelding)).ExactAantalKeer(1)
 	
 	Set GebruikerAanmeldenRequest = ##class(WS.Halux.AAP.GebruikerAanmeldenRequest).%New()
@@ -27,6 +28,33 @@
 	Do AanmeldingRepositoryMock.Verifieer()
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Aanmelden met LoginCode die al bestaat">
+<Implementation><![CDATA[
+	Do ##class(vhTest.Fake.TECH.DateTime.DateTimeAPI).Activeer()
+	
+	Set Aanmelding = ##class(DOM.Halux.AAP.Aanmelding).%New()
+	Set Aanmelding.Initialen = "TVE"
+	Set Aanmelding.ComputerNaam = "Een computernaam"
+	Set Aanmelding.AangemeldSinds = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentTimeStamp()
+	Set Aanmelding.LoginCode = "1234"
+	
+	#dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Aanmelding)
+	Set AanmeldingRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.AanmeldingRepository).%New()
+	Do AanmeldingRepositoryMock.IndienMethodCall("ZoekViaLoginCode","1234").DanReturn(Iterator)
+	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0)
+	
+	Set GebruikerAanmeldenRequest = ##class(WS.Halux.AAP.GebruikerAanmeldenRequest).%New()
+	Set GebruikerAanmeldenRequest.Initialen = "TVE"
+	Set GebruikerAanmeldenRequest.Header.ComputerNaam = "Een computernaam"
+	Set GebruikerAanmeldenRequest.LoginCode = "1234"
+		
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock)
+	Do GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
+	
+	Do AanmeldingRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: WSimpl/Halux/AAP/GebruikerService.cls.xml
===================================================================
diff -u -r55512 -r55515
--- WSimpl/Halux/AAP/GebruikerService.cls.xml	(.../GebruikerService.cls.xml)	(revision 55512)
+++ WSimpl/Halux/AAP/GebruikerService.cls.xml	(.../GebruikerService.cls.xml)	(revision 55515)
@@ -30,6 +30,10 @@
 <Method name="GebruikerAanmelden">
 <FormalSpec>GebruikerAanmeldenRequest:WS.Halux.AAP.GebruikerAanmeldenRequest</FormalSpec>
 <Implementation><![CDATA[
+	If ..AanmeldingRepository.ZoekViaLoginCode(GebruikerAanmeldenRequest.LoginCode).HasNext() {
+		Quit ""
+	}
+	
 	Set Aanmelding = ##class(DOM.Halux.AAP.Aanmelding).%New()
 	Set Aanmelding.Initialen = GebruikerAanmeldenRequest.Initialen
 	Set Aanmelding.ComputerNaam = GebruikerAanmeldenRequest.Header.ComputerNaam
@@ -38,7 +42,7 @@
 	
 	Do ..AanmeldingRepository.Bewaar(Aanmelding)
 	
-	Quit
+	Quit ""
 ]]></Implementation>
 </Method>