Index: vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestLogo.cls.xml =================================================================== diff -u -r54278 -r71815 --- vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestLogo.cls.xml (.../TestLogo.cls.xml) (revision 54278) +++ vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestLogo.cls.xml (.../TestLogo.cls.xml) (revision 71815) @@ -4,7 +4,7 @@ vhUnitTest.TestCase -vhTest.Fake.DOM.AKP.Toelevering +vhTest.Mock.DOM.AKP.Toelevering 1 @@ -48,11 +48,6 @@ 1 - -vhTest.Mock.BL.PPS.common.impl.OnderdelendoosLogoBepaler -1 - - APPS.Halux.common.ProductieService 1 @@ -66,7 +61,9 @@ Set ..ToeleveringID = $$$DummyInteger Set ..OrderID = $$$DummyInteger - Set ..ToeleveringStub = ##class(vhTest.Fake.DOM.AKP.Toelevering).%New(..ToeleveringID, $$$DummyInteger, ..OrderID) + Set ..ToeleveringStub = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New() + Do ..ToeleveringStub.IndienMethodCall("GeefOrderID").DanReturn(..OrderID) + Do ..ToeleveringStub.IndienMethodCall("GeefOorsprongKetting").DanReturn("") Set ..ToeleveringAPIStub = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance() Do ..ToeleveringAPIStub.IndienMethodCall("GeefToelevering", ..ToeleveringID).DanReturn(..ToeleveringStub) @@ -82,9 +79,6 @@ Do ..LegacyPartijAPIStub.IndienMethodCall("GeefKlantNummerVoorPartijID",$$$ElkeWaarde).DanReturn($$$DummyString) Set ..DummyKlant = ##class(vhTest.Dummy.DOM.VKP.VanHoeckeKlant).%New() - - Set ..LogoBepalerMock = ##class(vhTest.Mock.BL.PPS.common.impl.OnderdelendoosLogoBepaler).%New() - Do ..LogoBepalerMock.VerwachtMethodCall("GeefLogo",..DummyKlant).DanReturn("DummyLogo") Set ..VerkoopAPIStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).MockInstance() Do ..VerkoopAPIStub.IndienMethodCall("GeefKlant",$$$ElkeWaarde).DanReturn(..DummyKlant) @@ -100,11 +94,9 @@ Index: vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestPalletType.cls.xml =================================================================== diff -u -r54278 -r71815 --- vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestPalletType.cls.xml (.../TestPalletType.cls.xml) (revision 54278) +++ vhUnitTest/BL/PPS/common/impl/OnderdelenEtiketPrinterBase/EtikettenCommissieOne/TestPalletType.cls.xml (.../TestPalletType.cls.xml) (revision 71815) @@ -4,7 +4,7 @@ vhUnitTest.TestCase -vhTest.Fake.DOM.AKP.Toelevering +vhTest.Mock.DOM.AKP.Toelevering 1 @@ -48,11 +48,6 @@ 1 - -vhTest.Mock.BL.PPS.common.impl.OnderdelendoosLogoBepaler -1 - - APPS.Halux.common.ProductieService 1 @@ -66,7 +61,9 @@ Set ..ToeleveringID = $$$DummyInteger Set ..OrderID = $$$DummyInteger - Set ..ToeleveringStub = ##class(vhTest.Fake.DOM.AKP.Toelevering).%New(..ToeleveringID, $$$DummyInteger, ..OrderID) + Set ..ToeleveringStub = ##class(vhTest.Mock.DOM.AKP.Toelevering).%New() + Do ..ToeleveringStub.IndienMethodCall("GeefOrderID").DanReturn(..OrderID) + Do ..ToeleveringStub.IndienMethodCall("GeefOorsprongKetting").DanReturn("") Set ..ToeleveringAPIStub = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).MockInstance() Do ..ToeleveringAPIStub.IndienMethodCall("GeefToelevering", ..ToeleveringID).DanReturn(..ToeleveringStub) @@ -83,9 +80,6 @@ Set ..DummyKlant = ##class(vhTest.Dummy.DOM.VKP.VanHoeckeKlant).%New() - Set ..LogoBepalerMock = ##class(vhTest.Mock.BL.PPS.common.impl.OnderdelendoosLogoBepaler).%New() - Do ..LogoBepalerMock.IndienMethodCall("GeefLogo",..DummyKlant).DanReturn("DummyLogo") - Set ..VerkoopAPIStub = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).MockInstance() Do ..VerkoopAPIStub.IndienMethodCall("GeefKlant",$$$ElkeWaarde).DanReturn(..DummyKlant) @@ -100,7 +94,7 @@ #dim VerzendingWijzeDHL1Dag As %String = "E01" Do ..OrderStub.IndienMethodCall("GeefVerzendingWijze").DanReturn(VerzendingWijzeDHL1Dag) - #dim OnderdelenEtiketPrinterBase As vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass = ##class(vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass).%New(..LogoBepalerMock, ..ProductieService) + #dim OnderdelenEtiketPrinterBase As vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass = ##class(vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass).%New(, ..ProductieService) #dim pxCommissie As BL.PPS.TBX.sub.pxCommissie = OnderdelenEtiketPrinterBase.EtikettenCommissieOne(..ToeleveringID, $$$DummyInteger, $$$DummyString) Do $$$AssertEquals(pxCommissie.PalletType, "WWPALLET") ]]> @@ -111,7 +105,7 @@ #dim StandaardVerzendwijze As %String = "" Do ..OrderStub.IndienMethodCall("GeefVerzendingWijze").DanReturn(StandaardVerzendwijze) - #dim OnderdelenEtiketPrinterBase As vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass = ##class(vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass).%New(..LogoBepalerMock, ..ProductieService) + #dim OnderdelenEtiketPrinterBase As vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass = ##class(vhUnitTest.BL.PPS.common.impl.OnderdelenEtiketPrinterBase.SubClass).%New(, ..ProductieService) #dim pxCommissie As BL.PPS.TBX.sub.pxCommissie = OnderdelenEtiketPrinterBase.EtikettenCommissieOne(..ToeleveringID, $$$DummyInteger, $$$DummyString) Do $$$AssertEquals(pxCommissie.PalletType, "") ]]>