Index: WSimpl/Halux/AAP/GebruikerService.cls.xml
===================================================================
diff -u -r55529 -r55538
--- WSimpl/Halux/AAP/GebruikerService.cls.xml	(.../GebruikerService.cls.xml)	(revision 55529)
+++ WSimpl/Halux/AAP/GebruikerService.cls.xml	(.../GebruikerService.cls.xml)	(revision 55538)
@@ -13,14 +13,20 @@
 <Private>1</Private>
 </Property>
 
+<Property name="VanHoeckeGebruikerBeheerder">
+<Type>DOM.common.VanHoeckeGebruikerBeheerder</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>AanmeldingRepository:DOM.Halux.AAP.AanmeldingRepository</FormalSpec>
+<FormalSpec>AanmeldingRepository:DOM.Halux.AAP.AanmeldingRepository,VanHoeckeGebruikerBeheerder:DOM.common.VanHoeckeGebruikerBeheerder</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..AanmeldingRepository = $$$Inject(AanmeldingRepository, ##class(DOM.Halux.AAP.AanmeldingRepository).%New())
+	Set ..VanHoeckeGebruikerBeheerder = $$$Inject(VanHoeckeGebruikerBeheerder, ##class(DOM.common.impl.VanHoeckeGebruikerBeheerder).%New())
 	Set ..DateTimeAPI = ##class(TECH.Context).Instance().GeefDateTimeAPI()
 	
 	Quit $$$OK
@@ -33,6 +39,12 @@
 <Implementation><![CDATA[
 	Set Antwoord = ##class(WS.Halux.AAP.GebruikerAanmeldenResponse).%New()
 	
+	If $$$Not(..ValideerGebruiker(GebruikerAanmeldenRequest.LoginCode, GebruikerAanmeldenRequest.Initialen)) {
+		Set Antwoord.Header.Status = ##class(TECH.enu.ExceptionCode).InvalidUserInput()
+		Set Antwoord.Header.Omschrijving = "De ingegeven combinatie is niet geldig"
+		Quit Antwoord	
+	}
+	
 	If ..AanmeldingRepository.ZoekViaLoginCodeEnInitialen(GebruikerAanmeldenRequest.LoginCode, GebruikerAanmeldenRequest.Initialen).HasNext() {
 		Set Antwoord.Header.Status = ##class(TECH.enu.ExceptionCode).InvalidUserInput()
 		Set Antwoord.Header.Omschrijving = "Deze logincode is reeds aangemeld"
@@ -58,6 +70,25 @@
 <Implementation><![CDATA[	Quit
 ]]></Implementation>
 </Method>
+
+<Method name="ValideerGebruiker">
+<FormalSpec>LoginCode:%String,Initialen:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim Resultaat As %Boolean = $$$False
+	Try {
+		#dim GebruikerViaInitialen As DOM.common.VanHoeckeGebruiker = ..VanHoeckeGebruikerBeheerder.GeefGebruikerViaInitialen(Initialen)
+		#dim GebruikerViaPincode As DOM.common.VanHoeckeGebruiker = ..VanHoeckeGebruikerBeheerder.GeefGebruikerViaPincode(LoginCode)
+	
+		Set Resultaat = (GebruikerViaInitialen.GeefID()=GebruikerViaPincode.GeefID())
+	} Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+	}
+	
+	Quit Resultaat
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml
===================================================================
diff -u -r55530 -r55538
--- vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 55530)
+++ vhUnitTest/WSimpl/Halux/AAP/GebruikerService/GebruikerAanmelden/Test.cls.xml	(.../Test.cls.xml)	(revision 55538)
@@ -30,8 +30,13 @@
 	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",..Matches.Object(Aanmelding)).ExactAantalKeer(1)
 	
 	#dim GebruikerAanmeldenRequest As WS.Halux.AAP.GebruikerAanmeldenRequest = ..MaakGebruikerAanmeldenRequest()
+	
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	#dim Gebruiker As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Dummy.DOM.common.VanHoeckeGebruiker).%New()
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaInitialen",..#Initialen).DanReturn(Gebruiker)
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaPincode",..#LoginCode).DanReturn(Gebruiker)
 		
-	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock)
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock, VanHoeckeGebruikerBeheerderMock)
 	#dim Antwoord As WS.Halux.AAP.GebruikerAanmeldenResponse = GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"200")
@@ -51,8 +56,13 @@
 	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0)
 	
 	#dim GebruikerAanmeldenRequest As WS.Halux.AAP.GebruikerAanmeldenRequest = ..MaakGebruikerAanmeldenRequest()
+	
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	#dim Gebruiker As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Dummy.DOM.common.VanHoeckeGebruiker).%New()
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaInitialen",..#Initialen).DanReturn(Gebruiker)
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaPincode",..#LoginCode).DanReturn(Gebruiker)
 		
-	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock)
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock, VanHoeckeGebruikerBeheerderMock)
 	#dim Antwoord As WS.Halux.AAP.GebruikerAanmeldenResponse = GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
 	
 	Do $$$AssertEquals(Antwoord.Header.Status,"1005:InvalidUserInput")
