Index: BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml =================================================================== diff -u -r63123 -r63124 --- BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml (.../ProboxInhoudEtiketGenerator.cls.xml) (revision 63123) +++ BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator.cls.xml (.../ProboxInhoudEtiketGenerator.cls.xml) (revision 63124) @@ -61,8 +61,10 @@ Set ProboxInhoudLabel.InhoudAlsHTML = ..HtmlInhoudProboxEtiketBepaler.BepaalHtmlInhoudProboxEtiket(DnaCodeIterator) Set ProboxInhoudLabel.PalletBarcode = PalletId Set ProboxInhoudLabel.PalletBarcodeTxt = ..FormatteerPalletID(PalletId) + Set ProboxInhoudLabel.OrderRef = Order.GeefOrderReferentie() Set ProboxInhoudLabel.OrderNr = Order.GeefID() + Set ProboxInhoudLabel.ToeleveringNr = ToeleveringId Set ProboxInhoudLabel.Logo = ..GeefEtiketLogo(KlantNummer) Index: vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml =================================================================== diff -u -r63122 -r63124 --- vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 63122) +++ vhUnitTest/BL/PPS/TBX/DocsV1/ProboxInhoudEtiketGenerator/GenereerProboxInhoudEtiket/Test.cls.xml (.../Test.cls.xml) (revision 63124) @@ -27,6 +27,7 @@ Set ..DnaCode1.ProductNummer = ..#ProductId1 Set ..DnaCode1.KlantNummer = $$$DummyString Set ..DnaCode1.OrderId = $$$DummyString + Set ..DnaCode1.Toelevering = $$$DummyString Set ..DnaCodeIterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(..DnaCode1) ]]> @@ -70,6 +71,7 @@ Do $$$AssertEquals(Etiket.OrderRef, Order.GeefOrderReferentie()) Do $$$AssertEquals(Etiket.OrderNr, Order.GeefID()) + Do $$$AssertEquals(Etiket.ToeleveringNr, ..DnaCode1.Toelevering) Do PartijAPIMock.Verifieer() Do HtmlInhoudProboxEtiketBepalerMock.Verifieer() Index: BL/Etiket/ProboxInhoud.cls.xml =================================================================== diff -u -r63122 -r63124 --- BL/Etiket/ProboxInhoud.cls.xml (.../ProboxInhoud.cls.xml) (revision 63122) +++ BL/Etiket/ProboxInhoud.cls.xml (.../ProboxInhoud.cls.xml) (revision 63124) @@ -44,6 +44,11 @@ + +%String + + + %Status