My apologies. I am on Unidata. 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"
-----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dianne Ackerman Sent: Thursday, July 24, 2008 11:39 AM To: [email protected] Subject: Re: [U2] Basic SORT() Function not avail in UniVerse? 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/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
