Página 1 de 1

Cerrar ventanas

Publicado: Mié Abr 05, 2023 10:42 pm
por hrlarzabal
FORO:

Tengo una ventana donde mediante una variable y un file look up leo un registro de un archivo. Según una condición de este archivo lleno diversos campos de la ventana.
Ahora por esa misma condición puede que tenga que abrir OTRA ventana. Y desde esta otra ventana si se da la primer condición vuelvo a la primer ventana.
El problema que al pasar de la primera a la segunda, la primera no se cierra y si tengo que volver de la segunda a la primera, quedan abiertas todas.

En el accept de la variable desde donde leo el archivo tengo este código:

IF Condicion=1
GLO:Numero=TOU:Numero
!!! Con esto trato de cerrar todas las ventanas abiertas
LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END
!!! Con esto hago que cuando abra la otra ventana la llene con el número obtenido
PRESSKEY(EnterKey)
Ventana2()
END

En la ventana 2 tengo practicamente el mismo código para volver

IF Condicion=2
GLO:Numero=TOU:Numero
!!! Con esto trato de cerrar todas las ventanas abiertas
LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END
!!! Con esto hago que cuando abra la otra ventana la llene con el número obtenido
PRESSKEY(EnterKey)
Ventana()
END

Finalmente en el FileLookUp de ambas ventanas tengo este código:

LOOP I# = 2 to 64
POST(Event:CloseWindow,,I#)
END

Esperando que se entienda el problema, agradezco desde ya cualquier tip.

MUCHAS GRACIAS!!!

Re: Cerrar ventanas

Publicado: Mar Jul 18, 2023 4:16 am
por Mauricio
Tendrías que enviarle un evento a las ventanas, procesar ese evento y hacer lo que se te antoje.