HMGforum.com

Posted: **Wed May 22, 2019 4:43 pm**

Saludos amigos,

De nuevo aqui con algo que me parece de otra dimensión, me lanza este error:

: ERROR-3.jpg (123.31 KiB) Viewed 1539 times

Revisando mi código intuyo que el error viene desde aqui:

: ERROR-1.jpg (229.78 KiB) Viewed 1539 times

Y aquí es donde se genera:

: ERROR-2.jpg (215.13 KiB) Viewed 1539 times

¿ Como es posible que NO exista la ventana Win_ListaVentas si el botón que dispara la proc VentaListaElige() está sobre esta ventana ? - No logro entender como hizo el usuario para generar este error.

Atento a sus comentarios les agradezco anticipadamente.

Mil gracias y saludos.

Posted: **Thu May 23, 2019 7:07 am**

Maybe help

Code: Select all

   if IsWindowActive( FormPrev )
       DoMethod( 'FormPrev', "RELEASE" )
   endif
   
   DEFINE WINDOW FormPrev ;
      AT 20, desk_pozx ;
      WIDTH 1000 ; 
      HEIGHT 800 ;
      TITLE 'Preview Form' ;
      CHILD

Posted: **Thu May 23, 2019 3:52 pm**

Hola Edu, estaría bien ver todo el código, no obstante y por si te sirve este es mi consejo.

Yo pondría el RELEASE en la misma linea de la ACTION de BUTTON

Code: Select all

@ 300,200 BUTTON botaceptar() ;
    CAPTION "ACEPTAR" ;
    ACTION (Ventaelige(),WinListaventas.Release)

De esta forma te aseguras que el RELEASE se hace dentro de la misma ventana y por otra no tienes RELEASES "perdidos".

y por otra, si las FUNCIONES o PROCEDIMIENTOS los usas solo en este PRG utiliza la clausula

STATIC FUNCTION o STATIC PROCEDURE

con lo cual evitas duplicación o llamadas a funciones no deseadas.

Espero que te sirvan y que des con "la rata"..., una cervecita fresquita!!

HMGforum.com

ERROR EXTRAÑO

ERROR EXTRAÑO

Re: ERROR EXTRAÑO

Re: ERROR EXTRAÑO