> WITH .Container1.lstAvailable > SELECT AvailableServiceTypes > SCAN FOR ! DELETED() > .AddItem( TypeCode ) > .List[ .NewIndex, 2 ] = TypeDesc > ENDSCAN > .Sorted = .T. > ENDWITH >