Index: APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladBuilderTemplate.cls.xml
===================================================================
diff -u -r30070 -r30083
--- APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladBuilderTemplate.cls.xml	(.../BladBuilderTemplate.cls.xml)	(revision 30070)
+++ APPS/Halux/PPS/Document/ProductieDetailDocument/impl/common/BladBuilderTemplate.cls.xml	(.../BladBuilderTemplate.cls.xml)	(revision 30083)
@@ -119,10 +119,7 @@
 		}
 		
 		If $IsObject(Batch) && $L(..InputParameters.SequentieNr) {
-			Set ExtraInfoIterator = ##class(TECH.ListIterator).%New(..GeefExtraInfo(Batch,..InputParameters.SequentieNr))
-			While ExtraInfoIterator.HasNext() {
-				Do InputDataSummary.Insert(ExtraInfoIterator.Next())
-			}
+			Do ##class(TECH.ListUtils).AppendList(.InputDataSummary, ..GeefExtraInfo(Batch,..InputParameters.SequentieNr))
 		}
 	}
 	Quit ##class(TECH.ListUtils).ListToPieces(InputDataSummary, " - ")