Index: DOM/PM/enu/TBXVerpakking/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXVerpakking/AutoComplete.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXVerpakking/AutoComplete.cls.xml	(revision 39672)
@@ -0,0 +1,77 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXVerpakking.AutoComplete">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie Eigenschapn moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<ClassType>serial</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%SerialObject</Super>
+
+<Property name="CommissieMetOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"O"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="CommissieZonderOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"C"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KastMetOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"B"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="KastZonderOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"A"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Pallet">
+<Type>%String</Type>
+<InitialExpression>"P"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="ProboxMetOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"X"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="ProboxZonderOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"Y"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="StukMetOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"S"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="StukZonderOnderdelen">
+<Type>%String</Type>
+<InitialExpression>"Z"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXVerpakking.cls.xml
===================================================================
diff -u -r29059 -r39672
--- DOM/PM/enu/TBXVerpakking.cls.xml	(.../TBXVerpakking.cls.xml)	(revision 29059)
+++ DOM/PM/enu/TBXVerpakking.cls.xml	(.../TBXVerpakking.cls.xml)	(revision 39672)
@@ -79,6 +79,26 @@
 <Implementation><![CDATA[	Quit "Y"
 ]]></Implementation>
 </Method>
+
+<Method name="NaarVerpakkingType">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Verpakking:DOM.PM.enu.TBXVerpakking</FormalSpec>
+<ReturnType>DOM.PM.enu.TBXVerpakkingType</ReturnType>
+<Implementation><![CDATA[
+	Do ..Validate(Verpakking)
+	Quit $Case(Verpakking, "P":"Pallet", "X":"Probox", "Y":"Probox", "S":"V1", :"V1")
+]]></Implementation>
+</Method>
+
+<Method name="NaarVerpakking">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>VerpakkingType:DOM.PM.enu.TBXVerpakkingType</FormalSpec>
+<ReturnType>TECH.Enumeration</ReturnType>
+<Implementation><![CDATA[
+	Do ##class(DOM.PM.enu.TBXVerpakkingType).Validate(VerpakkingType)
+	Quit $Case(VerpakkingType, "Pallet":"P", "Procom":"O", "Probox":"X", "V1":"S")
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/enu/TBXVerpakking/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXVerpakking/Verwerker.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXVerpakking/Verwerker.cls.xml	(revision 39672)
@@ -0,0 +1,96 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXVerpakking.Verwerker">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de Enumeratie - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt
+De enumeratie methoden moeten als type de enumeratieklasse zelf terug geven. De enumeratieklasse moet afleiden van TECH.Enumeration</Description>
+<Abstract>1</Abstract>
+<ProcedureBlock>1</ProcedureBlock>
+
+<Method name="Verwerk">
+<Final>1</Final>
+<FormalSpec>TBXVerpakking:DOM.PM.enu.TBXVerpakking</FormalSpec>
+<Implementation><![CDATA[
+	If TBXVerpakking = "O" {
+		Do ..VerwerkCommissieMetOnderdelen()
+	} ElseIf TBXVerpakking = "C" {
+		Do ..VerwerkCommissieZonderOnderdelen()
+	} ElseIf TBXVerpakking = "B" {
+		Do ..VerwerkKastMetOnderdelen()
+	} ElseIf TBXVerpakking = "A" {
+		Do ..VerwerkKastZonderOnderdelen()
+	} ElseIf TBXVerpakking = "P" {
+		Do ..VerwerkPallet()
+	} ElseIf TBXVerpakking = "X" {
+		Do ..VerwerkProboxMetOnderdelen()
+	} ElseIf TBXVerpakking = "Y" {
+		Do ..VerwerkProboxZonderOnderdelen()
+	} ElseIf TBXVerpakking = "S" {
+		Do ..VerwerkStukMetOnderdelen()
+	} ElseIf TBXVerpakking = "Z" {
+		Do ..VerwerkStukZonderOnderdelen()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXVerpakking,"DOM.PM.enu.TBXVerpakking",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkCommissieMetOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkCommissieZonderOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKastMetOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkKastZonderOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkPallet">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkProboxMetOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkProboxZonderOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStukMetOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStukZonderOnderdelen">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>