>Because DBF header contain information about CDX file.
>See in help "Table File Structure (.dbc, .dbf, .frx, .lbx, .mnx, .pjx, .scx, .vcx)", byte ofset 28
>
>
>SELECT regtrans
>lcFile=DBF()
>USE
>ERASE .\DBF\REGTRANS.CDX
>=ClearCDXFlag(lcfile)
>
>****************************************
>PROCEDURE ClearCDXFlag(lcfile)
>LOCAL lihwnd,lixx,m.lcbyte
>lihwnd=FOPEN(lcfile,12)
>IF lihwnd>0
> lixx=FSEEK(lihwnd,28)
> IF lixx>-1
> lcbyte=CHR(BITCLEAR(ASC(FREAD(lihwnd,1)),0))
> lixx=FSEEK(lihwnd,28)
> lixx=FWRITE(lihwnd,lcbyte)
> ENDIF
> =FCLOSE(lihwnd)
>ENDIF
>
>
>MartinaJ
>
>>Hi Gang!
>>
>>The code below used to work just fine in a method.
>>
>>
>>SELECT regtrans
>>USE
>>ERASE .\DBF\REGTRANS.CDX
>>
>>SELECT 0
>>USE REGTRANS EXCLUSIVE
>>PACK
>>
>>
>>But as of this morning, it crashed on the USE REGTRANS EXCLUSIVE line....
>>
>>with error 1707 - "Structural .CDX file is not found."
>>
>>Why did it not fire this error before??? Why is it doing it now??? I am confused!
>>
>>Thanks!
Thank you!
Tommy Tillman A+ NetWork+ MCP