Index: WS/Vhisie4/RequestHeader.cls.xml
===================================================================
diff -u -r39519 -r40850
--- WS/Vhisie4/RequestHeader.cls.xml	(.../RequestHeader.cls.xml)	(revision 39519)
+++ WS/Vhisie4/RequestHeader.cls.xml	(.../RequestHeader.cls.xml)	(revision 40850)
@@ -49,6 +49,14 @@
 <Parameter name="VALUELIST" value=",N,F,E,D"/>
 </Property>
 
+<Method name="KlantIdGet">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	If (i%KlantId=6819)||(i%KlantId=1000) Set %GeenPrijsInVhisie4=1
+	Quit $S($Get(%GeenPrijsInVhisie4):1736,1:i%KlantId)
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>RequestHeaderState</State>
Index: AX/Uitgaand/EC/Data/impl/HelperOrdersOphalen.cls.xml
===================================================================
diff -u -r40654 -r40850
--- AX/Uitgaand/EC/Data/impl/HelperOrdersOphalen.cls.xml	(.../HelperOrdersOphalen.cls.xml)	(revision 40654)
+++ AX/Uitgaand/EC/Data/impl/HelperOrdersOphalen.cls.xml	(.../HelperOrdersOphalen.cls.xml)	(revision 40850)
@@ -97,6 +97,10 @@
 	{
 		Set pxLijn.ProductOmschrijving= pxLijn.ProductOmschrijving_"<br/>"_"Ref: "_$P(OLRec,"\",5)
 	}
+	If 'pxLijn.InAssortiment && 'pxLijn.InConfigurator
+	{
+		Set pxLijn.Afbeelding=""
+	}
 ]]></Implementation>
 </Method>
 
Index: WS/Vhisie4/KlantDocument/dto/HistoriekItem.cls.xml
===================================================================
diff -u -r39315 -r40850
--- WS/Vhisie4/KlantDocument/dto/HistoriekItem.cls.xml	(.../HistoriekItem.cls.xml)	(revision 39315)
+++ WS/Vhisie4/KlantDocument/dto/HistoriekItem.cls.xml	(.../HistoriekItem.cls.xml)	(revision 40850)
@@ -3,6 +3,10 @@
 <Class name="WS.Vhisie4.KlantDocument.dto.HistoriekItem">
 <Super>ProductInfo</Super>
 
+<Parameter name="NAMESPACE">
+<Default>http://vhisie.vanhoecke.be/V4</Default>
+</Parameter>
+
 <Parameter name="XMLIGNORENULL">
 <Type>STRING</Type>
 <Default>1</Default>
@@ -21,6 +25,30 @@
 <Type>%Decimal</Type>
 </Property>
 
+<Property name="Munt">
+<Type>DOM.enu.Munt</Type>
+</Property>
+
+<Property name="NettoPrijs">
+<Type>%Numeric</Type>
+</Property>
+
+<Property name="GrootteOrde">
+<Type>TECH.String</Type>
+</Property>
+
+<Method name="JaarOmzetGet">
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[	Quit $S($G(%GeenPrijsInVhisie4):..JaarAfname*1.99,1:i%JaarOmzet)
+]]></Implementation>
+</Method>
+
+<Method name="NettoPrijsGet">
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[	Quit $S($G(%GeenPrijsInVhisie4):1.99,1:i%NettoPrijs)
+]]></Implementation>
+</Method>
+
 <Storage name="Default">
 <Type>%Library.CacheSerialState</Type>
 <State>HistoriekItemState</State>
@@ -56,6 +84,15 @@
 <Value name="10">
 <Value>JaarOmzet</Value>
 </Value>
