SELECT PADR(MyFunc(MyTable.Code)) AS Decription ..... FUNCTION MyFunc(cString) LOCAL ret_val, seek_val ret_val = "" seek_val = "" DO WHILE .NOT. EMPTY(cString) seek_val = seek_val + LEFT(cString,2) cString = SUBSTR(cString,3) SEEK seek_val IN MyTable ORDER MyTableOrderByCode ret_val = ret_val + " " + ALLTRIM(Description) ENDDO RETURN ALLTRIM(ret_val)but it isn't so fast way