Index: PRDUPLI.mac.rou
===================================================================
diff -u -r29059 -r29330
--- PRDUPLI.mac.rou	(.../PRDUPLI.mac.rou)	(revision 29059)
+++ PRDUPLI.mac.rou	(.../PRDUPLI.mac.rou)	(revision 29330)
@@ -189,7 +189,7 @@
  Else  Set Txt=Txt+1,Txt(Txt)="Prijs   : NIET ingevuld"
  If $P(BLPrijs,D,5)="N" Set Txt=Txt+1,Txt(Txt)="          �BExterne specificatie : Netto prijs�b"
  If $P(BLPrijs,D,5)="B" Set Txt=Txt+1,Txt(Txt)="          �BExterne specificatie : Bruto prijs�b"
- Set Kort=$J($P(BLPrijs,D,3)*100,0,2)
+ Set Kort=$P(BLPrijs,D,3)*100
  Set:+Kort=(Kort\1) Kort=$J(+Kort,0,0)
  Set Klas=$P(^KPR(NewPRNr,IKey),D,4),Winst=$J($P(^KLAS("K",Klas),D,11)*100,0,2)
  If $P(BLPrijs,D,5)="N" Set (Kort,Winst)="" ; ES specificatie : Nettoprijs