PC Toledo

Enviado: **19 Mar 2024 12:17**

Error BASE/1004 No exported method: EVAL
Called from (b)HWG_ERRSYS(20)
Called from (b)EVAL(0)
Called from ONACTIVATE(452)
Called from (b)(_INITSTATICS00005)(0)
Called from HDIALOG:ONEVENT(236)
Called from HWG_DLGBOXINDIRECT(0)
Called from HDIALOG:ACTIVATE(176)
Called from GUI_DIALOGACTIVATE(137)
Called from DIALOGBROWSE(59)
Called from FRM_BROWSE(30)
Called from (b)FRM_CLASS(49)
Called from FRM_CLASS:VIEW(0)
Called from (b)FRM_BUTTONS(22)
Called from ONCLICK(586)
Called from (b)HBUTTON_NEW(416)
Called from HWG_DLGCOMMAND(412)
Called from (b)(_INITSTATICS00005)(0)
Called from HDIALOG:ONEVENT(236)
Called from HWG_DLGBOXINDIRECT(0)
Called from HDIALOG:ACTIVATE(176)
Called from GUI_DIALOGACTIVATE(137)
Called from FRM_DIALOG(49)
Called from (b)FRM_CLASS(48)
Called from FRM_CLASS:EXECUTE(0)
Called from FRM_MAIN(36)
Called from (b)GUI_MAINMENU(32)
Called from HWG_DLGCOMMAND(429)
Called from (b)(_INITSTATICS00005)(0)
Called from HDIALOG:ONEVENT(236)
Called from HWG_DLGBOXINDIRECT(0)
Called from HDIALOG:ACTIVATE(176)
Called from GUI_DIALOGACTIVATE(135)
Called from GUI_MAINMENU(40)
Called from FRM_MAINMENU(25)
Called from MAIN(135)

o erro acontece aqui:

Parece ter a ver com o codeblock de lostfocus da dialog, que nem sei qual é.

Enviado: **19 Mar 2024 13:05**

José,

Veja este exemplo e os comentários nele:

Código: Selecionar todos

FUNCTION Main()

   LOCAL b

   // b deveria ser um codeblock, mas vamos fingir que por
   // alguma razão desconhecida ele é um número
   b := 1

   // no lugar de testar se b é um codeblock, a comparação se limita
   // a testar se é diferente de NIL
   IF b != NIL
      // eval dá erro por b não ser um codeblock:
      // Error BASE/1004  No exported method: EVAL
      Eval(b)
   ENDIF

RETURN NIL

Aparentemente, oDlg:bLostFocus não é NIL mas também não é um codeblock.

Enviado: **19 Mar 2024 13:22**

Considerando que o conteúdo é Nil, e nada foi mexido.....

Acabo de ter na hwgui o mesmo problema eventual da WVG: um possível conteúdo zerado !!!

Só posso imaginar que foi tudo pro espaço, até a dialog, e o retorno do teste foi zero.

Enviado: **19 Mar 2024 17:43**

O erro sumiu.
Não sei o que mudou.
Talvez tenha errado em alguma tentativa de resolver erro.

PC Toledo

Como descobrir ao que se refere o erro?

Como descobrir ao que se refere o erro?

Como descobrir ao que se refere o erro?

Como descobrir ao que se refere o erro?

Como descobrir ao que se refere o erro?