Error BASE/1004 Message not found: CTSBROWSE:DRAWSELECT
Posted: Mon Apr 25, 2022 5:30 pm
Hello
while trying to convert my apps from xHarbour 1.1 to Harbour 3.2.0dev (r2008190002)
I have the following error as described in error.log:
Note that the source code of the class I use is the same that I successfully compile and run in xHarbour 1.1
and the method ::drawSelect() is actually defined.
I receive similar errors from other classes too
maybe a compile or link issue?
Error BASE/1004 Message not found: CTSBROWSE:DRAWSELECT
Operazione: 13
Args:
[ 1] = O CTSBROWSE CTSBROWSE
...
Stack Calls
===========
Called from __ERRRT_SBASE(0) ->
Called from CTSBROWSE:ERROR(148) -> ../../../tobject.prg
Called from (b)HBOBJECT(77) -> ../../../tobject.prg
Called from CTSBROWSE:MSGNOTFOUND(0) -> ../../../tobject.prg
Called from CTSBROWSE:DRAWSELECT(142) -> ../../../tobject.prg
Called from CTSBROWSE:GOTFOCUS(3659) -> .\tsBrowse.prg
Called from TWINDOW:HANDLEEVENT(0) ->
Called from TCONTROL:HANDLEEVENT(1926) -> .\wControl.prg
Called from TSBROWSE:HANDLEEVENT(8651) -> .\tsBrowse.prg
Called from CTSBROWSE:HANDLEEVENT(1071) -> .\clsTSBro.prg
Called from _FWH(3762) -> .\wWindow.prg
Called from SETFOCUS(0) ->
Called from CTSBROWSE:SETFOCUS(489) -> .\wControl.prg
Called from TMDICHILD:ACTIVATE(274) -> .\source\classes\MDICHILD.PRG
Called from CBROWSE:EXECUTE(690) -> .\clsBrow.prg
Called from CVIEW:NEW(355) -> .\clsView.prg
Called from CLSGEST:NEW(70) -> .\PR_GEST.prg
Called from RC_GEST(22) -> .\PR_GEST.prg
Called from RC_AUTOANNO(809) -> .\PR_GEST.prg
Called from CAPP:INIT(502) -> .\clsApp.prg
Called from (b)CAPP_START(421) -> .\clsApp.prg
Called from TMDIFRAME:ACTIVATE(1154) -> .\wWindow.prg
Called from CAPP:START(421) -> .\clsApp.prg
Called from MAIN(700) -> ..\prg\M.prg
...
Variables in use
================
Procedure Type Value
==========================
(b)ERRORSYS
Param 1: O Class: ERROR
__ERRRT_SBASE
Param 1: N 13
Param 2: N 1004
Param 3: C "Message not found"
Param 4: C "CTSBROWSE:DRAWSELECT"
Param 5: N 1
Param 6: O Class: CTSBROWSE
Local 1: U
Local 2: U
CTSBROWSE:ERROR
Param 1: C "Message not found"
Param 2: C "CTSBROWSE"
Param 3: C "DRAWSELECT"
Param 4: N 1004
(b)HBOBJECT
Param 1: O Class: CTSBROWSE
Param 2: C "DRAWSELECT"
CTSBROWSE:MSGNOTFOUND
Param 1: C "DRAWSELECT"
CTSBROWSE:DRAWSELECT
CTSBROWSE:GOTFOCUS
Param 1: N 2299474
TWINDOW:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
TCONTROL:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
TSBROWSE:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
Local 2: U
Local 3: U
Local 4: U
CTSBROWSE:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
Local 2: N 0
Local 3: N 0
Local 4: O Class: CBROWSE
_FWH
Param 1: N 0
Param 2: N 7
Param 3: N 2299474
Param 4: N 0
Param 5: N 5
Local 1: O Class: CTSBROWSE
SETFOCUS
Param 1: N 1513572
CTSBROWSE:SETFOCUS
Local 1: U
TMDICHILD:ACTIVATE
Param 1: U
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: B {|| ... }
Param 18: U
Param 19: U
Param 20: L .F.
CBROWSE:EXECUTE
Param 1: L .T.
Local 1: U
Local 2: O Class: CBROWSE
Local 3: O Class: CBROWSE
Local 4: A Len: 15
CVIEW:NEW
Param 1: L .T.
Param 2: C ""
Param 3: C "Selezione Gestione"
Param 4: L .T.
Param 5: B {|| ... }
Local 1: O Class: CAPP
Local 2: O Class: CLSGEST
Local 3: N 12
Local 4: L .T.
Local 5: O Class: CLSGEST
CLSGEST:NEW
Param 1: L .T.
Param 2: C ""
Param 3: L .T.
Param 4: N 20
Param 5: B {|| ... }
Local 1: O Class: CLSGEST
Local 2: C "Selezione Gestione"
Local 3: B {|| ... }
RC_GEST
Param 1: U
Param 2: U
Param 3: U
Param 4: N 20
Local 1: U
RC_AUTOANNO
Local 1: C "."
Local 2: N 6
Local 3: L .F.
Local 4: C "SELECT"
CAPP:INIT
Local 1: O Class: CAPP
Local 2: U
Local 3: U
(b)CAPP_START
Param 1: O Class: TMDIFRAME
TMDIFRAME:ACTIVATE
Param 1: C "NORMAL"
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: U
Param 18: U
Param 19: U
Param 20: L .F.
Local 1: O Class: TMDIFRAME
Local 2: U
Local 3: U
CAPP:START
Param 1: C "MAIN "
Param 2: C "SYSTEM "
Param 3: C "brush.bmp"
Local 1: O Class: TFONT
Local 2: O Class: TMSGBAR
Local 3: O Class: TBRUSH
Local 4: C "12"
MAIN
Local 1: U
Local 2: U
Local 3: U
Local 4: U
Local 5: U
Local 6: U
while trying to convert my apps from xHarbour 1.1 to Harbour 3.2.0dev (r2008190002)
I have the following error as described in error.log:
Note that the source code of the class I use is the same that I successfully compile and run in xHarbour 1.1
and the method ::drawSelect() is actually defined.
I receive similar errors from other classes too
maybe a compile or link issue?
Error BASE/1004 Message not found: CTSBROWSE:DRAWSELECT
Operazione: 13
Args:
[ 1] = O CTSBROWSE CTSBROWSE
...
Stack Calls
===========
Called from __ERRRT_SBASE(0) ->
Called from CTSBROWSE:ERROR(148) -> ../../../tobject.prg
Called from (b)HBOBJECT(77) -> ../../../tobject.prg
Called from CTSBROWSE:MSGNOTFOUND(0) -> ../../../tobject.prg
Called from CTSBROWSE:DRAWSELECT(142) -> ../../../tobject.prg
Called from CTSBROWSE:GOTFOCUS(3659) -> .\tsBrowse.prg
Called from TWINDOW:HANDLEEVENT(0) ->
Called from TCONTROL:HANDLEEVENT(1926) -> .\wControl.prg
Called from TSBROWSE:HANDLEEVENT(8651) -> .\tsBrowse.prg
Called from CTSBROWSE:HANDLEEVENT(1071) -> .\clsTSBro.prg
Called from _FWH(3762) -> .\wWindow.prg
Called from SETFOCUS(0) ->
Called from CTSBROWSE:SETFOCUS(489) -> .\wControl.prg
Called from TMDICHILD:ACTIVATE(274) -> .\source\classes\MDICHILD.PRG
Called from CBROWSE:EXECUTE(690) -> .\clsBrow.prg
Called from CVIEW:NEW(355) -> .\clsView.prg
Called from CLSGEST:NEW(70) -> .\PR_GEST.prg
Called from RC_GEST(22) -> .\PR_GEST.prg
Called from RC_AUTOANNO(809) -> .\PR_GEST.prg
Called from CAPP:INIT(502) -> .\clsApp.prg
Called from (b)CAPP_START(421) -> .\clsApp.prg
Called from TMDIFRAME:ACTIVATE(1154) -> .\wWindow.prg
Called from CAPP:START(421) -> .\clsApp.prg
Called from MAIN(700) -> ..\prg\M.prg
...
Variables in use
================
Procedure Type Value
==========================
(b)ERRORSYS
Param 1: O Class: ERROR
__ERRRT_SBASE
Param 1: N 13
Param 2: N 1004
Param 3: C "Message not found"
Param 4: C "CTSBROWSE:DRAWSELECT"
Param 5: N 1
Param 6: O Class: CTSBROWSE
Local 1: U
Local 2: U
CTSBROWSE:ERROR
Param 1: C "Message not found"
Param 2: C "CTSBROWSE"
Param 3: C "DRAWSELECT"
Param 4: N 1004
(b)HBOBJECT
Param 1: O Class: CTSBROWSE
Param 2: C "DRAWSELECT"
CTSBROWSE:MSGNOTFOUND
Param 1: C "DRAWSELECT"
CTSBROWSE:DRAWSELECT
CTSBROWSE:GOTFOCUS
Param 1: N 2299474
TWINDOW:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
TCONTROL:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
TSBROWSE:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
Local 2: U
Local 3: U
Local 4: U
CTSBROWSE:HANDLEEVENT
Param 1: N 7
Param 2: N 2299474
Param 3: N 0
Local 1: U
Local 2: N 0
Local 3: N 0
Local 4: O Class: CBROWSE
_FWH
Param 1: N 0
Param 2: N 7
Param 3: N 2299474
Param 4: N 0
Param 5: N 5
Local 1: O Class: CTSBROWSE
SETFOCUS
Param 1: N 1513572
CTSBROWSE:SETFOCUS
Local 1: U
TMDICHILD:ACTIVATE
Param 1: U
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: B {|| ... }
Param 18: U
Param 19: U
Param 20: L .F.
CBROWSE:EXECUTE
Param 1: L .T.
Local 1: U
Local 2: O Class: CBROWSE
Local 3: O Class: CBROWSE
Local 4: A Len: 15
CVIEW:NEW
Param 1: L .T.
Param 2: C ""
Param 3: C "Selezione Gestione"
Param 4: L .T.
Param 5: B {|| ... }
Local 1: O Class: CAPP
Local 2: O Class: CLSGEST
Local 3: N 12
Local 4: L .T.
Local 5: O Class: CLSGEST
CLSGEST:NEW
Param 1: L .T.
Param 2: C ""
Param 3: L .T.
Param 4: N 20
Param 5: B {|| ... }
Local 1: O Class: CLSGEST
Local 2: C "Selezione Gestione"
Local 3: B {|| ... }
RC_GEST
Param 1: U
Param 2: U
Param 3: U
Param 4: N 20
Local 1: U
RC_AUTOANNO
Local 1: C "."
Local 2: N 6
Local 3: L .F.
Local 4: C "SELECT"
CAPP:INIT
Local 1: O Class: CAPP
Local 2: U
Local 3: U
(b)CAPP_START
Param 1: O Class: TMDIFRAME
TMDIFRAME:ACTIVATE
Param 1: C "NORMAL"
Param 2: U
Param 3: U
Param 4: U
Param 5: U
Param 6: U
Param 7: U
Param 8: B {|| ... }
Param 9: U
Param 10: U
Param 11: U
Param 12: U
Param 13: U
Param 14: U
Param 15: U
Param 16: U
Param 17: U
Param 18: U
Param 19: U
Param 20: L .F.
Local 1: O Class: TMDIFRAME
Local 2: U
Local 3: U
CAPP:START
Param 1: C "MAIN "
Param 2: C "SYSTEM "
Param 3: C "brush.bmp"
Local 1: O Class: TFONT
Local 2: O Class: TMSGBAR
Local 3: O Class: TBRUSH
Local 4: C "12"
MAIN
Local 1: U
Local 2: U
Local 3: U
Local 4: U
Local 5: U
Local 6: U