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 = "") {