Index: AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfConverter.cls.xml
===================================================================
diff -u -r47131 -r47543
--- AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfConverter.cls.xml	(.../PrijsUitzDixfConverter.cls.xml)	(revision 47131)
+++ AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfConverter.cls.xml	(.../PrijsUitzDixfConverter.cls.xml)	(revision 47543)
@@ -156,6 +156,7 @@
 	ElseIf (..SubGroep'=0)&&(..Query'="")
 	{
 		Do ..ConvertQueryUitzondering()
+		w !,"Voor Klant: "_..KLNr_" is er een QueryPrijsUitzondering"
 	}
 	ElseIf (..SubGroep'=0)
 	{
Index: AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfGenerator.cls.xml
===================================================================
diff -u -r46136 -r47543
--- AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfGenerator.cls.xml	(.../PrijsUitzDixfGenerator.cls.xml)	(revision 46136)
+++ AX/Uitgaand/VKP/PrijsUitz/impl/PrijsUitzDixfGenerator.cls.xml	(.../PrijsUitzDixfGenerator.cls.xml)	(revision 47543)
@@ -10,13 +10,13 @@
 
 <Method name="GenerateAll">
 <Description>
-D ##class(AX.Uitgaand.VKP.PrijsUitz.impl.PrijsUitzDixfGenerator).%New().GenerateAll()</Description>
+Do ##class(AX.Uitgaand.VKP.PrijsUitz.impl.PrijsUitzDixfGenerator).%New().GenerateAll()</Description>
 <Implementation><![CDATA[
 	Try {
 		Do StartTimer^vhLib
 		#dim itPrijsUitz As TECH.Iterator = ##class(PrijsUitzIterator).%New()
 		Do ..Generate(itPrijsUitz)
-		Write !,"Csv voor migratie VerkoopPrijzenKortingen is klaar. Aantal minuten: "
+		Write !,"Csv voor migratie 0616_VHBE_VerkoopPrijzenKortingen is klaar. Aantal minuten: "
 		Write $$TimeFromStart^vhLib()/60
 	} Catch {
 		Write ##class(TECH.ExceptionHandler).Catch().ToString()
@@ -62,7 +62,7 @@
 	
 	Set AXProductData.ScheidingsTeken = ";"	
 	Set AXProductData.Iterator = itPrijsUitz
-	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"VerkoopPrijsUitz.csv")
+	Set AXProductData.BestandVolledigeNaam = ##class(TECH.Files).AppendFile(##class(TECH.Config.ConfigMgr).Instance().GeefString("AX_DIXF"),"0616_VHBE_VerkoopPrijsUitz.csv")
 	
 	#dim BestandGenerator As APPS.common.Rapport.impl.BestandGenerator
 	Set BestandGenerator = ##class(APPS.common.Rapport.impl.BestandGenerator).%New()
Index: AX/Uitgaand/PM/impl/RunAll2a.cls.xml
===================================================================
diff -u -r47330 -r47543
--- AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 47330)
+++ AX/Uitgaand/PM/impl/RunAll2a.cls.xml	(.../RunAll2a.cls.xml)	(revision 47543)
@@ -40,6 +40,7 @@
 	Do ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfGenerator).%New().GenerateAll("VHBE") 									// 0613_VHBE_LIJSTPRIJZEN *
 	Do ##class(AX.Uitgaand.PM.LijstPrijs.impl.LijstPrijsDixfGenerator).%New().GenerateAll("HLX") 									// 0613_HLX_LIJSTPRIJZEN *
 	Do ##class(AX.Uitgaand.VKP.CustomerCodexRelation.impl.CustomerCodexRelationDixfGenerator).%New().GenerateAll()					// 0615_VHBE_CUSTOMERCODEXRELATION
+	Do ##class(AX.Uitgaand.VKP.PrijsUitz.impl.PrijsUitzDixfGenerator).%New().GenerateAll()											// 0616_VHBE_PRIJSUITZONDERINGEN
 	Do ##class(AX.Uitgaand.PM.ProductVertaling.impl.ProductVertalingDixfGenerator).%New().GenerateAll() 							// 0617_VHBE_PRODUCT VERTALINGEN *
 	Do ##class(AX.Uitgaand.PM.ProductAfbeeldingen.impl.ProductAfbeeldingenGenerator).%New().GenerateAll() 							// 0618_VHBE_PRODUCT AFBEELDINGEN *
 	Do ##class(AX.Uitgaand.PM.GtinCode.impl.GtinCodeDixfGenerator).%New().GenerateAll()												// 0620_VHBE_GTIN CODES *
Index: PVExcel.mac.rou
===================================================================
diff -u -r29059 -r47543
--- PVExcel.mac.rou	(.../PVExcel.mac.rou)	(revision 29059)
+++ PVExcel.mac.rou	(.../PVExcel.mac.rou)	(revision 47543)
@@ -115,12 +115,24 @@
 	Quit $P(^KPR(Ref,0),"\")
  
 VerwerkProdXLS
-	q
-	Set PRNr=""
-	For  Set PRNr=$O(^PVExcelTmp(PRNr)) Quit:PRNr=""  Do
-	. Do $$$PRSet(123,"HH")
-	. w PRNr," ",$P(^KPR(PRNr,0),"\") r K
-	Kill ^PVExcelTmp
+	Set PRNr=0         Set Ref=""
+	For  Set Ref=$O(^PVExcelTmp(Ref)) Quit:Ref=""  Do
+	. Set IdentNr=$TR($P(Ref,"/"),".")_" "
+	. Set ArtGrpVHBE=$ZCVT($P(Ref,"/",2),"U")
+	. Set ArtGrpHLX=$ZCVT($P(Ref,"/",3),"U")
+	. Set:ArtGrpVHBE="SERVICE" ArtGrpVHBE="SERV"
+	. Set:ArtGrpVHBE="GRONDSTOF" ArtGrpVHBE="GS"
+	. Set:ArtGrpVHBE="VERPAKKING" ArtGrpVHBE="VERP"
+	. Set:ArtGrpVHBE="WERKKLEDIJ" ArtGrpVHBE="KLEDIJ"
+	. Set:ArtGrpHLX="SERVICE" ArtGrpHLX="SERV"
+	. Set:ArtGrpHLX="GRONDSTOF" ArtGrpHLX="GS"
+	. Set:ArtGrpHLX="VERPAKKING" ArtGrpHLX="VERP"
+	. Set:ArtGrpHLX="WERKKLEDIJ" ArtGrpHLX="KLEDIJ"
+	. Set PRNr=$P($G(^KPR2(IdentNr)),"\")
+	. Write:'PRNr !,IdentNr," ",ArtGrpVHBE," ",ArtGrpHLX
+	. Q:'PRNr
+	. Do $$$PRSet(312,ArtGrpVHBE)
+	. Do $$$PRSet(311,ArtGrpHLX)   
 	Quit
  
 SetNonAct(Prod)