Index: zTryout/MVI/UnitTest/KPR/Product/WinkelOrder/Test.cls.xml
===================================================================
diff -u -r33151 -r33169
--- zTryout/MVI/UnitTest/KPR/Product/WinkelOrder/Test.cls.xml	(.../Test.cls.xml)	(revision 33151)
+++ zTryout/MVI/UnitTest/KPR/Product/WinkelOrder/Test.cls.xml	(.../Test.cls.xml)	(revision 33169)
@@ -23,8 +23,8 @@
 <Private>1</Private>
 </Property>
 
-<Property name="WinkelOrderType">
-<Type>zTryout.MVI.KPR.Product.enu.WinkelOrderType.AutoComplete</Type>
+<Property name="ProductStockType">
+<Type>zTryout.MVI.KPR.Product.enu.ProductStockType.AutoComplete</Type>
 <Private>1</Private>
 </Property>
 
@@ -74,24 +74,24 @@
 
 <Method name="Test: GeefType">
 <Implementation><![CDATA[
-	Do ..MaakWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer, "", "", ..WinkelOrderType.KOM)
+	Do ..MaakWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer, "", "", ..ProductStockType.KOM)
 	
 	#dim WinkelOrder As zTryout.MVI.KPR.Product.WinkelOrder = ##class(zTryout.MVI.KPR.Product.WinkelOrder).GeefWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer)
 	
-	Set $Piece(^KPR(..#ProductNummer, WinkelOrder.GeefSleutel()), "\", 3) = ..WinkelOrderType.Stock
-	Do $$$AssertEquals(WinkelOrder.GeefType(), ..WinkelOrderType.Stock)
+	Set $Piece(^KPR(..#ProductNummer, WinkelOrder.GeefSleutel()), "\", 3) = ..ProductStockType.Stock
+	Do $$$AssertEquals(WinkelOrder.GeefType(), ..ProductStockType.Stock)
 ]]></Implementation>
 </Method>
 
 <Method name="Test: ZetType">
 <Implementation><![CDATA[
-	Do ..MaakWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer, "", "", ..WinkelOrderType.KOM)
+	Do ..MaakWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer, "", "", ..ProductStockType.KOM)
 	
 	#dim WinkelOrder As zTryout.MVI.KPR.Product.WinkelOrder = ##class(zTryout.MVI.KPR.Product.WinkelOrder).GeefWinkelOrder(..#ProductNummer, ..Datum, ..#OrderNummer, ..#OrderLijnNummer)	
-	Do WinkelOrder.ZetType(..WinkelOrderType.Stock)
+	Do WinkelOrder.ZetType(..ProductStockType.Stock)
 	
-	#dim Type As zTryout.MVI.KPR.Product.enu.WinkelOrderType = $Piece(^KPR(..#ProductNummer, WinkelOrder.GeefSleutel()), "\", 3)
-	Do $$$AssertEquals(Type, ..WinkelOrderType.Stock)
+	#dim Type As zTryout.MVI.KPR.Product.enu.ProductStockType = $Piece(^KPR(..#ProductNummer, WinkelOrder.GeefSleutel()), "\", 3)
+	Do $$$AssertEquals(Type, ..ProductStockType.Stock)
 ]]></Implementation>
 </Method>
 
@@ -107,7 +107,7 @@
 </Method>
 
 <Method name="MaakWinkelOrder">
