Index: vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsNul.cls.xml
===================================================================
diff -u
--- vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsNul.cls.xml	(revision 0)
+++ vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsNul.cls.xml	(revision 3176)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsNul">
+<ClassType>serial</ClassType>
+<Super>%SerialObject,%XML.Adaptor</Super>
+<Inheritance>left</Inheritance>
+
+<Parameter name="XMLIGNORENULL">
+<Default>0</Default>
+</Parameter>
+
+<Property name="LegeProperty">
+<Type>%String</Type>
+</Property>
+
+<Property name="PropertyNietInXML">
+<Type>%String</Type>
+</Property>
+
+<Property name="OpgevuldeProperty">
+<Type>%String</Type>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>XMLIgnoreNullIsNulState</State>
+<StreamLocation>^vhUnitTestAF8B.XMLIgnoreNulFC2S</StreamLocation>
+<Data name="XMLIgnoreNullIsNulState">
+<Value name="1">
+<Value>LegeProperty</Value>
+</Value>
+<Value name="2">
+<Value>OpgevuldeProperty</Value>
+</Value>
+<Value name="3">
+<Value>propertyNietInXML</Value>
+</Value>
+<Value name="4">
+<Value>PropertyNietInXML</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsEen.cls.xml
===================================================================
diff -u
--- vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsEen.cls.xml	(revision 0)
+++ vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsEen.cls.xml	(revision 3176)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsEen">
+<ClassType>serial</ClassType>
+<Super>%SerialObject,%XML.Adaptor</Super>
+<Inheritance>left</Inheritance>
+
+<Parameter name="XMLIGNORENULL">
+<Default>1</Default>
+</Parameter>
+
+<Property name="LegeProperty">
+<Type>%String</Type>
+</Property>
+
+<Property name="PropertyNietInXML">
+<Type>%String</Type>
+</Property>
+
+<Property name="OpgevuldeProperty">
+<Type>%String</Type>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>XMLIgnoreNullIsEenState</State>
+<StreamLocation>^vhUnitTestAF8B.XMLIgnoreNuCC3FS</StreamLocation>
+<Data name="XMLIgnoreNullIsEenState">
+<Value name="1">
+<Value>LegeProperty</Value>
+</Value>
+<Value name="2">
+<Value>propertyNietInXML</Value>
+</Value>
+<Value name="3">
+<Value>OpgevuldeProperty</Value>
+</Value>
+<Value name="4">
+<Value>PropertyNietInXML</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/Test.cls.xml
===================================================================
diff -u
--- vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/Test.cls.xml	(revision 0)
+++ vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/Test.cls.xml	(revision 3176)
@@ -0,0 +1,47 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Method name="Test Standaard gedrag class xmlignorenull 0">
+<Implementation><![CDATA[
+	Set correlator = ##class(TECH.XMLCorrelater).%New()
+	#dim classname as %String = ##class(vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsNul).%ClassName(1)
+	#Dim result as vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsNul
+	Set result = correlator.GeefObjectVanBestand(##class(TECH.Files).AppendFile( ..GeefBestandLocatie(),"Input.xml"),classname,"XMLIgnoreNullIsNul")
+	
+	Do $$$AssertEquals(result.LegeProperty,$char(0))
+	Do $$$AssertEquals(result.PropertyNietInXML,"")
+	Do $$$AssertEquals(result.OpgevuldeProperty,"Opgevuld")
+]]></Implementation>
+</Method>
+
+<Method name="Test Standaard gedrag class xmlignorenull 1">
+<Implementation><![CDATA[
+	Set correlator = ##class(TECH.XMLCorrelater).%New()
+	#dim classname as %String = ##class(vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsEen).%ClassName(1)
+	#Dim result as vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsEen
+	Set result = correlator.GeefObjectVanBestand(##class(TECH.Files).AppendFile( ..GeefBestandLocatie(),"Input.xml"),classname,"XMLIgnoreNullIsEen")
+	
+	Do $$$AssertEquals(result.LegeProperty,"")
+	Do $$$AssertEquals(result.PropertyNietInXML,"")
+	Do $$$AssertEquals(result.OpgevuldeProperty,"Opgevuld")
+]]></Implementation>
+</Method>
+
+<Method name="Test Standaard gedrag class xmlignorenull RUNTIME">
+<Implementation><![CDATA[
+	Set correlator = ##class(TECH.XMLCorrelater).%New()
+	#dim classname as %String = ##class(vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsRUNTIME).%ClassName(1)
+	#Dim result as vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsRUNTIME
+	Set result = correlator.GeefObjectVanBestand(##class(TECH.Files).AppendFile( ..GeefBestandLocatie(),"Input.xml"),classname,"XMLIgnoreNullIsRUNTIME")
+	
+	Do $$$AssertEquals(result.LegeProperty,$char(0))
+	Do $$$AssertEquals(result.PropertyNietInXML,"")
+	Do $$$AssertEquals(result.OpgevuldeProperty,"Opgevuld")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsRUNTIME.cls.xml
===================================================================
diff -u
--- vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsRUNTIME.cls.xml	(revision 0)
+++ vhUnitTest/TECH/XMLCorrelator/GeefObjectVanBestand/XMLIgnoreNullIsRUNTIME.cls.xml	(revision 3176)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhUnitTest.TECH.XMLCorrelator.GeefObjectVanBestand.XMLIgnoreNullIsRUNTIME">
+<ClassType>serial</ClassType>
+<Super>%SerialObject,%XML.Adaptor</Super>
+<Inheritance>left</Inheritance>
+
+<Parameter name="XMLIGNORENULL">
+<Default>RUNTIME</Default>
+</Parameter>
+
+<Property name="LegeProperty">
+<Type>%String</Type>
+</Property>
+
+<Property name="PropertyNietInXML">
+<Type>%String</Type>
+</Property>
+
+<Property name="OpgevuldeProperty">
+<Type>%String</Type>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>XMLIgnoreNullIsRUNTIMEState</State>
+<StreamLocation>^vhUnitTestAF8B.XMLIgnoreNu581AS</StreamLocation>
+<Data name="XMLIgnoreNullIsRUNTIMEState">
+<Value name="1">
+<Value>LegeProperty</Value>
+</Value>
+<Value name="2">
+<Value>propertyNietInXML</Value>
+</Value>
+<Value name="3">
+<Value>OpgevuldeProperty</Value>
+</Value>
+<Value name="4">
+<Value>PropertyNietInXML</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>