@@ -62,6 +72,86 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Test: Errors uit GeefGebruikerViaInitialen code wordt opgegeten en anders weergegeven">
+<Implementation><![CDATA[
+	#dim Aanmelding As DOM.Halux.AAP.Aanmelding = ..MaakAanmelding()
+	
+	#dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Aanmelding)
+	Set AanmeldingRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.AanmeldingRepository).%New()
+	Do AanmeldingRepositoryMock.IndienMethodCall("ZoekViaLoginCodeEnInitialen",..#LoginCode,..#Initialen).DanReturn(Iterator)
+	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0)
+	
+	#dim GebruikerAanmeldenRequest As WS.Halux.AAP.GebruikerAanmeldenRequest = ..MaakGebruikerAanmeldenRequest()
+	
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	#dim Gebruiker As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Dummy.DOM.common.VanHoeckeGebruiker).%New()
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaInitialen",..#Initialen).DanException($$$DummyException)
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaPincode",..#LoginCode).DanReturn(Gebruiker)
+		
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock, VanHoeckeGebruikerBeheerderMock)
+	#dim Antwoord As WS.Halux.AAP.GebruikerAanmeldenResponse = GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
+	
+	Do $$$AssertEquals(Antwoord.Header.Status,"1005:InvalidUserInput")
+	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"De ingegeven combinatie is niet geldig")
+	
+	Do AanmeldingRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Errors uit GeefGebruikerViaPincode code wordt opgegeten en anders weergegeven">
+<Implementation><![CDATA[
+	#dim Aanmelding As DOM.Halux.AAP.Aanmelding = ..MaakAanmelding()
+	
+	#dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Aanmelding)
+	Set AanmeldingRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.AanmeldingRepository).%New()
+	Do AanmeldingRepositoryMock.IndienMethodCall("ZoekViaLoginCodeEnInitialen",..#LoginCode,..#Initialen).DanReturn(Iterator)
+	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0)
+	
+	#dim GebruikerAanmeldenRequest As WS.Halux.AAP.GebruikerAanmeldenRequest = ..MaakGebruikerAanmeldenRequest()
+	
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	#dim Gebruiker As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Dummy.DOM.common.VanHoeckeGebruiker).%New()
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaInitialen",..#Initialen).DanReturn(Gebruiker)
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaPincode",..#LoginCode).DanException($$$DummyException)
+		
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock, VanHoeckeGebruikerBeheerderMock)
+	#dim Antwoord As WS.Halux.AAP.GebruikerAanmeldenResponse = GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
+	
+	Do $$$AssertEquals(Antwoord.Header.Status,"1005:InvalidUserInput")
+	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"De ingegeven combinatie is niet geldig")
+	
+	Do AanmeldingRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
+<Method name="Test: Aanmelden met foute LoginCode/Initialen combinatie">
+<Implementation><![CDATA[
+	#dim Aanmelding As DOM.Halux.AAP.Aanmelding = ..MaakAanmelding()
+	
+	#dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(Aanmelding)
+	Set AanmeldingRepositoryMock = ##class(vhTest.Mock.DOM.Halux.AAP.AanmeldingRepository).%New()
+	Do AanmeldingRepositoryMock.IndienMethodCall("ZoekViaLoginCodeEnInitialen",..#LoginCode,..#Initialen).DanReturn(Iterator)
+	Do AanmeldingRepositoryMock.VerwachtMethodCall("Bewaar",$$$ElkeWaarde).ExactAantalKeer(0)
+	
+	#dim GebruikerAanmeldenRequest As WS.Halux.AAP.GebruikerAanmeldenRequest = ..MaakGebruikerAanmeldenRequest()
+	
+	Set VanHoeckeGebruikerBeheerderMock = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruikerBeheerder).%New()
+	#dim Gebruiker1 As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Dummy.DOM.common.VanHoeckeGebruiker).%New()
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaInitialen",..#Initialen).DanReturn(Gebruiker1)
+	#dim Gebruiker2 As DOM.common.VanHoeckeGebruiker = ##class(vhTest.Mock.DOM.common.VanHoeckeGebruiker).%New()
+	Do Gebruiker2.IndienMethodCall("GeefID").DanReturn("9999")
+	Do VanHoeckeGebruikerBeheerderMock.IndienMethodCall("GeefGebruikerViaPincode",..#LoginCode).DanReturn(Gebruiker2)
+		
+	Set GebruikerService = ##class(WSimpl.Halux.AAP.GebruikerService).%New(AanmeldingRepositoryMock, VanHoeckeGebruikerBeheerderMock)
+	#dim Antwoord As WS.Halux.AAP.GebruikerAanmeldenResponse = GebruikerService.GebruikerAanmelden(GebruikerAanmeldenRequest)
+	
+	Do $$$AssertEquals(Antwoord.Header.Status,"1005:InvalidUserInput")
+	Do $$$AssertEquals(Antwoord.Header.Omschrijving,"De ingegeven combinatie is niet geldig")
+	
+	Do AanmeldingRepositoryMock.Verifieer()
+]]></Implementation>
+</Method>
+
 <Method name="MaakAanmelding">
 <Private>1</Private>
 <ReturnType>DOM.Halux.AAP.Aanmelding</ReturnType>