Index: APPS/Halux/Planning/Pitching/impl/BatchPitchExportedService/BatchPitchExportedHelper.cls.xml
===================================================================
diff -u -r71751 -r71752
--- APPS/Halux/Planning/Pitching/impl/BatchPitchExportedService/BatchPitchExportedHelper.cls.xml	(.../BatchPitchExportedHelper.cls.xml)	(revision 71751)
+++ APPS/Halux/Planning/Pitching/impl/BatchPitchExportedService/BatchPitchExportedHelper.cls.xml	(.../BatchPitchExportedHelper.cls.xml)	(revision 71752)
@@ -101,7 +101,7 @@
 		
 	While ((VolgendePitchorde <= HoogstePitchorde) && (VolgendeBatchPitchExported = "")) {
 		#dim VolgendeGeptichteBatch As APPS.Halux.Planning.Pitching.dto.BatchPitched = ..GeefBatchPitchedViaPitchordeEnLijnNummer(VolgendePitchorde, PitchedBatch.LijnNr)
-		Set VolgendeBatchPitchExported = ..GeefBatchExportedViaBatchId(VolgendeGeptichteBatch.Batch.GeefID())
+		Set VolgendeBatchPitchExported = ..GeefBatchPitchExportedViaBatchId(VolgendeGeptichteBatch.Batch.GeefID())
 
 		Set VolgendePitchorde = VolgendePitchorde + 1
 	}
@@ -144,18 +144,18 @@
 		
 	While ((VolgendePitchorde <= HoogstePitchorde) && (VolgendeBatchPitchExported = "")) {
 		#dim VolgendeGeptichteBatch As APPS.Halux.Planning.Pitching.dto.BatchPitched = ..GeefBatchPitchedViaPitchordeEnLijnNummer(VolgendePitchorde, PitchedBatch.LijnNr)
-		Set VolgendeBatchPitchExported = ..GeefBatchExportedViaBatchId(VolgendeGeptichteBatch.Batch.GeefID())
+		Set VolgendeBatchPitchExported = ..GeefBatchPitchExportedViaBatchId(VolgendeGeptichteBatch.Batch.GeefID())
 
 		Set VolgendePitchorde = VolgendePitchorde + 1
 	}
 	
-	#dim VorigePitchorde As %Integer = PitchedBatch.Pitchorde - 1
-	#dim VorigeGeptichteBatch As APPS.Halux.Planning.Pitching.dto.BatchPitched = ..GeefBatchPitchedViaPitchordeEnLijnNummer(VorigePitchorde, PitchedBatch.LijnNr)
-	#dim VorigeBatchPitchExported As APPS.Halux.Planning.Pitching.dto.BatchPitchExported = ..GeefBatchExportedViaBatchId(VorigeGeptichteBatch.Batch.GeefID())
-	
 	If (VolgendeBatchPitchExported = "") {
 		Set Volgnummer = ..GeefVolgendVolgnummer(PitchedBatch.LijnNr)
 	} Else {
+		#dim VorigePitchorde As %Integer = PitchedBatch.Pitchorde - 1
+		#dim VorigeGeptichteBatch As APPS.Halux.Planning.Pitching.dto.BatchPitched = ..GeefBatchPitchedViaPitchordeEnLijnNummer(VorigePitchorde, PitchedBatch.LijnNr)
+		#dim VorigeBatchPitchExported As APPS.Halux.Planning.Pitching.dto.BatchPitchExported = ..GeefBatchPitchExportedViaBatchId(VorigeGeptichteBatch.Batch.GeefID())
+		
 		Set Volgnummer = (VorigeBatchPitchExported.Volgnummer + VolgendeBatchPitchExported.Volgnummer) / 2
 	}
 	
@@ -199,7 +199,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefBatchExportedViaBatchId">
+<Method name="GeefBatchPitchExportedViaBatchId">
 <FormalSpec>BatchId:%String</FormalSpec>
 <Private>1</Private>
 <ReturnType>APPS.Halux.Planning.Pitching.dto.BatchPitchExported</ReturnType>