Index: AXimpl/Controle/Order/AdminOrderIterator.cls.xml
===================================================================
diff -u -r42638 -r42926
--- AXimpl/Controle/Order/AdminOrderIterator.cls.xml	(.../AdminOrderIterator.cls.xml)	(revision 42638)
+++ AXimpl/Controle/Order/AdminOrderIterator.cls.xml	(.../AdminOrderIterator.cls.xml)	(revision 42926)
@@ -24,6 +24,7 @@
 {
 	#Dim SqlStatement as %String
 	Set SqlStatement = "SELECT * FROM Flow_Uitlevering.Lijn"
+	// FOUT !!! MOET DOM.VKP.ProductOrderlijn ZIJN !!!
 	// Filter voor beperkt resultaat
 	_" WHERE ID IN ('300011||101','300011||102','300011||103')"
 
@@ -35,11 +36,11 @@
 	Quit ( ..ResultSet.Next() > 0 )
 }
 
-Method Next() As AXimpl.Controle.Order.Order
+Method Next() As AXimpl.Controle.Order.OrderLijn
 {
-	Set AdminOrder = ##class(DOM.VKP.Orderlijn).%New(..ResultSet.GetData(1))  // ("BonNr"),..ResultSet.Data("UniekOrderLijnNr")) // Nog: GlobalNode As TECH.Persistentie.GlobalNode, Type As %String
-	#dim ConvertedAdminOrder As AXimpl.Controle.Order.Order = ..Converter.Convert(AdminOrder)
-	Quit ConvertedAdminOrder
+	Set AdminOrderLijn = ##class(DOM.VKP.ProductOrderlijn).%New(..ResultSet.GetData(1))
+	#dim ConvertedAdminOrderLijn As AXimpl.Controle.Order.OrderLijn = ..Converter.Convert(AdminOrderLijn)
+	Quit ConvertedAdminOrderLijn
 }
 */
 ]]></Content>