Index: AX/Uitgaand/common/impl/AifGenerator.cls.xml
===================================================================
diff -u -r34685 -r34687
--- AX/Uitgaand/common/impl/AifGenerator.cls.xml	(.../AifGenerator.cls.xml)	(revision 34685)
+++ AX/Uitgaand/common/impl/AifGenerator.cls.xml	(.../AifGenerator.cls.xml)	(revision 34687)
@@ -49,7 +49,7 @@
 	set:Command="SalesInvoice/Create" Message.Body.MessageParts.LedgerGeneralJournal = Converter.Convert(Id)
 		
 	#dim Path As %String = ##class(TECH.Files).AppendSubPath(##class(TECH.Config.ConfigMgr).Instance().GeefString("MSMGATEWAY"),"AIF\Inbound")
-	#dim Filename As %String = $replace(Command,"/","-")_" "_Id_" "_" - "_..FirmaBepaler.GeefInitialen()_##class(TECH.Files).GeefCurrentTimeStamp()_" .xml"
+	#dim Filename As %String = $replace(Command,"/","-")_" "_$replace(Id,"|","")_" "_" - "_..FirmaBepaler.GeefInitialen()_" - "_##class(TECH.Files).GeefCurrentTimeStamp()_".xml"
 	#dim FullFilename As %String = ##class(TECH.Files).AppendFile(Path,Filename)
 		
 	#dim FileWriter As TECH.File.FileWriter = ..FileAPI.GeefFileWriter()