Index: APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml =================================================================== diff -u -r67813 -r67900 --- APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml (.../OverzichtBatch.cls.xml) (revision 67813) +++ APPS/Halux/PPS/impl/AansturingActie/common/OverzichtBatch.cls.xml (.../OverzichtBatch.cls.xml) (revision 67900) @@ -69,12 +69,12 @@ Set BatchService = ##class(APPS.Halux.Planning.impl.BatchService).%New() Set ToeleveringIDs = ##class(%ListOfDataTypes).%New() #dim CommonBatchService As APPS.Halux.common.BatchService = ##class(APPS.ApplicatieContext).Instance().GeefProductieAPI().GeefBatchService() - #dim LijstToeleveringenInBatch As APPS.Halux.Planning.dto.BatchToeleveringen = BatchService.GeefToeleveringenInBatch(BatchID) If (CommonBatchService.GeefBatch(BatchID).GeefCategorie() = ##class(APPS.Halux.common.enu.Categorie).TAORbox()) { Set Repository = ##class(APPS.Halux.common.ProductieSequentieItemRepository).%New() Set ToeleveringIDs = Repository.GeefToeleveringIDsInBatchVolgensSequentie(BatchID) } Else { + #dim LijstToeleveringenInBatch As APPS.Halux.Planning.dto.BatchToeleveringen = BatchService.GeefToeleveringenInBatch(BatchID) #dim ToeleveringDtoIterator As TECH.ListIterator = ##class(TECH.ListIterator).%New(LijstToeleveringenInBatch.Toeleveringen) While ToeleveringDtoIterator.HasNext() {