Select contact, eligarea, groupnum, groupname, ; WHERE NOT DELETED() ORDER BY IIF(LEFT(contact,1) = "A", "1", "2"), contact INTO FILE c:\temp\vsamnew.txt Type SDF>I think he means he doesn't want the field cord included in the output file. He could just COPY TO FILE FIELDS EXCEPT cord.
>>>>SELECT ..., >>>> IIF(LEFT(contact,1) >= "A", "1", "2") AS cord ; >>>> ORDER BY cord, contact >>>> ...>>>>