Index: WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml =================================================================== diff -u -r55890 -r57713 --- WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml (.../Decrypteerder.cls.xml) (revision 55890) +++ WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml (.../Decrypteerder.cls.xml) (revision 57713) @@ -157,6 +157,15 @@ Set ..Response.IsGeldig = $$$True Set Resultaat = ..Response.IsGeldig + } ElseIf (##class(TECH.StringUtils).Contains(##class(TECH.StringUtils).ToLower(DecrypteerRequest.Hostname), "beslagteknikk")) { + Set ..Response.PersonalityId = ##class(DOM.common.enu.Personality).BeslagDesignteknikk() + Set ..Response.Taal = ##class(DOM.enu.Taal).Noors() + Set ..Response.IsContactGegevensFormulierNodig = $$$False + Set ..Response.IsLoginFormulierNodig = $$$False + Set ..Response.IsGeldig = $$$True + + Set Resultaat = ..Response.IsGeldig + } ElseIf (##class(TECH.StringUtils).Contains(##class(TECH.StringUtils).ToLower(DecrypteerRequest.Hostname), "galimberti")) { Set ..Response.PersonalityId = ##class(DOM.common.enu.Personality).Galimberti() Set ..Response.Taal = "I" // niet ##class(DOM.enu.Taal).Italiaans() gebruiken, want dat is 'IT' en niet afgesproken met ITR Index: vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler/Bepaal/Test.cls.xml =================================================================== diff -u -r56070 -r57713 --- vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler/Bepaal/Test.cls.xml (.../Test.cls.xml) (revision 56070) +++ vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler/Bepaal/Test.cls.xml (.../Test.cls.xml) (revision 57713) @@ -76,6 +76,11 @@ ]]> + + + + @@ -132,6 +137,11 @@ ]]> + + + + Index: WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler.cls.xml =================================================================== diff -u -r56068 -r57713 --- WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler.cls.xml (.../KlantDataBepaler.cls.xml) (revision 56068) +++ WSimpl/Vhisie4/Auth/HandelAuthenticator/ContactGegevensRegistreerder/KlantDataBepaler.cls.xml (.../KlantDataBepaler.cls.xml) (revision 57713) @@ -34,7 +34,7 @@ #dim KlantData As DOM.VKP.impl.HandelKlantData #dim KlantId As %String = "" - If ##class(TECH.StringUtils).Equals(RegistreerContactGegevensRequest.Header.PersonalityId,##class(DOM.common.enu.Personality).Dupont(),##class(DOM.common.enu.Personality).Ferexpert(),##class(DOM.common.enu.Personality).Pavanello(),##class(DOM.common.enu.Personality).Galimberti(),##class(DOM.common.enu.Personality).Destil(),##class(DOM.common.enu.Personality).Hein(),##class(DOM.common.enu.Personality).Seefelder(),##class(DOM.common.enu.Personality).Zweygart(),##class(DOM.common.enu.Personality).BeslagDesign()) && $$$HasLength(RegistreerContactGegevensRequest.Header.KlantId){ + If ##class(TECH.StringUtils).Equals(RegistreerContactGegevensRequest.Header.PersonalityId,##class(DOM.common.enu.Personality).Beslagteknikk(),##class(DOM.common.enu.Personality).Dupont(),##class(DOM.common.enu.Personality).Ferexpert(),##class(DOM.common.enu.Personality).Pavanello(),##class(DOM.common.enu.Personality).Galimberti(),##class(DOM.common.enu.Personality).Destil(),##class(DOM.common.enu.Personality).Hein(),##class(DOM.common.enu.Personality).Seefelder(),##class(DOM.common.enu.Personality).Zweygart(),##class(DOM.common.enu.Personality).BeslagDesign()) && $$$HasLength(RegistreerContactGegevensRequest.Header.KlantId){ Set KlantId = HandelPersonality.GeefPrefix()_RegistreerContactGegevensRequest.Header.KlantId Set KlantData = ..MaakHandelKlantData(KlantId,RegistreerContactGegevensRequest) } ElseIf (RegistreerContactGegevensRequest.Header.KlantId = "") {