Index: WS/EC/InterneConfiguratorService.cls.xml =================================================================== diff -u -r33281 -r33450 --- WS/EC/InterneConfiguratorService.cls.xml (.../InterneConfiguratorService.cls.xml) (revision 33281) +++ WS/EC/InterneConfiguratorService.cls.xml (.../InterneConfiguratorService.cls.xml) (revision 33450) @@ -54,7 +54,7 @@ Set:(KlantID="") KlantID = ..GeefKlantID() - Set KlantBepalerVisitor = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.KlantBepaler).%New() + Set KlantBepalerVisitor = ##class(DOM.common.impl.PersonalityKlantBepaler).%New() #dim KlantIDVoorVKW As DOM.common.PartijID = KlantBepalerVisitor.GeefKlantID(Personality, KlantID) #dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantIDVoorVKW) @@ -72,7 +72,7 @@ Set:(KlantID="") KlantID = ..GeefKlantID() - Set KlantBepalerVisitor = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.KlantBepaler).%New() + Set KlantBepalerVisitor = ##class(DOM.common.impl.PersonalityKlantBepaler).%New() #dim KlantIDVoorVKW As DOM.common.PartijID = KlantBepalerVisitor.GeefKlantID(Personality, KlantID) #dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantIDVoorVKW) @@ -89,7 +89,7 @@ #dim KlantID As %String = ..GeefKlantID() - Set KlantBepalerVisitor = ##class(APPS.EC.Winkelkar.WinkelkarService.impl.KlantBepaler).%New() + Set KlantBepalerVisitor = ##class(DOM.common.impl.PersonalityKlantBepaler).%New() #dim KlantIDVoorVKW As DOM.common.PartijID = KlantBepalerVisitor.GeefKlantID(Personality, KlantID) #dim Klant As DOM.VKP.VanHoeckeKlant = ##class(DOM.DomeinContext).Instance().GeefVerkoopAPI().GeefKlant(KlantIDVoorVKW)