>WITH thisform.grdHolds > for each loColumn in .columns > > for each loControl in m.loColumn.controls > if upper(m.loControl.baseclass) = "HEADER" > loControl.Alignment = 2 > loControl.FontBold = .t. > bindevent(m.loControl,"Click",thisform,"HeaderClick") > > endif > next > next > > with .colLevels.cboLevels > .rowsource = '' > .rowsourcetype = 3 > .rowsource = "select * from csrAllLevels where LevelID IS NOT NULL order by Descrip into cursor csrBLvls nofilter" > > .parent.ControlSource = 'rsHolds.LevelID' > endwith > > with .colSections.cboSections > .rowsource = '' > .rowsourcetype = 3 > .rowsource = "select * from csrAllSections where LevelID = ?m.nLevelID order by Descrip into cursor csrSect nofilter" > .parent.ControlSource = 'rsHolds.SectionID' > endwith > > with .colRow.cboRows > .rowsource = '' > .rowsourcetype = 3 > .rowsource = "select * from csrAllRows where LevelID = ?m.nLevelID and SectionID = ?m.nSectionID order by Row into cursor csrRows nofilter" > .parent.ControlSource = 'rsHolds.Row' > endwith > >* .setall('DynamicFontStrikeThru','thisform.RefreshHoldsGrid()') > .refresh() >endwith>