> WITH .Container1.lstAvailable > SELECT AvailableServiceTypes > SCAN FOR ! DELETED() > .AddItem( TypeCode ) > .List[ .NewIndex, 2 ] = TypeDesc > ENDSCAN > .Sorted = .T. > ENDWITH >List and Combos ALWAYS sort by first column.
WITH .Container1.lstAvailable .RowSourceType = 3 .RowSource = [SELECT TypeCode, TypeDesc FROM AvailableServiceTypes ORDER BY TypeDesc INTO CURSOR lstAvailableCrs] .Requery() ENDWITHAnd if your SET DELETED is ON you will see no deleted records :-)