Index: TECH/File/impl/FileAPI.cls.xml
===================================================================
diff -u -r2392 -r2484
--- TECH/File/impl/FileAPI.cls.xml	(.../FileAPI.cls.xml)	(revision 2392)
+++ TECH/File/impl/FileAPI.cls.xml	(.../FileAPI.cls.xml)	(revision 2484)
@@ -3,6 +3,27 @@
 <Class name="TECH.File.impl.FileAPI">
 <Super>TECH.RegisteredObject,TECH.File.FileAPI</Super>
 
+<Method name="GetFileList">
+<FormalSpec>Directory:%String,FileMask:%String="*.*",AddSubDir:%Boolean=1,IncludeDirs:%Boolean=0</FormalSpec>
+<ReturnType>TECH.Iterator</ReturnType>
+<Implementation><![CDATA[
+	set FileIterator = ##class(TECH.ListIterator).%New(##class(TECH.File.impl.FileUtils).%New().GetFileList(Directory,FileMask,AddSubDir,IncludeDirs))
+	quit ##class(TECH.DynamicIterator).%New(FileIterator,"Item.Name")
+]]></Implementation>
+</Method>
+
+<Method name="MoveFile">
+<FormalSpec>FilenameOld:%String,FilenameNew:%String</FormalSpec>
+<Implementation><![CDATA[  	do ##class(TECH.File).Rename(FilenameOld,FilenameNew)
+]]></Implementation>
+</Method>
+
+<Method name="DeleteFile">
+<FormalSpec>FullFilename:%String</FormalSpec>
+<Implementation><![CDATA[	do ##class(TECH.File).Delete(FullFilename)
+]]></Implementation>
+</Method>
+
 <Method name="GeefFileReader">
 <FormalSpec>Bestand:%String</FormalSpec>
 <ReturnType>TECH.File.FileReader</ReturnType>