FiveTech Software tech support forums

Hola foro,

Hay momentos en la actividad del programa en los que ejecuta el siguiente error.

Code: Select all  Expand view

________________________________________________________________________________

   Error BASE/1.077  Error de argumento: .NOT.

   Argumentos   :
     [   1] = U   
Llamadas al Stack
________________________________________________________________________________

   Called from TDIALOG:END(0)
   Called from (b)ENABLE(550)
   Called from TCONTROL:CLICK(0)
   Called from TWINDOW:KEYCHAR(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from _FWH(3126)
   Called from DIALOGBOXINDIRECT(0)
   Called from TDIALOG:ACTIVATE(0)
   Called from MSGRUN(0)
   Called from PS_GETPRECIOSQL(346)
   Called from GETPRECIOS(87)
   Called from PS_SHOW(270)
   Called from (b)ALBCOMPLIN(82)
   Called from TLINDAT:EDIT(511)
   Called from TLINDAT:EJECUTAR(601)
   Called from (b)BUILDCONTROLS(301)
   Called from TLINDAT:KEYDOWN(702)
   Called from (b)NEW(181)
   Called from (b)ACTIVATE(186)
   Called from TWINDOW:KEYDOWN(2392)
   Called from TWINDOW:KEYDOWN(0)
   Called from TWINDOW:KEYDOWN(2400)
   Called from TWINDOW:KEYDOWN(2400)
   Called from TWINDOW:KEYDOWN(0)
   Called from TWINDOW:KEYDOWN(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from _FWH(3126)
   Called from WINRUN(0)
   Called from TWINDOW:ACTIVATE(880)
   Called from MAIN(58)

Haber si me pudierais explicar porque que se produce.

Muchas gracias de antemano por vuestro tiempo

fgondi,

Called from TDIALOG:END(0)
Called from (b)ENABLE(550)
Called from TCONTROL:CLICK(0)

Revisa el bloque de código que debe haber dentro del ACTION de algún botón del diálogo (el que se haya pulsado).

Saludos,
José Luis Capel

Jose Luis,

Ante todo gracias por tu respuesta.

fijate que el error se produce al cerrar la ventana que genera msgrun(), eso es lo que no entiendo.

Code: Select all  Expand view

Called from TDIALOG:END(0)
   Called from (b)ENABLE(550)
   Called from TCONTROL:CLICK(0)
   Called from TWINDOW:KEYCHAR(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from TWINDOW:HANDLEEVENT(0)
   Called from _FWH(3126)
   Called from DIALOGBOXINDIRECT(0)
   Called from TDIALOG:ACTIVATE(0)
   Called from MSGRUN(0)

Lo que no sé es si el click() pertenece a algún botón de la ventana que hay por detras del mensaje msgrun() y como evitarlo, ya que no debería permitir la pulsación de dichos botones, aunque sea a traves de pulsación rapida (KeyDown, KeyChar, etc.)

Fernando,

Prueba a deshabilitar la ventana principal, antes de llamar a MsgRun():

Code: Select all  Expand view

   oWnd:Disable()
   MsgRun( ... )
   oWnd:Enable()


Antonio.

Gracias. En eso no había caido, seguramente se solucione. Lo probaré