Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFLijmv001.cls.xml
===================================================================
diff -u -r1496 -r1506
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFLijmv001.cls.xml	(.../HFLijmv001.cls.xml)	(revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFLijmv001.cls.xml	(.../HFLijmv001.cls.xml)	(revision 1506)
@@ -23,7 +23,7 @@
 <Implementation><![CDATA[
 	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New(Context, ..Rol)
 	Set HalffabItem.Halffab = ##class(DOM.PM.Maatwerk.Calc.HF.Halffab).%New()
-	Set HalffabItem.Halffab.UnID = "<Onbekend>"
+	Set HalffabItem.Halffab.UnID = 10479
 	Set HalffabItem.Aantal = 1
 	
 	Quit HalffabItem
Index: DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml
===================================================================
diff -u -r1075 -r1506
--- DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml	(.../KostItemWriterVisitor.cls.xml)	(revision 1075)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/KostItemWriterVisitor.cls.xml	(.../KostItemWriterVisitor.cls.xml)	(revision 1506)
@@ -19,7 +19,7 @@
 <FormalSpec>Item:DOM.PM.Maatwerk.Calc.Kost.StandaardHalffabKostItem</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	w ..GeefIndentatie()_"[StandaardHalffabKostItem] "_Item.GeefNaam(),!
+	w ..GeefIndentatie()_"[StandaardHFKostItem] "_Item.GeefNaam(),!
 	w ..GeefIndentatie()_"Kost: "_..GeefKost(Item)_" EUR, Details: "_Item.GeefDetails(),!
 	Quit $$$OK
 ]]></Implementation>
@@ -29,7 +29,7 @@
 <FormalSpec>Item:DOM.PM.Maatwerk.Calc.Kost.BewerktHalffabKostItem</FormalSpec>
 <ReturnType>%Status</ReturnType>
 <Implementation><![CDATA[
-	w ..GeefIndentatie()_"[BewerktHalffabKostItem] "_Item.GeefNaam(),!
+	w ..GeefIndentatie()_"[BewerktHFKostItem] "_Item.GeefNaam(),!
 	w ..GeefIndentatie()_"Kost: "_..GeefKost(Item)_" EUR, Details: "_Item.GeefDetails(),!
 	Quit $$$OK
 ]]></Implementation>
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/SpecKostv001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/SpecKostv001.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/SpecKostv001.cls.xml	(revision 1506)
@@ -0,0 +1,29 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.SpecKostv001">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.Kost.KostSpec</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..Familie = ##class(DOM.PM.enu.Familie).Lade()
+	Set ..Variant = ##class(DOM.PM.enu.LadeVariant).TAOO()
+	
+	Do ..KostItemBuilders.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostVoorbereidenv001).%New(""))
+	Do ..KostItemBuilders.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostMontagev001).%New(""))
+	Do ..KostItemBuilders.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostAfwerkenv001).%New(""))
+	
+	Quit ##super()
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+</Export>
Index: zTryout/CSC/TAOOLade.cls.xml
===================================================================
diff -u -r1496 -r1506
--- zTryout/CSC/TAOOLade.cls.xml	(.../TAOOLade.cls.xml)	(revision 1496)
+++ zTryout/CSC/TAOOLade.cls.xml	(.../TAOOLade.cls.xml)	(revision 1506)
@@ -35,7 +35,7 @@
 	Do HalffabItems.Accept(WriterVisitor)
 	write !
 	
