Index: vhTest/Fake/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml
===================================================================
diff -u
--- vhTest/Fake/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 0)
+++ vhTest/Fake/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 65302)
@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.DOM.PM.Maatwerk.TBX.StalenRugUtils">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.TBX.StalenRugUtils</Super>
+
+<Method name="GeefStalenRugIteratorViaKenmerken">
+<FormalSpec>LadeHoogte:%String,LadeKleur:%String,InterneBreedte:%String,RugHoogte:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml
===================================================================
diff -u
--- vhTest/Mock/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 0)
+++ vhTest/Mock/DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 65302)
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.DOM.PM.Maatwerk.TBX.StalenRugUtils">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>DOM.PM.Maatwerk.TBX.StalenRugUtils,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>DataDefinitieRepository:Prod.Kenmerk.impl.DataDefinitieRepository=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefStalenRugIteratorViaKenmerken">
+<FormalSpec>LadeHoogte:%String,LadeKleur:%String,InterneBreedte:%String,RugHoogte:%String,KlantId:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefStalenRugIteratorViaKenmerken",LadeHoogte,LadeKleur,InterneBreedte,RugHoogte,KlantId)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml
===================================================================
diff -u
--- DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 0)
+++ DOM/PM/Maatwerk/TBX/StalenRugUtils.cls.xml	(revision 65302)
@@ -0,0 +1,53 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.PM.Maatwerk.TBX.StalenRugUtils">
+<ProcedureBlock>1</ProcedureBlock>
+<Super>TECH.Mockable</Super>
+
+<Property name="DataDefinitieRepository">
+<Type>Prod.Kenmerk.impl.DataDefinitieRepository</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>DataDefinitieRepository:Prod.Kenmerk.impl.DataDefinitieRepository=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..DataDefinitieRepository = $$$Inject(DataDefinitieRepository,##class(Prod.Kenmerk.impl.DataDefinitieRepository).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefStalenRugIteratorViaKenmerken">
+<FormalSpec>LadeHoogte:%String,LadeKleur:%String,InterneBreedte:%String,RugHoogte:%String,KlantId:%String</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	#dim IsGeldigeVHKlantId As %Boolean = $IsValidNum(KlantId)
+	If $$$Not(IsGeldigeVHKlantId) {
+		Set KlantId = "A"
+	}
+	#dim RugKleur As %String = LadeKleur   ; 1-op-1 mapping is voorlopig oké, omdat "MG" en "SW" de enige beschikbare kleuren zijn voor Stalen rug.
+	
+	#dim DataDefinitieRepository As Prod.Kenmerk.impl.DataDefinitieRepository = ##class(Prod.Kenmerk.impl.DataDefinitieRepository).%New()	
+	#dim StalenRugDataDefIterator As TECH.Iterator = DataDefinitieRepository.ZoekTbxStalenRugViaKenmerken(InterneBreedte,RugHoogte,RugKleur,KlantId)
+	Quit StalenRugDataDefIterator
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+/*
+	Voorbeeld : (in de KenmerkenEditor wordt dit als volgt voorgesteld) 		
+	Korttekst					ProductId			tB	BasisType	(vpk)		BreedteIntern	Kleur	RugHoogte		Actief (a.k.a. KlantBeperking)	
+	Z30C385S.6 STR   V20 R906	503365		:		1	RUGS		I			417				MG		C				A								
+	Z30C389S.6 STR  *K43*R906	1172871		:		1	RUGS		I			417				MG		C				23112							
+ */
+]]></Content>
+</UDLText>
+</Class>
+
+
+</Export>