Index: KORTING.mac.rou
===================================================================
diff -u -r29059 -r36781
--- KORTING.mac.rou	(.../KORTING.mac.rou)	(revision 29059)
+++ KORTING.mac.rou	(.../KORTING.mac.rou)	(revision 36781)
@@ -12,7 +12,8 @@
 	; Optie : D = Display van optionele kortingen 
 	New I,R,Korting,Korting1,Korting2,DTyp,HoofdGroep,Groep,SubGroep,Niveau,PrijsGegRec
 	New GrootVp,OptMin,OptPlus,OptKort,IsKatPr,PrijsKl,KlantInd,KYW,GenPRNr
- 
+	New KatPrijs,Result,OptKortList,HeeftUitz,DispOption,KortRec
+	
 	Do InitKORTPC ; ophalen van HoofdGroep, groep, subgroep, PrijsGegRec en defaulten option variabelen
 	Set PrijsKl=$$PRIJSKL^KLANT(KLNr,PRNr,NoSa) ;Prijsklasse Beslag of Orgalux
 	Set KatPrijs=$$KATPrijs(KLNr,PRNr,NoSa,PrijsGegRec) ; Katprijs zonder uitzonderingen