Page 1 of 1

random problem in xBrowse Problem BASE/1004 There is no meth

Posted: Thu May 07, 2020 9:01 am
by MOISES
Hello,

Some customers report me this error:

Problem BASE/1004 There is no method: ISKINDOF
Args:
[ 1] = U
[ 2] = C TMULTIGET

Stack Calls
===========
Called from: => ISKINDOF( 0 )
Called from: .\source\classes\XBROWSE.PRG => EDITGETKEYDOWN( 15132 )

Offending line:

Code: Select all

static function EditGetkeyDown( Self, nKey )

   local lMultiGet   := ::oEditGet:IsKindOf( "TMULTIGET" )
I am not able to reproduce it. Maybe you can give me some light.

Thank you.

Re: random problem in xBrowse Problem BASE/1004 There is no meth

Posted: Thu May 07, 2020 10:28 am
by nageswaragunupudi
The above error means that oCol:oEditGet is NIL when the function is called.

But this is how this function is used

Code: Select all

   ::oEditGet:bKeyDown   := { | nKey | EditGetkeyDown( Self, nKey ) }
 
Logically the function should not execute when oCol:oEditGet itself is NIL.

Let us look into this.

Re: random problem in xBrowse Problem BASE/1004 There is no meth

Posted: Thu May 07, 2020 10:57 am
by nageswaragunupudi
For now, please try making this change in xbrowse.prg

for the lines

Code: Select all

static function EditGetkeyDown( Self, nKey )

   local lMultiGet   := ::oEditGet:IsKindOf( "TMULTIGET" )
   local lExit       := .f.
 
Substitute these lines

Code: Select all

static function EditGetkeyDown( Self, nKey )

   local lMultiGet
   local lExit       := .f.

   if ::oEditGet == nil
      return nil
   endif

   lMultiGet   := ::oEditGet:IsKindOf( "TMULTIGET" )
 

Re: random problem in xBrowse Problem BASE/1004 There is no meth

Posted: Thu May 07, 2020 4:55 pm
by MOISES
Thank you very much!