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