Index: AXimpl/Dynamics/SalesLineStatusOut/Converter/SalesLineStatusUpdateConverter.cls.xml
===================================================================
diff -u -r49409 -r49623
--- AXimpl/Dynamics/SalesLineStatusOut/Converter/SalesLineStatusUpdateConverter.cls.xml	(.../SalesLineStatusUpdateConverter.cls.xml)	(revision 49409)
+++ AXimpl/Dynamics/SalesLineStatusOut/Converter/SalesLineStatusUpdateConverter.cls.xml	(.../SalesLineStatusUpdateConverter.cls.xml)	(revision 49623)
@@ -3,6 +3,31 @@
 <Class name="AXimpl.Dynamics.SalesLineStatusOut.Converter.SalesLineStatusUpdateConverter">
 <Super>TECH.RegisteredObject</Super>
 
+<Parameter name="Geproduceerd">
+<Type>%String</Type>
+<Default>Geproduceerd</Default>
+</Parameter>
+
+<Parameter name="Doorgegeven">
+<Type>%String</Type>
+<Default>Doorgegeven</Default>
+</Parameter>
+
+<Parameter name="Klaargezet">
+<Type>%String</Type>
+<Default>Klaargezet</Default>
+</Parameter>
+
+<Parameter name="Geannuleerd">
+<Type>%String</Type>
+<Default>Geannuleerd</Default>
+</Parameter>
+
+<Parameter name="KomLink">
+<Type>%String</Type>
+<Default>KOM</Default>
+</Parameter>
+
 <Property name="OrderApi">
 <Type>DOM.VKP.OrderAPI</Type>
 <Private>1</Private>
@@ -47,6 +72,8 @@
 	#dim Order As DOM.VKP.Order = ..OrderApi.GeefOrder($Piece(Command.SubjectId,"_",1))
 	#dim Orderlijn As DOM.VKP.Orderlijn = Order.GeefOrderLijn($Piece(Command.SubjectId,"_",2))
 	
+	Do ..UpdateMessageIndienMaatwerk(Orderlijn, Command)
+	
 	#dim TimeStamp As %TimeStamp = ##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentTimeStamp()_"."_$piece(##class(TECH.Context).Instance().GeefDateTimeAPI().CurrentHorolog(6),".",2)
 	Set:$$$HasLength(Order.GeefAxSalesId()) ^LOG.AX.Order(Order.GeefAxSalesId(),TimeStamp,"SalesLineStatusUpdate Orderlijn '"_Orderlijn.GeefID()_"'") = Command.Message
 	
@@ -71,6 +98,16 @@
 ]]></Implementation>
 </Method>
 
+<Method name="UpdateMessageIndienMaatwerk">
+<FormalSpec>Orderlijn:DOM.VKP.Orderlijn,Command:AXimpl.Request</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	If (Command.Message = ..#Geannuleerd) && (Orderlijn.GeefToeleveringLijnNr() = ..#KomLink) {
+		Set Command.Message = ..#Geproduceerd
+	}
+]]></Implementation>
+</Method>
+
 <Method name="UpdateSalesOrderLineStatus">
 <FormalSpec>AxInventTransId:%String,Message:%String</FormalSpec>
 <Private>1</Private>
@@ -101,8 +138,9 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Quit:(Message="Doorgegeven") ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).InVerwerking()
-	Quit:(Message="Klaargezet") ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).InVerwerking()
+	Quit:(Message=..#Doorgegeven) ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).InVerwerking()
+	Quit:(Message=..#Klaargezet) ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).InVerwerking()
+	Quit:(Message=..#Geproduceerd) ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).InVerwerking()
 	Quit ##class(AXdata.Dynamics.SalesLineStatus.enu.SalesOrderLineStatus).Vrij()
 ]]></Implementation>
 </Method>