Index: EWORDF2.mac.rou =================================================================== diff -u -r29059 -r31924 --- EWORDF2.mac.rou (.../EWORDF2.mac.rou) (revision 29059) +++ EWORDF2.mac.rou (.../EWORDF2.mac.rou) (revision 31924) @@ -81,7 +81,9 @@ .Kill ^ORDW("BON",CONSNr) .Set HighPrio=("AF;EX"[$E($P(CONSRec,D,2),1,2))||($$DIFFTIME^vhLib.DataTypes($H,$P(CONSRec,D,3))<0) ; Afhaling of expediteur OF DueOutTime is verstreken .If $P(CONSRec,D,20)="C",$P(CONSRec,D,21)="" Do ; Op bon zonder interaktie + ..Do ##class(vhLib.Logger).%New().Info("VerwerkConsolidatieNaarBon Start","CONSNr "_CONSNr) ..Do ##class(BL.Legacy.EWBON).VerwerkConsolidatieNaarBon(CONSNr,1) + ..Do ##class(vhLib.Logger).%New().Info("VerwerkConsolidatieNaarBon Finished","CONSNr "_CONSNr) .Else Do WARN^EWLOG($T(NOBON)) Quit