select myTable local lnI local array laFields[1] afields(laFields) for lnI = 1 to alen(laFields,1) blank for empty(&laFields[lnI,1]) nextFrom the top of my head.
>USE mytable >SCAN FOR FIELDS=0 >REPLACE ALL FIELDS WITH balnk >*BLANK for Fields = 0 in myTable >ENDSCAN >>
>>>USE mytable >>>SCAN FOR FIELDS=0 >>>REPLACE ALL FIELDS WITH SPACE() >>>ENDSCAN >>>>>>thanks