-	/*
+	
 	Set KostContext = ##class(DOM.PM.Maatwerk.Calc.Kost.KostContext).%New(Familie, Variant, BerekeningsSpecificatie)
 	
 	Set KostItem = KostContext.GeefKostSpec().BerekenKostDetails(KostContext,HalffabItemsBoom,IngegevenKenmerken)
@@ -44,7 +44,6 @@
 	write !
 	Do KostItem.Accept(KostItemWriterVisitor)
 	write !
-	*/
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontBevestigingv001.cls.xml
===================================================================
diff -u -r1496 -r1506
--- DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 1496)
+++ DOM/PM/Maatwerk/Calc/HF/impl/TAOO/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 1506)
@@ -23,7 +23,7 @@
 <Implementation><![CDATA[
 	Set HalffabItem = ##class(DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem).%New(Context, ..Rol)
 	Set HalffabItem.Halffab = ##class(DOM.PM.Maatwerk.Calc.HF.Halffab).%New()
-	Set HalffabItem.Halffab.UnID = "<Onbekend>"
+	Set HalffabItem.Halffab.UnID = 10479
 	Set HalffabItem.Aantal = 2
 	
 	Quit HalffabItem
Index: CSC TAOO.prj.xml
===================================================================
diff -u -r1496 -r1506
--- CSC TAOO.prj.xml	(.../CSC TAOO.prj.xml)	(revision 1496)
+++ CSC TAOO.prj.xml	(.../CSC TAOO.prj.xml)	(revision 1506)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="9">
-<Project name="CSC TAOO" LastModified="2011-06-23 09:37:19">
+<Project name="CSC TAOO" LastModified="2011-06-23 16:33:16">
   <Items>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Common.BerekeningsSpecificatie" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Common.IngegevenKenmerken" type="CLS"/>
@@ -80,8 +80,9 @@
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFFrontv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFGlijderv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFLadeZijkantv001" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFLijmv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFRugv001" type="CLS"/>
-    <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFSchroevenv001" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFSchroefv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HFTandemKoppelingv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HalffabBodem" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.HF.impl.TAOO.HalffabClassNameFactory" type="CLS"/>
@@ -144,12 +145,17 @@
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.NotEvaluator" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.OfEvaluator" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.ProductPrijsSpecificatie" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItem" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.StaffelMultiplier" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.StandaardHalffabKostItem" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.TrueEvaluator" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostAfwerkenv001" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostMontagev001" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostVoorbereidenv001" type="CLS"/>
+    <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.SpecKostv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.KAD.KostZagenv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.KAD.SpecMainKostv001" type="CLS"/>
     <ProjectItem name="DOM.PM.Maatwerk.Calc.Kost.impl.KAD.Zagen.FactorHalenProfielen" type="CLS"/>
@@ -186,12 +192,15 @@
     <ProjectItem name="vhDeploy.Deploy20110620x1536" type="CLS"/>
     <ProjectItem name="vhDeploy.Deploy20110621x0804" type="CLS"/>
     <ProjectItem name="vhDeploy.Deploy20110622x1605" type="CLS"/>
+    <ProjectItem name="vhDeploy.Deploy20110623x1342" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFBodemv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFFrontBevestigingv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFFrontv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFGlijderv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFLadeZijkantv001" type="CLS"/>
+    <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFLijmv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFRugv001" type="CLS"/>
+    <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFSchroefv001" type="CLS"/>
     <ProjectItem name="vhUnitTest.DOM.PM.Maatwerk.Calc.HF.TAOO.HFTandemKoppelingv001" type="CLS"/>
     <ProjectItem name="zTryout.CSC.TAOOLade" type="CLS"/>
   </Items>
Index: DOM/PM/Maatwerk/Calc/Kost/impl/TBX/SpecAntaroPlanv001.cls.xml
===================================================================
diff -u -r1075 -r1506
--- DOM/PM/Maatwerk/Calc/Kost/impl/TBX/SpecAntaroPlanv001.cls.xml	(.../SpecAntaroPlanv001.cls.xml)	(revision 1075)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/TBX/SpecAntaroPlanv001.cls.xml	(.../SpecAntaroPlanv001.cls.xml)	(revision 1506)
@@ -13,6 +13,9 @@
 <Implementation><![CDATA[
 	Set ..Familie = ##class(DOM.PM.enu.Familie).Lade()
 	Set ..Variant = ##class(DOM.PM.enu.LadeVariant).TBXAntaro()
+	
+	Do ..KostItemBuilders.Insert(##class(DOM.PM.Maatwerk.Calc.Kost.impl.TBX.PlanBewerkenv001).%New(""))
+	
 	Quit ##super()
 ]]></Implementation>
 </Method>
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostAfwerkenv001.cls.xml	(revision 1506)
@@ -0,0 +1,104 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostAfwerkenv001">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldKostItemBuilder:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set Status = ##super(SamengesteldKostItemBuilder)
+	
+	Set ..Naam = "Montage"
+	
+	Set MultiplierFixedNul = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0)
+	Set MultiplierFixedEen = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(1)
+	
+	Set RugAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Rug())
+	Set BodemAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Bodem())
+	Set ZijkantAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).LadeZijkant())
+	Set TandemKoppelingAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).TandemKoppeling())
+	Set GlijderAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Glijder())
+	
+	// TODO: Correcte kostenplaats definiëren
+	Set KostenPlaats = "TBZAAG"
+	
+	
+	Set ActiviteitNr = 14
+	Set ActiviteitNaam = "Opkuisen lade"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 30
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 15
+	Set ActiviteitNaam = "Verpakken losse onderdelen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 57
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 16
+	Set ActiviteitNaam = "Snijden karton met PANOTE"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 45
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 17
+	Set ActiviteitNaam = "Vouwen doos"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 50
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 18
+	Set ActiviteitNaam = "Inpakken lade"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 50
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 19
+	Set ActiviteitNaam = "Controle, labelen en kuisen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 30
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+</Export>
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostVoorbereidenv001.cls.xml	(revision 1506)
@@ -0,0 +1,104 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostVoorbereidenv001">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldKostItemBuilder:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set Status = ##super(SamengesteldKostItemBuilder)
+	
+	Set ..Naam = "Voorbereiden"
+	
+	Set MultiplierFixedNul = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0)
+	Set MultiplierFixedEen = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(1)
+	
+	Set RugAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Rug())
+	Set BodemAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Bodem())
+	
+	// TODO: Correcte kostenplaats definiëren
+	Set KostenPlaats = "TBZAAG"
+	
+	
+	Set ActiviteitNr = 1
+	Set ActiviteitNaam = "Werkplaatsvoorbereiding zagen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 10
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+	
+	
+	Set ActiviteitNr = 2
+	Set ActiviteitNaam = "Werkplaatsvoorbereiding monteren"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 10
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 3
+	Set ActiviteitNaam = "Zagen bodem + rug"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 67
+	Set MinimumKost = 0
+	Set ZagenBodemRug = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do ZagenBodemRug.GebruikEvaluator(##class(DOM.PM.Maatwerk.Calc.Kost.OfEvaluator).%New(RugAanwezigEvaluator,BodemAanwezigEvaluator))
+
+
+
+	Set ActiviteitNr = 4
+	Set ActiviteitNaam = "Aanbrengen identificatie"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 10
+	Set MinimumKost = 0
+	Do ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+
+
+
+	Set ActiviteitNr = 5
+	Set ActiviteitNaam = "Boren bodem"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 30
+	Set MinimumKost = 0
+	Set BorenBodem = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do BorenBodem.GebruikEvaluator(BodemAanwezigEvaluator)
+
+
+
+	Set ActiviteitNr = 6
+	Set ActiviteitNaam = "Frezen + boren rug"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 60
+	Set MinimumKost = 0
+	Set FrezenBorenRug = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do FrezenBorenRug.GebruikEvaluator(RugAanwezigEvaluator)
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+</Export>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFLijmv001.cls.xml
===================================================================
diff -u -r1496 -r1506
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFLijmv001.cls.xml	(.../HFLijmv001.cls.xml)	(revision 1496)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFLijmv001.cls.xml	(.../HFLijmv001.cls.xml)	(revision 1506)
@@ -25,7 +25,7 @@
 	Do $$$AssertTrue($IsObject(HalffabItem),"HalffabItem is een object")
 	Do $$$AssertTrue(HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem"),"HalffabItem is een StandaardHalffabItem")
 	Do $$$AssertTrue($IsObject(HalffabItem.Halffab),"HalffabItem heeft een halffab")
-	Do $$$AssertEquals(HalffabItem.Halffab.UnID,"<Onbekend>","Halffab UnID voor de lijm")
+	Do $$$AssertEquals(HalffabItem.Halffab.UnID,10479,"Halffab UnID voor de lijm")
 ]]></Implementation>
 </Method>
 </Class>
