Index: DOM/VKP/VerzendwijzeUtils.cls.xml
===================================================================
diff -u
--- DOM/VKP/VerzendwijzeUtils.cls.xml	(revision 0)
+++ DOM/VKP/VerzendwijzeUtils.cls.xml	(revision 52714)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.VKP.VerzendwijzeUtils">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="LijktOpEnumeratieVerzendwijze">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Verzendwijze:%String,Referentie:DOM.VKP.enu.VerzendWijze</FormalSpec>
+<ReturnType>%Boolean</ReturnType>
+<Implementation><![CDATA[
+	#dim ValueList as %ListOfDataTypes = ##class(TECH.ListUtils).PiecesToList($PARAMETER("DOM.VKP.enu.VerzendWijze","VALUELIST"),",")
+	if ##class(TECH.ListUtils).Contains(ValueList,Referentie) {
+		quit (##class(TECH.StringUtils).Trim($Piece(Verzendwijze,";",1)) = ##class(TECH.StringUtils).Trim(Referentie))		
+	} else {
+		Quit $$$False
+	}
+]]></Implementation>
+</Method>
+
+<Method name="EnumWaardeToTrimmedString">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Referentie:DOM.VKP.enu.VerzendWijze</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim ValueList as %ListOfDataTypes = ##class(TECH.ListUtils).PiecesToList($PARAMETER("DOM.VKP.enu.VerzendWijze","VALUELIST"),",")
+	Quit:(##class(TECH.ListUtils).Contains(ValueList,Referentie)) ##class(TECH.StringUtils).Trim(Referentie)
+	Quit ""
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>