Index: ZBCHKWN.mac.rou
===================================================================
diff -u -r49423 -r49565
--- ZBCHKWN.mac.rou	(.../ZBCHKWN.mac.rou)	(revision 49423)
+++ ZBCHKWN.mac.rou	(.../ZBCHKWN.mac.rou)	(revision 49565)
@@ -62,6 +62,8 @@
  ....Do wKORTTXT^zbcheck
  ....Write !!,"Order ",Ref," lijn ",LijnNr," onbekend - ",ZR
  ....Set Res=Res+$P(Rec,D),@("Res"_$P("S\K",D,$P(Rec,D,3)+1))=@("Res"_$P("S\K",D,$P(Rec,D,3)+1))+$P(Rec,D)
+ ....Write !,"CleanUp KPR(W-node) : Kill "_$Name(^KPR(PRNr,W))_"  with value '"_$G(^KPR(PRNr,W))_"' ."
+ ....Kill ^KPR(PRNr,W)
  ...Set OrdTyp=$P(^KOD(KLNr,"F",Ref,1),D,25)
  ...Set R=^KOD(KLNr,"F",Ref,LijnNr)
  ...Quit:$P(R,D,14)["S"  Quit:$P(R,D,14)["Z"