I don't seem to have SORT.LIST on UV 10.1.14.  Is it on a later version?
-Dianne

Dave Laansma wrote:

I think I like this one better than the Unix sort.  It is really quick
too.  However I'd suggest using the SORT.LIST instead of the
GET.LIST/MERGE.LIST:

  SUBROUTINE HUB.SORT.C (ITAB)

  SORT.KEY    = "tmpsortfile"
  SORT.KEY<2> = @UID
  SORT.KEY<3> = @USERNO
  SORT.KEY<4> = TIME()
  SWAP @AM WITH "_" IN SORT.KEY

  WRITELIST ITAB ON SORT.KEY

  CMD = "SORT.LIST ":SORT.KEY
  EXECUTE CMD CAPTURING MSG RETURNING ERR

  READLIST ITAB FROM SORT.KEY ELSE ITAB = ""

9999

  RETURN

  END

David Laansma
IT Manager
Hubbard Supply Co. Direct: 810-342-7143
Office:810-234-8681
Fax: 810-234-6142
www.hubbardsupply.com
"Delivering Products, Services, and Innovative Solutions"
-------
u2-users mailing list
[email protected]
To unsubscribe please visit http://listserver.u2ug.org/

Reply via email to