FiveTech Software tech support forums

by **Gale FORd** » Wed Jul 01, 2015 4:37 pm

Using controls.prg I am having a problem using test.dbf on android phone. I have tried it on 2 different devices.
I modified the controls.prg sample you provided and added a check for test.dbf right before the use statement.

Here is the relevant section of controls.prg.

Code: Select all Expand view: if file( "test.dbf" ) msginfo( "test.dbf found" ) else msginfo( "test.dbf NOT found" ) endif USE TEST @ 20, 300 SAY oSay PROMPT "Browse" OF oDlg @ 20, 380 BROWSE oBrw OF oDlg ; SIZE 400, 300 ; HEADERS "FIRST", "LAST" ; FIELDS FIELD -> first, FIELD -> last

When I run the code it pops up message saying “test.dbf found” which is good.
Then when you press ok button it gets open error. If I comment out //use test
Then it gets dbedit error so I know it is on the “use test” statement.

I have tried searching on the internet but couldn’t find anything to help.
Have you been able to use dbf on android phone?

By the way DISTFILES += test.dbf does not get test.dbf onto android in any accessible location.
I added to FiveTouch.prg a little program like your other sample prgs to check for test.dbf in all normal android directories.
Then if it finds it in download directory it copies it and checks all directories again.
Here is that code.

Code: Select all Expand view: // GFCheckDownload.prg TEXT INTO cCode #include "FiveTouch.ch" function GFCheckDownload() local cDownloadDir local cDataDir local cFile := "test.dbf" local cMemo := "" local nCounter, cDir cDownloadDir := DownloadLocation()+"/" cDataDir := DataLocation()+"/" // Before updating Test.dbf from download dir Check all folders cMemo += "Check Directories Before"+CRLF for nCounter := 1 to 14 cDir := QStandardPaths():StandardLocations( nCounter ):Value( 0 ) cMemo += str(nCounter,2)+" "+cDir+CRLF if .not. empty( cDir ) // If empty must be current directory cDir += "/" endif if file( cDir+cFile ) cMemo += "Test.dbf Found"+CRLF endif next if file( cDownloadDir+cFile ) // move test.dbf from download directory cMemo += CRLF cMemo += "Test.dbf copied from download dir"+CRLF memowrit( cDataDir+cFile, memoread(cDownloadDir+cFile)) memowrit( cFile, memoread(cDownloadDir+cFile)) //__CopyFile( cDownloadDir+cFile, cDataDir+cFile ) //__CopyFile( cDownloadDir+cFile, cFile ) // ferase() does not seem to work on download directory. Must be permission issue //ferase( cDownloadDir+cFile ) // Now check all folders for test.dbf cMemo += CRLF cMemo += "Check Directories After"+CRLF for nCounter := 1 to 14 cDir := QStandardPaths():StandardLocations( nCounter ):Value( 0 ) cMemo += str(nCounter,2)+" "+cDir+CRLF if .not. empty( cDir ) // If empty must be current directory cDir += "/" endif if file( cDir+cFile ) cMemo += "Test.dbf Found"+CRLF endif next else cMemo += "Test.dbf not found in download dir"+CRLF endif MemoWrit( "FileInfo.txt", cMemo ) OpenFile( "FileInfo.txt" ) return nil ENDTEXT MemoWrit( "GFCheckDownload.prg", cCode )

Here is the results after running it.

by **Gale FORd** » Wed Jul 01, 2015 7:34 pm

I changed the code from "use test" to add some error handling and it seem to work .
Controls.prg works with the changed code below. (and copying test.dbf from download directory of coarse)

Code: Select all Expand view: if file( "test.dbf" ) msginfo( "test.dbf found" ) else msginfo( "test.dbf NOT found" ) endif bErrorBlock := ErrorBlock( {|| Break( Nil ) } ) BEGIN SEQUENCE dbUseArea( .t. , "DBFCDX", "test.dbf",, .t.) RECOVER USING oErr msginfo( oErr:Description ) END SEQUENCE ErrorBlock( bErrorBlock ) //USE TEST

by **Antonio Linares** » Wed Jul 01, 2015 7:45 pm

Gale,

I think this line made the difference:

dbUseArea( .t. , "DBFCDX", "test.dbf",, .t.)

as it specifies the RDD to use

Glad to know that you are progressing with FiveTouch. I am aware we go slowly but we keep moving forward :-)

FiveTech Software tech support forums

Getting "Open Error" using test.dbf on android phone

Getting "Open Error" using test.dbf on android phone

Re: Getting "Open Error" using test.dbf on android phone

Re: Getting "Open Error" using test.dbf on android phone

Who is online