use qcombined1 excl ALTER table qcombined1 ADD COLUMN mnt c(17) &&if qcombined1.f1 found()&& f1 isfield name scan replace mnt WITH f1 IF f1=SPACE(17) APPEND fields name as(no,name,f1,f2........at new record if field.f2 found() replace mnt WITH f2 IF f2=SPACE(17) APPEND fields name as(no,name,f1,f2........at new record if field.f3 found() replace mnt with f3 . . . . . if field.f56 found() replace mnt with f56 endif endif endif ENDSCANthanks