Index: APPS/VKP/impl/OfferteService.cls.xml =================================================================== diff -u -r33765 -r33784 --- APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 33765) +++ APPS/VKP/impl/OfferteService.cls.xml (.../OfferteService.cls.xml) (revision 33784) @@ -269,12 +269,26 @@ #dim MaatwerkLijnIterator As TECH.Iterator = ..GeefMaatwerkLijnenIterator(..OfferteRepository.GeefViaID(OfferteID)) While (MaatwerkLijnIterator.HasNext()) { #dim Lijn As DOM.EC.Winkelkar.MaatwerkLijn = MaatwerkLijnIterator.Next() - #dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New("",Lijn.GeefTotaalGewicht(),Lijn.GeefTotaalPrijs(),Lijn.GeefProductID(),Lijn.GeefAantal()) + #dim Afmeting As APPS.TRANSP.OfferteService.dto.Afmeting = ..ConverteerVerpakteAfmeting(Lijn.GeefVerpakteAfmeting()) + #dim Verpakking As APPS.VKP.Offerte.dto.Verpakking = ##class(APPS.VKP.Offerte.dto.Verpakking).%New(Afmeting ,Lijn.GeefTotaalGewicht(),Lijn.GeefTotaalPrijs(),Lijn.GeefProductID(),Lijn.GeefAantal()) Do VerpakkingList.Insert(Verpakking) } Quit VerpakkingList ]]> + + +VerpakteAfmeting:APPS.Halux.common.impl.VerpakteAfmeting="" +APPS.TRANSP.OfferteService.dto.Afmeting + + Index: vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml =================================================================== diff -u -r33748 -r33784 --- vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml (.../Test.cls.xml) (revision 33748) +++ vhUnitTest/APPS/VKP/impl/OfferteService/GeefProductVerpakkingDetails/Test.cls.xml (.../Test.cls.xml) (revision 33784) @@ -3,7 +3,7 @@ vhUnitTest.TestCase - + + + + +