Index: KORTING.mac.rou
===================================================================
diff -u -r39200 -r48610
--- KORTING.mac.rou	(.../KORTING.mac.rou)	(revision 39200)
+++ KORTING.mac.rou	(.../KORTING.mac.rou)	(revision 48610)
@@ -71,7 +71,7 @@
 KATPrijs(KLNr,PRNr,NoSa,PrijsGegRec) ; Katprijs zonder rekening te houden met uitzonderingen op product nivo
 	New IsKsCust,KlTyp,Rec
 	Quit:$$IsMedewerker^KLANT5(KLNr) "" ; geen katprijs voor medewerkers
-	Set:$G(PrijsGegRec)="" PrijsGegRec=$$PRIJSGEG^KPRIJS(PRNr,.NoSa)
+	Set:$G(PrijsGegRec)="" PrijsGegRec=$$PRIJSGEGZONDERAX^KPRIJS(PRNr,.NoSa)
 	Set KlTyp=$$IsHandel^KLANT5(KLNr)
 	Set IsKsCust=0 ;$$ISKLANT^KS(KLNr,,.NoSa)
 	Quit $S(IsKsCust:$P(PrijsGegRec,D,18),KlTyp:$P(PrijsGegRec,D,17),1:$P(PrijsGegRec,D,16))
@@ -92,7 +92,7 @@
 	Set LevTerm=$G(LevTerm),DTyp="" If LevTerm'?.N Set DTyp="DW"
 	If $L(DTyp) Set LevTerm=$$CALCDATE^vhLib.DataTypes($$INTDATE^vhLib.DataTypes(LevTerm,DTyp),"W","FD"),LevTerm=$J((LevTerm-$H)/7,0)
 	Set DispOption=$G(DispOption)
-	Set PrijsGegRec=$$PRIJSGEG^KPRIJS(PRNr,NoSa)
+	Set PrijsGegRec=$$PRIJSGEGZONDERAX^KPRIJS(PRNr,NoSa)
 	Quit
  
 	// --- Optionele kortingen ---