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")
]]>