FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour FWH 803 testxBrw.prg error
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
FWH 803 testxBrw.prg error
Posted: Sat Mar 15, 2008 04:38 PM

Auto edit browse - dblclick:
Regards,
Otto

Time from start: 0 hours 0 mins 3 secs
Error occurred at: 03/15/08, 17:28:41
Error description: Error BASE/41 Scope violation (hidden): TXBRWCOLUMN:HCHECKED

Stack Calls

Called from: => TXBRWCOLUMN:HCHECKED(0)
Called from: => TXBROWSE:LDBLCLICK(0)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: => TXBROWSE:HANDLEEVENT(0)
Called from: .\source\classes\WINDOW.PRG => _FWH(0)
Called from: => WINRUN(0)
Called from: => TMDIFRAME:ACTIVATE(0)
Called from: C:\FWH\SAMPLES\test\testxbrw.prg => MAIN(61)

Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
FWH 803 testxbrw.prg error 2
Posted: Sat Mar 15, 2008 04:42 PM

Auto edit browse - enter key - do some changes - then enter key

Application

Path and name: C:\FWH\samples\testxbrw.exe (32 bits)
Size: 1,474,048 bytes
Time from start: 0 hours 0 mins 55 secs
Error occurred at: 03/15/08, 17:38:48
Error description: Error DBFCDX/1022 Lock required

Stack Calls

Called from: => FIELDPUT(0)
Called from: testxbrw.prg => (b)AUTOEDIT(390)
Called from: => TXBRWCOLUMN:POSTEDIT(0)
Called from: .\source\classes\XBROWSE.PRG => EDITGETLOSTFOCUS(0)
Called from: => (b)EDIT(0)
Called from: => TWINDOW:LOSTFOCUS(0)
Called from: .\source\classes\CONTROL.PRG => (b)TCONTROL(0)
Called from: => TCONTROL:LOSTFOCUS(0)
Called from: => TGET:LOSTFOCUS(0)
Called from: => TGET:KILLFOCUS(0)

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
FWH 803 testxBrw.prg error
Posted: Sat Mar 15, 2008 07:12 PM

Otto,

Please download 8.03 again as we have just published some new changes and enhancements.

We are going to review those errors asap, thanks

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
FWH 803 testxBrw.prg error
Posted: Sat Mar 15, 2008 08:01 PM

Otto,

in xbrowse.prg please remove HIDDEN from this line:

DATA hChecked AS LOGICAL HIDDEN INIT .F.

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 6983
Joined: Fri Oct 07, 2005 07:07 PM
FWH 803 testxBrw.prg error
Posted: Sat Mar 15, 2008 10:46 PM

Hello Antonio,
now it is working.

Could you tell me the way how to insert
rlock() - unlock best.

oCol:bOnPostEdit := {|o, v, n| iif( n != VK_ESCAPE, (rlock(),FieldPut( o:nCreationOrder, v ),unlock ), ) }

I would also suggest to change the sample from ADS to standard DBF.
Regards,
OPtto

Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
FWH 803 testxBrw.prg error
Posted: Sun Mar 16, 2008 12:26 AM

Otto,

oCol:bOnPostEdit := {|o, v, n| If( n != VK_ESCAPE, If( Rlock(), ( FieldPut( o:nCreationOrder, v ), DbUnLock() ), MsgAlert( "record in use, please try it again" ) ) ) }

> I would also suggest to change the sample from ADS to standard DBF.

Please review samples/TestXbr3.prg

regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion