FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Testing for tDatabase EOF
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Testing for tDatabase EOF
Posted: Tue Jun 01, 2021 09:35 PM

To All

How do I test for tDatabase end of file

If oDbf:Eof // fails

If oDbf:Eof() // fails

Any Ideas ?

Thanks

Rick Lipkin

Posts: 4840
Joined: Fri Nov 18, 2005 04:52 PM
Re: Testing for tDatabase EOF
Posted: Tue Jun 01, 2021 09:45 PM

Rick,

I have never seen it fail. Can you provide sample code to show the failure?

FWH 18.05/xHarbour 1.2.3/BCC7/Windows 10
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Re: Testing for tDatabase EOF
Posted: Wed Jun 02, 2021 03:01 PM

James

I am retrofitting a billing app for my State Governmental customer that has me under contract to encrypt all their confidential billing information ( after the colonial pipeline hack ) .. I am re-tooling my app to use tdababase in certain modules that are temporally created on the local hard drive that I use as a repository for the dencrypted data.

oDbf:eof DOES work ... just my mistake in NOT passing the oDbf object to the correct ( retrofited ) function .. a rookie mistake :)

Thanks
Rick Lipkin

Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: Testing for tDatabase EOF
Posted: Wed Jun 02, 2021 03:44 PM
Code (fw): Select all Collapse
IF EOF()

or

IF .NOT. FOUND()

or

   LOCAL lEof := .F.

   lEof  := oDbf:Eof()

   ? lEof


Regards.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion