Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml =================================================================== diff -u -r69502 -r69504 --- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 69502) +++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 69504) @@ -234,6 +234,59 @@ ]]> + +" + Do HtmlInhoudProboxEtiketBepalerMock.VerwachtMethodCall("BepaalHtmlInhoudProboxEtiket", DnaCodeIterator).DanReturn(InhoudAlsHTML) + + #dim KlantOrderNummer As %String = "55000000" + #dim DocRef As DOM.VKP.DocumentReferenties = ##class(DOM.VKP.DocumentReferenties).%New() + Set DocRef.KlantOrderNummer = KlantOrderNummer + + Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() + #dim Order As DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding() + Do Order.IndienMethodCall("GeefVerzendingWijze").DanReturn($$$DummyString) + Do Order.IndienMethodCall("GeefDocumentReferenties").DanReturn(DocRef) + Do OrderAPIMock.VerwachtMethodCall("GeefOrder", ..DnaCode1.OrderId).DanReturn(Order) + + #dim Toelevering As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding() + #dim CurrentHorolog As TECH.String = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog() + Set ToeleveringAPIMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).%New() + Do Toelevering.IndienMethodCall("GeefDueOutTime").DanReturn(CurrentHorolog) + Do ToeleveringAPIMock.VerwachtMethodCall("BestaatToelevering", $$$DummyString).DanReturn($$$True) + Do ToeleveringAPIMock.VerwachtMethodCall("GeefToelevering", ..DnaCode1.Toelevering).DanReturn(Toelevering) + + Set VerkoopAPIMock = ##class(vhTest.Mock.DOM.VKP.VerkoopAPI).%New() + #dim Klant As TECH.RegisteredObject = $$$DummyObject + Do VerkoopAPIMock.VerwachtMethodCall("GeefKlant", ..DnaCode1.KlantNummer).DanReturn(Klant) + + Set LogoBepalerMock = ##class(vhTest.Mock.BL.PPS.common.impl.OnderdelendoosLogoBepaler).%New() + #dim Logo As %String = "logo\"_$$$DummyString + Do LogoBepalerMock.VerwachtMethodCall("GeefLogo", Klant).DanReturn(Logo) + + Set ProboxInhoudEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxInhoudEtiketGenerator).%New(PartijAPIMock, HtmlInhoudProboxEtiketBepalerMock, OrderAPIMock, ToeleveringAPIMock, VerkoopAPIMock, LogoBepalerMock) + #dim Device As %String = $$$DummyString + #dim Etiket As BL.Etiket.ProboxInhoud = ProboxInhoudEtiketGenerator.GenereerProboxInhoudEtiket(DnaCodeIterator, Device) + + Do ..AssertTicket(Etiket, Device, Partij, InhoudAlsHTML, Order, $translate($$EXTDATE^vhLib.DataTypes(CurrentHorolog,"DW"),"/",""), Logo, KlantOrderNummer) + + Do PartijAPIMock.Verifieer() + Do HtmlInhoudProboxEtiketBepalerMock.Verifieer() + Do OrderAPIMock.Verifieer() + Do ToeleveringAPIMock.Verifieer() + Do VerkoopAPIMock.Verifieer() + Do LogoBepalerMock.Verifieer() +]]> + + Etiket:BL.Etiket.ProboxInhoud,Device:%String,Partij:DOM.PARTIJ.Partij,InhoudAlsHTML:%String,Order:DOM.VKP.Order,ProductieWeek:%String,Logo:%String,KlantOrderNummer:%String="" 1