Index: APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Aantal.cls.xml
===================================================================
diff -u -r60054 -r60080
--- APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Aantal.cls.xml	(.../Aantal.cls.xml)	(revision 60054)
+++ APPS/Halux/PPS/impl/AansturingActie/common/KlantEtiket/Aantal.cls.xml	(.../Aantal.cls.xml)	(revision 60080)
@@ -12,6 +12,10 @@
 <Type>%Integer</Type>
 </Property>
 
+<Property name="Eenheid">
+<Type>APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid</Type>
+</Property>
+
 <Index name="IndexKortTekstSleutel">
 <Properties>KortTekstSleutel</Properties>
 <Unique>1</Unique>
@@ -25,8 +29,6 @@
 <IndexLocation>^APPS.Halux.PPS.implE132.AantalI</IndexLocation>
 <StreamLocation>^APPS.Halux.PPS.implE132.AantalS</StreamLocation>
 <Data name="AantalDefaultData">
-<Structure>listnode</Structure>
-<Subscript/>
 <Value name="1">
 <Value>%%CLASSNAME</Value>
 </Value>
@@ -36,6 +38,9 @@
 <Value name="3">
 <Value>Aantal</Value>
 </Value>
+<Value name="4">
+<Value>Eenheid</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: vhDeploy/Deploy28022020KlantEtiketUpdateAantal.cls.xml
===================================================================
diff -u
--- vhDeploy/Deploy28022020KlantEtiketUpdateAantal.cls.xml	(revision 0)
+++ vhDeploy/Deploy28022020KlantEtiketUpdateAantal.cls.xml	(revision 60080)
@@ -0,0 +1,59 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhDeploy.Deploy28022020KlantEtiketUpdateAantal">
+<Super>vhDeploy.Deploy</Super>
+
+<Parameter name="Omschrijving">
+<Type>%String</Type>
+<Default>Zet KlanteEtiketAantal voor producten</Default>
+</Parameter>
+
+<Method name="ExecCode">
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Do ..MaakKalntEtiketAantal("MAT", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Lijn())
+	Do ..MaakKalntEtiketAantal("AFV", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Lijn())
+
+	Do ..MaakKalntEtiketAantal("SD1", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("SD2", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("INP", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("Z37", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("Z31", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("ZRG", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("ZW7", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("ZR7", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("20Q", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("Z80", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("H80", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("ZE7", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("20F", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("Z40", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Veelvoud())
+	Do ..MaakKalntEtiketAantal("SST", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Stuk())
+	Do ..MaakKalntEtiketAantal("HAL", 1, ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid).Lijn())
+]]></Implementation>
+</Method>
+
+<Method name="MaakKalntEtiketAantal">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>KortTekstSleutel:%String,Aantal:%Integer=1,Eenheid:APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.enu.Eenheid</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim KlantEtiketAantal As APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.Aantal
+	
+	Set AantalRepository = ##class(APPS.Halux.PPS.impl.AansturingActie.common.KlantEtiket.AantalRepository).%New()
+	If $$$Not(AantalRepository.BestaatViaKortTekstSleutel(KortTekstSleutel)) {
+		Set KlantEtiketAantal = AantalRepository.Maak()
+	} Else {
+		Set KlantEtiketAantal = AantalRepository.GeefViaKortTekstSleutel(KortTekstSleutel)
+	}
+	
+	Set KlantEtiketAantal.KortTekstSleutel = KortTekstSleutel
+	Set KlantEtiketAantal.Aantal = Aantal
+	Set KlantEtiketAantal.Eenheid = Eenheid
+	Do AantalRepository.Bewaar(KlantEtiketAantal)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>