>select myTable >local lnI,laFields[1] >afields(laFields) >for lnI = 1 to alen(laFields,1) > blank fields (laFields[lnI,1]) for empty(&laFields[lnI,1]) >next