Index: vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml =================================================================== diff -u -r74689 -r75007 --- vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 74689) +++ vhUnitTest/APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator/DataVoorToeleveringGenerator/GenereerData/Test.cls.xml (.../Test.cls.xml) (revision 75007) @@ -47,7 +47,6 @@ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanReturn(LijnNummer) - Do BatchMock.VerwachtMethodCall("GeefProductieGroep").DanReturn("") #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1) @@ -113,6 +112,8 @@ If ($$$AssertTrue($IsObject(GebruikersVelden.NumeriekeVelden))) { #dim NumeriekeVelden As APPS.Halux.PPS.Document.impl.common.BatchNaarObjective.dto.BatchNaarObjectiveNumeriekeVelden = GebruikersVelden.NumeriekeVelden Do $$$AssertEquals(NumeriekeVelden.BerekendeVolumeEenheden, 0) + Do $$$AssertEquals(NumeriekeVelden.AantalGrotePalletten, 0) + Do $$$AssertEquals(NumeriekeVelden.AantalKleinePalletten, 0) } If ($$$AssertTrue($IsObject(GebruikersVelden.Vlag))) { @@ -144,8 +145,7 @@ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) - Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanReturn(LijnNummer) - Do BatchMock.VerwachtMethodCall("GeefProductieGroep").DanReturn("") + Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanReturn(LijnNummer) #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1) @@ -272,7 +272,6 @@ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanReturn(LijnNummer) - Do BatchMock.VerwachtMethodCall("GeefProductieGroep").DanReturn("") #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1, OorspronKeeting) @@ -343,7 +342,6 @@ #dim BatchMock As vhTest.Mock.APPS.Halux.common.Batch = ##class(vhTest.Mock.APPS.Halux.common.Batch).%New() Do BatchMock.VerwachtMethodCall("GeefID").ExactAantalKeer(1).DanReturn(..#BatchId) Do BatchMock.VerwachtMethodCall("GeefLijn").ExactAantalKeer(1).DanReturn(LijnNummer) - Do BatchMock.VerwachtMethodCall("GeefProductieGroep").DanReturn("") #dim ToeleveringMock As vhTest.Mock.DOM.AKP.Toelevering = ..GeefToeleveringMock(..#ToeleveringId, ..#AantalLades, ..#Horolog, 1, OorspronKeeting) @@ -410,6 +408,11 @@ Do ToeleveringMock.VerwachtMethodCall("GeefOrderID").DanReturn(OrderId) Do ToeleveringMock.VerwachtMethodCall("GeefOorsprongKetting").DanReturn(OorsprongKetting) + #dim IteratorMock As TECH.Iterator = ##class(vhTest.Mock.TECH.Iterator).%New() + Do IteratorMock.IndienMethodCall("Reset").DanDoeNiks() + Do IteratorMock.IndienMethodCall("HasNext").DanReturn($$$False) + Do ToeleveringMock.VerwachtMethodCall("GeefTypeToeleveringLijnIterator", "KTRPL").DanReturn(IteratorMock) + Quit ToeleveringMock ]]> Index: APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml =================================================================== diff -u -r74993 -r75007 --- APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 74993) +++ APPS/Halux/PPS/Document/impl/common/BatchNaarObjective/HoofdDataGenerator.cls.xml (.../HoofdDataGenerator.cls.xml) (revision 75007) @@ -486,8 +486,6 @@ %Integer - + Toelevering:DOM.AKP.Toelevering,AantalVolumeEenheden:%Integer,AllesMoetOpHalvePaletten:%Boolean 1 %Integer @@ -527,7 +525,7 @@ ]]> - + Toelevering:DOM.AKP.Toelevering,AantalVolumeEenheden:%Integer,AllesMoetOpHalvePaletten:%Boolean 1 %Integer @@ -536,7 +534,7 @@ #dim VerpakkingsTypeToelevering As %String = ..GeefVerpakkingsTypeVanToelevering(Toelevering) If (..HeeftVerpakkingsTypeOpPallet(VerpakkingsTypeToelevering)) { - If (VerpakkingsTypeToelevering = "Probox") { + If (..HeeftVerpakkingsTypeProbox(VerpakkingsTypeToelevering)) { If (AllesMoetOpHalvePaletten) { Set AantalPalletten = AantalVolumeEenheden } Else { @@ -557,6 +555,14 @@ ]]> + +VerpakkingsType:%String +1 +%Boolean + + + Toelevering:DOM.AKP.Toelevering