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 + + + + + +