Index: zTryout/KCA/VhipDocBaseFactuur.cls.xml
===================================================================
diff -u -r46294 -r55072
--- zTryout/KCA/VhipDocBaseFactuur.cls.xml	(.../VhipDocBaseFactuur.cls.xml)	(revision 46294)
+++ zTryout/KCA/VhipDocBaseFactuur.cls.xml	(.../VhipDocBaseFactuur.cls.xml)	(revision 55072)
@@ -38,6 +38,37 @@
 	}
 ]]></Implementation>
 </Method>
+
+<Method name="RenderFactuurFromPxDoc">
+<Description>
+Do ##class(zTryout.KCA.VhipDocBaseFactuur).RenderFactuurFromPxDoc()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Write !,"Start RenderFactuur"
+	#Dim Testbestand As %String = "\\cache01\e$\CacheExport\FopTaskDoc_3526668_1.1_34438.xml"
+	#Dim pxDoc As BL.Flow.Proxy.pxFlowDocs = ##class(TECH.XMLCorrelater).%New().GeefObjectVanBestand(Testbestand,"BL.Flow.Proxy.pxFlowDocs","DOCS")
+	Write !,"Ingelezen factuurnummer : '" _ pxDoc.Facturen.GetAt(1).FACTUURNR  _ "'"
+	
+	#dim Result As WS.AX.DocGen.dto.RenderResultaat = ##class(WSimpl.AX.DocGen.FactuurService.RenderFactuur).%New().RenderFactuur(pxDoc.Facturen.GetAt(1),##class(WS.AX.DocGen.enu.BestemmingCode).Screen())
+	;#dim Result As WS.AX.DocGen.dto.RenderResultaat = ##class(WSimpl.AX.DocGen.FactuurService.RenderFactuur).%New().RenderFactuur(pxDoc.Facturen.GetAt(1),##class(WS.AX.DocGen.enu.BestemmingCode).Printer(),1)
+	Write !,!,"Result :" , ! , Result.ToDisplayStream().Read(),!
+]]></Implementation>
+</Method>
+
+<Method name="RenderOrder">
+<Description>
+Do ##class(zTryout.KCA.VhipDocBaseFactuur).RenderOrder()</Description>
+<ClassMethod>1</ClassMethod>
+<Implementation><![CDATA[
+	Write !,"Start RenderOrder"
+	#Dim Testbestand As %String = "\\cache01\e$\CacheExport\FopTaskDoc_3526935_1.1_55902.xml"
+	#Dim pxDoc As BL.Flow.Proxy.pxFlowDocs = ##class(TECH.XMLCorrelater).%New().GeefObjectVanBestand(Testbestand,"BL.Flow.Proxy.pxFlowDocs","DOCS")
+	Write !,"Ingelezen ordernummer : '" _ pxDoc.Orders.GetAt(1).ORDERNR  _ "'"
+	
+	#dim Result As WS.AX.DocGen.dto.RenderResultaat = ##class(WS.AX.DocGen.OrderService).%New().RenderOrder(pxDoc.Orders.GetAt(1))
+	Write !,!,"Result :" , ! , Result.ToDisplayStream().Read(),!
+]]></Implementation>
+</Method>
 </Class>