Index: APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml
===================================================================
diff -u -r71350 -r71353
--- APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 71350)
+++ APPS/Halux/PPS/Document/impl/LBX/BatchNaarObjective.cls.xml	(.../BatchNaarObjective.cls.xml)	(revision 71353)
@@ -85,6 +85,8 @@
 	If (MESFase > 0 && ##class(TECH.ListUtils).Contains(MESProductieLijnenActiefLijst, ProductieLijn)) {
 		Set IsActief = $$$True
 	}
+	
+	Quit IsActief
 ]]></Implementation>
 </Method>
 
@@ -147,6 +149,12 @@
 <ReturnType>TECH.String</ReturnType>
 <Implementation><![CDATA[
 	#dim BestandLocatie As %String = ##class(TECH.Config.ConfigMgr).Instance().GeefString("APPS.Halux.PPS.Document.impl.BatchNaarObjective.FilePath")
+	#dim IndexAsString = $Length(Index)
+	
+	While ($Length(Index) < 4) {
+		Set Index = "0" _ Index
+	}
+	
 	#dim BestandVolledigeNaam As %String = ##class(TECH.Files).AppendFile(BestandLocatie, BatchId _ "_" _ Index _ "." _ Extensie)
 	
 	Quit BestandVolledigeNaam