Different time CDX after COMMIT,DBCOMMIT
Posted: Thu Aug 30, 2018 1:43 am
Hi,
Who know, why after commit is updated only date time of DBF file, but no CDX ?
I need to control consistency both files to test, if somebody not open and modify database without CDX file (Visual Foxpro).
I am testing when date "detuning" and now I see after commit, or dbcommit, or dbcommitall.
Exist some solution to update both files, or I can not use command COMMIT ? Or I have bad settings in dbesys ?
Here is my settings in DBESYS:
STATIC FUNCTION Dbesys()
LOCAL i, aDbeList := DbeList(), cDbeList := ''
SET COLLATION TO ASCII
IF Valtype(aDbeList) = 'A'
FOR i := 1 TO Len(aDbeList)
cDbeList += aDbeList[i,1] + ','
NEXT
ENDIF
aDbeList := cDbeList
IF !('DBFDBE'$aDbeList) .AND. !DbeLoad( "DBFDBE",.T.)
DC_WinAlert( "Database-Engine DBFDBE not loaded" )
ENDIF
IF !('NTXDBE'$aDbeList) .AND. !DbeLoad( "NTXDBE",.T.)
DC_WinAlert( "Database-Engine NTXDBE not loaded" )
ENDIF
IF !('DBFNTX'$aDbeList) .AND. !DbeBuild( "DBFNTX", "DBFDBE", "NTXDBE" )
DC_WinAlert( "DBFNTX Database-Engine, Could not build engine" )
ENDIF
IF !('CDXDBE'$aDbeList) .AND. !DbeLoad( "CDXDBE",.T.)
DC_WinAlert( "Database-Engine CDXDBE not loaded" )
ENDIF
IF !('DBFCDX'$aDbeList) .AND. !DbeBuild( "DBFCDX", "DBFDBE", "CDXDBE" )
DC_WinAlert( "DBFCDX Database-Engine, Could not build engine" )
ENDIF
IF !('FOXDBE'$aDbeList) .AND. !DbeLoad( "FOXDBE",.T.)
DC_WinAlert( "Database-Engine FOXDBE not loaded" )
ENDIF
IF !('FOXCDX'$aDbeList) .AND. !DbeBuild( "FOXCDX", "FOXDBE", "CDXDBE" )
DC_WinAlert( "FOXCDX Database-Engine, Could not build engine" )
ENDIF
IF !('DELDBE'$aDbeList) .AND. !DbeLoad( "DELDBE",.T.)
DC_WinAlert( "Database-Engine DELDBE not loaded" )
ENDIF
DbeSetDefault( "FOXCDX" ) // toto bolo
DbeInfo(COMPONENT_DATA, FOXDBE_LIFETIME, 20 ) && bielik
RETURN .t.
Who know, why after commit is updated only date time of DBF file, but no CDX ?
I need to control consistency both files to test, if somebody not open and modify database without CDX file (Visual Foxpro).
I am testing when date "detuning" and now I see after commit, or dbcommit, or dbcommitall.
Exist some solution to update both files, or I can not use command COMMIT ? Or I have bad settings in dbesys ?
Here is my settings in DBESYS:
STATIC FUNCTION Dbesys()
LOCAL i, aDbeList := DbeList(), cDbeList := ''
SET COLLATION TO ASCII
IF Valtype(aDbeList) = 'A'
FOR i := 1 TO Len(aDbeList)
cDbeList += aDbeList[i,1] + ','
NEXT
ENDIF
aDbeList := cDbeList
IF !('DBFDBE'$aDbeList) .AND. !DbeLoad( "DBFDBE",.T.)
DC_WinAlert( "Database-Engine DBFDBE not loaded" )
ENDIF
IF !('NTXDBE'$aDbeList) .AND. !DbeLoad( "NTXDBE",.T.)
DC_WinAlert( "Database-Engine NTXDBE not loaded" )
ENDIF
IF !('DBFNTX'$aDbeList) .AND. !DbeBuild( "DBFNTX", "DBFDBE", "NTXDBE" )
DC_WinAlert( "DBFNTX Database-Engine, Could not build engine" )
ENDIF
IF !('CDXDBE'$aDbeList) .AND. !DbeLoad( "CDXDBE",.T.)
DC_WinAlert( "Database-Engine CDXDBE not loaded" )
ENDIF
IF !('DBFCDX'$aDbeList) .AND. !DbeBuild( "DBFCDX", "DBFDBE", "CDXDBE" )
DC_WinAlert( "DBFCDX Database-Engine, Could not build engine" )
ENDIF
IF !('FOXDBE'$aDbeList) .AND. !DbeLoad( "FOXDBE",.T.)
DC_WinAlert( "Database-Engine FOXDBE not loaded" )
ENDIF
IF !('FOXCDX'$aDbeList) .AND. !DbeBuild( "FOXCDX", "FOXDBE", "CDXDBE" )
DC_WinAlert( "FOXCDX Database-Engine, Could not build engine" )
ENDIF
IF !('DELDBE'$aDbeList) .AND. !DbeLoad( "DELDBE",.T.)
DC_WinAlert( "Database-Engine DELDBE not loaded" )
ENDIF
DbeSetDefault( "FOXCDX" ) // toto bolo
DbeInfo(COMPONENT_DATA, FOXDBE_LIFETIME, 20 ) && bielik
RETURN .t.