Index: WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml
===================================================================
diff -u -r62133 -r73933
--- WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml	(.../Decrypteerder.cls.xml)	(revision 62133)
+++ WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml	(.../Decrypteerder.cls.xml)	(revision 73933)
@@ -94,7 +94,6 @@
 	If ..VerwerkRefEnDataOptZonderProblemen(DecrypteerRequest) {
 		Try {
 			#dim LoginParameters As WSimpl.Unishop.Login.ParametersHandel = ..LoginParameterBepaler.GeefLoginParameters(DecrypteerRequest.Ref, DecrypteerRequest.DataOpt, DecrypteerRequest.Header.Taal, DecrypteerRequest.Header.GebruikerIp)
-			
 			//Do ..ValideerHostnameMetRef(DecrypteerRequest, LoginParameters)
 			
 			Do ..KortingBewaarder.BewaarMeegegevenKorting(DecrypteerRequest.Ref,DecrypteerRequest.DataOpt)
@@ -330,9 +329,11 @@
 	#dim HandelPersonality As DOM.common.impl.HandelPersonality = ..HandelPersonalityRepository.GeefViaID(LoginParameters.PersonalityID)
 	Set ..Response.KlantId = ##class(TECH.StringUtils).Replace(KlantData.ID,HandelPersonality.GeefPrefix(),"")
 	Set ..Response.KlantNaam = KlantData.Naam
-	
 	If $$$HasLength(DecrypteerRequest.DataOpt) {
 		Set ..Response.GebruikerId = $$$True
+		If $$$HasLength(LoginParameters.GebruikerID) {
+			Set ..Response.GebruikerId = $Piece(LoginParameters.GebruikerID,"_",3,$ListLength($ListFromString(LoginParameters.GebruikerID,"_")))
+		}
 	}
 	
 	Set ..Response.GebruikerNaam = ""
@@ -341,7 +342,8 @@
 		Set ..Response.Taal = "I"
 	}
 	Set ..Response.ToegelatenLadetypes = ..HandelToegelatenLadetypesBepaler.Bepaal(LoginParameters.PersonalityID)
-	Set ..Response.KortingPercentages = ..HandelsKlantKortingsPercentageBepaler.Bepaal(HandelPersonality,..Response.KlantId)	
+	Set ..Response.KortingPercentages = ..HandelsKlantKortingsPercentageBepaler.Bepaal(HandelPersonality,..Response.KlantId)
+	Set ..Response.IsSalesMedewerker = 	LoginParameters.IsSalesMedewerker
 	Set ..Response.IsGeldig = $$$True
 ]]></Implementation>
 </Method>