Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar.cls.xml
===================================================================
diff -u -r41614 -r41639
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar.cls.xml	(.../MaakWinkelkar.cls.xml)	(revision 41614)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar.cls.xml	(.../MaakWinkelkar.cls.xml)	(revision 41639)
@@ -35,6 +35,8 @@
 <Method name="MaakWinkelkar">
 <FormalSpec>MaakWinkelkarRequest:WS.Vhisie4.Winkelkar.MaakWinkelkarRequest</FormalSpec>
 <Implementation><![CDATA[
+	do ##class(TECH.Context.RuntimeContext).Instance().ZetGebruikerID(..GeefKlantPartijID(MaakWinkelkarRequest.Header.KlantId, MaakWinkelkarRequest.Header.PersonalityId))
+	do ##class(TECH.Context.RuntimeContext).Instance().ZetPersonalityID(MaakWinkelkarRequest.Header.PersonalityId)
 	Do:(..WinkelkarRepository.BestaatViaID(MaakWinkelkarRequest.WinkelkarId)) ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.InvalidInputException).%New("Winkelkar met id '"_MaakWinkelkarRequest.WinkelkarId _"' bestaat reeds."))
 	Do ..VerkoopService.MaakOfferte(..GeefKlantPartijID(MaakWinkelkarRequest.Header.KlantId, MaakWinkelkarRequest.Header.PersonalityId), $$$If(+MaakWinkelkarRequest.Header.PersonalityId=0,##class(DOM.common.enu.Personality).VanHoecke(),MaakWinkelkarRequest.Header.PersonalityId), MaakWinkelkarRequest.WinkelkarId)
 ]]></Implementation>
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar/Test.cls.xml
===================================================================
diff -u -r41609 -r41639
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 41609)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/MaakWinkelkar/Test.cls.xml	(.../Test.cls.xml)	(revision 41639)
@@ -126,6 +126,7 @@
 	
 	#dim Request As WS.Vhisie4.Winkelkar.MaakWinkelkarRequest = ##class(vhTest.Utils.WS.Vhisie4.Winkelkar.MaakWinkelkarRequest).MaakWinkelkarRequest()
 	Set Request.WinkelkarId = "1"
+	Set Request.Header.PersonalityId = "11"
 	
 	Set Service = ##class(WSimpl.Vhisie4.Winkelkar.WinkelkarService.MaakWinkelkar).%New(VerkoopServiceDummy, LegacyPartijAPIDummy, WinkelkarRepositoryStub)
 	Do Service.MaakWinkelkar(Request)