strange error on index with ftp
Posted: Thu Mar 22, 2018 7:08 pm
I have a strange error making index with dbf and ftp
on main.prg I set
REQUEST DBFCDX
REQUEST DBFFPT
EXTERNAL ORDKEYNO,ORDKEYCOUNT,ORDCREATE,ORDKEYGOTO
FUNCTION Main()
PUBLIC oApp
RddSetDefault( "DBFCDX" )
SetHandleCount( 100 )
SET DATE FORMAT "dd-mm-yyyy"
SET DELETED ON
SET CENTURY ON
SET EPOCH TO year( date() ) - 20
SET MULTIPLE OFF
SetBalloon( .T. )
WITH OBJECT oApp := TApplication():New()
:Activate()
END
RETURN nil
when I make the index it make error because it go to found DBT file and not FPT why ?
on Index I open the file with no index and make the index
on main.prg I set
REQUEST DBFCDX
REQUEST DBFFPT
EXTERNAL ORDKEYNO,ORDKEYCOUNT,ORDCREATE,ORDKEYGOTO
FUNCTION Main()
PUBLIC oApp
RddSetDefault( "DBFCDX" )
SetHandleCount( 100 )
SET DATE FORMAT "dd-mm-yyyy"
SET DELETED ON
SET CENTURY ON
SET EPOCH TO year( date() ) - 20
SET MULTIPLE OFF
SetBalloon( .T. )
WITH OBJECT oApp := TApplication():New()
:Activate()
END
RETURN nil
when I make the index it make error because it go to found DBT file and not FPT why ?
Code: Select all | Expand
Application
===========
Path and name: C:\Work\Prg\Studio\Studio.Exe (32 bits)
Size: 7,020,544 bytes
Compiler version: Harbour 3.2.0dev (r1703231115)
FiveWin version: FWH 17.12
C compiler version: Borland/Embarcadero C++ 7.0 (32-bit)
Windows version: 6.1, Build 7600
Time from start: 0 hours 0 mins 14 secs
Error occurred at: 22-03-2018, 19:49:37
Error description: (DOS Error 2) DBFCDX/1002 Errore in apertura: .\2013\Data\Agenda.dbt
Stack Calls
===========
Called from: => DBUSEAREA( 0 )
Called from: source\ut\ut_dbf.prg => DB_OPENNOINDEX( 66 )
Called from: source\ut\ut_index.prg => UT_CREARCDX( 1295 )
Called from: source\ut\ut_index.prg => (b)UT_INDEXAR( 770 )
Called from: .\source\classes\DIALOG.PRG => (b)TDIALOG( 95 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:DISPLAY( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 909 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 296 )
Called from: source\ut\ut_index.prg => UT_INDEXAR( 774 )
Called from: source\Main.prg => (b)TAPPLICATION_BUILDBTNBAR2( 1224 )
Called from: .\source\classes\TRBTN.PRG => TRBTN:CLICK( 717 )
Called from: .\source\classes\TRBTN.PRG => TRBTN:LBUTTONUP( 917 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1721 )
Called from: .\source\classes\TRBTN.PRG => TRBTN:HANDLEEVENT( 1575 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3356 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1037 )
Called from: source\Main.prg => TAPPLICATION:ACTIVATE( 451 )
Called from: source\Main.prg => MAIN( 66 )on Index I open the file with no index and make the index