Index: AXimpl/Admin/STAT/Invoice/LineIterator.cls.xml
===================================================================
diff -u -r49443 -r49444
--- AXimpl/Admin/STAT/Invoice/LineIterator.cls.xml	(.../LineIterator.cls.xml)	(revision 49443)
+++ AXimpl/Admin/STAT/Invoice/LineIterator.cls.xml	(.../LineIterator.cls.xml)	(revision 49444)
@@ -36,9 +36,8 @@
 <Method name="VoerUitQuery">
 <Private>1</Private>
 <Implementation><![CDATA[
-	#Dim SqlStatement As %String = ""
-	
-	set SqlStatement = 
+	#dim SqlStatement As %String = ""
+	Set SqlStatement = 
 		"SELECT CustInvoiceJour.InvoiceAccount,CustInvoiceJour.OrderAccount,CustInvoiceJour.InvoiceId,CustInvoiceTrans.ItemId,com.AdminProductNummer,"
 		_ " CustInvoiceTrans.InventQty,CustInvoiceTrans.LineAmount,CustInvoiceTrans.TaxAmount, CustInvoiceJour.InvoiceDate, CustInvoiceJour.RecId"
 		_ " FROM CustInvoiceTrans"
@@ -60,18 +59,18 @@
 <Method name="Next">
 <ReturnType>AXimpl.Admin.STAT.Invoice.Line</ReturnType>
 <Implementation><![CDATA[
-	set InvoiceLine = ##class(AXimpl.Admin.STAT.Invoice.Line).%New()
-	set InvoiceLine.InvoiceAccount = ..ResultSet.GetDataByName("InvoiceAccount")
-	set InvoiceLine.OrderAccount = ..ResultSet.GetDataByName("OrderAccount")
-	set InvoiceLine.InvoiceId = ..ResultSet.GetDataByName("InvoiceId")
-	set InvoiceLine.ItemId = ..ResultSet.GetDataByName("ItemId")
-	set InvoiceLine.AdminProductNummer = ..ResultSet.GetDataByName("AdminProductNummer")
-	set InvoiceLine.InventQty = ..ResultSet.GetDataByName("InventQty")
-	set InvoiceLine.LineAmount = ..ResultSet.GetDataByName("LineAmount")
-	set InvoiceLine.TaxAmount = ..ResultSet.GetDataByName("TaxAmount")
-	set InvoiceLine.InvoiceDate = ..ResultSet.GetDataByName("InvoiceDate")
-	set InvoiceLine.RecId = ..ResultSet.GetDataByName("RecId")
-	quit InvoiceLine
+	Set InvoiceLine = ##class(AXimpl.Admin.STAT.Invoice.Line).%New()
+	Set InvoiceLine.InvoiceAccount = ..ResultSet.GetDataByName("InvoiceAccount")
+	Set InvoiceLine.OrderAccount = ..ResultSet.GetDataByName("OrderAccount")
+	Set InvoiceLine.InvoiceId = ..ResultSet.GetDataByName("InvoiceId")
+	Set InvoiceLine.ItemId = ..ResultSet.GetDataByName("ItemId")
+	Set InvoiceLine.AdminProductNummer = ..ResultSet.GetDataByName("AdminProductNummer")
+	Set InvoiceLine.InventQty = ..ResultSet.GetDataByName("InventQty")
+	Set InvoiceLine.LineAmount = ..ResultSet.GetDataByName("LineAmount")
+	Set InvoiceLine.TaxAmount = ..ResultSet.GetDataByName("TaxAmount")
+	Set InvoiceLine.InvoiceDate = ..ResultSet.GetDataByName("InvoiceDate")
+	Set InvoiceLine.RecId = ..ResultSet.GetDataByName("RecId")
+	Quit InvoiceLine
 ]]></Implementation>
 </Method>