-<FormalSpec>ProductNummer:%String,Datum:%Date,OrderNummer:%String,OrderLijnNummer:%String,Aantal:%Integer,Leverweek:%Date,Type:zTryout.MVI.KPR.Product.enu.WinkelOrderType</FormalSpec>
+<FormalSpec>ProductNummer:%String,Datum:%Date,OrderNummer:%String,OrderLijnNummer:%String,Aantal:%Integer,Leverweek:%Date,Type:zTryout.MVI.KPR.Product.enu.ProductStockType</FormalSpec>
 <Private>1</Private>
 <Implementation><![CDATA[
 	#dim WinkelOrder As zTryout.MVI.KPR.Product.WinkelOrder = ##class(zTryout.MVI.KPR.Product.WinkelOrder).MaakWinkelOrder(ProductNummer, Datum, OrderNummer, OrderLijnNummer)
Index: zTryout/MVI/KPR/Product/WinkelOrder.cls.xml
===================================================================
diff -u -r33143 -r33169
--- zTryout/MVI/KPR/Product/WinkelOrder.cls.xml	(.../WinkelOrder.cls.xml)	(revision 33143)
+++ zTryout/MVI/KPR/Product/WinkelOrder.cls.xml	(.../WinkelOrder.cls.xml)	(revision 33169)
@@ -144,13 +144,13 @@
 </Method>
 
 <Method name="GeefType">
-<ReturnType>zTryout.MVI.KPR.Product.enu.WinkelOrderType</ReturnType>
+<ReturnType>zTryout.MVI.KPR.Product.enu.ProductStockType</ReturnType>
 <Implementation><![CDATA[	Quit $Piece(^KPR(..Product.GeefProductNummer(), ..Sleutel), "\", 3)
 ]]></Implementation>
 </Method>
 
 <Method name="ZetType">
-<FormalSpec>Type:zTryout.MVI.KPR.Product.enu.WinkelOrderType</FormalSpec>
+<FormalSpec>Type:zTryout.MVI.KPR.Product.enu.ProductStockType</FormalSpec>
 <Implementation><![CDATA[	Set $Piece(^KPR(..Product.GeefProductNummer(), ..Sleutel), "\", 3) = Type
 ]]></Implementation>
 </Method>
Index: zTryout/MVI/KPR/Product/enu/WinkelOrderType.cls.xml
===================================================================
diff -u -r33143 -r33169
--- zTryout/MVI/KPR/Product/enu/WinkelOrderType.cls.xml	(.../WinkelOrderType.cls.xml)	(revision 33143)
+++ zTryout/MVI/KPR/Product/enu/WinkelOrderType.cls.xml	(.../ProductStockType.cls.xml)	(revision 33169)
@@ -1,6 +1,6 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
-<Class name="zTryout.MVI.KPR.Product.enu.WinkelOrderType">
+<Class name="zTryout.MVI.KPR.Product.enu.ProductStockType">
 <ClassType>datatype</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>TECH.Enumeration</Super>
@@ -15,14 +15,14 @@
 
 <Method name="KOM">
 <ClassMethod>1</ClassMethod>
-<ReturnType>zTryout.MVI.KPR.Product.enu.WinkelOrderType</ReturnType>
+<ReturnType>zTryout.MVI.KPR.Product.enu.ProductStockType</ReturnType>
 <Implementation><![CDATA[	Quit "1"
 ]]></Implementation>
 </Method>
 
 <Method name="Stock">
 <ClassMethod>1</ClassMethod>
-<ReturnType>zTryout.MVI.KPR.Product.enu.WinkelOrderType</ReturnType>
+<ReturnType>zTryout.MVI.KPR.Product.enu.ProductStockType</ReturnType>
 <Implementation><![CDATA[ 	Quit ""
 ]]></Implementation>
 </Method>
FishEye: Tag 33169 refers to a dead (removed) revision in file `zTryout/MVI/KPR/Product/enu/WinkelOrderType.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: zTryout/MVI/KPR/Product/enu/ProductStockType/AutoComplete.cls.xml
===================================================================
diff -u
--- zTryout/MVI/KPR/Product/enu/ProductStockType/AutoComplete.cls.xml	(revision 0)
+++ zTryout/MVI/KPR/Product/enu/ProductStockType/AutoComplete.cls.xml	(revision 33169)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.MVI.KPR.Product.enu.ProductStockType.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="KOM">
+<Type>zTryout.MVI.KPR.Product.enu.ProductStockType</Type>
+<InitialExpression>"1"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Stock">
+<Type>zTryout.MVI.KPR.Product.enu.ProductStockType</Type>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: zTryout/MVI/KPR/Product/enu/ProductStockType/Verwerker.cls.xml
===================================================================
diff -u
--- zTryout/MVI/KPR/Product/enu/ProductStockType/Verwerker.cls.xml	(revision 0)
+++ zTryout/MVI/KPR/Product/enu/ProductStockType/Verwerker.cls.xml	(revision 33169)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.MVI.KPR.Product.enu.ProductStockType.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>ProductStockType:zTryout.MVI.KPR.Product.enu.ProductStockType</FormalSpec>
+<Implementation><![CDATA[
+	If ProductStockType = "1" {
+		Do ..VerwerkKOM()
+	} ElseIf ProductStockType = "" {
+		Do ..VerwerkStock()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(ProductStockType,"zTryout.MVI.KPR.Product.enu.ProductStockType",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkKOM">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStock">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
FishEye: Tag 33169 refers to a dead (removed) revision in file `zTryout/MVI/KPR/Product/enu/WinkelOrderType/Verwerker.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
FishEye: Tag 33169 refers to a dead (removed) revision in file `zTryout/MVI/KPR/Product/enu/WinkelOrderType/AutoComplete.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?