Index: DOM/VKP/impl/InGeheugen/ProductOrderLijn.cls.xml
===================================================================
diff -u
--- DOM/VKP/impl/InGeheugen/ProductOrderLijn.cls.xml	(revision 0)
+++ DOM/VKP/impl/InGeheugen/ProductOrderLijn.cls.xml	(revision 41690)
@@ -0,0 +1,66 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="DOM.VKP.impl.InGeheugen.ProductOrderLijn">
+<Super>DOM.VKP.ProductOrderlijn,TECH.RegisteredObject</Super>
+
+<Property name="ProductID">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="OrderlijnNummer">
+<Type>%Integer</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Aantal">
+<Type>%Decimal</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="ZetProductID">
+<FormalSpec>ProductID:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..ProductID = ProductID
+]]></Implementation>
+</Method>
+
+<Method name="ZetOrderlijnNummer">
+<FormalSpec>OrderlijnNummer:%Integer</FormalSpec>
+<Implementation><![CDATA[	Set ..OrderlijnNummer = OrderlijnNummer
+]]></Implementation>
+</Method>
+
+<Method name="ZetAantal">
+<FormalSpec>Aantal:%Decimal</FormalSpec>
+<Implementation><![CDATA[	Set ..Aantal = Aantal
+]]></Implementation>
+</Method>
+
+<UDLText name="T">
+<Content><![CDATA[
+// moet uniek lijnnr worden
+
+]]></Content>
+</UDLText>
+
+<Method name="GeefProductID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	Quit ..ProductID
+]]></Implementation>
+</Method>
+
+<Method name="GeefLijnVolgNr">
+<ReturnType>%Integer</ReturnType>
+<Implementation><![CDATA[	Quit ..OrderlijnNummer
+]]></Implementation>
+</Method>
+
+<Method name="GeefAantal">
+<ReturnType>%Decimal</ReturnType>
+<Implementation><![CDATA[	Quit ..Aantal
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhUnitTest/AXimpl/BizTalkMessage/Converter/OrderConverter/Convert/Test.cls.xml
===================================================================
diff -u -r41677 -r41690
--- vhUnitTest/AXimpl/BizTalkMessage/Converter/OrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 41677)
+++ vhUnitTest/AXimpl/BizTalkMessage/Converter/OrderConverter/Convert/Test.cls.xml	(.../Test.cls.xml)	(revision 41690)
@@ -13,16 +13,22 @@
 <Method name="Test : Convert roept juiste objecten aan om adhv request maatwerkorderlijnen op te halen">
 <Implementation><![CDATA[
 	Set OrderAPIMock = ##class(vhTest.Mock.DOM.VKP.OrderAPI).%New()
+	Set ProductTypeAPIMock = ##class(vhTest.Mock.DOM.PM.ProductTypeAPI).%New()
 	Set OrderMock = ##class(vhTest.Mock.DOM.VKP.Order).%New()
 
+	Do ProductTypeAPIMock.VerwachtMethodCall("IsMaatwerkProduct",1).DanReturn($$$True)
+
 	Do OrderAPIMock.VerwachtMethodCall("GeefOrder",1).DanReturn(OrderMock)
 	Do OrderMock.VerwachtMethodCall("GeefProductOrderLijnIterator").DanReturn(..GeefProductOrderLijnIterator())	
+	Do OrderMock.VerwachtMethodCall("GeefID").DanReturn(1)
+	Do OrderMock.VerwachtMethodCall("GeefKlantID").DanReturn(1)
 	
-	Set OrderConverteerder = ##class(AXimpl.BizTalkMessage.Converter.OrderConverter).%New(OrderAPIMock)
+	Set OrderConverteerder = ##class(AXimpl.BizTalkMessage.Converter.OrderConverter).%New(OrderAPIMock,ProductTypeAPIMock)
 	#Dim MessageParts as AXBizTalk.AX.Order.Close.MessageParts
 	Set MessageParts =  OrderConverteerder.Convert(..GeefRequest())
 	
 	Do OrderAPIMock.Verifieer()
+	Do ProductTypeAPIMock.Verifieer()
 	Do OrderMock.Verifieer()
 ]]></Implementation>
 </Method>
@@ -32,16 +38,24 @@
 <ReturnType>TECH.Iterator</ReturnType>
 <Implementation><![CDATA[
 	Set ProductOrderLijnList = ##class(%ListOfObjects).%New() 
+	Do ProductOrderLijnList.Insert(..GeefMaatwerkLijn(1,1,1))
+	
 	Quit ##class(TECH.ListIterator).%New(ProductOrderLijnList)
 ]]></Implementation>
 </Method>
 
 <Method name="GeefMaatwerkLijn">
+<FormalSpec>LijnNummer:%Integer,ProductID:%String,Aantal:%Decimal</FormalSpec>
 <Private>1</Private>
 <ReturnType>DOM.VKP.Orderlijn</ReturnType>
 <Implementation><![CDATA[
-	Set OrderLijn = ##class(DOM.VKP.ProductOrderlijn).%New()
 	
+	Set OrderLijn = ##class(DOM.VKP.impl.InGeheugen.ProductOrderLijn).%New()
+	
+	Do OrderLijn.ZetProductID(ProductID)
+	Do OrderLijn.ZetOrderlijnNummer(LijnNummer)
+	Do OrderLijn.ZetAantal(Aantal)	
+	
 	Quit OrderLijn
 ]]></Implementation>
 </Method>
Index: AXimpl/BizTalkMessage/Converter/OrderConverter.cls.xml
===================================================================
diff -u -r41677 -r41690
--- AXimpl/BizTalkMessage/Converter/OrderConverter.cls.xml	(.../OrderConverter.cls.xml)	(revision 41677)
+++ AXimpl/BizTalkMessage/Converter/OrderConverter.cls.xml	(.../OrderConverter.cls.xml)	(revision 41690)
@@ -8,14 +8,20 @@
 <Private>1</Private>
 </Property>
 
+<Property name="ProductTypeAPI">
+<Type>DOM.PM.ProductTypeAPI</Type>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
-<FormalSpec>OrderAPI:DOM.VKP.OrderAPI</FormalSpec>
+<FormalSpec>OrderAPI:DOM.VKP.OrderAPI,ProductAPI:DOM.PM.ProductTypeAPI</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
 	Set ..OrderAPI = $$$Inject(OrderAPI,  ##class(DOM.DomeinContext).Instance().GeefOrderAPI())
+	Set ..ProductTypeAPI = $$$Inject(ProductAPI,  ##class(DOM.DomeinContext).Instance().GeefProductTypeAPI())
 	Quit $$$OK
 ]]></Implementation>
 </Method>
@@ -25,15 +31,30 @@
 <ReturnType>AXBizTalk.AX.Order.Close.MessageParts</ReturnType>
 <Implementation><![CDATA[
 	#Dim Order as DOM.VKP.Order
+	Set MessageParts =##class(AXBizTalk.AX.Order.Close.MessageParts).%New()
+	Set MessageParts.Order =##class(AXBizTalk.AX.Order.Close.Order).%New()
+	Set MessageParts.Order.OrderLines = ##class(%ListOfObjects).%New()
+
 	Set Order = ..OrderAPI.GeefOrder(Request.SubjectId)
 	#Dim ProductLijnIterator as TECH.Iterator = Order.GeefProductOrderLijnIterator()
 	While ProductLijnIterator.HasNext() {
-		#Dim ProductOrderLijn as DOM.VKP.ProductOrderlijn
-		Set ProductOrderLijn = ProductLijnIterator.Next()
-		
+		#Dim ProductOrderlijn as DOM.VKP.ProductOrderlijn
+		Set ProductOrderlijn = ProductLijnIterator.Next()
+		if ..ProductTypeAPI.IsMaatwerkProduct(ProductOrderlijn.GeefProductID()){
+			Set OrderLine = ##class(AXBizTalk.AX.Order.Close.OrderLine).%New()
+			Set OrderLine.LineNumber = ProductOrderlijn.GeefLijnVolgNr() ; -> moet uniek lijn nr worden?
+			Set OrderLine.ProductNumber = ProductOrderlijn.GeefProductID()
+			Set OrderLine.Quantity = ProductOrderlijn.GeefAantal()			
+			Do MessageParts.Order.OrderLines.Insert(OrderLine)						
+		}
 	}
-	
-	Set MessageParts =##class(AXBizTalk.AX.Order.Close.MessageParts).%New()
+	If MessageParts.Order.OrderLines.Count() {
+		Set MessageParts.Order.OrderNumber = Order.GeefID()
+		Set MessageParts.Order.CustomerNumber = Order.GeefKlantID() ;nog omzetten naar klantnummer
+		
+	}else{
+		// wat met order zonder maatwerk.
+	}	
 	Quit MessageParts
 ]]></Implementation>
 </Method>