>>SELECT tmpfloor >>WITH thisform.grdfloor >> .column23.sparse = .f. >> .column23.dynamiccurrentControl = 'IIF( EMPTY(tmpfloor.fn_comment),"CmdBlack","CmdBlue" )' >> .Scrollbars = 3 >>ENDWITH >> >>SELECT tmpfloor >>WITH thisform.grdfloor >> .column4.sparse = .f. >> .column4.dynamiccurrentControl = 'IIF( tmpfloor.fn_finish = "FLOOR"; >> OR EMPTY(tmpfloor.fn_finish),"ComboFloor", ; >> IIF(tmpfloor.fn_finish = "CEILING","ComboCeiling","ComboWall" )) ' >> .scrollbars = 3 >>ENDWITH >>>>
>> .column4.controlsource = "tmpfloor.fn_type" >> .column4.ComboCeiling.ColumnCount = 1 >> .column4.ComboCeiling.ColumnWidths = "120" >> .column4.ComboCeiling.ColumnLines = .t. >> .column4.ComboCeiling.DisplayCount = 6 >> .column4.ComboCeiling.rowsourcetype = 3 && - SQL Statement >> .column4.ComboCeiling.rowsource = "SELECT floortype FROM floor ; >> ORDER BY floortype INTO CURSOR _cfloorC ; >> WHERE UPPER(floor.floorfin)='CEILING'" >> >> .column4.ComboFloor.ColumnCount = 1 >> .column4.ComboFloor.ColumnWidths = "120" >> .column4.ComboFloor.ColumnLines = .t. >> .column4.ComboFloor.DisplayCount = 6 >> .column4.ComboFloor.rowsourcetype = 3 && - SQL Statement >> .column4.ComboFloor.rowsource = "SELECT floortype FROM floor ; >> ORDER BY floortype INTO CURSOR _cfloorR ; >> WHERE UPPER(floor.floorfin)='FLOOR'" >> .column4.currentcontrol = "ComboFloor" >> >> .column4.ComboWall.ColumnCount = 1 >> .column4.ComboWall.ColumnWidths = "120" >> .column4.ComboWall.ColumnLines = .t. >> .column4.ComboWall.DisplayCount = 6 >> .column4.ComboWall.rowsourcetype = 3 && - SQL Statement >> .column4.ComboWall.rowsource = "SELECT floortype FROM floor ; >> ORDER BY floortype INTO CURSOR _cfloorW ; >> WHERE UPPER(floor.floorfin)='WALL'" >> >>>>
>... WHERE UPPER(floor.floorfin)= iif(empty(tmpfloor.fn_finish),'FLOOR', tmpfloor.fn_finish)" >>Cetin
Column1 Column2 Type Choices ==== ======= Ceiling Tiles Ceiling Panelling Floor Asphalt Floor Concrete Floor Tile Floor Marble Wall Drywall Wall PlasterIn the INIT, i am creating 3 cursors based on what matches with Ceiling, floor, and wall. Those cursors are the recordsources for the combos in col2.