Index: BL/Legacy/FLOWORD7.cls.xml
===================================================================
diff -u -r68952 -r69006
--- BL/Legacy/FLOWORD7.cls.xml	(.../FLOWORD7.cls.xml)	(revision 68952)
+++ BL/Legacy/FLOWORD7.cls.xml	(.../FLOWORD7.cls.xml)	(revision 69006)
@@ -14,14 +14,13 @@
 	
 	If (($$$HasLength(OrderID)) && (OrderApi.BestaatOrder(OrderID))) {
 		#dim Order As DOM.VKP.Order = OrderApi.GeefOrder(OrderID)
-		#dim OrderLijnIterator As TECH.Iterator = Order.GeefOrderLijnIterator()
+		#dim OrderLijnIterator As TECH.Iterator = Order.GeefProductOrderLijnIterator()
 		
 		While (OrderLijnIterator.HasNext() && $$$Not(IsOrderMetRevegoProducten)) {
 			#dim OrderLijn As DOM.VKP.impl.DataM.DataMProductOrderlijn = OrderLijnIterator.Next()
 				
 			Set:(ProductTypeAPI.IsRevegoProduct(OrderLijn.GeefProductID())) IsOrderMetRevegoProducten = $$$True
 		}
-		Do OrderLijnIterator.Reset()
 	}
 	
 	Quit IsOrderMetRevegoProducten