PREVWINDOW
PREVWINDOW
SET COLOR TO &COLOR5
      Sorting Data
MSORTORDER
MSORTFIELD
MSRTNAME
+(LEFT(LTRIM(RTRIM(LNAME))+','+LTRIM(RTRIM(FNAME))+SPACE(
MNAMELEN
MNAMELEN
MSORTFIELD
MSRTCOMP
+(LEFT(LTRIM(RTRIM(CONAME))+SPACE(
MCOMPLEN
MCOMPLEN
MSORTFIELD
MSRTCITY
+(LEFT(LTRIM(RTRIM(CITY))+SPACE(
MCITYLEN
MCITYLEN
MSORTFIELD
MSRTSTATE
+(LEFT(STATE,
MSTATELEN
MSORTFIELD
MSRTZIP
+(LEFT(LTRIM(RTRIM(ZIP+ZIP_EXT))+SPACE(
MZIPLEN
MZIPLEN
MSORTFIELD
MSRTPH1AC
+(SUBSTR(PHONE1,2,
MPH1ACLEN
MSORTFIELD
MSRTPH2AC
+(SUBSTR(PHONE2,2,
MPH2ACLEN
MSORTFIELD
MSRTMCODE
+(LEFT(LTRIM(RTRIM(MISCCHAR))+SPACE(
MMCODELEN
MMCODELEN
MSORTFIELD
MSRTCATEG
+(LEFT(STR(CATEG,
MCATEGLEN
MCATEGLEN
MSORTFIELD
MSORTFIELD
MSORTORDER
MSORTFIELD
MSORTORDER
MSORTFIELD
MSORTORDER
MSORTORDER
MSORTORDER
LEFT(
MSORTORDER
,100)
MSORTORDER
USE &DATAFILE
INDEX ON &mSORTORDER to &TEMPINDEX
Finished - Press a key ..
PREVWINDOW