Index: TRANSP.mac.rou =================================================================== diff -u -r50086 -r50561 --- TRANSP.mac.rou (.../TRANSP.mac.rou) (revision 50086) +++ TRANSP.mac.rou (.../TRANSP.mac.rou) (revision 50561) @@ -33,7 +33,7 @@ If $L($G(VervRef)) Set R=^TRANSP("D",VervRef),TranspNr=$P(R,D) Else Set R=$$SELVERV(,"N"),TranspNr=$P(R,";"),VervRef=$P(R,";",2) Do:$L($G(VervRef)) - .Do:TranspNr=5036 CHKVERZW(.BONNrs) + .Do:((TranspNr=5036)||(TranspNr=6612)) CHKVERZW(.BONNrs) .Set Labels=0 .Set GroepNr=$O(@BONNrs@("")) .Quit:'$$LOCK(VervRef,GroepNr) @@ -780,4 +780,3 @@ ; -