Index: APPS/Halux/Planning/impl/BatchService.cls.xml
===================================================================
diff -u -r69009 -r69010
--- APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 69009)
+++ APPS/Halux/Planning/impl/BatchService.cls.xml	(.../BatchService.cls.xml)	(revision 69010)
@@ -434,34 +434,34 @@
 	#dim MaatwerkBatches As array of APPS.Halux.Planning.dto.TandemboxBatch = ##class(%ArrayOfObjects).%New()
 	#dim ToeleveringIterator As TECH.Iterator = ##class(DOM.DomeinContext).Instance().GeefAankoopAPI().GeefLeverancier(##class(DOM.AKP.enu.Leverancier).Halux()).GeefToeleveringIterator()
 	
-	while (ToeleveringIterator.HasNext()) {
+	While (ToeleveringIterator.HasNext()) {
 		#dim Toelevering As DOM.AKP.Toelevering = ToeleveringIterator.Next()
 		
-		try	{
+		Try	{
 			#dim GeplandOpDatum As %Date = ..GeefGeplandOpDatum(Toelevering.GeefID())
 			
-			if ((GeplandOpDatum = Datum) && $$$Not($IsObject(..BatchService.GeefBijhorendeBatch(Toelevering)))) {
+			If ((GeplandOpDatum = Datum) && $$$Not($IsObject(..BatchService.GeefBijhorendeBatch(Toelevering)))) {
 				#dim Categorie As APPS.Halux.common.enu.Categorie = ..ProductieService.GeefCategorieVoorToelevering(Toelevering)
 				#dim Builder As APPS.Halux.Planning.impl.BatchService.MaatwerkBatchBuilder = ..GeefMaatwerkBatchBuilder(Categorie)
 				
-				if $$$Not(MaatwerkBatches.IsDefined(Categorie)) {
+				If $$$Not(MaatwerkBatches.IsDefined(Categorie)) {
 					#dim MaatwerkBatch As APPS.Halux.Planning.dto.MaatwerkBatch = Builder.GeefNieuweMaatwerkBatchDto()
 					
-					set MaatwerkBatch.Datum = Datum
-					set MaatwerkBatch.HeeftAandachtNodig = 0
-					set MaatwerkBatch.Status = ##class(APPS.Halux.common.enu.BatchStatus).Auto()
-					set MaatwerkBatch.IsASAP = 0
-					set MaatwerkBatch.Categorie = Categorie
+					Set MaatwerkBatch.Datum = Datum
+					Set MaatwerkBatch.HeeftAandachtNodig = 0
+					Set MaatwerkBatch.Status = ##class(APPS.Halux.common.enu.BatchStatus).Auto()
+					Set MaatwerkBatch.IsASAP = 0
+					Set MaatwerkBatch.Categorie = Categorie
 					
-					do MaatwerkBatches.SetAt(MaatwerkBatch, Categorie)
-				} else {
-					set MaatwerkBatch = MaatwerkBatches.GetAt(Categorie)
+					Do MaatwerkBatches.SetAt(MaatwerkBatch, Categorie)
+				} Else {
+					Set MaatwerkBatch = MaatwerkBatches.GetAt(Categorie)
 				}
 				
-				do Builder.AggregeerToeleveringInBatch(Toelevering, MaatwerkBatch)
+				Do Builder.AggregeerToeleveringInBatch(Toelevering, MaatwerkBatch)
 			}
 		} catch	{
-			do ##class(vhLib.Logger).%New().LogEnMailExceptie(##class(TECH.ExceptionHandler).Catch())
+			Do ##class(vhLib.Logger).%New().LogEnMailExceptie(##class(TECH.ExceptionHandler).Catch())
 		}
 	}