Index: BL/PPS/TBX/DocsV1.cls.xml =================================================================== diff -u -r63303 -r63448 --- BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 63303) +++ BL/PPS/TBX/DocsV1.cls.xml (.../DocsV1.cls.xml) (revision 63448) @@ -1583,7 +1583,7 @@ DnaCodeIterator:TECH.Iterator Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml =================================================================== diff -u -r63385 -r63448 --- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 63385) +++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 63448) @@ -57,29 +57,29 @@ " + #dim InhoudAlsHTML As %String = "" Do HtmlInhoudProboxEtiketBepalerMock.VerwachtMethodCall("BepaalHtmlInhoudProboxEtiket", DnaCodeIterator).DanReturn(InhoudAlsHTML) Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() - Set Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding() + #dim Order As DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding() Do Order.IndienMethodCall("GeefVerzendingWijze").DanReturn($$$DummyString) Do OrderAPIMock.VerwachtMethodCall("GeefOrder", ..DnaCode1.OrderId).DanReturn(Order) Set ToeleveringAPIMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).%New() - Set Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding() + #dim Toelevering As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding() Do Toelevering.IndienMethodCall("GeefDueOutTime").DanReturn(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) Do ToeleveringAPIMock.VerwachtMethodCall("GeefToelevering", ..DnaCode1.Toelevering).DanReturn(Toelevering) Set ProboxInhoudEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxInhoudEtiketGenerator).%New(PartijAPIMock, HtmlInhoudProboxEtiketBepalerMock, OrderAPIMock, ToeleveringAPIMock) - Set Device = $$$DummyString - Set Etiket = ProboxInhoudEtiketGenerator.GenereerProboxInhoudEtiket(DnaCodeIterator, Device) + #dim Device As %String = $$$DummyString + #dim Etiket As BL.Etiket.ProboxInhoud = ProboxInhoudEtiketGenerator.GenereerProboxInhoudEtiket(DnaCodeIterator, Device) Do ..AssertTicket(Etiket, Device, Partij, InhoudAlsHTML, Order) @@ -92,29 +92,29 @@ " + #dim InhoudAlsHTML As %String = "" Do HtmlInhoudProboxEtiketBepalerMock.VerwachtMethodCall("BepaalHtmlInhoudProboxEtiket", DnaCodeIterator).DanReturn(InhoudAlsHTML) Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New() - Set Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding() + #dim Order As DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding() Do Order.IndienMethodCall("GeefVerzendingWijze").DanReturn($$$DummyString) Do OrderAPIMock.VerwachtMethodCall("GeefOrder", ..DnaCode1.OrderId).DanReturn(Order) Set ToeleveringAPIMock = ##class(vhTest.Mock.DOM.AKP.ToeleveringAPI).%New() - Set Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding() + #dim Toelevering As DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).StandaardToeleveringHoofding() Do Toelevering.IndienMethodCall("GeefDueOutTime").DanReturn(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog()) Do ToeleveringAPIMock.VerwachtMethodCall("GeefToelevering", ..DnaCode1.Toelevering).DanReturn(Toelevering) Set ProboxInhoudEtiketGenerator = ##class(BL.PPS.TBX.DocsV1.ProboxInhoudEtiketGenerator).%New(PartijAPIMock, HtmlInhoudProboxEtiketBepalerMock, OrderAPIMock, ToeleveringAPIMock) - Set Device = $$$DummyString - Set Etiket = ProboxInhoudEtiketGenerator.GenereerProboxInhoudEtiket(DnaCodeIterator, Device) + #dim Device As %String = $$$DummyString + #dim Etiket As BL.Etiket.ProboxInhoud = ProboxInhoudEtiketGenerator.GenereerProboxInhoudEtiket(DnaCodeIterator, Device) Do ..AssertTicket(Etiket, Device, Partij, InhoudAlsHTML, Order)