Index: WS/Vhisie4/KlantDocument/KlantDocumentService.cls.xml
===================================================================
diff -u -r48575 -r48579
--- WS/Vhisie4/KlantDocument/KlantDocumentService.cls.xml	(.../KlantDocumentService.cls.xml)	(revision 48575)
+++ WS/Vhisie4/KlantDocument/KlantDocumentService.cls.xml	(.../KlantDocumentService.cls.xml)	(revision 48579)
@@ -22,6 +22,11 @@
 <Default>http://vhisie.vanhoecke.be/V4</Default>
 </Parameter>
 
+<Parameter name="RunAX">
+<Type>%Boolean</Type>
+<Default>1</Default>
+</Parameter>
+
 <Property name="HeaderValidator">
 <Type>WSimpl.Vhisie4.HeaderValidator</Type>
 <Private>1</Private>
@@ -75,7 +80,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefVerkoopHistoriekResponse = ##class(AX.Uitgaand.EC.Data.impl.HistoriekOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefVerkoopHistoriekResponse
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.HistoriekOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.HistoriekOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response.KlantId)
 	
 	#dim HistoriekGroepIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Response.Lijst)
@@ -108,7 +117,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefOrdersResponse = ##class(AX.Uitgaand.EC.Data.impl.OrdersOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefOrdersResponse
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.OrdersOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.OrdersOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response.KlantId)
 	
 	#dim HoofdingIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Response.Lijst)
@@ -140,7 +153,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefFacturenResponse = ##class(AX.Uitgaand.EC.Data.impl.FacturenOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefFacturenResponse 
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.FacturenOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.FacturenOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response.KlantId)
 	
 	#dim HoofdingIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Response.Lijst)
@@ -171,7 +188,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefOffertesResponse = ##class(AX.Uitgaand.EC.Data.impl.OffertesOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefOffertesResponse 
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.OffertesOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.OffertesOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response.KlantId)
 	
 	#dim HoofdingIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Response.Lijst)
@@ -203,7 +224,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefLeveringenResponse = ##class(AX.Uitgaand.EC.Data.impl.LeveringenOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefLeveringenResponse 
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.LeveringenOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.LeveringenOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response)
 	
 	#dim HoofdingIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(Response.Lijst)
@@ -227,7 +252,11 @@
 	Do ..HeaderValidator.ValidateHeader(Request.Header)
 	Do ..SessionManager.RegisterSession(Request.Header)
 	
-	#dim Response As WS.Vhisie4.KlantDocument.GeefDocumentResponse = ##class(AX.Uitgaand.EC.Data.impl.DocumentOphalen).%New(Request).GeefResponse()
+	#dim Response As WS.Vhisie4.KlantDocument.GeefDocumentResponse
+	
+	Set:$$$Not(..#RunAX) Response = ##class(AX.Uitgaand.EC.Data.impl.DocumentOphalen).%New(Request).GeefResponse()
+	Set:..#RunAX Response = ##class(AX.Uitgaand.EC.DataAX.impl.DocumentOphalen).%New(Request).GeefResponse()
+	
 	Set Response.KlantId = ..KlantIdConverter.ConvertToAx(Response)
 	
 	Quit Response