>SELECT modacad.key3, modacad.key4, modacad.moc011, modacad.mochk009 ; >FROM "U:\Data\modacad.dbf" ; >WHERE modacad.key4<>'TECHNICAL' ; >ORDER BY key3 ; >INTO CURSOR result > >with thisform.grid1 >.columncount = 4 >.RecordSourceType = 1 >.RecordSource = 'result' >.column1.controlsource = 'UPPER(result.key3)' >.column1.header1.caption = 'Design No' >.column1.width=100 >.column2.controlsource = 'UPPER(result.key4)' >.column2.header1.caption = 'Design No' >.column2.width=130 >.column3.controlsource = 'UPPER(result.moc011)' >.column3.header1.caption = 'Description' >.column3.width=370 >.column4.addobject("Chk1","Checkbox") >.column4.CurrentControl="Chk1" >.Column4.chk1.Caption = "" >.Column4.Sparse = .F. >.column4.width=110 >.Column4.controlsource = 'result.mochk009' >.column4.header1.caption = 'Final Garments' >ENDWITH >>