Baker Off the top of my head:
FUNCTION SortArray(InArray, AllowDups) Dc = DCount(InArray,@FM) OutArray = '' For I = 1 To Dc Locate InArray<I> In OutArray By "AL" Setting Pos Then If AllowDups Then Ins InArray<I> Before OutArray<Pos> End Else Ins InArray<I> Before OutArray<Pos> End Next Return(OutArray) Then add DEFFUN SortArray(InArray, AllowDups) to your calling routine. Brian Hey, I'm needing to SORT a dynamic array and apparently UniVerse doesn't have this Function. Other MV implementations have this, such as D3 - "The sort() function sorts an attribute or value mark delimited str.exp in ascending order." [from ePick] There was also a user exit u1072 that did the same thing. Does anyone have a work around or fast path to same thing .... maybe I'm missing something but can't see this in UV docs. -Baker ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
