IF PEMSTATUS(m.THISFORM.Grid1, alltrim(field(i)),5) * exists ELSE THISFORM.Grid1.AddColumn(i) THISFORM.Grid1.Columns(THISFORM.Grid1.ColumnCount).Name = alltrim(field(i)) && Field(i) ENDIF