Index: DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml =================================================================== diff -u -r29059 -r36043 --- DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml (.../VerwachteUitvoerImpl.cls.xml) (revision 29059) +++ DOM/ProdRes/impl/VerwachteUitvoerImpl.cls.xml (.../VerwachteUitvoerImpl.cls.xml) (revision 36043) @@ -185,7 +185,8 @@ While (VerwachteInvoerIterator.HasNext()) { #dim VerwachteInvoer As DOM.ProdRes.VerwachteInvoer = VerwachteInvoerIterator.Next() - If (VerwachteInvoer.GeefStatus() = ##class(DOM.ProdRes.enu.VerwachteInvoerStatus).Ingeboekt()) Do TeVerwijderenVerwachteInvoeren.Insert(VerwachteInvoer) + // De VerwachteInvoerIterator kan soms lege listitems bevatten. Probleem eigenlijk bij de iterator oplossen. Voorlopig via If $IsObject(...) + If ($IsObject(VerwachteInvoer)) && (VerwachteInvoer.GeefStatus() = ##class(DOM.ProdRes.enu.VerwachteInvoerStatus).Ingeboekt()) Do TeVerwijderenVerwachteInvoeren.Insert(VerwachteInvoer) } #dim TeVerwijderenIterator As TECH.Iterator = ##class(TECH.ListIterator).%New(TeVerwijderenVerwachteInvoeren) @@ -202,7 +203,6 @@ %Library.CacheStorage VerwachteUitvoerImplDefaultData -listnode "VerwachteUitvoerImpl" Reservatie