Index: vhDeploy/Maatwerk/MVX/Bouwsteenmapping.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/MVX/Bouwsteenmapping.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/MVX/Bouwsteenmapping.cls.xml	(revision 66917)
@@ -0,0 +1,64 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.MVX.Bouwsteenmapping">
+<Super>vhDeploy.Deploy</Super>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Adapterstuk()_"Links", "PRADSTKLI", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Adapterstuk()_"Rechts", "PRADSTKRE", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).AfdekkapRugWandHouder()_"Rechts", "PRAKLI", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).AfdekkapRugWandHouder()_"Rechts", "PRAKLI", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap()_"Links", "PRBXCPL", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Boxcap()_"Rechts", "PRBXCPR", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverAchter()_"Links", "PRBXCVAL", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverAchter()_"Rechts", "PRBXCVAR", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverVoor()_"Links", "PRBXCVL", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).BoxcoverVoor()_"Rechts", "PRBXCVR", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingBoven(), "PRFBB", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingOnder(), "PRFBO", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).FrontBevestigingTussenstuk(), "PRFBT", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).MeenemerHuis(), "PRMEH", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).SchroefManueleMontage(), "PRSCRM", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).SpoelbakBinnenRugwandHouder()_"Links", "PRSPRGWHLI", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).SpoelbakBinnenRugwandHouder()_"Rechts", "PRSPRGWHRE", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).TiponBlumotionAdapter(), "PRTOBA", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Tussenstuk(), "PRTUS", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Voorstuk(), "PRVRS", 0)
+	Do ..MaakMappingVoorRol(##class(DOM.PM.Maatwerk.Calc.HF.enu.MVXRol).Voorstuk(), "PRVRS", 1)
+	
+	Do ..MaakMappingVoorRol("GetandeStrookLinks", "PRZSTLI", 0)
+	Do ..MaakMappingVoorRol("GetandeStrookRechts", "PRZSTRE", 0)
+	Do ..MaakMappingVoorRol("GetandeStrookLinks", "PRZSTLI", 1)
+	Do ..MaakMappingVoorRol("GetandeStrookRechts", "PRZSTRE", 1)
+	Do ..MaakMappingVoorRol("LoopwagenLinks", "PRZLPLI", 0)
+	Do ..MaakMappingVoorRol("LoopwagenRechts", "PRZLPRE", 0)
+	Do ..MaakMappingVoorRol("Meenemers", "PRZME", 0)
+	Do ..MaakMappingVoorRol("Overbelastingskoppeling", "PRZOKP", 0)
+	Do ..MaakMappingVoorRol("Stang", "PRZSTA", 0)
+	Do ..MaakMappingVoorRol("Stang", "PRZSTA", 1)
+	Do ..MaakMappingVoorRol("TandemKoppelstuk", "PRZTKP", 0)
+	Do ..MaakMappingVoorRol("TandemOnderdeel", "PRZTON", 0)
+]]></Implementation>
+</Method>
+
+<Method name="MaakMappingVoorRol">
+<Description>
+Rol wordt verondersteld uniek te zijn met slechts 1 mapping, verwijdert eerst de mapping voor die rol</Description>
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Rol:%String,Label:%String,IsBewerkt:%Boolean</FormalSpec>
+<Implementation><![CDATA[
+	#dim Query As %String = "SELECT ID FROM DOM_PM_impl_DataM.DataMBouwsteenLabelInfo WHERE Rol = ? AND IsBewerkt = ?"
+	#dim ResultSet As %ResultSet = $$ExecDynQuery^vhLib.Query(Query,$LB(Rol, IsBewerkt))
+	If ResultSet.Next(){
+		Do ##class(DOM.PM.impl.DataM.DataMBouwsteenLabelInfo).%DeleteId(ResultSet.Data("ID"))
+	}
+	Set Mapping = ##class(DOM.PM.impl.DataM.DataMBouwsteenLabelInfo).%New(Rol, Label, IsBewerkt)
+	Do Mapping.%Save()
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>