Index: EWTOE.mac.rou
===================================================================
diff -u -r3289 -r3872
--- EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 3289)
+++ EWTOE.mac.rou	(.../EWTOE.mac.rou)	(revision 3872)
@@ -272,6 +272,7 @@
  .Set RTemp=R
  .Set:$P(RTemp,D,2) R=$$CV2EENH^MRP(PRNr,$P(RTemp,D,2)),$P(RTemp,D,5)=$P(RTemp,D,5)/$P(RTemp,D,2)*R,$P(RTemp,D,2)=R
  .Set R=RTemp,$P(R,D,13)=1
+ .d WLIP^vhDBG(191,"Tralalala "_TOENr_" - "_TLUNr)
  .Do WV^KPR10,PUT^PRHIST(PRNr,AantWMS,"I","W",LEVNr,TOENr,TLUNr,RCPODate,,,,,,$G(OrdDat))
  .Do:$$HasHalfFabr^PRBS(PRNr) HADPR^PRHF(TOENr,TLUNr,PRNr,AantWMS,RCPODate) ; Verwerking halffabrikaten
  Else  If $E(IDNr)'=7 Do  ; Geen DO-product