FOR EACH oField in .oRS.Fields WITH oField IF .Type=202 && ADVARWCHAR lcFieldName="'"+.NAME+"'" .oRS.Fields(&lcFieldName).Value="" ---> ERROR Here