Index: BL/PR/GA/TandemBox.cls.xml =================================================================== diff -u -r700 -r703 --- BL/PR/GA/TandemBox.cls.xml (.../TandemBox.cls.xml) (revision 700) +++ BL/PR/GA/TandemBox.cls.xml (.../TandemBox.cls.xml) (revision 703) @@ -1962,7 +1962,8 @@ . Set arErrs(i,"DK")=$$$GetVertaling("Draagkracht","L")_" - "_$$$GetVertaling("NietBeschikbaar","O") ; Else - New GeleiderIsUitgefaseerd Set GeleiderIsUitgefaseerd = ##class(APPS.TBXWeb.Utils).IsGeleiderUitgefaseerd(WSLn) + New WebDomein Set WebDomein = $$$LCase($G(%session.Data("DOMAIN"))) + New GeleiderIsUitgefaseerd Set GeleiderIsUitgefaseerd = ##class(APPS.TBXWeb.Utils).IsGeleiderUitgefaseerd(WSLn, WebDomein) If GeleiderIsUitgefaseerd { Set arErrs(i,"DK")=$$$GetVertaling("Draagkracht","L")_" - "_$$$GetVertaling("NietBeschikbaar","O") _ " | 50kg --> 65kg" } Index: APPS/TBXWeb/Utils.cls.xml =================================================================== diff -u -r699 -r703 --- APPS/TBXWeb/Utils.cls.xml (.../Utils.cls.xml) (revision 699) +++ APPS/TBXWeb/Utils.cls.xml (.../Utils.cls.xml) (revision 703) @@ -79,13 +79,22 @@ 1 -WSOrderLijn:WS.TBX.EM.OrderLijn +WSOrderLijn:WS.TBX.EM.OrderLijn,WebDomein:%String 1 %Boolean ($$$DollarHvan20Juni2016-1)) + } + Else { + Set IsGeleiderUitgefaseerd = $$$Not(##class(TECH.StringUtils).Equals(WSOrderLijn.ItemLD, 400, 450, 500, 550, 600, 650)) + } } Quit IsGeleiderUitgefaseerd ]]>