>>Hi,
>>
>>I just upgraded VFP to the new 6.0 version (without the Service Pack yet) and got an error when running my application (I´m still using version 3.02 of the framework). I have a View that needs to be ordered by type of document (ascending) and documents of the same type must be ordered by date of document (descending). So I created an index on "od_tipo_documento + STR({31/12/2100} - dt_documento, 5)" and it was working fine. Now, with 6.0, I had to change the ambiguous date to "od_tipo_documento + STR({^2100-12-31} - dt_documento, 5)". Now I receive an error :
>>
>>Index does not match the table. Delete the index file and re-create the index (Error 114)
>>
>>??????????
>>
>>Any tips ?
>>
>>Regards,
>
>José,
>
>I played a while with this:
>
>SET DATE FRENCH
>? {31/12/2100} = {^2100-12-31} gives .T.
>SET DATE AMERICAN
>? {31/12/2100} = {^2100-12-31} gives .F.
>SET DATE FRENCH
>? {31/12/2100} - DATE() gives 0 (not right, by my standards...)
>? {^2100-12-31} - DATE() gives 37178 (seems mor trustable...)
>
>Do you mean you changed the index at the table level or at the view level. If it's in the view, it should do no harm, since the index disappears with the view.
>
>José

This is happening in aDataEnv.prg, indexing the View. I know that the index file created by a View indexing is temporary, but I get the error anyway. The code is :

*-------------------------------------
*--- TitularesDocumentosEnvironment
*--- Used in frmTitulares
*-------------------------------------
DEFINE CLASS TitularesDocumentosEnvironment AS SPIEnvironment
FUNCTION LoadCursors()
DIMENSION this.aCursors[2]
this.aCursors[1] = 'v_Titulares_Documentos'
this.aCursors[2] = 'v_Titulares_Documentos_Todos'
ENDFUNC
FUNCTION PostInitHook()
LOCAL lcIndexExpr
lcIndexExpr = 'INDEX ON STR({^2100-12-31} - dt_documento, 5) TAG DATA'
This.CreateIndex('v_Titulares_Documentos',lcIndexExpr)
lcIndexExpr = 'INDEX ON TiraAcento(UPPER(LEFT(rf_documento, 50))) TAG REFERENCIA'
This.CreateIndex('v_Titulares_Documentos',lcIndexExpr)
lcIndexExpr = 'INDEX ON nu_registro TAG REGISTRO'
This.CreateIndex('v_Titulares_Documentos',lcIndexExpr)
lcIndexExpr = 'INDEX ON LEFT(nu_registro, 5) TAG REGISTRO'
This.CreateIndex('v_Titulares_Documentos_Todos',lcIndexExpr)
lcIndexExpr = 'INDEX ON od_tipo_documento + ' +;
'STR({^2100-12-31} - dt_documento, 5) TAG TIPO'
This.CreateIndex('v_Titulares_Documentos',lcIndexExpr)
ENDFUNC
ENDDEFINE