Index: vhDeploy/Deploy20110623x1342.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy20110623x1342.cls.xml	(revision 0)
+++ vhDeploy/Deploy20110623x1342.cls.xml	(revision 1506)
@@ -0,0 +1,20 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="vhDeploy.Deploy20110623x1342">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>svn.Deploy</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="ExecCode">
+<Description>
+Do ##class(vhDeploy.Deploy20110623x1342).%ExecCode()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do $SYSTEM.OBJ.Compile("DOM.PM.Maatwerk.Calc.Kost.impl.KostSpecInfo")
+	Set KostSpecInfo = ##class(DOM.PM.Maatwerk.Calc.Kost.impl.KostSpecInfo).%New(##class(DOM.PM.enu.Familie).Lade(),##class(DOM.PM.enu.LadeVariant).TAOO(),"DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.SpecKostv001",,##class(TECH.DateTime).CurrentDate(),##class(TECH.DateTime).MaxDate())
+	Set Status = KostSpecInfo.%Save()
+	w "KostSpecInfo status: "_$$ParseStatus^vhLib(Status)
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml
===================================================================
diff -u -r1496 -r1506
--- vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 1496)
+++ vhUnitTest/DOM/PM/Maatwerk/Calc/HF/TAOO/HFFrontBevestigingv001.cls.xml	(.../HFFrontBevestigingv001.cls.xml)	(revision 1506)
@@ -25,7 +25,7 @@
 	Do $$$AssertTrue($IsObject(HalffabItem),"HalffabItem is een object")
 	Do $$$AssertTrue(HalffabItem.%Extends("DOM.PM.Maatwerk.Calc.HF.StandaardHalffabItem"),"HalffabItem is een StandaardHalffabItem")
 	Do $$$AssertTrue($IsObject(HalffabItem.Halffab),"HalffabItem heeft een halffab")
