XBROWSE : LEN(::aDisplay)==0 AGAIN !

[Franklin Demont]

Hello,

Xbrowse gives again an error that also in the past was a problem. Executing :

METHOD ColAtPos( nPos ) INLINE ::aCols[ ::aDisplay[ MinMax( If( nPos == nil .or. nPos == 0, 1, nPos ), 1, Len( ::aDisplay ) ) ] ]
I have a error while LEN(::aDisplay) == 0

The aplication seems to have generated 7 errorlist (31.640 , 148.000 , 300.000 , 567.000 , 1.065.000 , 1.980.000 , 3.665.000 bytes , all same creation time)
The error shows the second (148.000) bytes.

Studying the errorlist , it is not clear from which module the error is generated , nor while this error is repeating.

Frank Demont

Application
===========
Path and name: I:\BestelSysteem\HENWIN\HenBcc130219.Exe (32 bits)
Size: 3,955,712 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9421)
FiveWin Version: FWHX 12.03
Windows version: 5.1, Build 2600 Service Pack 3

Time from start: 0 hours 7 mins 34 secs
Error occurred at: 19/02/2013, 09:18:40
Bediende : CAROLINE
Error description: Error BASE/1132 Bound error: array access
Args:
[ 1] = A { ... }
[ 2] = N 0

Stack Calls
===========
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SYSREFRESH( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 511 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORDIALOG( 442 )
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK( 157 )
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1654 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SENDMESSAGE( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 379 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 886 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => ERRORDIALOG( 461 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORSYS( 41 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SYSREFRESH( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 511 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORDIALOG( 442 )
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK( 157 )
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1654 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SENDMESSAGE( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 379 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 886 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => ERRORDIALOG( 461 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORSYS( 41 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
Called from: B:\HENWINNEW\HENMAIN.PRG => MAIN( 108 )
===========
Path and name: I:\BestelSysteem\HENWIN\HenBcc130219.Exe (32 bits)
Size: 3,955,712 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9421)
FiveWin Version: FWHX 12.03
Windows version: 5.1, Build 2600 Service Pack 3

Time from start: 0 hours 7 mins 32 secs
Error occurred at: 19/02/2013, 09:18:38
Bediende : CAROLINE
Error description: Error BASE/1132 Bound error: array access
Args:
[ 1] = A { ... }
[ 2] = N 0

Stack Calls
===========
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SYSREFRESH( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 511 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORDIALOG( 442 )
Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK( 157 )
Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1654 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => SENDMESSAGE( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 379 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 886 )
Called from: => DIALOGBOXINDIRECT( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => ERRORDIALOG( 461 )
Called from: B:\FWH1203\CHANGED\errsysw.prg => (b)ERRORSYS( 41 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
Called from: B:\HENWINNEW\HENMAIN.PRG => MAIN( 108 )
===========
Path and name: I:\BestelSysteem\HENWIN\HenBcc130219.Exe (32 bits)
Size: 3,955,712 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9421)
FiveWin Version: FWHX 12.03
Windows version: 5.1, Build 2600 Service Pack 3

Time from start: 0 hours 7 mins 30 secs
Error occurred at: 19/02/2013, 09:18:35
Bediende : CAROLINE
Error description: Error BASE/1132 Bound error: array access
Args:
[ 1] = A { ... }
[ 2] = N 0

Stack Calls
===========
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
Called from: B:\HENWINNEW\HENMAIN.PRG => MAIN( 108 )
===========
Path and name: I:\BestelSysteem\HENWIN\HenBcc130219.Exe (32 bits)
Size: 3,955,712 bytes
Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 9421)
FiveWin Version: FWHX 12.03
Windows version: 5.1, Build 2600 Service Pack 3

Time from start: 0 hours 7 mins 30 secs
Error occurred at: 19/02/2013, 09:18:35
Bediende : CAROLINE
Error description: Error BASE/1132 Bound error: array access
Args:
[ 1] = A { ... }
[ 2] = N 0

Stack Calls
===========
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 533 )
Called from: => TXBROWSE:COLATPOS( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => (b)TXBROWSE:TXBROWSE( 535 )
Called from: => TXBROWSE:SELECTEDCOL( 0 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:PAINT( 1293 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:DISPLAY( 1271 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1666 )
Called from: B:\FWH1203\CHANGED\xbrowse.prg => TXBROWSE:HANDLEEVENT( 11719 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3159 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 980 )
Called from: B:\HENWINNEW\HENMAIN.PRG => MAIN( 108 )

[nageswaragunupudi]

Normally ::aDisplay can not be an empty array unless ::aCols is empty or the data lHide of all columns is true. Such situation can happen only due to some inadvertent code in the application.

For locating the issue, please insert the following lines at the end of the METHOD GetDisplayCols() of TXBrowse before the line return aDisplay

Code: Select all  Expand view

if Empty( ::aCols )
   MsgStop( "aCols empty" )
   quit
endif
if Empty( ::aDisplay )
   MsgStop( "aDisplay empty" )
   quit
endif
return aDisplay
 

and link with the application and run.

[Franklin Demont]

Normally ::aDisplay can not be an empty array unless ::aCols is empty or the data lHide of all columns is true. Such situation can happen only due to some inadvertent code in the application.

For locating the issue, please insert the following lines at the end of the METHOD GetDisplayCols() of TXBrowse before the line return aDisplay

Code: Select all  Expand view

if Empty( ::aCols )
   MsgStop( "aCols empty" )
   quit
endif
if Empty( ::aDisplay )
   MsgStop( "aDisplay empty" )
   quit
endif
return aDisplay
 

and link with the application and run.

Thanks for the answer. It seems to be more complicated . This error occured only one's (FWH12.03, the user tryed 3 times , maybe the 4-the time he had succes) in a network from 5 computers. On the active alias i can see which table he tryed to open , it is only possible from the mainmenu. In the errorlist i can not see that.

The second and third try let see that the error occurs after +/- 1 min. This is only possible when he starts the program and select in the mainmenu the table (DBF) to open. That does every user each day several times. Why can this give such error only on this computer at this moment ? I know that in the passed there where also some problems with LEN(::aDisplay) probably at random ? So i suppose that this is also now the case.

Anyhow , i will include your code (with a tracelog) , so that i can see which line produces the offending code.

Many thanks ,
Frank Demont

[nageswaragunupudi]

Anyhow , i will include your code (with a tracelog) , so that i can see which line produces the offending code.

To help us to locate the problem, please do this test.
Please also try to find the information to identity the alias, etc. within the error routine.