Index: vhDeploy/Maatwerk/TAOR/Deploy20190730xTAORSELAfdekkapBovenVerpakkingenUpdaten.cls.xml
===================================================================
diff -u
--- vhDeploy/Maatwerk/TAOR/Deploy20190730xTAORSELAfdekkapBovenVerpakkingenUpdaten.cls.xml	(revision 0)
+++ vhDeploy/Maatwerk/TAOR/Deploy20190730xTAORSELAfdekkapBovenVerpakkingenUpdaten.cls.xml	(revision 57480)
@@ -0,0 +1,61 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Maatwerk.TAOR.Deploy20190730xTAORSELAfdekkapBovenVerpakkingenUpdaten">
+<Super>TECH.RegisteredObject</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>VerpakkingType updaten voor TAOR_SEL_AfdekkapBoven</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	#Dim KenmerkenService As APPS.PM.Kenmerk.impl.KenmerkenService = ##class(APPS.PM.Kenmerk.impl.KenmerkenService).%New()
+	#Dim ProductenKenmerken As APPS.PM.dto.Kenm.ProductenKenmerken = ##class(APPS.PM.dto.Kenm.ProductenKenmerken).%New()
+	#Dim VerpakkingTypeKenmerk As TECH.String = "VerpakkingType"
+	#Dim ZA7TZLI01TAORBOXZAL As TECH.STring = "1067624"
+	#Dim ZA7TZRE01TAORBOXZAL As TECH.STring = "1067701"
+	#Dim ZA7TALI01TAORBOXAL As TECH.STring = "1067709"
+	#Dim ZA7TARE01TAORBOXAL As TECH.STring = "1067714"
+	#dim ZA7TALI01TAORBOXS As TECH.STring = "1668094"
+	#dim ZA7TARE01TAORBOXS As TECH.STring = "1668104"
+	#dim ZA7TALI01TAORBOXW As TECH.STring = "1668116"
+	#dim ZA7TARE01TAORBOXW As TECH.STring = "1668119"
+	#dim ZA7TALI01TAORBOXANTR As TECH.STring = "1668120"
+	#dim ZA7TARE01TAORBOXANTR As TECH.STring = "1668124"
+	
+	#dim lbVerpakkingType As %List = $LB(##class(DOM.PM.enu.TAORVerpakkingType).FlatpackProcom(),##class(DOM.PM.enu.TAORVerpakkingType).FlatpackV1(),##class(DOM.PM.enu.TAORVerpakkingType).LosseComponentenInBulk(),##class(DOM.PM.enu.TAORVerpakkingType).V1(),##class(DOM.PM.enu.TAORVerpakkingType).Probox(),##class(DOM.PM.enu.TAORVerpakkingType).BulkPerOnderdeelGegroepeerd())
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TZLI01TAORBOXZAL, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TZRE01TAORBOXZAL, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TALI01TAORBOXAL, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TARE01TAORBOXAL, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TALI01TAORBOXS, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TARE01TAORBOXS, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TALI01TAORBOXW, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TARE01TAORBOXW, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TALI01TAORBOXANTR, VerpakkingTypeKenmerk, lbVerpakkingType))
+	Do ProductenKenmerken.Kenmerken.Insert(..VulInVoorProductViaLB(ZA7TARE01TAORBOXANTR, VerpakkingTypeKenmerk, lbVerpakkingType))
+	
+	Do KenmerkenService.BewaarProductenKenmerken(ProductenKenmerken)
+]]></Implementation>
+</Method>
+
+<Method name="VulInVoorProductViaLB">
+<Description>
+Aangepaste versie : krijgt $LB() binnen als parameter! </Description>
+<ClassMethod>1</ClassMethod>
+<FormalSpec>ProductID:TECH.String,Kenmerk:TECH.String,lbEnumeratieWaarde:%List</FormalSpec>
+<Private>1</Private>
+<ReturnType>APPS.PM.dto.Kenm.ProductenKenmerken</ReturnType>
+<Implementation><![CDATA[
+	#Dim KenmerkGroep As TECH.String = "TAOR_SEL_AfdekkapBoven"
+	#Dim ProductKenmerkenUtils As vhDeploy.Maatwerk.Kenmerk.ProductKenmerkenUtils = ##class(vhDeploy.Maatwerk.Kenmerk.ProductKenmerkenUtils).%New()
+	
+	Quit ProductKenmerkenUtils.MaakProductKenmerken(KenmerkGroep, ProductID, Kenmerk, lbEnumeratieWaarde)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>