Index: BL/PR/GA/TB/tmpDev2.mac.rou
===================================================================
diff -u -r518 -r531
--- BL/PR/GA/TB/tmpDev2.mac.rou	(.../tmpDev2.mac.rou)	(revision 518)
+++ BL/PR/GA/TB/tmpDev2.mac.rou	(.../tmpDev2.mac.rou)	(revision 531)
@@ -451,13 +451,13 @@
   
 	// BENELUX handels met korting, i.e. met klantinfo 
 	New HandelVKPrijs,KPrijsData,HandelVKPrijs
-	If (sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH") {
+	If (sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH")||(sDomVERW="RAEM") {
 		Set KPrijsData=$$KLANTPR^KPRIJS(KLNrPrs,GenPRNr,$G(%NoSa),$J(KPrijsVH,0,2))
 		Set HandelVKPrijs=$J($$$HandelLijstPrijs(KPrijsData)*KLReductie,0,2)
 		// Als de "HandelVKPrijs met KLKorting" kleiner dan de HandelAKPrijs, dan wordt de KLKorting volledig ongedaan gemaakt. 
 		If HandelVKPrijs<$$$HandelAankoopPrijs(KPrijsData) { Set HandelVKPrijs=$$$HandelLijstPrijs(KPrijsData) } 
 	}	 
-	Quit:(sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH") HandelVKPrijs
+	Quit:(sDomVERW="MBHO")||(sDomVERW="HFLB")||(sDomVERW="KISCH")||(sDomVERW="RAEM") HandelVKPrijs
 	
 	// Niet-BENELUX handels (met en zonder korting , i.e. met en zonder klantinfo) 
 	Set VerwMarge=$CASE(sDomVERW, "HEIN":$$$MargeHEIN, "LMC":$$$MargeLMC, "SFS":$$bfwGeefPrijsFactorVoorSFS(pdlNietMee), :1)   ; , "DUPO":$$$MargeDUPO, "HELMY":$$$MargeHELMY, "HFLE":$$$MargeHFLE, "MBHO":$$$MargeMBHO