Index: AX/Uitgaand/EC/DataAX/impl/HelperOrdersConverteren.cls.xml
===================================================================
diff -u -r53242 -r55704
--- AX/Uitgaand/EC/DataAX/impl/HelperOrdersConverteren.cls.xml	(.../HelperOrdersConverteren.cls.xml)	(revision 53242)
+++ AX/Uitgaand/EC/DataAX/impl/HelperOrdersConverteren.cls.xml	(.../HelperOrdersConverteren.cls.xml)	(revision 55704)
@@ -94,15 +94,17 @@
 	} Else {
 		Set pxLijn.Aantal=+^||ECCache("D",OrderId,"DTL",VolgNr,"QTYORDERED")
 	}
-    ; Set pxLijn.NettoPrijs=+^||ECCache("D",OrderId,"DTL",VolgNr,"SALESPRICE")
+	Set pxLijn.NettoPrijs=+^||ECCache("D",OrderId,"DTL",VolgNr,"SALESPRICE")
 	Set pxLijn.Munt=^||ECCache("D",OrderId,"DTL",VolgNr,"CURRENCYCODE")
 	Set pxLijn.GrootteOrde=$S(+^||ECCache("D",OrderId,"DTL",VolgNr,"PRICEUNIT")=100:"%",1:"")
 	Set pxLijn.TotaalPrijs=+^||ECCache("D",OrderId,"DTL",VolgNr,"LINEAMOUNT")
-	Set:+^||ECCache("D",OrderId,"DTL",VolgNr,"QTYORDERED") pxLijn.NettoPrijs=pxLijn.TotaalPrijs/+^||ECCache("D",OrderId,"DTL",VolgNr,"QTYORDERED")
-	Set pxLijn.VerwachteLeverDatum=$zdh(^||ECCache("D",OrderId,"DTL",VolgNr,"RECEIPTDATECONFIRMED"),3)
-	Set pxLijn.GevraagdeLeverDatum=$zdh(^||ECCache("D",OrderId,"DTL",VolgNr,"RECEIPTDATEREQUESTED"),3)
 	Set pxLijn.Type=$S(pxLijn.Aantal<0:"R",1:"L") ; Retour of Levering
-	Set pxLijn.Status=..TranslateStatus(pxLijn.PRNr,pxLijn.Aantal,^||ECCache("D",OrderId,"DTL",VolgNr,"SALESSTATUS"),^||ECCache("D",OrderId,"DTL",VolgNr,"ADUORDERSTATUSID"))
+	Set pxLijn.Status=..TranslateStatus(pxLijn.PRNr,pxLijn.Aantal,^||ECCache("D",OrderId,"DTL",VolgNr,"SALESSTATUS"),^||ECCache("D",OrderId,"DTL",VolgNr,"ADUORDERSTATUSID"),^||ECCache("D",OrderId,"DTL",VolgNr,"SALESTYPE"),^||ECCache("D",OrderId,"DTL",VolgNr,"ADUJOURNALTYPE"),^||ECCache("D",OrderId,"DTL",VolgNr,"MCRHOLDCODE"))
+	If ^||ECCache("D",OrderId,"DTL",VolgNr,"SALESTYPE")=3 ; alleen bij orders die de CTP gepasseerd zijn, dus zonder actieve holdcode
+	{
+		Set pxLijn.VerwachteLeverDatum=$zdh(^||ECCache("D",OrderId,"DTL",VolgNr,"RECEIPTDATECONFIRMED"),3)
+		Set pxLijn.GevraagdeLeverDatum=$zdh(^||ECCache("D",OrderId,"DTL",VolgNr,"RECEIPTDATEREQUESTED"),3)
+	}
 	Set pxLijn.Commentaar=$TR(^||ECCache("D",OrderId,"HFD","LIJNCONFTXT"),$C(0))
 	Set pxLijn.InAssortiment=..ProductValidator.InAssortiment(pxLijn.PRNr)
 	Set pxLijn.InConfigurator=..ProductValidator.InConfigurator(pxLijn.PRNr)
