Index: STATDEL.mac.rou
===================================================================
diff -u -r29059 -r40396
--- STATDEL.mac.rou	(.../STATDEL.mac.rou)	(revision 29059)
+++ STATDEL.mac.rou	(.../STATDEL.mac.rou)	(revision 40396)
@@ -196,7 +196,7 @@
  .For  Set Dat=$O(^KFA1("F",KLNr,Dat)) Quit:Dat=""  Quit:Dat>VanD  Do
  ..For  Set FAKNr=$O(^KFA1("F",KLNr,Dat,FAKNr)) Quit:FAKNr=""  Do
  ...For  Lock +^KFA("F",FAKNr):2 Quit:$T  Do:Display LDISP^vhLock($NA(^KFA("F",FAKNr)))
- ...Write:Display=2 !,KLNr," ",Dat," ",$P(^COPYKFA("F",FAKNr,0,0),D,6)
+ ...Write:Display=2 !,KLNr," ",Dat," ",$P($G(^COPYKFA("F",FAKNr,0,0)),D,6)
  ...If $D(^KK1(KLNr)),$D(^KKL(^KK1(KLNr),FAKNr)) Lock -^KFA("F",FAKNr) Quit  ; Nog te betalen
  ...Do DELOBJ^FLOWCOPYKFA(FAKNr) ; Verwijderen indien deze nog zou bestaan van een vorig boekjaar
  ...Merge ^COPYKFA("F",FAKNr)=^KFA("F",FAKNr)
@@ -412,3 +412,4 @@
  If $$EXTDATE^vhLib.DataTypes($H,"DMN")=1 Do DELBON("",$$CALCDATE^vhLib.DataTypes($H,"M","-13","MD"),1)
  Quit
 
+