Página 1 de 1

Tabelas e Indices

Enviado: 23 Abr 2016 12:34
por tonicm
Boas,
Tenho uma aplicação em clipper que estou a passar para harbour.
Ainda estou a testar todas as opções pois de vez em quando encontro algumas diferenças.

E tenho outra aplicação para criar os índices (DBFCDX).
Terei algum tipo de problema se eu criar os índices nesta segunda aplicação compilada em harbour e continuar a utilizar a outra aplicação em clipper?

Obrigado desde já.

Tabelas e Indices

Enviado: 23 Abr 2016 14:09
por sygecom
Use no Harbour: SET DBFLOCKSCHEME TO

DB_DBFLOCK_DEFAULT 0 Default locking scheme
DB_DBFLOCK_CLIP 1 Clipper 5.2 locking scheme
DB_DBFLOCK_CL53 2 Clipper 5.3 locking scheme
DB_DBFLOCK_VFP 3 Visual FoxPro locking scheme
DB_DBFLOCK_CL53EXT 4 Emulated shared locking
DB_DBFLOCK_XHB64 5 Locking scheme for files > 4GB

exemplo do manual do xharbour:

Código: Selecionar todos

 #include "DbInfo.ch"

   REQUEST DBFCDX

   PROCEDURE Main()
      LOCAL aStruct := { { "FIELD1", "C", 30, 0 }, ;
                         { "FIELD2", "N", 10, 2 } }

      RddSetDefault( "DBFCDX" )

      SET DBFLOCKSCHEME TO DB_DBFLOCK_CL53
      DbCreate( "test", aStruct, "DBFCDX")

      USE Test SHARED
      APPEND BLANK

      IF ! NetErr()
         FIELD1->"This is a test"
         FIELD2->100
         ? "Append operation completed"
         COMMIT
      ELSE
         ? "Append operation failed"
      ENDIF
   RETURN