Hi All,
There is an runtime error at the line : If (lRet := dBRequest( cTAls, Tl,
NIL, Fl ) )
Anything wrong ?
and the hb_out.log attached as well ...
Function _mydBRequest( cTAls, nTime )
Local lRet:=Fl
Local nCnt:=0
Local olVal:=Fl
Local nAMax:=0
Local aAreas:={}
Local cOAlias:=cTAls
Do While nTime > 0
myTlog( "Before dBRequest: " +cTAls, "mylog") // Write to
log file
If (lRet := dBRequest( cTAls, Tl, NIL, Fl ) )
Exit
Endif
myTlog( "After dBRequest: " +cTAls, "mylog") // Write to
log file
aAreas := WorkSpaceList( DB_ZEROSPACE )
nAMax := Len(aAreas)
cTAls := cOAlias + "_"
olVal := Set(_SET_EXACT, Tl )
myTlog( "After WoekSpaceList( DB_ZEROSPACE )", "mylog")
For nCnt:=1 to nAMax
If AT( cTAls, aAreas[nCnt]) > 0
cTAls := aAreas[nCnt]
If (lRet := dBRequest( cTAls, Tl, NIL, Fl ) )
Exit
Endif
Endif
Next
Set(_SET_EXACT, olVal )
If !lRet
cTAls := cOAlias
Endif
--nTime
EndDo
Return( lRet )
Shum http://n2.nabble.com/file/n4843816/hb_out.log hb_out.log
--
View this message in context:
http://n2.nabble.com/dBRequest-runtime-error-tp4843816p4843816.html
Sent from the harbour-devel mailing list archive at Nabble.com.
_______________________________________________
Harbour mailing list (attachment size limit: 40KB)
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
