Index: WS/TAPI/Router.cls.xml =================================================================== diff -u -r50378 -r52025 --- WS/TAPI/Router.cls.xml (.../Router.cls.xml) (revision 50378) +++ WS/TAPI/Router.cls.xml (.../Router.cls.xml) (revision 52025) @@ -172,7 +172,7 @@ . Set (ObjType,ObjRef,PersRef)="" . For Set ObjType=$O(^TAPI("T",CLIP,ObjType)) Quit:ObjType="" Do . . Set Value1=$S(ObjType="L":3000,ObjType="CRM":1000,1:2000) - . . For Set ObjRef=$O(^TAPI("T",CLIP,ObjType,ObjRef)) Quit:ObjRef="" Do + . . For Set ObjRef=$O(^TAPI("T",CLIP,ObjType,ObjRef),-1) Quit:ObjRef="" Do . . . For Set PersRef=$O(^TAPI("T",CLIP,ObjType,ObjRef,PersRef)) Quit:PersRef="" Do . . . . Set Sort(Value1+$S(PersRef="*":200,PersRef?1.N:100,1:300)+$I(Sort))=$LB(ObjType,ObjRef,PersRef,^TAPI("T",CLIP,ObjType,ObjRef,PersRef)) .