Index: BL/Sys/FOP/Interface.cls.xml
===================================================================
diff -u -r74011 -r74028
--- BL/Sys/FOP/Interface.cls.xml	(.../Interface.cls.xml)	(revision 74011)
+++ BL/Sys/FOP/Interface.cls.xml	(.../Interface.cls.xml)	(revision 74028)
@@ -380,66 +380,6 @@
 ]]></Implementation>
 </Method>
 
-<Method name="TransformXMLxxOLD">
-<Description>
-Oproepen via : 
-  s sc=##class(BL.Sys.FOP.Interface).TransformXML("EDI-HAEFELE",,)   w $$ParseStatus^vhLib(sc)</Description>
-<ClassMethod>1</ClassMethod>
-<FormalSpec>TypeXSLT:%String,inXML:%String,lbDataOut:%List="",blnUploadSrc:%Boolean=0</FormalSpec>
-<ReturnType>%Status</ReturnType>
-<Implementation><![CDATA[
-#define SeqItemTProptSet(%k,%v)   SeqItem.TPropts.SetAt(%v,%k)
-	;New TSeq,SeqItem,tmpFileName,tmpFolder,XSLPath,sc
-	Set TSeq=##class(BL.Sys.FOP.Data).NewTaskSequence()
-	Set SeqItem=TSeq.AddNewItem("DocBase")
-	Set SeqItem.OmsID="TrafoXML+Dist"
-	Set SeqItem.CallType="S"
-	Set SeqItem.ADBProcess="VH_XSLTransformAndFile"
-	Set SeqItem.LogLevel=""
-	Set:($L($LG(lbDataOut,1))) tmpFileName=$LG(lbDataOut,1)   ; FileName
-	Set:($L($LG(lbDataOut,2))) tmpFolder=$LG(lbDataOut,2)     ; Folder
-	Do tfxADBInputFile(.inXML)
-	Do tfxADBTaskTransform(.TypeXSLT)
-	Do tfxADBTaskFile(.tmpFileName,.tmpFolder)
-	Set sc=##class(Verwerker).RunTaskSequence(TSeq)
-	Quit sc
-tfxADBInputFile(inXML)
-	If blnUploadSrc Do
-	. Set FStream=##class(%FileBinaryStream).%New()
-	. Do tfxOpenFileStream(.FStream,$G(inXML))   ; Stream ophalen
-	. Set SeqItem.DataInStream=FStream
-	. Set SeqItem.DataInType="Stream"
-	. Set FStream=""
-	Else  Do
-	. Set SeqItem.DataIn=$G(inXML)
-	. Set SeqItem.DataInType="LocalFile"
-	Quit
-tfxOpenFileStream(FStream,FilePath)   ; FStream als .local doorgeven
-	Set tmpStream=##class(%FileBinaryStream).%New()
-	Set sc=tmpStream.LinkToFile(FilePath)
-	If $$$ISOK(sc) Do
-	. Do FStream.CopyFrom(tmpStream)
-	Else  Do
-	. Set FStream=""
-	Quit
-tfxADBTaskTransform(TypeXSLT)
-	If TypeXSLT="EDI-HAEFELE" Do
-	. Set XSLPath="file:///C:/FOP/XSLT/MapToFlowOfferte.xslt"   ; t.o.v. FOP-server   c:/FOP/XSLT/MapToFlowOfferte_v2007r3sp1.xslt
-	Else  If $L(TypeXSLT) Do
-	. Set XSLPath=TypeXSLT
-	Else  Do
-	. Set XSLPath=""
-	Do $$$SeqItemTProptSet("transform_xslurl",XSLPath)
-	Do $$$SeqItemTProptSet("transform_inputasbytearray","true")
-	Quit
-tfxADBTaskFile(FileName,Folder)
-	;Set arTask("TPROPS",$$$dmkDistributionType)=$$$dmkDistributionFile
-	Do $$$SeqItemTProptSet($$$dmkDistributionFileDocname,$G(FileName,"TestSample_"_$P($H,",",2)))
-	Do $$$SeqItemTProptSet($$$dmkDistributionFileFolder,$G(Folder,"E:\FOP\PDFTemp"))
-	Quit
-]]></Implementation>
-</Method>
-
 <Method name="RenderOrgalux">
 <Description>
 lbDataOut=$LB(fname,dir) : dir als netwerkpad doorgeven.