-	Do $$$AssertEquals(HalffabItem.Halffab.UnID,"<Onbekend>","Halffab UnID voor de front bevestiging")
+	Do $$$AssertEquals(HalffabItem.Halffab.UnID,10479,"Halffab UnID voor de front bevestiging")
 ]]></Implementation>
 </Method>
 </Class>
Index: DOM/PM/Maatwerk/Calc/Kost/RolAanwezigEvaluator.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/RolAanwezigEvaluator.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/RolAanwezigEvaluator.cls.xml	(revision 1506)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.Kost.IEvaluator,%RegisteredObject</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Property name="Rol">
+<Type>%String</Type>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>Rol:%String</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set ..Rol = Rol
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<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[	Quit $IsObject(HalffabItemsBoom.GeefHalffabItem(..Rol))
+]]></Implementation>
+</Method>
+</Class>
+</Export>
Index: DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/Calc/Kost/impl/ATOO/KostMontagev001.cls.xml	(revision 1506)
@@ -0,0 +1,123 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="9">
+<Class name="DOM.PM.Maatwerk.Calc.Kost.impl.ATOO.KostMontagev001">
+<ClassType>persistent</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</Super>
+<ClassDefinitionError>0</ClassDefinitionError>
+
+<Method name="%OnNew">
+<FormalSpec>SamengesteldKostItemBuilder:DOM.PM.Maatwerk.Calc.Kost.SamengesteldKostItemBuilder</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	Set Status = ##super(SamengesteldKostItemBuilder)
+	
+	Set ..Naam = "Montage"
+	
+	Set MultiplierFixedNul = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(0)
+	Set MultiplierFixedEen = ##class(DOM.PM.Maatwerk.Calc.Kost.FixedMultiplier).%New(1)
+	
+	Set RugAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Rug())
+	Set BodemAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Bodem())
+	Set ZijkantAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).LadeZijkant())
+	Set TandemKoppelingAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).TandemKoppeling())
+	Set GlijderAanwezigEvaluator = ##class(DOM.PM.Maatwerk.Calc.Kost.RolAanwezigEvaluator).%New(##class(DOM.PM.Maatwerk.Calc.HF.enu.TAOORol).Glijder())
+	
+	// TODO: Correcte kostenplaats definiëren
+	Set KostenPlaats = "TBZAAG"
+	
+	
+	Set ActiviteitNr = 7
+	Set ActiviteitNaam = "Zijkanten verlijmen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 90
+	Set MinimumKost = 0
+	Set ZijkantVerlijmen = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do ZijkantVerlijmen.GebruikEvaluator(ZijkantAanwezigEvaluator)
+	
+	
+	
+	Set ActiviteitNr = 8
+	Set ActiviteitNaam = "Rug verlijmen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 45
+	Set MinimumKost = 0
+	Set RugVerlijmen = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do RugVerlijmen.GebruikEvaluator(RugAanwezigEvaluator)
+	
+	
+	
+	Set ActiviteitNr = 9
+	Set ActiviteitNaam = "Rug vastschroeven aan bodem"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 20
+	Set MinimumKost = 0
+	Set RugBodemVastschroeven = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do RugBodemVastschroeven.GebruikEvaluator(##class(DOM.PM.Maatwerk.Calc.Kost.OfEvaluator).%New(RugAanwezigEvaluator,BodemAanwezigEvaluator))
+	
+	
+	
+	Set ActiviteitNr = 10
+	Set ActiviteitNaam = "Montage TANDEM koppeling"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 45
+	Set MinimumKost = 0
+	Set TandemKoppeling = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do TandemKoppeling.GebruikEvaluator(TandemKoppelingAanwezigEvaluator)
+	
+	
+	
+	Set ActiviteitNr = 11
+	Set ActiviteitNaam = "Uitpakken zijkanten"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 15
+	Set MinimumKost = 0
+	Set UitpakkenZijkanten = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do UitpakkenZijkanten.GebruikEvaluator(ZijkantAanwezigEvaluator)
+	
+	
+	
+	Set ActiviteitNr = 12
+	Set ActiviteitNaam = "Uitpakken TANDEM"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 15
+	Set MinimumKost = 0
+	Set UitpakkenTandem = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do UitpakkenTandem.GebruikEvaluator(GlijderAanwezigEvaluator)
+	
+	
+	
+	Set ActiviteitNr = 13
+	Set ActiviteitNaam = "Wegleggen lege verpakkingen"
+	Set Variabele = MultiplierFixedNul
+	Set Factor = MultiplierFixedEen
+	Set VariabeleKost = 0
+	Set VasteKost = 10
+	Set MinimumKost = 0
+	Set LegeVerpakkingVerwijderen = ##class(DOM.PM.Maatwerk.Calc.Kost.StandaardActiviteitKostItemBuilder).%New(##this,ActiviteitNaam,KostenPlaats, Variabele, Factor, VariabeleKost, VasteKost, MinimumKost, ActiviteitNr)
+	Do LegeVerpakkingVerwijderen.GebruikEvaluator(##class(DOM.PM.Maatwerk.Calc.Kost.OfEvaluator).%New(GlijderAanwezigEvaluator,ZijkantAanwezigEvaluator))
+	
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheStorage</Type>
+</Storage>
+</Class>
+</Export>