+<Value name="11">
+<Value>Munt</Value>
+</Value>
+<Value name="12">
+<Value>NettoPrijs</Value>
+</Value>
+<Value name="13">
+<Value>GrootteOrde</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: AX/Uitgaand/EC/Data/impl/HelperOffertesOphalen.cls.xml
===================================================================
diff -u -r38803 -r40850
--- AX/Uitgaand/EC/Data/impl/HelperOffertesOphalen.cls.xml	(.../HelperOffertesOphalen.cls.xml)	(revision 38803)
+++ AX/Uitgaand/EC/Data/impl/HelperOffertesOphalen.cls.xml	(.../HelperOffertesOphalen.cls.xml)	(revision 40850)
@@ -91,6 +91,10 @@
 	Set pxLijn.InConfigurator=..ProductValidator.InConfigurator(pxLijn.ProductID)
 	Do pxLijn.VulAanMetProduct(..Taal)
 	Do ..BepaalLeveringsTermijn(pxLijn)
+	If 'pxLijn.InAssortiment && 'pxLijn.InConfigurator
+	{
+		Set pxLijn.Afbeelding=""
+	}
 ]]></Implementation>
 </Method>
 
Index: AX/Uitgaand/EC/Data/impl/HelperFacturenOphalen.cls.xml
===================================================================
diff -u -r40654 -r40850
--- AX/Uitgaand/EC/Data/impl/HelperFacturenOphalen.cls.xml	(.../HelperFacturenOphalen.cls.xml)	(revision 40654)
+++ AX/Uitgaand/EC/Data/impl/HelperFacturenOphalen.cls.xml	(.../HelperFacturenOphalen.cls.xml)	(revision 40850)
@@ -166,6 +166,10 @@
 	{
 		Set pxLijn.ProductOmschrijving= pxLijn.ProductOmschrijving_"<br/>"_"Ref: "_$P(OLRec,"\",5)
 	}
+	If 'pxLijn.InAssortiment && 'pxLijn.InConfigurator
+	{
+		Set pxLijn.Afbeelding=""
+	}
 ]]></Implementation>
 </Method>
 
Index: WS/Vhisie4/KlantDocument/dto/DocumentLijn.cls.xml
===================================================================
diff -u -r39609 -r40850
--- WS/Vhisie4/KlantDocument/dto/DocumentLijn.cls.xml	(.../DocumentLijn.cls.xml)	(revision 39609)
+++ WS/Vhisie4/KlantDocument/dto/DocumentLijn.cls.xml	(.../DocumentLijn.cls.xml)	(revision 40850)
@@ -48,6 +48,18 @@
 <Parameter name="VALUELIST" value=";L;R;T;O"/>
 </Property>
 
+<Method name="NettoPrijsGet">
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[	Quit $S($G(%GeenPrijsInVhisie4):1.99,1:i%NettoPrijs)
+]]></Implementation>
+</Method>
+
+<Method name="TotaalPrijsGet">
+<ReturnType>%Numeric</ReturnType>
+<Implementation><![CDATA[	Quit $S($G(%GeenPrijsInVhisie4):19.99,1:i%TotaalPrijs)
+]]></Implementation>
+</Method>
+
 <Method name="CommentaarGet">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
Index: WS/Vhisie4/KlantDocument/GeefVerkoopHistoriekResponse.cls.xml
===================================================================
diff -u -r39315 -r40850
--- WS/Vhisie4/KlantDocument/GeefVerkoopHistoriekResponse.cls.xml	(.../GeefVerkoopHistoriekResponse.cls.xml)	(revision 39315)
+++ WS/Vhisie4/KlantDocument/GeefVerkoopHistoriekResponse.cls.xml	(.../GeefVerkoopHistoriekResponse.cls.xml)	(revision 40850)
@@ -8,6 +8,14 @@
 <Default>1</Default>
 </Parameter>
 
+<Parameter name="NAMESPACE">
+<Default>http://vhisie.vanhoecke.be/V4</Default>
+</Parameter>
+
+<Parameter name="XMLPREFIX">
+<Default>vh</Default>
+</Parameter>
+
 <Property name="RequestId">
 <Type>TECH.String</Type>
 <Required>1</Required>
@@ -37,7 +45,7 @@
 </Property>
 
 <Property name="Lijst">
