Index: vhUnitTest/APPS/EC/impl/WebshopSessieFactory/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/APPS/EC/impl/WebshopSessieFactory/Test.cls.xml (revision 0)
+++ vhUnitTest/APPS/EC/impl/WebshopSessieFactory/Test.cls.xml (revision 36421)
@@ -0,0 +1,80 @@
+
+
+
+vhUnitTest.TestCase
+
+
+APPS.EC.impl.WebshopSessieFactory
+1
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+Personality:DOM.common.HandelPersonality,VerwachteKlasseNaam:TECH.String
+1
+
+
+
+
+Personality:DOM.common.HandelPersonality
+1
+
+
+
+
+
+
Index: vhUnitTest/APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter/Test.cls.xml
===================================================================
diff -u -r33288 -r36421
--- vhUnitTest/APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter/Test.cls.xml (.../Test.cls.xml) (revision 33288)
+++ vhUnitTest/APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter/Test.cls.xml (.../Test.cls.xml) (revision 36421)
@@ -3,41 +3,65 @@
vhUnitTest.TestCase
+
+APPS.EC.impl.WebshopSessieGenerator.LoginParametersNaarSessieConverter
+1
+
+
-
-PersonalityID:DOM.common.enu.Personality
-1
+
Index: APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml
===================================================================
diff -u -r36420 -r36421
--- APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml (.../LoginParametersNaarSessieConverter.cls.xml) (revision 36420)
+++ APPS/EC/impl/WebshopSessieGenerator/LoginParametersNaarSessieConverter.cls.xml (.../LoginParametersNaarSessieConverter.cls.xml) (revision 36421)
@@ -13,6 +13,24 @@
1
+
+APPS.EC.impl.WebshopSessieFactory
+1
+
+
+
+WebshopSessieFactory:APPS.EC.impl.WebshopSessieFactory=""
+1
+1
+%Status
+1
+
+
+
LoginParameters:WSimpl.Unishop.Login.Parameters
APPS.EC.WebshopSessie
@@ -67,7 +85,10 @@
Do ..BewaarKlant(HandelPersonality,KlantData)
}
- Set ..WebshopSessie = ##class(APPS.EC.impl.DestilWebshopSessie).%New(GebruikerID)
+ Set ..WebshopSessie = ..WebshopSessieFactory.GeefWebshopSessie(HandelPersonality.GeefID(), GebruikerID)
+
+ Do ##class(Tools.Wlip).%New(42).String("=====>" _ ..WebshopSessie)
+
Do ..WebshopSessie.ZetKlant(KlantID)
]]>
@@ -108,11 +129,7 @@
HeinPersonality:DOM.common.HeinPersonality
-
Index: APPS/EC/impl/WebshopSessieFactory.cls.xml
===================================================================
diff -u
--- APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 0)
+++ APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 36421)
@@ -0,0 +1,91 @@
+
+
+
+TECH.Mockable,DOM.common.PersonalityUnishopVisitor
+
+
+APPS.EC.HandelWebshopSessie
+1
+
+
+
+TECH.String
+1
+
+
+
+Personality:DOM.common.HandelPersonality,GebruikerId:TECH.String
+APPS.EC.HandelWebshopSessie
+
+
+
+
+DestilPersonality:DOM.common.DestilPersonality
+
+
+
+
+DupontPersonality:DOM.common.DupontPersonality
+
+
+
+
+HeinPersonality:DOM.common.HeinPersonality
+
+
+
+
+DaroPersonality:DOM.common.DaroPersonality
+
+
+
+
+HaefeleBEPersonality:DOM.common.HaefeleBEPersonality
+
+
+
+
+KischPersonality:DOM.common.KischPersonality
+
+
+
+
+SFSPersonality:DOM.common.SFSPersonality
+
+
+
+
+VanHoeckePersonality:DOM.common.VanHoeckePersonality
+
+
+
+
+VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality
+
+
+
+
+Personality:DOM.common.HandelPersonality
+1
+
+
+
+
+
+
Index: APPS/EC/impl/WebshopSessieGenerator/SessieNaarDtoConverter.cls.xml
===================================================================
diff -u -r36420 -r36421
--- APPS/EC/impl/WebshopSessieGenerator/SessieNaarDtoConverter.cls.xml (.../SessieNaarDtoConverter.cls.xml) (revision 36420)
+++ APPS/EC/impl/WebshopSessieGenerator/SessieNaarDtoConverter.cls.xml (.../SessieNaarDtoConverter.cls.xml) (revision 36421)
@@ -17,7 +17,7 @@
WebshopSessie:APPS.EC.impl.WebshopSessie
APPS.EC.dto.WebshopSessie
HeinPersonality:DOM.common.HeinPersonality
-
Index: vhTest/Mock/APPS/EC/impl/WebshopSessieFactory.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 0)
+++ vhTest/Mock/APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 36421)
@@ -0,0 +1,75 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+Inheritance van meerdere TECH.Interface interfaces resulteert nog niet in een mockklasse met overeenkomstige inheritance-structuur.
+1
+APPS.EC.impl.WebshopSessieFactory,Tools.Mock.MockClassBase
+right
+
+
+Personality:DOM.common.HandelPersonality,GebruikerId:TECH.String
+APPS.EC.HandelWebshopSessie
+
+
+
+
+DaroPersonality:DOM.common.DaroPersonality
+
+
+
+
+DestilPersonality:DOM.common.DestilPersonality
+
+
+
+
+DupontPersonality:DOM.common.DupontPersonality
+
+
+
+
+HaefeleBEPersonality:DOM.common.HaefeleBEPersonality
+
+
+
+
+HeinPersonality:DOM.common.HeinPersonality
+
+
+
+
+KischPersonality:DOM.common.KischPersonality
+
+
+
+
+SFSPersonality:DOM.common.SFSPersonality
+
+
+
+
+VanHoeckePersonality:DOM.common.VanHoeckePersonality
+
+
+
+
+VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality
+
+
+
+
+
+
Index: vhTest/Fake/APPS/EC/impl/WebshopSessieFactory.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 0)
+++ vhTest/Fake/APPS/EC/impl/WebshopSessieFactory.cls.xml (revision 36421)
@@ -0,0 +1,73 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+1
+APPS.EC.impl.WebshopSessieFactory
+
+
+Personality:DOM.common.HandelPersonality,GebruikerId:TECH.String
+APPS.EC.HandelWebshopSessie
+
+
+
+
+DaroPersonality:DOM.common.DaroPersonality
+
+
+
+
+DestilPersonality:DOM.common.DestilPersonality
+
+
+
+
+DupontPersonality:DOM.common.DupontPersonality
+
+
+
+
+HaefeleBEPersonality:DOM.common.HaefeleBEPersonality
+
+
+
+
+HeinPersonality:DOM.common.HeinPersonality
+
+
+
+
+KischPersonality:DOM.common.KischPersonality
+
+
+
+
+SFSPersonality:DOM.common.SFSPersonality
+
+
+
+
+VanHoeckePersonality:DOM.common.VanHoeckePersonality
+
+
+
+
+VanRaemdonckPersonality:DOM.common.VanRaemdonckPersonality
+
+
+
+
+
+