Index: Blum/VerwerkInkomendeFacturen.mac.rou
===================================================================
diff -u -r35587 -r35589
--- Blum/VerwerkInkomendeFacturen.mac.rou	(.../VerwerkInkomendeFacturen.mac.rou)	(revision 35587)
+++ Blum/VerwerkInkomendeFacturen.mac.rou	(.../VerwerkInkomendeFacturen.mac.rou)	(revision 35589)
@@ -187,7 +187,7 @@
  .Do BepaalVervalDatum(FaktDat),DISPLAY^vhScherm("BLCSBAF")
  .Set TFaktDat=$P(Rec,D,2)
  Set Bedrag=$P(Rec,D,5),MaatStaf=Bedrag,Btw=$J(Bedrag*%Btw/100,0,2),KontKort=$J(Bedrag*%KKort/100,0,2)
- Set ReceptieDatum = $piece(^RCP("D",$piece(^Verv(LEVNr,"D",VervRef),"\",16)),"\",4)
+ Set ReceptieDatum = +$piece(^RCP("D",$piece(^Verv(LEVNr,"D",VervRef),"\",16)),"\",4)
  Set LvhFANr=$$VERWERK^FCINK(LEVNr,LevFANr,FaktDat,VervDat,Bedrag,MaatStaf,Btw,KontKort,LevMunt,Pariteit,BH,BJ,BM,BP,BX,ReceptieDatum)
  Set $P(Rec,D,8,9)="2\"_LvhFANr,^Verv(LEVNr,"D",VervRef,LevFANr)=Rec
  Quit