Index: APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml
===================================================================
diff -u -r35934 -r35938
--- APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml	(.../UitsparingValidator.cls.xml)	(revision 35934)
+++ APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator.cls.xml	(.../UitsparingValidator.cls.xml)	(revision 35938)
@@ -26,8 +26,11 @@
 	Quit:(..Product.Klasse="L")&&(HeeftUitsparingData) $$$False
 	Quit:(..Product.Klasse="SP2")&&$$$HasLength(..Product.UitsparingDataBreedteM_..Product.UitsparingDataBreedteZ2) $$$False
 	Quit:(..Product.Klasse="SY2")&&(..Product.UitsparingDataAantalUitsparingen=1)&&$$$HasLength(..Product.UitsparingDataBreedteM_..Product.UitsparingDataBreedteZ2) $$$False
-	Quit:(..Product.Klasse="SY2")&&(..Product.UitsparingDataAantalUitsparingen=2)&&((..Product.UitsparingDataBreedteM=0)||(..Product.UitsparingDataBreedteX=0)||(..Product.UitsparingDataBreedteY=0)||(..Product.UitsparingDataBreedteZ1=0)||(..Product.UitsparingDataBreedteZ2=0)) $$$False
-	Quit $$$False
+	Quit:(..Product.Klasse="SY2")&&(..Product.UitsparingDataAantalUitsparingen=2)&&((+..Product.UitsparingDataBreedteM=0)||(+..Product.UitsparingDataBreedteX=0)||(+..Product.UitsparingDataBreedteY=0)||(+..Product.UitsparingDataBreedteZ1=0)||(+..Product.UitsparingDataBreedteZ2=0)) $$$False
+	Quit:(..Product.Klasse="SY2")&&(..Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Staal())&&$$$Not(##class(TECH.StringUtils).Equals(..Product.UitsparingDataBreedteZ1,"150","250")&&##class(TECH.StringUtils).Equals(..Product.UitsparingDataBreedteZ2,"150","250")) $$$False
+	Quit:(..Product.Klasse="SP2")&&(..Product.TussenrugMateriaal=##class(DOM.PM.enu.TBXRugwandMateriaal).Staal())&&$$$Not(##class(TECH.StringUtils).Equals(..Product.UitsparingDataBreedteZ1,"150","250")) $$$False
+
+	Quit $$$True
 ]]></Implementation>
 </Method>
 </Class>
Index: vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator/Test.cls.xml
===================================================================
diff -u -r35934 -r35938
--- vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 35934)
+++ vhUnitTest/APPS/EDI/Bestel/impl/BestelService/TandemboxBesteller/Validator/UitsparingValidator/Test.cls.xml	(.../Test.cls.xml)	(revision 35938)
@@ -90,6 +90,170 @@
 	Do $$$AssertFalse(Validator.IsValid())
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Klasse = Spoelbak, TussenrugMateriaal Metaal, uitsparingbreedte 150">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SP2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 1
+	Set Product.UitsparingDataBreedteZ1 = 150
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Spoelbak, TussenrugMateriaal Metaal, uitsparingbreedte 250">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SP2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 1
+	Set Product.UitsparingDataBreedteZ1 = 250
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Spoelbak, TussenrugMateriaal Metaal, uitsparingbreedte 42">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SP2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 1
+	Set Product.UitsparingDataBreedteZ1 = 42
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertFalse(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Spoelbak, TussenrugMateriaal Hout, breedte is altijd ok">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SP2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+	Set Product.UitsparingDataAantalUitsparingen = 1
+	Set Product.UitsparingDataBreedteZ1 = 42
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Metaal, uitsparingbreedte 150/150">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 150
+	Set Product.UitsparingDataBreedteZ2 = 150
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Metaal, uitsparingbreedte 150/250">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 150
+	Set Product.UitsparingDataBreedteZ2 = 250
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Metaal, uitsparingbreedte 250/150">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 250
+	Set Product.UitsparingDataBreedteZ2 = 150
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Metaal, uitsparingbreedte 250/250">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 150
+	Set Product.UitsparingDataBreedteZ2 = 150
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Metaal, uitsparingbreedte 42/150">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Staal()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 42
+	Set Product.UitsparingDataBreedteZ2 = 150
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertFalse(Validator.IsValid())
+]]></Implementation>
+</Method>
+
+<Method name="Test: Klasse = Siffon, TussenrugMateriaal Hout, uitsparingbreedte 42/150">
+<Implementation><![CDATA[
+	#dim Product As APPS.EDI.common.dto.v001.LadeTBX = ##class(APPS.EDI.common.dto.v001.LadeTBX).%New()
+	Set Product.Klasse = "SY2"
+	Set Product.TussenrugMateriaal = ##class(DOM.PM.enu.TBXRugwandMateriaal).Hout()
+	Set Product.UitsparingDataAantalUitsparingen = 2
+	Set Product.UitsparingDataBreedteZ1 = 42
+	Set Product.UitsparingDataBreedteZ2 = 150
+	Set Product.UitsparingDataBreedteM = 1
+	Set Product.UitsparingDataBreedteX = 1
+	Set Product.UitsparingDataBreedteY = 1
+	
+	Set Validator = ##class(APPS.EDI.Bestel.impl.BestelService.TandemboxBesteller.Validator.UitsparingValidator).%New(Product)
+	
+	Do $$$AssertTrue(Validator.IsValid())
+]]></Implementation>
+</Method>
 </Class>
 
 
