Yes, I will create a sample that will work inside the sample-folder without all the defined extras. The defined TDatabase // CreateIndex( cFile, cTag, cKey, lUnique, lDescend, lMemory ) oProject := TDatabase():Open( , "PROJECT", "DBFCDX", .T. ) oProject:CreateIndex( ...