FabioYeyo, si no hago ThruEvents funciona con la ventana deshabilitada.
Código COBOL:
MOVE POW-FALSE TO "Enabled" OF POW-SELF
Esto es para que el usuario no haga click en ningún lado y no cambie nada mientras se ejecuta el bucle. Cuando el bucle (por ejemplo una búsqueda) se termina, se vuelve al estado habilitado del Form con:
Código COBOL:
MOVE POW-TRUE TO "Enabled" OF POW-SELF