Index: vhUnitTest/WS/EC/TestInterneWinkelkarService.cls.xml
===================================================================
diff -u -r33279 -r33393
--- vhUnitTest/WS/EC/TestInterneWinkelkarService.cls.xml (.../TestInterneWinkelkarService.cls.xml) (revision 33279)
+++ vhUnitTest/WS/EC/TestInterneWinkelkarService.cls.xml (.../TestInterneWinkelkarService.cls.xml) (revision 33393)
@@ -28,7 +28,7 @@
#dim ECommerceAPIStub As vhTest.Mock.APPS.EC.ECommerceAPI = ##class(vhTest.Mock.APPS.EC.ECommerceAPI).MockInstance()
#dim WebshopSessionServiceStub As vhTest.Mock.APPS.EC.WebshopSessionService = ##class(vhTest.Mock.APPS.EC.WebshopSessionService).%New()
- Do WebshopSessionServiceStub.IndienMethodCall("GeefVanHoeckeSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
+ Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
]]>
Index: APPS/EC/Winkelkar/impl/LijnPrijsBepaler.cls.xml
===================================================================
diff -u -r33392 -r33393
--- APPS/EC/Winkelkar/impl/LijnPrijsBepaler.cls.xml (.../LijnPrijsBepaler.cls.xml) (revision 33392)
+++ APPS/EC/Winkelkar/impl/LijnPrijsBepaler.cls.xml (.../LijnPrijsBepaler.cls.xml) (revision 33393)
@@ -28,6 +28,11 @@
1
+
+APPS.EC.enu.WebshopModus.AutoComplete
+1
+
+
VerkoopPrijsBepaler:APPS.EC.VerkoopPrijsBepaler=""
%Status
@@ -51,49 +56,55 @@
#dim Personality As DOM.common.Personality = ##class(DOM.DomeinContext).Instance().GeefCommonAPI().GeefPersonality(PersonalityID)
Do Personality.Accept(##this)
+ Do ..PasAanPrijzen(..WebshopSessionService.GeefSessie(..SessieID))
}
]]>
-
-SFSPersonality:DOM.common.SFSPersonality
+
+Sessie:APPS.EC.WebshopSessie
+1
-
-HaefeleBEPersonality:DOM.common.HaefeleBEPersonality
-
-
-
-VanHoeckePersonality:DOM.common.VanHoeckePersonality
+
+1
-
-WebshopModus:APPS.EC.enu.WebshopModus
+
1
+
+SFSPersonality:DOM.common.SFSPersonality
+
+
+
+HaefeleBEPersonality:DOM.common.HaefeleBEPersonality
+
+
+
+VanHoeckePersonality:DOM.common.VanHoeckePersonality
+
+
VanHoeckVoorHaluxPersonality:DOM.common.VanHoeckeVoorHaluxPersonality
-
Index: vhUnitTest/APPS/EC/ExterneVerkoopService/Base.cls.xml
===================================================================
diff -u -r33337 -r33393
--- vhUnitTest/APPS/EC/ExterneVerkoopService/Base.cls.xml (.../Base.cls.xml) (revision 33337)
+++ vhUnitTest/APPS/EC/ExterneVerkoopService/Base.cls.xml (.../Base.cls.xml) (revision 33393)
@@ -146,9 +146,8 @@
#dim WebshopSessionServiceStub As vhTest.Mock.APPS.EC.WebshopSessionService = ##class(vhTest.Mock.APPS.EC.WebshopSessionService).%New()
Do WebshopSessionServiceStub.IndienMethodCall("GeefWebshopModus").DanReturn(##class(APPS.EC.enu.WebshopModus).Normaal())
- Do WebshopSessionServiceStub.IndienMethodCall("GeefVanHoeckeSessie", $$$DummySessieID).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
- Do WebshopSessionServiceStub.IndienMethodCall("GeefSFSSessie", "").DanReturn(##class(APPS.EC.impl.SFSWebshopSessie).%New($$$DummyString))
- Do WebshopSessionServiceStub.IndienMethodCall("BestaatWebshopSessie", $$$DummySessieID).DanReturn(1)
+ Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", $$$DummySessieID).DanReturn(##class(APPS.EC.impl.WebshopSessie).%New($$$DummyString))
+ Do WebshopSessionServiceStub.IndienMethodCall("BestaatWebshopSessie", $$$DummySessieID).DanReturn($$$True)
Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
Index: APPS/EC/impl/WebshopSessionService.cls.xml
===================================================================
diff -u -r33392 -r33393
--- APPS/EC/impl/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33392)
+++ APPS/EC/impl/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33393)
@@ -1,7 +1,7 @@
-TECH.Mockable,APPS.EC.WebshopSessionService
+TECH.RegisteredObject,APPS.EC.WebshopSessionService
LoginParameters:WSimpl.Unishop.Login.Parameters
@@ -24,20 +24,13 @@
]]>
-
+
SessieID:%String
-APPS.EC.VanHoeckeWebshopSessie
+APPS.EC.WebshopSessie
-
-SessieID:%String
-APPS.EC.HandelWebshopSessie
-
-
-
DomeinVerwerker:APPS.EC.enu.WebShopVerwerker
DOM.common.enu.Personality
Index: APPS/EC/WebshopSessionService.cls.xml
===================================================================
diff -u -r33392 -r33393
--- APPS/EC/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33392)
+++ APPS/EC/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33393)
@@ -24,19 +24,12 @@
-
+
1
SessieID:%String
-APPS.EC.VanHoeckeWebshopSessie
-
+APPS.EC.WebshopSessie
-
-1
-SessieID:%String
-APPS.EC.HandelWebshopSessie
-
-
1
APPS.EC.enu.WebshopModus
FishEye: Tag 33393 refers to a dead (removed) revision in file `vhTest/Mock/APPS/EC/impl/WebshopSessionService.cls.xml'.
FishEye: No comparison available. Pass `N' to diff?
Index: vhTest/Mock/APPS/EC/WebshopSessionService.cls.xml
===================================================================
diff -u -r33392 -r33393
--- vhTest/Mock/APPS/EC/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33392)
+++ vhTest/Mock/APPS/EC/WebshopSessionService.cls.xml (.../WebshopSessionService.cls.xml) (revision 33393)
@@ -22,24 +22,17 @@
]]>
-
-SessieID:%String
-APPS.EC.HandelWebshopSessie
-
-
-
DomeinVerwerker:APPS.EC.enu.WebShopVerwerker
DOM.common.enu.Personality
-
+
SessieID:%String
-APPS.EC.VanHoeckeWebshopSessie
-APPS.EC.WebshopSessie
+
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml
===================================================================
diff -u -r33279 -r33393
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml (.../TestVanHoecke.cls.xml) (revision 33279)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestVanHoecke.cls.xml (.../TestVanHoecke.cls.xml) (revision 33393)
@@ -65,7 +65,7 @@
#dim ECommerceAPIStub As vhTest.Mock.APPS.EC.ECommerceAPI = ##class(vhTest.Mock.APPS.EC.ECommerceAPI).MockInstance()
#dim WebshopSessionServiceStub As vhTest.Mock.APPS.EC.WebshopSessionService = ##class(vhTest.Mock.APPS.EC.WebshopSessionService).%New()
- Do WebshopSessionServiceStub.IndienMethodCall("GeefVanHoeckeSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
+ Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
#dim MailAPI As vhUnitTest.TECH.Mail.impl.MailAPIMock = ##class(vhUnitTest.TECH.Mail.impl.MailAPIMock).MockInstance()
Index: vhUnitTest/APPS/VKP/TestVerkoopService.cls.xml
===================================================================
diff -u -r33279 -r33393
--- vhUnitTest/APPS/VKP/TestVerkoopService.cls.xml (.../TestVerkoopService.cls.xml) (revision 33279)
+++ vhUnitTest/APPS/VKP/TestVerkoopService.cls.xml (.../TestVerkoopService.cls.xml) (revision 33393)
@@ -16,7 +16,7 @@
#dim WebshopSessionServiceStub = ##class(vhTest.Mock.APPS.EC.WebshopSessionService).%New()
#dim ECommerceAPIStub As vhTest.Mock.APPS.EC.ECommerceAPI = ##class(vhTest.Mock.APPS.EC.ECommerceAPI).MockInstance()
- Do WebshopSessionServiceStub.IndienMethodCall("GeefVanHoeckeSessie",##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(VanHoeckeWebshopSessie)
+ Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(VanHoeckeWebshopSessie)
Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
Set ..WinkelkarService = ##class(APPS.EC.Winkelkar.impl.WinkelkarService).%New()
Index: vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml
===================================================================
diff -u -r32363 -r33393
--- vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml (.../TestHandel.cls.xml) (revision 32363)
+++ vhUnitTest/APPS/EC/Winkelkar/WinkelkarService/TestHandel.cls.xml (.../TestHandel.cls.xml) (revision 33393)
@@ -49,10 +49,12 @@
aTestName:%String
@@ -81,7 +83,7 @@
Set SFSFictievePrijsSessie = ##class(APPS.EC.impl.SFSWebshopSessie).%New( $$$DummyString )
Do SFSFictievePrijsSessie.ZetWebshopModus( ##class(APPS.EC.enu.WebshopModus).FictievePrijs() )
#Dim WebshopSessionServiceFake As vhTest.Mock.APPS.EC.WebshopSessionService = ##class(APPS.ApplicatieContext).Instance().GeefECommerceAPI().GeefWebshopSessionService()
- Do WebshopSessionServiceFake.IndienMethodCall( "GeefSFSSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID() ).DanReturn( SFSFictievePrijsSessie )
+ Do WebshopSessionServiceFake.IndienMethodCall( "GeefHandelSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID() ).DanReturn( SFSFictievePrijsSessie )
Do WebshopSessionServiceFake.IndienMethodCall( "BestaatWebshopSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID() ).DanReturn( 1 )
#dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = ##class(DOM.EC.Winkelkar.MaatwerkLijn).%New()
Index: APPS/EC/enu/WebshopModus/AutoComplete.cls.xml
===================================================================
diff -u
--- APPS/EC/enu/WebshopModus/AutoComplete.cls.xml (revision 0)
+++ APPS/EC/enu/WebshopModus/AutoComplete.cls.xml (revision 33393)
@@ -0,0 +1,56 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration
+serial
+1
+%SerialObject
+
+
+APPS.EC.enu.WebshopModus
+"AdviesPrijs"
+1
+1
+
+
+
+APPS.EC.enu.WebshopModus
+"AlleenLezen"
+1
+1
+
+
+
+APPS.EC.enu.WebshopModus
+"FictievePrijs"
+1
+1
+
+
+
+APPS.EC.enu.WebshopModus
+"Normaal"
+1
+1
+
+
+
+APPS.EC.enu.WebshopModus
+"START"
+1
+1
+
+
+
+APPS.EC.enu.WebshopModus
+"Vrijgave"
+1
+1
+
+
+
+
+
Index: APPS/EC/impl/WebshopSessie.cls.xml
===================================================================
diff -u -r29059 -r33393
--- APPS/EC/impl/WebshopSessie.cls.xml (.../WebshopSessie.cls.xml) (revision 29059)
+++ APPS/EC/impl/WebshopSessie.cls.xml (.../WebshopSessie.cls.xml) (revision 33393)
@@ -1,7 +1,6 @@
-1
persistent
TECH.Persistent,APPS.EC.WebshopSessie
FishEye: Tag 33393 refers to a dead (removed) revision in file `vhTest/Fake/APPS/EC/impl/WebshopSessionService.cls.xml'.
FishEye: No comparison available. Pass `N' to diff?
Index: APPS/EC/enu/WebshopModus.cls.xml
===================================================================
diff -u -r29059 -r33393
--- APPS/EC/enu/WebshopModus.cls.xml (.../WebshopModus.cls.xml) (revision 29059)
+++ APPS/EC/enu/WebshopModus.cls.xml (.../WebshopModus.cls.xml) (revision 33393)
@@ -3,7 +3,7 @@
datatype
1
-%String
+TECH.Enumeration
,Normaal,AdviesPrijs,AlleenLezen,START,Vrijgave,FictievePrijs
@@ -15,37 +15,42 @@
1
+APPS.EC.enu.WebshopModus
1
+APPS.EC.enu.WebshopModus
1
+APPS.EC.enu.WebshopModus
1
+APPS.EC.enu.WebshopModus
1
+APPS.EC.enu.WebshopModus
1
-%String
+APPS.EC.enu.WebshopModus
Index: vhUnitTest/APPS/EC/TestInterneVerkoopService.cls.xml
===================================================================
diff -u -r33337 -r33393
--- vhUnitTest/APPS/EC/TestInterneVerkoopService.cls.xml (.../TestInterneVerkoopService.cls.xml) (revision 33337)
+++ vhUnitTest/APPS/EC/TestInterneVerkoopService.cls.xml (.../TestInterneVerkoopService.cls.xml) (revision 33393)
@@ -24,15 +24,15 @@
Index: vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/Base.cls.xml
===================================================================
diff -u -r33279 -r33393
--- vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/Base.cls.xml (.../Base.cls.xml) (revision 33279)
+++ vhUnitTest/APPS/EC/Winkelkar/impl/WinkelkarService/Base.cls.xml (.../Base.cls.xml) (revision 33393)
@@ -41,7 +41,7 @@
#dim ECommerceAPIStub As vhTest.Mock.APPS.EC.ECommerceAPI = ##class(vhTest.Mock.APPS.EC.ECommerceAPI).MockInstance()
#dim WebshopSessionServiceStub As vhTest.Mock.APPS.EC.WebshopSessionService = ##class(vhTest.Mock.APPS.EC.WebshopSessionService).%New()
- Do WebshopSessionServiceStub.IndienMethodCall("GeefVanHoeckeSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
+ Do WebshopSessionServiceStub.IndienMethodCall("GeefSessie", ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()).DanReturn(##class(APPS.EC.impl.VanHoeckeWebshopSessie).%New($$$DummyString))
Do ECommerceAPIStub.IndienMethodCall("GeefWebshopSessionService").DanReturn(WebshopSessionServiceStub)
]]>
Index: APPS/EC/enu/WebshopModus/Verwerker.cls.xml
===================================================================
diff -u
--- APPS/EC/enu/WebshopModus/Verwerker.cls.xml (revision 0)
+++ APPS/EC/enu/WebshopModus/Verwerker.cls.xml (revision 33393)
@@ -0,0 +1,72 @@
+
+
+
+
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration
+1
+1
+
+
+1
+WebshopModus:APPS.EC.enu.WebshopModus
+
+
+
+
+1
+1
+
+
+
+
+1
+1
+
+
+
+
+1
+1
+
+
+
+
+1
+1
+
+
+
+
+1
+1
+
+
+
+
+1
+1
+
+
+
+
+
+