Index: TRANSPC.mac.rou =================================================================== diff -u -r59933 -r60202 --- TRANSPC.mac.rou (.../TRANSPC.mac.rou) (revision 59933) +++ TRANSPC.mac.rou (.../TRANSPC.mac.rou) (revision 60202) @@ -355,7 +355,7 @@ ..Do:Modify["T" ##class(vhLib.Logger).%New("").Info("Sluiten transport einde","VervRef='"_VervRef_"'; Closed : '"_Closed_"'; Modifiers : '"_Modify_"'; .") ..Do:Closed ...Kill ^TRANSP("IO",VervRef) - ..If TranspNr=$$$LevGLS Do ; Enkel voor ABX // N.B. Labels afdrukken bij sluiten van een TransportRit is zinloos, cfr Alain. + ..If TranspNr=$$$LevVRD Do ; Enkel voor ABX // N.B. Labels afdrukken bij sluiten van een TransportRit is zinloos, cfr Alain. ...Do:Modify="O" PRINT^DCABXVD(VervRef) // = afdrukken van een vervoerdocument ..Else Do ...Do:Modify="O" EXTERN^DCPRINT("E",VervRef,,,1)