Index: AX/Uitgaand/EC/Data/impl/Testing.cls.xml
===================================================================
diff -u -r38803 -r39105
--- AX/Uitgaand/EC/Data/impl/Testing.cls.xml	(.../Testing.cls.xml)	(revision 38803)
+++ AX/Uitgaand/EC/Data/impl/Testing.cls.xml	(.../Testing.cls.xml)	(revision 39105)
@@ -40,6 +40,39 @@
 ]]></Implementation>
 </Method>
 
+<Method name="Doc">
+<Description>
+d ##class(AX.Uitgaand.EC.Data.impl.Testing).Doc()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Set request=##class(WS.Vhisie4.KlantDocument.GeefDocumentRequest).%New()
+	Set request.Header.KlantId=1736
+	Set request.Header.Taal="N"
+	Set request.Header.SessieId="xx"
+	Set request.Header.RequestId="yy"
+	Set request.Header.PersonalityId="VH"
+	Set request.Header.GebruikerId="gg"
+	Set request.Header.GebruikerIp="11.11.11.11"
+
+	Set request.DocumentId=591298
+	Set request.DocumentType="Factuur"
+	Set request.ResultaatType="PDF"
+	;Set request.DocumentId=315652
+	;Set request.DocumentType="Levering"
+	
+	;Set request.DocumentId=166946
+	;Set request.DocumentType="Order"
+	;Set request.DocumentId="573781"
+	;Set request.DocumentType="Offerte"
+
+	Set bl=##class(WS.Vhisie4.KlantDocument.KlantDocumentService).%New()
+	Set dto=bl.GeefDocument(request)
+
+	Do ObjToXMLFile^vhLib(request,"\\notes01\shared\P V\EC Document request "_request.Header.KlantId_" "_request.DocumentId_".xml")
+	Do ObjToXMLFile^vhLib(dto,"\\notes01\shared\P V\EC Document response "_request.Header.KlantId_" "_request.DocumentId_".xml")
+]]></Implementation>
+</Method>
+
 <Method name="Orders">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>KlantId:%String,Periode:%Integer</FormalSpec>
Index: AX/Uitgaand/EC/Data/impl/DocumentOphalen.cls.xml
===================================================================
diff -u -r38273 -r39105
--- AX/Uitgaand/EC/Data/impl/DocumentOphalen.cls.xml	(.../DocumentOphalen.cls.xml)	(revision 38273)
+++ AX/Uitgaand/EC/Data/impl/DocumentOphalen.cls.xml	(.../DocumentOphalen.cls.xml)	(revision 39105)
@@ -18,34 +18,6 @@
 <Type>BL.EC.pxDocLink</Type>
 </Property>
 
-<Method name="test">
-<Description>
-d ##class(AX.Uitgaand.EC.Data.impl.DocumentOphalen).test()</Description>
-<ClassMethod>1</ClassMethod>
-<Implementation><![CDATA[
-	Set Aanvraag=##class(WS.Vhisie4.KlantDocument.GeefDocumentRequest).%New()
-	Set Aanvraag.Header=##class(WS.Vhisie4.RequestHeader).%New()
-	Set Aanvraag.Header.KlantId=1736
-	Set Aanvraag.Header.Taal="N"
-
-	Set Aanvraag.DocumentId=591298
-	Set Aanvraag.DocumentType="Factuur"
-	Set Aanvraag.ResultaatType="PDF"
-	;Set Aanvraag.DocumentId=315652
-	;Set Aanvraag.DocumentType="Levering"
-	
-	;Set Aanvraag.DocumentId=166946
-	;Set Aanvraag.DocumentType="Order"
-	;Set Aanvraag.DocumentId="573781"
-	;Set Aanvraag.DocumentType="Offerte"
-
-	Set bl=..%New(Aanvraag)
-	
-	D bl.GeefResponse().XMLExport(,"literal,indent")
-	D bl.DocURL.XMLExport(,"literal,indent")
-]]></Implementation>
-</Method>
-
 <Method name="%OnNew">
 <Description>
 DocType : Factuur, Levering, Order, Offerte, PrijsLijst, Rappel