Index: zTryout/JWI/SAXParser/PerfionDTO.cls.xml
===================================================================
diff -u
--- zTryout/JWI/SAXParser/PerfionDTO.cls.xml	(revision 0)
+++ zTryout/JWI/SAXParser/PerfionDTO.cls.xml	(revision 60427)
@@ -0,0 +1,25 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.JWI.SAXParser.PerfionDTO">
+<Super>TECH.RegisteredObject,%XML.Adaptor</Super>
+
+<Property name="VertalingsType">
+<Type>%String</Type>
+</Property>
+
+<Property name="VertalingsGroep">
+<Type>%String</Type>
+</Property>
+
+<Property name="Sleutel">
+<Type>%String</Type>
+</Property>
+
+<Property name="Vertalingen">
+<Type>%String</Type>
+<Collection>array</Collection>
+</Property>
+</Class>
+
+
+</Export>
Index: zTryout/JWI/SAXParser/Test2.cls.xml
===================================================================
diff -u
--- zTryout/JWI/SAXParser/Test2.cls.xml	(revision 0)
+++ zTryout/JWI/SAXParser/Test2.cls.xml	(revision 60427)
@@ -0,0 +1,146 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.JWI.SAXParser.Test2">
+<Super>%XML.SAX.ContentHandler,TECH.RegisteredObject</Super>
+
+<Property name="PerfionVertalingen">
+<Type>zTryout.JWI.SAXParser.PerfionDTO</Type>
+<Collection>list</Collection>
+<Private>1</Private>
+</Property>
+
+<Property name="Skip">
+<Type>%Boolean</Type>
+</Property>
+
+<Property name="LastValue">
+<Type>%String</Type>
+</Property>
+
+<Property name="Dto">
+<Type>zTryout.JWI.SAXParser.PerfionDTO</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>initvalue:%CacheString</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..PerfionVertalingen = ##class(%ListOfObjects).%New()
+	Set ..Skip = $$$False
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ResetDto">
+<Implementation><![CDATA[	Set ..Dto = ##class(zTryout.JWI.SAXParser.PerfionDTO).%New()
+]]></Implementation>
+</Method>
+
+<Method name="startElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[
+	If qname = "Features" {
+		Set ..Skip = $$$True
+	}
+	
+	Quit:(..Skip)
+
+	If qname = "Vertalingssleutel" {
+		Set ..Dto = ##class(zTryout.JWI.SAXParser.PerfionDTO).%New()
+	
+	}
+]]></Implementation>
+</Method>
+
+<Method name="endElement">
+<FormalSpec>uri:%String,localname:%String,qname:%String,attrs:%List</FormalSpec>
+<Implementation><![CDATA[
+	if $$$Not(..Skip){
+		if localname = "Vertalingssleutel" {
+			Do DumpObject^%apiOBJ(..Dto)
+			Do ..PerfionVertalingen.Insert(..Dto)
+		} else {
+			Set:(localname = "Value") ..Dto.Sleutel = ..LastValue
+			Set:(localname = "Vertalingsgroep") ..Dto.VertalingsGroep = ..LastValue
+			Set:(localname = "Vertalingstypes") ..Dto.VertalingsType = ..LastValue
+			Set:(localname = "") ..Dto.Sleutel = ..LastValue
+			if ##class(TECH.StringUtils).StartsWith(localname,"Vertaling"){
+				#dim Taal as %String = ##class(TECH.StringUtils).Replace(localname,"Vertaling","")
+				if (##class(TECH.StringUtils).Equals(Taal,"DA","DE","EN","ES","FR","IT","NL","NO")){
+					Do ..Dto.Vertalingen.SetAt(..LastValue,Taal)
+				}
+			}
+		}
+
+	}
+	if localname = "Features" {
+		Set ..Skip = $$$False
+	}
+]]></Implementation>
+</Method>
+
+<Method name="characters">
+<FormalSpec>chars:%Library.String,length:%Library.Integer</FormalSpec>
+<Implementation><![CDATA[
+	Set:($$$Not(..Skip)) ..LastValue = chars
+ 	Quit
+]]></Implementation>
+</Method>
+
+<Method name="ReadFile">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>file:%String</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+    //create an instance of this class
+    set handler=..%New()
+
+    //parse the given file using this instance
+    set status=##class(%XML.SAX.Parser).ParseFile(file,handler)
+
+    //quit with status
+    quit status
+]]></Implementation>
+</Method>
+
+<Method name="endDocument">
+<Implementation><![CDATA[
+	w !,"enddoc count " _ ..PerfionVertalingen.Count()
+ Quit
+]]></Implementation>
+</Method>
+
+<Method name="error">
+<FormalSpec>error:%Library.String</FormalSpec>
+<Implementation><![CDATA[
+	w !,"Error :" _ error
+ 	Quit
+]]></Implementation>
+</Method>
+
+<Method name="fatalError">
+<FormalSpec>fatalerror:%Library.String</FormalSpec>
+<Implementation><![CDATA[
+	w !,"Fatal error :" _ fatalerror
+ 	Quit
+]]></Implementation>
+</Method>
+
+<Method name="GeefXml">
+<ClassMethod>1</ClassMethod>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Xml as %String = ""
+	
+	
+	Quit Xml
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>