CLEAR x=ADIR(la1,[*.*]) ncol=4 acopy(la1,aTemp) asort(la1,ncol,-1,1) luMax = la1[2] FOR I= 1 TO x ?la1[i,ncol] endforrun this prg with different values for ncol. (ncol is the column number to sort by)
>acopy(myArray,aTemp) >asort(aTemp,2,-1,1) >luMax = aTemp[2] >Cetin