FDELIM
nsort_list = count_fields(sortp, FDELIM);
nprcols = count_fields(colsp, FDELIM);
if ((ncols2 = count_fields(cols2p, FDELIM)) > nprcols)
cp = strchr(*fspp, FDELIM);