> setvar eof finfo(HPSTDIN,'eof') > while setvar(eof,eof-1) > 0 do >= 0 that way you read the last record! > input record > ...<statements to process the contents of the record variable> > endwhile > deletevar record,eof Jeff Vance, CSY