Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Halffab/HalffabAfdekkapBoven.cls.xml
===================================================================
diff -u -r29059 -r29503
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Halffab/HalffabAfdekkapBoven.cls.xml	(.../HalffabAfdekkapBoven.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOR/Halffab/HalffabAfdekkapBoven.cls.xml	(.../HalffabAfdekkapBoven.cls.xml)	(revision 29503)
@@ -16,6 +16,15 @@
 <Properties>AfdekkapBovenKleur</Properties>
 </Index>
 
+<Property name="VerpakkingType">
+<Type>DOM.PM.enu.TAORVerpakkingType</Type>
+</Property>
+
+<Index name="BitTAORAfdekkapBovenVerpakkingType">
+<Type>bitmap</Type>
+<Properties>VerpakkingType</Properties>
+</Index>
+
 <Property name="LiRe">
 <Type>DOM.PM.enu.LiRe</Type>
 </Property>
@@ -28,9 +37,7 @@
 <Method name="GeefOmschrijvingVoorDocs">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim Omschrijving As %String = "AfdekkapBoven"
-	Set Omschrijving = ##class(TECH.StringUtils).VoegToeIndienNietLeeg(Omschrijving,##class(DOM.PM.enu.TAORAfdekkapBovenKleur).LogicalToDisplay(..AfdekkapBovenKleur))
-	Set Omschrijving = ##class(TECH.StringUtils).VoegToeIndienNietLeeg(Omschrijving,##class(DOM.PM.enu.LiRe).LogicalToDisplay(..LiRe))
+	#dim Omschrijving As %String = "AfdekkapBoven, " _ ##class(DOM.PM.enu.TAORAfdekkapBovenKleur).LogicalToDisplay(..AfdekkapBovenKleur) _ ", " _ ##class(DOM.PM.enu.LiRe).LogicalToDisplay(..LiRe) _ ""
 	Quit Omschrijving
 ]]></Implementation>
 </Method>
@@ -45,6 +52,9 @@
 <Value>AfdekkapBovenKleur</Value>
 </Value>
 <Value name="2">
+<Value>VerpakkingType</Value>
+</Value>
+<Value name="3">
 <Value>LiRe</Value>
 </Value>
 </Data>