Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml
===================================================================
diff -u -r71842 -r71843
--- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 71842)
+++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 71843)
@@ -62,7 +62,7 @@
Set BatchNaarObjectiveData.AantalLades = ..GeefWaardeOfNull(..GeefAantalLades(Batch, Toelevering))
Set BatchNaarObjectiveData.BatchId = ..GeefWaardeOfNull(Batch.GeefID())
- Set BatchNaarObjectiveData.ProductieLijn = ..GeefWaardeOfNull(Batch.GeefLijn())
+ Set BatchNaarObjectiveData.ProductieLijn = ..GeefWaardeOfNull(..GeefProductieLijn(Batch.GeefID()))
Set BatchNaarObjectiveData.DueBefore = ..GeefWaardeOfNull(..FormateerHorolog(Toelevering.GeefDueOutTime()))
Set BatchNaarObjectiveData.DueOut = ..GeefWaardeOfNull(..FormateerHorolog(Toelevering.GeefDueOutTime()))
@@ -112,6 +112,16 @@
]]>
+
+BatchId:%String
+1
+%Integer
+
+
+
1
Batch:APPS.Halux.common.Batch,Toelevering:DOM.AKP.Toelevering
Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml
===================================================================
diff -u -r71783 -r71843
--- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 71783)
+++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 71843)
@@ -13,10 +13,10 @@
#dim VerzendingWijze As %String = "OD3;1`OD3;3"
#dim VerwachteVerzendingWijzeGeformateerd = "OD3"
#dim KlantId As %String = "1000"
+ #dim LijnNummer As %Integer = 1
#dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New()
- Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(2).DanReturn(BatchId)
- Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanDoeNiks()
+ Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(3).DanReturn(BatchId)
#dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ##class(vhTest.Utils.DOM.AKP.Toelevering).ToeleveringMetLijn()
Do ToeleveringMock.VerwachtMethodCall("GeefAantalProducten").ExactAantalKeer(1).DanDoeNiks()
@@ -28,10 +28,11 @@
Set BatchPitchExported = ##class(APPS.Halux.Planning.Pitching.dto.BatchPitchExported).%New()
Set BatchPitchExported.Volgnummer = BatchPitchExportedVolgnummer
+ Set BatchPitchExported.LijnNummer = LijnNummer
#dim BatchPitchExportedIterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(BatchPitchExported)
Set BatchPitchExportedRepositoryMock = ##class(vhTest.Mock.APPS.Halux.Planning.Pitching.impl.BatchPitchExportedRepository).%New()
- Do BatchPitchExportedRepositoryMock.VerwachtMethodCall("ZoekViaBatchId", BatchId).ExactAantalKeer(1).DanReturn(BatchPitchExportedIterator)
+ Do BatchPitchExportedRepositoryMock.VerwachtMethodCall("ZoekViaBatchId", BatchId).ExactAantalKeer(2).DanReturn(BatchPitchExportedIterator)
#dim OrderMock As vhTest.Mock.DOM.VKP.Order = ##class(vhTest.Mock.DOM.VKP.Order).%New()
Do OrderMock.VerwachtMethodCall("GeefAxSalesId").ExactAantalKeer(1).DanDoeNiks()
@@ -60,6 +61,7 @@
Do $$$AssertEquals(BatchNaarObjectiveData.MultipersonalityKlant1, "null")
Do $$$AssertEquals(BatchNaarObjectiveData.KlantId, "01000")
Do $$$AssertEquals(BatchNaarObjectiveData.ReceptNaam, "Template Lade TLM.Template M1.4")
+ Do $$$AssertEquals(BatchNaarObjectiveData.ProductieLijn, LijnNummer)
Do BatchMock.Verifieer()
Do ToeleveringMock.Verifieer()