Index: WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml
===================================================================
diff -u -r53152 -r53372
--- WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 53152)
+++ WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar.cls.xml (.../BestelWinkelkar.cls.xml) (revision 53372)
@@ -187,9 +187,22 @@
Set Hoofding.Referentie.CommissieReferentie = BestelWinkelkarRequest.Winkelkar.CommissieReferentie
If (##class(DOM.common.impl.ProjectSettingsAPI).%New().IsActiefVhisieEmailadressenNaarAx()) {
- #dim EmailAdresBevestiging As %String = $$$If(##class(TECH.StringUtils).StartsWith(##class(TECH.StringUtils).ToLower(BestelWinkelkarRequest.Header.EmailAdresBevestiging),"impersonificatie"),"",BestelWinkelkarRequest.Header.EmailAdresBevestiging)
- Set Hoofding.EmailAdresBevestiging = $$$If(##class(TECH.MailUtils).Check(EmailAdresBevestiging),EmailAdresBevestiging,"")
- Set Hoofding.EmailAdresBesteller = $$$If(##class(TECH.MailUtils).Check(BestelWinkelkarRequest.Header.EmailAdresBesteller),BestelWinkelkarRequest.Header.EmailAdresBesteller,"")
+ If (##class(TECH.StringUtils).StartsWith(##class(TECH.StringUtils).ToLower(BestelWinkelkarRequest.Header.EmailAdresBevestiging),"impersonificatie")) ||
+ (##class(TECH.StringUtils).StartsWith(##class(TECH.StringUtils).ToLower(BestelWinkelkarRequest.Header.EmailAdresBevestiging),"multi")) {
+ Set Hoofding.EmailAdresBevestiging = ""
+ } ElseIf $$$Not(##class(TECH.MailUtils).Check(BestelWinkelkarRequest.Header.EmailAdresBevestiging)) {
+ Set Hoofding.EmailAdresBevestiging = ""
+ } Else {
+ Set Hoofding.EmailAdresBevestiging = BestelWinkelkarRequest.Header.EmailAdresBevestiging
+ }
+
+ If (##class(TECH.StringUtils).StartsWith(##class(TECH.StringUtils).ToLower(BestelWinkelkarRequest.Header.EmailAdresBesteller),"multi")) {
+ Set Hoofding.EmailAdresBesteller = ""
+ } ElseIf $$$Not(##class(TECH.MailUtils).Check(BestelWinkelkarRequest.Header.EmailAdresBesteller)) {
+ Set Hoofding.EmailAdresBesteller = ""
+ } Else {
+ Set Hoofding.EmailAdresBesteller = BestelWinkelkarRequest.Header.EmailAdresBesteller
+ }
}
// ALS DE LOGGING WEER WEG MAG, VERGEET DAN NIET DE SPECIAAL HIERVOOR AANGEMAAKTE NIEUWE PROPERTY OfferteIDVoorLogging TERUG TE VERWIJDEREN !!!
Do ##class(vhLib.Logger).%New("Vhisie4EmailAdressen").Debug("EmailAdresBevestiging", "OfferteId: '"_..OfferteIDVoorLogging_"' - Input vanuit Vhisie4 - EmailAdresBevestiging: '"_BestelWinkelkarRequest.Header.EmailAdresBevestiging_"'")
Index: vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml
===================================================================
diff -u -r53267 -r53372
--- vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 53267)
+++ vhUnitTest/WSimpl/Vhisie4/Winkelkar/WinkelkarService/BestelWinkelkar/Test.cls.xml (.../Test.cls.xml) (revision 53372)
@@ -89,6 +89,114 @@
]]>
+
+
+
+
+
+
+
+
+
+
+
+