Index: ZBCHKRCP.mac.rou
===================================================================
diff -u -r39507 -r55821
--- ZBCHKRCP.mac.rou	(.../ZBCHKRCP.mac.rou)	(revision 39507)
+++ ZBCHKRCP.mac.rou	(.../ZBCHKRCP.mac.rou)	(revision 55821)
@@ -44,7 +44,7 @@
  ....    Set TLNr=$G(^TO("IU",TOENr,TLUNr))
  ....    If 'TLNr Do  Quit
  .....     Set Check=0
- .....     Write !!,$ZR,!,RCPTOERec,!,"Toeleveringslijn onbekend"
+ .....     Write !!,$ZR,!,RCPTOERec,!,"Toeleveringslijn onbekend. Indien toelevering niet bestaat => mogelijks geval van foute inboeking RCP: "_RCPNr // Als er meer stuks gerecepteerd worden dan verwacht, dan crasht de scanner soms. VDR kan verheldering brengen!
  ....    Set TOERec=$G(^KTO(LEVNr,TOENr,TLNr)),TOEPRNr=$P(TOERec,D,2)
  ....    Do:TOEPRNr'=RCPPRNr
  .....     Set Check=0