Index: APPS/VKP/impl/OfferteService.cls.xml
===================================================================
diff -u -r37519 -r37524
--- APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 37519)
+++ APPS/VKP/impl/OfferteService.cls.xml	(.../OfferteService.cls.xml)	(revision 37524)
@@ -293,6 +293,7 @@
 		Set Verpakking.Aantal = Lijn.GeefAantal()
 		Set Verpakking.VolumeAandeel = Lijn.GeefVolumeAandeel()
 		Set Verpakking.VerpakkingType = ..GeefVerpakkingType(Lijn.GeefIngegevenKenmerken())
+		Set Verpakking.LadeType = ..GeefLadeType(Lijn.GeefIngegevenKenmerken())
 		Do VerpakkingList.Insert(Verpakking)
 	}
 	Quit VerpakkingList
@@ -314,7 +315,6 @@
 			If ##class(APPS.VKP.Offerte.enu.VerpakkingType).IsValid(TAXKenmerken.VerpakkingType) {
 				Quit TAXKenmerken.VerpakkingType
 			}
-			
 		} elseif IsVariantLBX {
 			#dim LBXKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = IngegevenKenmerken
 			If ##class(APPS.VKP.Offerte.enu.VerpakkingType).IsValid(LBXKenmerken.VerpakkingType) {
@@ -326,6 +326,22 @@
 ]]></Implementation>
 </Method>
 
+<Method name="GeefLadeType">
+<FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.VKP.Offerte.enu.LadeType</ReturnType>
+<Implementation><![CDATA[
+	#dim IsFamilieLade As %Boolean = (IngegevenKenmerken.GeefFamilie() = ##class(DOM.PM.enu.Familie).Lade())
+
+	if IsFamilieLade {
+		If ##class(APPS.VKP.Offerte.enu.LadeType).IsValid(IngegevenKenmerken.GeefVariant()) {
+			Quit IngegevenKenmerken.GeefVariant()
+		}
+	}
+	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="ConverteerVerpakteAfmeting">
 <FormalSpec>VerpakteAfmeting:APPS.Halux.common.impl.VerpakteAfmeting=""</FormalSpec>
 <ReturnType>APPS.TRANSP.OfferteService.dto.Afmeting</ReturnType>