WITH thisform.clsdatadesc.cboGlAcctNum .Sorted = .T. .DisplayCount = 7 .columnLines = .t. .ControlSource = "apInvPoItems.glAcctNum" .rowsourcetype = 2 && alias .rowsource = "glAccts.glAcctNum, glAcctName" .columncount = 2 .boundcolumn = 1 .columnWidths = "50,165" .style = 2 ENDWITH WITH thisform.clsdatadesc.cboFactor *** form.activate .AddItem("Discount") .List[.newindex,2] = "D" .AddItem("No Discount") .List[.newindex,2] = "N" .AddItem("Freight") .List[.newindex,2] = "F" .AddItem("Taxes") .List[.newindex,2] = "T" .sorted = .f. .controlSource = "apInvPoItems.factor" .boundcolumn = 2 .columncount = 2 .columnWidths = "80,10" .displayCount = 5 .style = 2 .enabled = .T. .listindex = 1 .readonly = .F. ENDWITHThanks again, any other suggestions appreciated.