Index: APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml
===================================================================
diff -u -r36535 -r36777
--- APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml	(.../Ontvanger.cls.xml)	(revision 36535)
+++ APPS/EDIExport/AankoopOrderResponse/impl/BLUM/Ontvanger.cls.xml	(.../Ontvanger.cls.xml)	(revision 36777)
@@ -91,8 +91,11 @@
 
 <Method name="GeefTeVerwerkenBestanden">
 <Private>1</Private>
+<ReturnType>%ListOfObjects</ReturnType>
 <Implementation><![CDATA[
 	#Dim GevondenBestanden As %ListOfObjects = ..FileUtils.GetFileList(..GeefBestandLocatie(),"ORDRSP*.xml",0)
+	#Dim FileInfoComparator As TECH.Comparator.FileInfoComparator = ##class(TECH.Comparator.FileInfoComparator).%New("Name")
+	Do ##class(TECH.Algo.Sort.InsertionSort).Sort(.GevondenBestanden,FileInfoComparator)
 	Quit GevondenBestanden
 ]]></Implementation>
 </Method>