Index: vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/Test.cls.xml
===================================================================
diff -u -r29059 -r29371
--- vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/Test.cls.xml	(.../Test.cls.xml)	(revision 29059)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler/BepaalInfoDiverseItems/Test.cls.xml	(.../Test.cls.xml)	(revision 29371)
@@ -3,6 +3,25 @@
 <Class name="vhUnitTest.DOM.PM.Maatwerk.Calc.Common.impl.IngegevenKenmerkenInfoDiverseBepaler.BepaalInfoDiverseItems.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Property name="IngegevenKenmerken">
+<Type>DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="VerwachteInfoDiverseItems">
+<Type>%ListOfDataTypes</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Set ..VerwachteInfoDiverseItems = ##class(%ListOfDataTypes).%New()
+]]></Implementation>
+</Method>
+
 <Method name="Test C lade">
 <Implementation><![CDATA[
 	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken = ##class(vhTest.Utils.DOM.PM.Maatwerk.Calc.Common.impl.LBXKenmerken).CLade()
@@ -31,21 +50,31 @@
 ]]></Implementation>
 </Method>
 
-<Method name="Test C TAORlade met werktuigloze koppeling">
+<Method name="Test TAORKenmerken met Werktuigloze koppeling">
 <Implementation><![CDATA[
-	#dim IngegevenKenmerken As DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken = ##class(vhTest.Dummy.DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).CLade()
-	Set IngegevenKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel()
-	Set VerwachteInfoDiverseItems = ##class(%ListOfDataTypes).%New()
-	Do VerwachteInfoDiverseItems.Insert("[DiverseTAXKoppeling]")
-	Do ..AssertInfoDiverse(IngegevenKenmerken, VerwachteInfoDiverseItems)
+	Set ..IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set ..IngegevenKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel()
+	
+	Do ..VerwachteInfoDiverseItems.Insert("[DiverseTAXKoppeling]")
+	Do ..AssertInfoDiverse(..IngegevenKenmerken, ..VerwachteInfoDiverseItems)
 ]]></Implementation>
 </Method>
 
+<Method name="Test TAORKenmerken met AfdekkapKleur">
+<Implementation><![CDATA[
+	Set ..IngegevenKenmerken = ##class(DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken).%New()
+	Set ..IngegevenKenmerken.AfdekkapBovenKleur = ##class(DOM.PM.enu.TAORAfdekkapBovenKleur).AluminiumLook()
+	
+	Do ..VerwachteInfoDiverseItems.Insert("[DiverseTAXEindkap]: [AL]")
+	Do ..AssertInfoDiverse(..IngegevenKenmerken, ..VerwachteInfoDiverseItems)
+]]></Implementation>
+</Method>
+
 <Method name="AssertInfoDiverse">
 <FormalSpec>IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken,VerwachteInfoDiverseItems:%ListOfDataTypes</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
-	#dim VertaalAPIStub As vhTest.Mock.DOM.common.Transl.VertaalAPI = ##class(vhTest.Mock.DOM.common.Transl.VertaalAPI).MockInstance()
+	#Dim VertaalAPIStub As vhTest.Mock.DOM.common.Transl.VertaalAPI = ##class(vhTest.Mock.DOM.common.Transl.VertaalAPI).MockInstance()
 	set VertalerStub = ##class(vhTest.Utils.Vertaler).%New("")
 	#dim Taal As DOM.enu.Taal = ##class(DOM.enu.Taal).Nederlands()
 	do VertaalAPIStub.IndienMethodCall("GeefStandaardVertaler", Taal).DanReturn(VertalerStub)
Index: DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler.cls.xml
===================================================================
diff -u -r29059 -r29371
--- DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler.cls.xml	(.../IngegevenKenmerkenInfoDiverseBepaler.cls.xml)	(revision 29059)
+++ DOM/PM/Maatwerk/Calc/Common/impl/IngegevenKenmerkenInfoDiverseBepaler.cls.xml	(.../IngegevenKenmerkenInfoDiverseBepaler.cls.xml)	(revision 29371)
@@ -51,9 +51,14 @@
 <Method name="VerwerkTAORKenmerken">
 <FormalSpec>TAORKenmerken:DOM.PM.Maatwerk.Calc.Common.impl.TAORKenmerken</FormalSpec>
 <Implementation><![CDATA[
-	If TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel() {
+	If (TAORKenmerken.KoppelingType = ##class(DOM.PM.enu.TAORKoppelingType).Drevel()) {
 		Do ..InfoDiverseItems.Insert(..Vertaler.GeefVertaling("DiverseTAXKoppeling"))
 	}
+
+	If ($$$Not(TAORKenmerken.AfdekkapBovenKleur = "")) {
+		#Dim Eindkap As TECH.String = ..Vertaler.GeefVertaling("DiverseTAXEindkap") _ ": " _ ..Vertaler.GeefVertaling(TAORKenmerken.AfdekkapBovenKleur)
+		Do ..InfoDiverseItems.Insert(Eindkap)	
+	}
 ]]></Implementation>
 </Method>
 
Index: vhDeploy/Deploy20150703xVertalingEindkap.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20150703xVertalingEindkap.cls.xml	(revision 0)
+++ vhDeploy/Deploy20150703xVertalingEindkap.cls.xml	(revision 29371)
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy20150703xVertalingEindkap">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Aanmaken vertaling Eindkap</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[	Do ..MaakEindkap()
+]]></Implementation>
+</Method>
+
+<Method name="MaakEindkap">
+<ClassMethod>1</ClassMethod>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim N As TECH.String = "Eindkap"
+	#Dim F As TECH.String = "Cache couverture"
+	#Dim D As TECH.String = "Endkappe"
+	#Dim E As TECH.String = "Cover"
+	
+	Do ..MaakVertaling("DiverseTAXEindkap", N, F, D, E)
+]]></Implementation>
+</Method>
+
+<Method name="MaakVertaling">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Sleutel:TECH.String,N:TECH.String,F:TECH.String,D:TECH.String,E:TECH.String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#Dim VertaalGroep As DOM.common.Transl.enu.VertaalGroep = ##class(DOM.common.Transl.enu.VertaalGroep).TechnischeTermen()
+	#Dim TextType As TECH.String = "L"
+	
+	Do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Nederlands(), N)
+	Do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Frans(), F)
+	Do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Duits(), D)
+	Do ##class(Res.Vertaling).CreateOrUpdate(VertaalGroep, Sleutel, TextType, ##class(DOM.enu.Taal).Engels(), E)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>