Index: AXimpl/MessageInProcessor.cls.xml
===================================================================
diff -u -r48774 -r48832
--- AXimpl/MessageInProcessor.cls.xml	(.../MessageInProcessor.cls.xml)	(revision 48774)
+++ AXimpl/MessageInProcessor.cls.xml	(.../MessageInProcessor.cls.xml)	(revision 48832)
@@ -50,6 +50,10 @@
 <Implementation><![CDATA[
 	Do ..Logger.Info("Verwerking inkomende AX bestand", "Bestandsnaam " _FullFilename)
 	
+	#dim SessionId As %String = ##class(TECH.Context.RuntimeContext).Instance().GeefSessieID()
+	set $piece(SessionId," ",2) = ##class(TECH.File).GeefBestandsnaam(FullFilename)
+	do ##class(TECH.Context.RuntimeContext).Instance().ZetSessieID(SessionId)
+	
 	Try {
 
 		#dim DebugStream As %Stream.Object = ##class(%GlobalCharacterStream).%New()
Index: AXimpl/MessageInCollector.cls.xml
===================================================================
diff -u -r42602 -r48832
--- AXimpl/MessageInCollector.cls.xml	(.../MessageInCollector.cls.xml)	(revision 42602)
+++ AXimpl/MessageInCollector.cls.xml	(.../MessageInCollector.cls.xml)	(revision 48832)
@@ -29,6 +29,8 @@
 
 <Method name="Process">
 <Implementation><![CDATA[
+	do ##class(TECH.Context.RuntimeContext).Instance().ZetApplicatie("AxIncomingFileBasedRequests")
+	
 	#dim Path As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_IF_IN_RequestPath")
 	set IteratorUitvoerder = ##class(TECH.IteratorUitvoerder).%New(..FileAPI.GetFileList(Path,"*.xml") , ##class(TECH.ListUtils).CreateListOfObjects(..MessageInProcessor))
 	do IteratorUitvoerder.VoerUit()