Index: Stat/OmzetKlantProductMaand.cls.xml
===================================================================
diff -u -r1841 -r1933
--- Stat/OmzetKlantProductMaand.cls.xml	(.../OmzetKlantProductMaand.cls.xml)	(revision 1841)
+++ Stat/OmzetKlantProductMaand.cls.xml	(.../OmzetKlantProductMaand.cls.xml)	(revision 1933)
@@ -178,7 +178,7 @@
 <SqlProc>1</SqlProc>
 <SqlQuery>	</SqlQuery>
 <Parameter name="CONTAINID" value="0"/>
-<Parameter name="ROWSPEC" value="KLNr:%Integer,Naam:%String,Tel1:%String,Straat:%String,Postkode:%String,Gemeente:%String,Taal:%String,Regio:%Integer,Aktiviteit:%String,Kwantiteit:%String,Kwaliteit:%String,NonAkt:%Integer,Vervallen:%Integer,AantalBezoeken:%String,LaatsteBezoek:%String,KlachtenJr:%Integer,KlachtenMnd:%Integer,Codex:%String,Uitz:%String,Trend:%String,VoBlum:%Float,VoHAL:%Float,VoTBX:%Float,VoGRP:%Float,VoRest:%Float,VoOL:%Float,HuBlum:%Float,HuHAL:%Float,HuTBX:%Float,HuGRP:%Float,HuRest:%Float,HuOL:%Float,VoMaBlum:%Float,VoMaHAL:%Float,VoMaTBX:%Float,VoMaGRP:%Float,VoMaRest:%Float,VoMaOL:%Float,HuMaBlum:%Float,HuMaHAL:%Float,HuMaTBX:%Float,HuMaGRP:%Float,HuMaRest:%Float,HuMaOL:%Float,IndicVoBlum:%Float,IndicVoHAL:%Float,IndicVoTBX:%Float,IndicVoGRP:%Float,IndicVoRest:%Float,IndicVoOL:%Float,IndicHuBlum:%Float,IndicHuHAL:%Float,IndicHuTBX:%Float,IndicHuGRP:%Float,IndicHuRest:%Float,IndicHuOL:%Float,IndicVoMaBlum:%Float,IndicVoMaHAL:%Float,IndicVoMaTBX:%Float,IndicVoMaGRP:%Float,IndicVoMaRest:%Float,IndicVoMaOL:%Float,IndicHuMaBlum:%Float,IndicHuMaHAL:%Float,IndicHuMaTBX:%Float,IndicHuMaGRP:%Float,IndicHuMaRest:%Float,IndicHuMaOL:%Float,CatalogusInfo:%String,KostprijsVertegenwoordiging:%Float,KostprijsMonster:%Float,KostprijsTotaal:%Float"/>
+<Parameter name="ROWSPEC" value="KLNr:%Integer,Naam:%String,Tel1:%String,Straat:%String,Postkode:%String,Gemeente:%String,Taal:%String,Regio:%Integer,Aktiviteit:%String,Kwantiteit:%String,Kwaliteit:%String,NonAkt:%Integer,Vervallen:%Integer,AantalBezoeken:%String,LaatsteBezoek:%String,KlachtenJr:%Integer,KlachtenMnd:%Integer,Codex:%String,Uitz:%String,Trend:%String,VoBlum:%Float,VoHAL:%Float,VoTBX:%Float,VoGRP:%Float,VoRest:%Float,VoOL:%Float,HuBlum:%Float,HuHAL:%Float,HuTBX:%Float,HuGRP:%Float,HuRest:%Float,HuOL:%Float,VoMaBlum:%Float,VoMaHAL:%Float,VoMaTBX:%Float,VoMaGRP:%Float,VoMaRest:%Float,VoMaOL:%Float,HuMaBlum:%Float,HuMaHAL:%Float,HuMaTBX:%Float,HuMaGRP:%Float,HuMaRest:%Float,HuMaOL:%Float,IndicVoBlum:%Float,IndicVoHAL:%Float,IndicVoTBX:%Float,IndicVoGRP:%Float,IndicVoRest:%Float,IndicVoOL:%Float,IndicHuBlum:%Float,IndicHuHAL:%Float,IndicHuTBX:%Float,IndicHuGRP:%Float,IndicHuRest:%Float,IndicHuOL:%Float,IndicVoMaBlum:%Float,IndicVoMaHAL:%Float,IndicVoMaTBX:%Float,IndicVoMaGRP:%Float,IndicVoMaRest:%Float,IndicVoMaOL:%Float,IndicHuMaBlum:%Float,IndicHuMaHAL:%Float,IndicHuMaTBX:%Float,IndicHuMaGRP:%Float,IndicHuMaRest:%Float,IndicHuMaOL:%Float,CatalogusInfo:%String,KostprijsVertegenwoordiging:%Float,KostprijsMonster:%Float,KostprijsAfhaling:%Float,KostprijsTotaal:%Float"/>
 </Query>
 
 <Method name="VerschilOmzetProdGrpExecute">
@@ -367,9 +367,10 @@
 	/// Kosten toevoegen
 	Set KostprijsVertegenw = ..GeefKostprijsKlant(KLNr,##class(APPS.common.KlantKost.enu.KostType).Bezoek())
 	Set KostprijsMonsters = ..GeefKostprijsKlant(KLNr,##class(APPS.common.KlantKost.enu.KostType).Monster())
-	Set KostprijsTotaal = KostprijsVertegenw + KostprijsMonsters
+	Set KostprijsAfhaling = ..GeefKostprijsKlant(KLNr,##class(APPS.common.KlantKost.enu.KostType).Afhaling())
+	Set KostprijsTotaal = KostprijsVertegenw + KostprijsMonsters + KostprijsAfhaling
 	
-	Set Row=Row_$LB(KostprijsVertegenw,KostprijsMonsters,KostprijsTotaal)
+	Set Row=Row_$LB(KostprijsVertegenw,KostprijsMonsters,KostprijsAfhaling,KostprijsTotaal)
 		
 	Quit $$$OK
 ]]></Implementation>