Index: DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/Evaluators/IsBodemSlicedTypeEvaluator.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/Evaluators/IsBodemSlicedTypeEvaluator.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TAOR/Evaluators/IsBodemSlicedTypeEvaluator.cls.xml	(revision 29342)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.impl.TAOR.Evaluators.IsBodemSlicedTypeEvaluator">
+<Description>
+Gaat na of het BodemSlicedType overeenkomt met het type dat meegegeven is aan de constructor</Description>
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%RegisteredObject,DOM.PM.Maatwerk.Calc.Kost.IEvaluator</Super>
+<Inheritance>right</Inheritance>
+
+<Property name="BodemSlicedType">
+<Type>DOM.PM.Maatwerk.Calc.HF.enu.TAX.SlicedType</Type>
+</Property>
+
+<Method name="Evalueer">
+<Description>
+</Description>
+<FormalSpec>HalffabItemsBoom:DOM.PM.Maatwerk.Calc.HF.HalffabItemsBoom,Context:DOM.PM.Maatwerk.Calc.Kost.KostContext,IngegevenKenmerken:DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	Set BodemSlicedTypeBepaler = ##class(zTryout.WV.FPV1.DOM.impl.BodemSlicedTypeBepaler).%New()
+	Quit (BodemSlicedTypeBepaler.GeefBodemSlicedType(IngegevenKenmerken) = ..BodemSlicedType)
+]]></Implementation>
+</Method>
+
+<Method name="%OnNew">
+<FormalSpec>BodemSlicedType:DOM.PM.enu.LBXVerpakkingType</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..BodemSlicedType = BodemSlicedType
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ToString">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit "Bodem " _ ##class(DOM.PM.Maatwerk.Calc.HF.enu.TAX.SlicedType).LogicalToDisplay(..BodemSlicedType)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>