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
-
+
+
+
+
+