Index: vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder/Test/Pavanello.cls.xml =================================================================== diff -u -r55395 -r55439 --- vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder/Test/Pavanello.cls.xml (.../Pavanello.cls.xml) (revision 55395) +++ vhUnitTest/WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder/Test/Pavanello.cls.xml (.../Pavanello.cls.xml) (revision 55439) @@ -26,15 +26,15 @@ #dim DecrypteerResponse As WS.Vhisie4.Auth.DecrypteerResponse = Decrypteerder.Decrypteer(DecrypteerRequest) Do $$$AssertFalse(DecrypteerResponse.IsGeldig) - Do $$$AssertTrue(DecrypteerResponse.IsContactGegevensFormulierNodig) - Do $$$AssertFalse(DecrypteerResponse.IsLoginFormulierNodig) + Do $$$AssertFalse(DecrypteerResponse.IsContactGegevensFormulierNodig) + Do $$$AssertTrue(DecrypteerResponse.IsLoginFormulierNodig) ]]> - + - + Index: WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml =================================================================== diff -u -r55395 -r55439 --- WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml (.../Decrypteerder.cls.xml) (revision 55395) +++ WSimpl/Vhisie4/Auth/HandelAuthenticator/Decrypteerder.cls.xml (.../Decrypteerder.cls.xml) (revision 55439) @@ -104,7 +104,6 @@ } Else { Do ..Logger.Warning("Decrypteer", "Er werd een ongeldige decrypteer uitgevoerd."_$$$CRLF_"Ref = "_DecrypteerRequest.Ref_$$$CRLF_"Dataopt = "_DecrypteerRequest.DataOpt) } - Quit ..Response ]]> @@ -169,18 +168,18 @@ } ElseIf (##class(TECH.StringUtils).Contains(##class(TECH.StringUtils).ToLower(DecrypteerRequest.Hostname), "pavanello")) { Set ..Response.PersonalityId = ##class(DOM.common.enu.Personality).Pavanello() Set ..Response.Taal = "I" // niet ##class(DOM.enu.Taal).Italiaans() gebruiken, want dat is 'IT' en niet afgesproken met ITR - Set ..Response.IsContactGegevensFormulierNodig = $$$True - Set ..Response.IsLoginFormulierNodig = $$$False + Set ..Response.IsContactGegevensFormulierNodig = $$$False + Set ..Response.IsLoginFormulierNodig = $$$True Set ..Response.IsGeldig = $$$True Set Resultaat = ..Response.IsGeldig } ElseIf (##class(TECH.StringUtils).Contains(##class(TECH.StringUtils).ToLower(DecrypteerRequest.Hostname), "ferexpert")) { Set ..Response.PersonalityId = ##class(DOM.common.enu.Personality).Ferexpert() Set ..Response.Taal = "I" // niet ##class(DOM.enu.Taal).Italiaans() gebruiken, want dat is 'IT' en niet afgesproken met ITR - Set ..Response.IsContactGegevensFormulierNodig = $$$True - Set ..Response.IsLoginFormulierNodig = $$$False + Set ..Response.IsContactGegevensFormulierNodig = $$$False + Set ..Response.IsLoginFormulierNodig = $$$True Set ..Response.IsGeldig = $$$True - + Set Resultaat = ..Response.IsGeldig } ElseIf (DecrypteerRequest.Hostname = "") { Set ..Response.IsGeldig = $$$False