Index: Sys/FOP/SubTaskArchief.cls.xml
===================================================================
diff -u -r1798 -r1835
--- Sys/FOP/SubTaskArchief.cls.xml	(.../SubTaskArchief.cls.xml)	(revision 1798)
+++ Sys/FOP/SubTaskArchief.cls.xml	(.../SubTaskArchief.cls.xml)	(revision 1835)
@@ -6,7 +6,7 @@
 Een opdracht bevat een of meerdere te verwerken documenten en een of meerdere actions</Description>
 <ClassType>serial</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>BL.Sys.FOP.SubTask</Super>
+<Super>%SerialObject</Super>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Property name="DocName">
@@ -27,8 +27,7 @@
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	Set ToString = ""
-	Set:(..DocName_..DocPath '= "") ToString = "Archief : "_..DocPath_"\"_..DocName   ; [Review JBL  WV FOPQueue]  1. Woordje "Archief" mag gewoon "File" zijn
-	                                                                                  ;                            2. Concat Dir en FileName via  ##class(TECH.Files).AppendFile(,)
+	Set:(..DocName_..DocPath '= "") ToString = "File : "_ ##class(TECH.Files).AppendFile(..DocPath,..DocName)
 	Quit ToString
 ]]></Implementation>
 </Method>