Index: vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml =================================================================== diff -u -r37133 -r37134 --- vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml (.../Test.cls.xml) (revision 37133) +++ vhUnitTest/WSimpl/Halux/PPS/Verpakking/TAXFlatpackV1Controle/OnderdelenBepaler/BepalerVoorLadeOnderdeel/Test.cls.xml (.../Test.cls.xml) (revision 37134) @@ -8,13 +8,13 @@ 1 - -TECH.String + +TECH.Weight 1 - -TECH.Weight + +TECH.String 1 @@ -28,9 +28,9 @@ Do ##super() Set ..Aantal = 1 + Set ..Gewicht = 100000 Set ..DummyRol = "DummyRol" - Set ..DummyGewicht = 100000 Set ..DummyKleurCode = "DummyKleurCode" ]]> @@ -41,7 +41,7 @@ #dim Locatie As TECH.String = "" #dim PlaatMock As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat).%New() - Do PlaatMock.VerwachtMethodCall("GeefGewicht").DanReturn(..DummyGewicht) + Do PlaatMock.VerwachtMethodCall("GeefGewicht").DanReturn(..Gewicht) #dim Platen As DOM.PM.Maatwerk.LadeInfo.Platen = ##class(DOM.PM.Maatwerk.LadeInfo.Platen).%New() Do Platen.Insert(PlaatMock) @@ -51,7 +51,7 @@ #dim Iterator As TECH.Iterator = ##class(TECH.ListUtils).CreateIteratorOfObjects(LadeOnderdeelMock) #dim ProductData As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.data.ProductData = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.data.ProductData).%New() - Set ProductData.Gewicht = ..DummyGewicht + Set ProductData.Gewicht = ..Gewicht #dim ProductDataRepositoryMock As vhTest.Mock.TECH.Persistentie.Repository = ##class(vhTest.Mock.TECH.Persistentie.Repository).%New() Do ProductDataRepositoryMock.VerwachtMethodCall("Maak").DanReturn(ProductData) @@ -82,7 +82,7 @@ #dim Tolerantie As TECH.Decimal = 0.05 #dim PlaatStub As vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat = ##class(vhTest.Mock.DOM.PM.Maatwerk.LadeInfo.Plaat).%New() - Do PlaatStub.IndienMethodCall("GeefGewicht").DanReturn(..DummyGewicht) + Do PlaatStub.IndienMethodCall("GeefGewicht").DanReturn(..Gewicht) #dim Platen As DOM.PM.Maatwerk.LadeInfo.Platen = ##class(DOM.PM.Maatwerk.LadeInfo.Platen).%New() Do Platen.Insert(PlaatStub) @@ -106,7 +106,6 @@ #dim BepalerVoorLadeOnderdeel As WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel = ##class(WSimpl.Halux.PPS.Verpakking.TAXFlatpackV1Controle.OnderdelenBepaler.BepalerVoorLadeOnderdeel).%New(OnderdeelFactory, "", KleurcodeStringBepalerStub, TolerantieBepalerStub) #dim Onderdelen As %ListOfObjects = BepalerVoorLadeOnderdeel.GeefOnderdelen(Iterator, ..DummyRol) #dim Onderdeel As WS.Halux.PPS.Verpakking.TAXFlatpackV1Controle.Onderdeel = Onderdelen.GetAt(1) - #dim VerwachteTolerantie As TECH.Weight = ..DummyGewicht * Tolerantie Do $$$AssertEquals(Onderdeel.Tolerantie, 5000000, "Tolerantie in milligram") ]]>