-<Type>WS.Vhisie4.KlantDocument.dto.HistoriekItem</Type>
+<Type>WS.Vhisie4.KlantDocument.dto.HistoriekGroep</Type>
 <Collection>list</Collection>
 <Parameter name="XMLITEMNAME" value="Groep"/>
 <Parameter name="XMLNAME" value="Lijst"/>
Index: AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalen.cls.xml
===================================================================
diff -u -r40654 -r40850
--- AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalen.cls.xml	(.../HelperLeveringenOphalen.cls.xml)	(revision 40654)
+++ AX/Uitgaand/EC/Data/impl/HelperLeveringenOphalen.cls.xml	(.../HelperLeveringenOphalen.cls.xml)	(revision 40850)
@@ -183,6 +183,10 @@
 	{
 		Set pxLijn.ProductOmschrijving= pxLijn.ProductOmschrijving_"<br/>"_"Ref: "_$P(OLRec,"\",5)
 	}
+	If 'pxLijn.InAssortiment && 'pxLijn.InConfigurator
+	{
+		Set pxLijn.Afbeelding=""
+	}
 ]]></Implementation>
 </Method>
 
Index: AX/Uitgaand/EC/Data/impl/HistoriekOphalen.cls.xml
===================================================================
diff -u -r39315 -r40850
--- AX/Uitgaand/EC/Data/impl/HistoriekOphalen.cls.xml	(.../HistoriekOphalen.cls.xml)	(revision 39315)
+++ AX/Uitgaand/EC/Data/impl/HistoriekOphalen.cls.xml	(.../HistoriekOphalen.cls.xml)	(revision 40850)
@@ -106,6 +106,9 @@
 	Set pxItem.ProductID=$P(HistRec,"\",15)
 	Set pxItem.JaarAfname=$P(HistRec,"\",3)
 	Set pxItem.JaarOmzet=$P(HistRec,"\",12)
+	Set pxItem.NettoPrijs=$P(HistRec,"\",9)
+	Set pxItem.GrootteOrde=$P(HistRec,"\",11)
+	Set pxItem.Munt=$P(HistRec,"\",10)
 	Set pxItem.LaatsteDatum=$$INTDATE^vhLib.DataTypes($P(HistRec,"\",5))
 	Do pxItem.VulAanMetProduct(..Taal)
 	Do ..ToevoegenAanGroep(pxItem)
Index: AX/Uitgaand/EC/Data/impl/Testing.cls.xml
===================================================================
diff -u -r39315 -r40850
--- AX/Uitgaand/EC/Data/impl/Testing.cls.xml	(.../Testing.cls.xml)	(revision 39315)
+++ AX/Uitgaand/EC/Data/impl/Testing.cls.xml	(.../Testing.cls.xml)	(revision 40850)
@@ -17,8 +17,9 @@
 	Do ..All(2913) ; tristar
 	Do ..All(3042) ; dovy
 	Do ..All(3145) ; mibois
-	Do ..All(7755) ; Casa vero
 	Do ..All(6780) ; De decker jb
+	Do ..All(7755) ; Casa vero
+	Do ..All(1000) ; Van Hoecke TEST-> Dupont zonder prijs
 ]]></Implementation>
 </Method>
 
@@ -61,8 +62,8 @@
 	;Set request.DocumentId=315652
 	;Set request.DocumentType="Levering"
 	
-	;Set request.DocumentId=166946
-	;Set request.DocumentType="Order"
+	Set request.DocumentId=166946
+	Set request.DocumentType="Order"
 	;Set request.DocumentId="573781"
 	;Set request.DocumentType="Offerte"
 
@@ -174,7 +175,7 @@
 	Set request.Header.PersonalityId="VH"
 	Set request.Header.GebruikerId="gg"
 	Set request.Header.GebruikerIp="11.11.11.11"
-	Set request.Periode=100
+	Set request.Periode=200
 	Set bl=##class(WS.Vhisie4.KlantDocument.KlantDocumentService).%New()
 	Set dto=bl.GeefOffertes(request)
 	;D dto.XMLExport(,"literal,indent")