Index: DOM/PM/enu/TBXRugwandMateriaal/Verwerker.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXRugwandMateriaal/Verwerker.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXRugwandMateriaal/Verwerker.cls.xml	(revision 35938)
@@ -0,0 +1,40 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXRugwandMateriaal.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>TBXRugwandMateriaal:DOM.PM.enu.TBXRugwandMateriaal</FormalSpec>
+<Implementation><![CDATA[
+	If TBXRugwandMateriaal = "Hout" {
+		Do ..VerwerkHout()
+	} ElseIf TBXRugwandMateriaal = "Staal" {
+		Do ..VerwerkStaal()
+	} Else {
+		Set Exceptie = ##class(TECH.Exceptions.EnumerationException).%New(TBXRugwandMateriaal,"DOM.PM.enu.TBXRugwandMateriaal",$classname())
+		Do ##class(TECH.ExceptionHandler).Throw(Exceptie)
+	}
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkHout">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="VerwerkStaal">
+<Abstract>1</Abstract>
+<Private>1</Private>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXRugwandMateriaal.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXRugwandMateriaal.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXRugwandMateriaal.cls.xml	(revision 35938)
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXRugwandMateriaal">
+<ClassType>datatype</ClassType>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Enumeration</Super>
+
+<Parameter name="VALUELIST">
+<Default>;Hout;Staal</Default>
+</Parameter>
+
+<Parameter name="DISPLAYLIST">
+<Default>;Hout;Staal</Default>
+</Parameter>
+
+<Method name="Hout">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugwandMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "Hout"
+]]></Implementation>
+</Method>
+
+<Method name="Staal">
+<ClassMethod>1</ClassMethod>
+<ReturnType>DOM.PM.enu.TBXRugwandMateriaal</ReturnType>
+<Implementation><![CDATA[	Quit "Staal"
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/enu/TBXRugwandMateriaal/AutoComplete.cls.xml
===================================================================
diff -u
--- DOM/PM/enu/TBXRugwandMateriaal/AutoComplete.cls.xml	(revision 0)
+++ DOM/PM/enu/TBXRugwandMateriaal/AutoComplete.cls.xml	(revision 35938)
@@ -0,0 +1,28 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.enu.TBXRugwandMateriaal.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="Hout">
+<Type>%String</Type>
+<InitialExpression>"Hout"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+
+<Property name="Staal">
+<Type>%String</Type>
+<InitialExpression>"Staal"</InitialExpression>
+<Transient>1</Transient>
+<ReadOnly>1</ReadOnly>
+</Property>
+</Class>
+
+
+</Export>
Index: EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml
===================================================================
diff -u -r35923 -r35938
--- EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 35923)
+++ EXT/Unishop/PurchaseOrder001/CreateOrder/LadeEigenschappenTBX.cls.xml	(.../LadeEigenschappenTBX.cls.xml)	(revision 35938)
@@ -52,9 +52,9 @@
 <Parameter name="XMLNAME" value="SideRaiseDesignElementColour"/>
 </Property>
 
-<Property name="AantalUitsparingen">
-<Type>TECH.String</Type>
-<Parameter name="XMLNAME" value="NumberOfCutOuts"/>
+<Property name="UitsparingDataAantalUitsparingen">
+<Type>TECH.Integer</Type>
+<Parameter name="XMLNAME" value="NumberOfSiphonCaps"/>
 </Property>
 
 <Property name="UitsparingDataBreedteX">
@@ -215,6 +215,9 @@
 <Value name="41">
 <Value>UitsparingDataBreedteY</Value>
 </Value>
+<Value name="42">
+<Value>UitsparingDataAantalUitsparingen</Value>
+</Value>
 </Data>
 </Storage>
 </Class>