cmxAutoOpen[solved]

[StefanHaupt]

Salvo,

yes, please look the post from James.

But I don´t understand, why you pack a dbf without it´s indexes, you´ll always get inconsistent index files. I would pack a dbf only with open indexes.

[James Bott]

Salvo,

An even better solution is to reuse deleted records instead of packing.

With my TData class there is an optional subclass to reuse deleted records automatically. This way you never have to PACK a DBF. You can find more information about TData on this page:

http://www.gointellitech.com/program.htm

Regards,
James

[Salvo1087]

james ,

thanks a lot for advice,but pack is? .Second question : i have use set autopen on before seek

Code: Select all  Expand view  RUN

 set autopen on
    select parti
    set filter to upper(cod_contro+qualita)=upper(cCodFascicolo+STR_PARTI)
        seek upper(m->cCodFascicolo+STR_PARTI)

        select cparti
    set filter to upper(cod_contro+qualita)=upper(cCodFascicolo+STR_CPARTI)
        seek upper(m->cCodFascicolo+STR_CPARTI)

        select altri
    set filter to upper(cod_contro+qualita)=upper(cCodFascicolo+STR_ALTRI)
        seek upper(m->cCodFascicolo+STR_ALTRI)

        select nota_spe
    set order to tag codice
    set filter to upper(field->cod_pratic)=m->cCodPratica //nooptimize
        seek upper(m->cCodPratica)

is right?and when you say "open file" you mean file .cdx? thanks a lot for patience. regard

Salvo

[James Bott]

Salvo,

thanks a lot for advice,but pack is?

I was refering to the PACK command which removes all deleted records from a file. As Stefan pointed out, you don't really need to open the file (DBF) without the indexes when you PACK. If you leave the indexes open when PACKing, then the indexes are updated also. If you don't leave the indexes open, then you have to reopen the file and rebuild the indexes after PACKing. I presume that is what you are doing now.

Second question : i have use set autopen on before seek, is right?

No, in your case you only need to set autopen on after packing. Autopen must be on when you open the files (DBFs). Then if you have more than one index, you must select the desired index before seeking.

when you say "open file" you mean file .cdx?

No, I mean open the database (DBF). I think you are getting confused by auto open. I never turn it on or off in my apps. It is on by default and so whenever a DBF is opened the indexes are opened also automatically. Of course, the indexes need to be opened for any SEEKs. You don't need to be opening and closing the indexes, except possibly as your app is doing when PACKing.

James

[Salvo1087]

thanks both, i have solved problem !!