1 vhUnitTest.APPS.MAG.Inventaris.InventarisService.IntegratieBase %Boolean 0 %String 1000 %String 100 0, "Er zijn redenen ingevuld") #Dim GrootVerpakking As APPS.MAG.Inventaris.dto.ProductVerpakking = CycleCountInfo.GrootVerpakking Do $$$AssertEquals(GrootVerpakking.AantalVerpakkingen, 0, "Aantal grootverpakkingen") Do $$$AssertEquals(GrootVerpakking.AantalInVerpakking, 0, "Aantal in grootverpakking") #Dim KleinVerpakking As APPS.MAG.Inventaris.dto.ProductVerpakking = CycleCountInfo.KleinVerpakking Do $$$AssertEquals(KleinVerpakking.AantalVerpakkingen, 0, "Aantal kleinverpakkingen") Do $$$AssertEquals(KleinVerpakking.AantalInVerpakking, 0, "Aantal in kleinverpakking") #Dim StukVerpakking As APPS.MAG.Inventaris.dto.ProductVerpakking = CycleCountInfo.StukVerpakking Do $$$AssertEquals(StukVerpakking.AantalVerpakkingen, 170, "Aantal stukverpakkingen") Do $$$AssertEquals(StukVerpakking.AantalInVerpakking, 1, "Aantal in stukverpakking") ]]>