Index: vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalGewicht/Test.cls.xml =================================================================== diff -u --- vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalGewicht/Test.cls.xml (revision 0) +++ vhUnitTest/APPS/VKP/Offerte/dto/VerpakkingList/GeefTotaalGewicht/Test.cls.xml (revision 37570) @@ -0,0 +1,65 @@ + + + +vhUnitTest.TestCase + + + + + + + + + + + + + + + + Index: APPS/VKP/Offerte/dto/VerpakkingList.cls.xml =================================================================== diff -u -r37568 -r37570 --- APPS/VKP/Offerte/dto/VerpakkingList.cls.xml (.../VerpakkingList.cls.xml) (revision 37568) +++ APPS/VKP/Offerte/dto/VerpakkingList.cls.xml (.../VerpakkingList.cls.xml) (revision 37570) @@ -57,6 +57,8 @@ #dim TotaalGewicht As TECH.Decimal = 0.0 #dim Counter As %Integer = 0 for Counter=1:1:..Count() { + Do ..Valideer(..GetAt(Counter).Gewicht, ..GetAt(Counter).ProductID, "Gewicht") + Do ..Valideer(..GetAt(Counter).Aantal, ..GetAt(Counter).ProductID, "Aantal") Set TotaalGewicht = TotaalGewicht + (..GetAt(Counter).Gewicht * ..GetAt(Counter).Aantal) } Quit TotaalGewicht Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml =================================================================== diff -u -r37567 -r37570 --- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml (.../TestVerpakkingType.cls.xml) (revision 37567) +++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/TAX/TestVerpakkingType.cls.xml (.../TestVerpakkingType.cls.xml) (revision 37570) @@ -93,6 +93,7 @@ #dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New() Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken) Do MaatwerkLijn.ZetVolumeAandeel(0.25) + Do MaatwerkLijn.ZetTotaalGewicht(10) Quit MaatwerkLijn ]]> Index: vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml =================================================================== diff -u -r37567 -r37570 --- vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml (.../TestVerpakkingType.cls.xml) (revision 37567) +++ vhUnitTest/APPS/VKP/impl/OfferteService/VerpakkingConvertor/Converteer/LBX/TestVerpakkingType.cls.xml (.../TestVerpakkingType.cls.xml) (revision 37570) @@ -88,6 +88,7 @@ #dim MaatwerkLijn As vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn = ##class(vhTest.Dummy.DOM.EC.Winkelkar.MaatwerkLijn).%New() Do MaatwerkLijn.ZetIngegevenKenmerken(IngegevenKenmerken) Do MaatwerkLijn.ZetVolumeAandeel(0.25) + Do MaatwerkLijn.ZetTotaalGewicht(10) Quit MaatwerkLijn ]]>