Index: vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml =================================================================== diff -u -r63970 -r64265 --- vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml (.../Test.cls.xml) (revision 63970) +++ vhUnitTest/DOM/common/impl/PersonalityService/IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel/Test.cls.xml (.../Test.cls.xml) (revision 64265) @@ -34,7 +34,7 @@ while PersonalityIterator.HasNext() { #dim PersonalityId as %String = PersonalityIterator.Next() - if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup){ + if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleAT,..Personality.HaefeleIT){ Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout") } ElseIf ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.VanHoecke,..Personality.VanHoeckeVoorHalux,..Personality.SFS,..Personality.Kisch,..Personality.Destil,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Noteborn,..Personality.Daro,..Personality.BeslagDesign,..Personality.Demo,..Personality.Galimberti,..Personality.Pavanello,..Personality.Ferexpert,..Personality.Beslagteknikk,..Personality.YachtSupplier,..Personality.DeceuninckDeforce,..Personality.Pierard,..Personality.HahleOy,..Personality.BiemarBois,..Personality.CampeTonny, ..Personality.Dupont) { Do $$$AssertFalse(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout") @@ -61,7 +61,7 @@ while PersonalityIterator.HasNext() { #dim PersonalityId as %String = PersonalityIterator.Next() - if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer, ..Personality.Dupont,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Pavanello,..Personality.Ferexpert){ + if ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.HaefeleNL, ..Personality.Hein, ..Personality.Seefelder, ..Personality.Zweygart,..Personality.JBarth,..Personality.Kleiner,..Personality.Layer, ..Personality.Dupont,..Personality.Rini,..Personality.Furnifit,..Personality.DeBisschop,..Personality.HaefeleDE,..Personality.HaefeleSE,..Personality.HaefeleFI,..Personality.DSGroup,..Personality.HaefeleBE,..Personality.VanRaemdonck,..Personality.Pavanello,..Personality.Ferexpert,,..Personality.HaefeleAT,..Personality.HaefeleIT){ Do $$$AssertTrue(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout") } ElseIf ##class(TECH.StringUtils).Equals(PersonalityId,..Personality.VanHoecke,..Personality.VanHoeckeVoorHalux,..Personality.SFS,..Personality.Kisch,..Personality.Destil,..Personality.Noteborn,..Personality.Daro,..Personality.BeslagDesign,..Personality.Demo,..Personality.Galimberti,..Personality.Beslagteknikk,..Personality.YachtSupplier,..Personality.DeceuninckDeforce,..Personality.Pierard,..Personality.HahleOy,..Personality.BiemarBois,..Personality.CampeTonny) { Do $$$AssertFalse(Service.IsRechtstreekseLeveringDoorVanHoeckeAanKlantVanHandel(PersonalityId),"Personality "_ ##class(DOM.common.enu.Personality).DisplayList().GetAt(PersonalityId) _ " Fout") Index: DOM/common/impl/PersonalityService.cls.xml =================================================================== diff -u -r64263 -r64265 --- DOM/common/impl/PersonalityService.cls.xml (.../PersonalityService.cls.xml) (revision 64263) +++ DOM/common/impl/PersonalityService.cls.xml (.../PersonalityService.cls.xml) (revision 64265) @@ -110,6 +110,8 @@ Quit:(PersonalityID = Personality.HaefeleDE) $$$True Quit:(PersonalityID = Personality.HaefeleSE) $$$True Quit:(PersonalityID = Personality.HaefeleFI) $$$True + Quit:(PersonalityID = Personality.HaefeleIT) $$$True + Quit:(PersonalityID = Personality.HaefeleAT) $$$True Quit:(PersonalityID = Personality.Zweygart) $$$True Quit:(PersonalityID = Personality.JBarth) $$$True Quit:(PersonalityID = Personality.Kleiner) $$$True Index: vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml =================================================================== diff -u -r64098 -r64265 --- vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml (.../Test.cls.xml) (revision 64098) +++ vhUnitTest/DOM/common/impl/PersonalityService/MagOrgaluxVerkopen/Test.cls.xml (.../Test.cls.xml) (revision 64265) @@ -11,7 +11,7 @@ #dim PersonalityIterator as TECH.Iterator = ##class(DOM.common.enu.Personality).ValueListIterator() While PersonalityIterator.HasNext(){ #dim PersonalityID as %String = PersonalityIterator.Next() - if ##class(TECH.StringUtils).Equals(PersonalityID,Personality.SFS,Personality.HaefeleDE,Personality.HaefeleSE,Personality.HaefeleFI,Personality.HaefeleNL,Personality.Kisch) { + if ##class(TECH.StringUtils).Equals(PersonalityID,Personality.SFS,Personality.HaefeleDE,Personality.HaefeleSE,Personality.HaefeleFI,,Personality.HaefeleAT,Personality.HaefeleIT,Personality.HaefeleNL,Personality.Kisch) { Do $$$AssertTrue(Service.MagOrgaluxVerkopen(PersonalityID)) } else { Do $$$AssertFalse(Service.MagOrgaluxVerkopen(PersonalityID))