@@ -123,45 +125,70 @@
 </Method>
 
 <Method name="TranslateStatus">
-<FormalSpec>PRNr:%String,Aantal:%Integer,SalesStatus:%String,BlokkeerStatus:%String</FormalSpec>
+<FormalSpec>PRNr:%String,Aantal:%Integer,SalesLineStatus:%String,BlokkeerStatus:%String,SalesOrderType:%String,JournalType:%String,HoldCode:%String</FormalSpec>
 <Implementation><![CDATA[
-  ; AX SalesStatus : OpenOrder = 1, Delivered = 2, Invoiced = 3, Canceled = 4
-   ; BlokkeerStatus : Doorgegeven, Klaargezet, Geannuleerd, leeg
-	If SalesStatus=1
-	{
-		If BlokkeerStatus="Klaargezet" 
+  ; AX SalesLineStatus : OpenOrder = 1, Delivered = 2, Invoiced = 3, Canceled = 4
+  ; BlokkeerStatus : Doorgegeven, Klaargezet, Geannuleerd, leeg
+  ; HoldCode : 'VOORUIT','LIMIET','VERVALLEN','REMBOURS'
+  ; SalesOrderType : Order=3, Journaal=0
+  ; JournalType : SalesEntry=3, Offerte=1
+ 	If SalesOrderType=3
+ 	{
+		If SalesLineStatus=1
 		{
-			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).InProductie()
+			If BlokkeerStatus="Klaargezet" 
+			{
+				Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).InProductie()
+			}
+			ElseIf BlokkeerStatus="Doorgegeven"
+			{
+				Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).VerwerkingMagazijn() 
+			}
+			ElseIf BlokkeerStatus="Geproduceerd"
+			{
+				Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Geproduceerd()
+			}
+			ElseIf ((BlokkeerStatus="")||(BlokkeerStatus="KlaargezetWissen"))&&($P($$GENTYP^HAD(PRNr),"\")'="")
+			{
+				Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).WachtenOpProductie()
+			}
+			ElseIf Aantal<1
+			{
+				Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Terugname()
+			}
+			Else
+			{
+				Set ECStatus=$CASE(..VoorraadStatus(PRNr,Aantal,,1),"F":##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).NietInVoorraad(),"P":##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).BeperkteVoorraad(),:##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).VoldoendeVoorraad())
+			}
 		}
-		ElseIf BlokkeerStatus="Doorgegeven"
+		ElseIf SalesLineStatus=2 
 		{
-			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).VerwerkingMagazijn() 
-		}
-		ElseIf BlokkeerStatus="Geproduceerd"
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).InLevering()
+			}
+		ElseIf SalesLineStatus=3 
 		{
-			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Geproduceerd()
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Gefactureerd()
 		}
-		ElseIf ((BlokkeerStatus="")||(BlokkeerStatus="KlaargezetWissen"))&&($P($$GENTYP^HAD(PRNr),"\")'="")
+ 	}
+ 	Else
+ 	{
+	 	If HoldCode="REMBOURS"
 		{
-			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).WachtenOpProductie()
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Rembours()
 		}
-		ElseIf Aantal<1
+	 	ElseIf HoldCode="VOORUIT"
+	 	{
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Vooruitbetaling()
+		}
+	 	ElseIf (HoldCode="VERVALLEN") || (HoldCode="LIMIET")
 		{
-			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Terugname()
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Krediet()
 		}
 		Else
 		{
-			Set ECStatus=$CASE(..VoorraadStatus(PRNr,Aantal,,1),"F":##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).NietInVoorraad(),"P":##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).BeperkteVoorraad(),:##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).VoldoendeVoorraad())
+			Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Geblokkeerd()
 		}
-	}
-	ElseIf SalesStatus=2 
-	{
-		Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).InLevering()
-		}
-	ElseIf SalesStatus=3 
-	{
-		Set ECStatus=##class(WS.Vhisie4.KlantDocument.enu.OrderLijnStatus).Gefactureerd()
-	}
+ 	}
 	Quit ECStatus
 ]]></Implementation>
 </Method>