Mmmm, dale una prueba con un TFRCTL dentro de tu cl (transfiere el control 
desde este comando), capaz ayude al problema.
comentanos.



From: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Fri, 11 Jul 2008 10:25:26 
+0200Subject: RE: Ventanas solapadas








Jordi: Si no encuentro algo mejor esa puede ser la solución, ya el problema es 
solo sería de estética aunque al hacerlo asi se borra la 1ª ventana
 
Fernando ¿Dónde pongo KEEP?
 
Juanra: Siendo autónomo no todo son desventajas: Seguramente nadie tiene tan 
poco tráfico desde casa al trabajo, y la indumentaria puede ser de lo mas 
informal (pantalón corto y camiseta y descalza) je,je. Y además le he pedido 
jornada intensiva al jefe  ¡ Y ME LA HA DADO !.
 
Bueno, al lío. Totalmente de acuerdo con los parámetros de compilación, también 
vengo del 36 ¡Y del 34! Incluso más, también exactamente igual hago con los 
RETRN Y SETON LR y en los mismos casos. (Es en este caso cuando te muestra la 
pantalla pero desactualizada –la 1ª imagen del primer ciclo de ejecucion).  
Todos esos ASSUMES, KEEP’s etc. Han sido pruebas que he ido haciendo. .. a 
partir de aquí escribo en mayúsculas para resaltar lo importante y centrar el 
problema que veo que nos estamos dispersando:
 
SI EL PROGRAMA (A) LLAMA AL PROGRAMA (B) Y (B) LLAMA A  (C) A (D9 à FUNCIONA 
PERFECTAMENTE BIEN SIEMPRE (yo tambien tengo cienes y cienes de ellos)
-----------------------         ------------------           
----------------------
PGMA            |       |  PGM B          |      | PGM C          |
                      | à   |                      | à  |                      
|          esto funciona perfectamente
CALL PGMB   |       |  CALL PGMC  |      |                      |
----------------------       ------------------------       
----------------------
**************************************************************************************************************************************************************************
EL PROBLEMA ES CUANDO EL PROGRAMA (A) LLAMA SECUENCIALMENTE A LOS OTROS DOS 
PROGRAMAS (B) Y  (C) 
*********SIENDO (B) Y (C) PROGRAMAS DE VENTANA********

***********************************************************************************************************************************************************************
 
---------------------            
PGM A          |            
                     |            --------------
CALL PGMB  | -à      | PGM B |      
                     |           ---------------  
CALL PGMC  | à       | PGM C |            cuando muestra esta ventana BORRA LA 
VENTANA DE B Y LA PANTALLA DE A
---------------------            --------------
 
 
 
GRACIAS GRACIAS GRACIAS A TODOS
 
 
 
 
 
 
 
 
 




De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de liberman_.es 
ManeEnviado el: viernes, 11 de julio de 2008 4:25Para: forum.help400Asunto: RE: 
Ventanas solapadas
 
Cuando compilas, luego hazle un CHGDSPF y le das el refresco. Espero les sirva.



From: [EMAIL PROTECTED]: [EMAIL PROTECTED]: Thu, 10 Jul 2008 11:51:32 
+0200Subject: Re: Ventanas solapadas

Hola Susana:

 

No he contestado antes porque ya te habian facilitado la respuesta correcta, 
efectivamente hay que compilar con RSTDSP(*YES) pero eso lo que realmente hace 
es lo que te ocurre, guarda una imagen en memoria de la pantalla que tenía 
antes y la mantiene mientras vas solapando ventanas.

Ten en cuenta que el primer programa queda en espera cuando llamas al segundo 
por lo que la hora no puede actualizarse.

Tengo muchos programas hechos de esta forma, la solucion que encontre fue al 
volver al primer programa, desde otros que visualizan ventanas, forzar un WRITE 
de la pantalla para "refrescar" la informacion antes de volver a llamar a otro 
programa que solape una ventana.

Es chapucero pero funciona.

 

Un saludo.

 

Juanra

ChapuciSaurio

 


----- Original Message ----- 

From: FORO 

To: 'forum.help400' 

Sent: Thursday, July 10, 2008 11:31 AM

Subject: RE: Ventanas solapadas

 

Gracias a todos por contestar.
Marti, Jose, Rafa: Ya están compiladas con RSTDSP *YES , Aunque si las compilas 
con *NO, tampoco se aprecia ninguna diferencia.
 
Manuel: Con tu propuesta es curioso lo que ocurre,  el primer ciclo de 
ejecución FUNCIONA PERFECTAMENTE, pero si os fijaís en la codificación de los 3 
programas, son sencillamente un bucle DO, pues bien, en el segundo ciclo, NO SE 
VISUALIZAN LAS PANTALLAS DEL PGMB Y PGMC, he estado mirando con el debug y el 
problema es que NO FINALIZA EL PROGRAMA, es decir: hace el RETURN pero no la 
sentencia SETON LR por lo que el programa no finaliza, y la siguiente vez que 
es invocado, encuentra el KC encendido y no entra en el bucle DO   he tenido 
que hacer un RCLRSC para que funcionar de nuevo. De hecho la curiosidad no 
termina hay, si modifico el PGMB para que no este condicionado de esa manera 
 
*************** Principio de datos *****************
      FPGM02FM CF  E                    WORKSTN      
      C                     EXFMTFMT01               
      C   KC              MOVEL*ON       *INLR     
      C                     RETRN                    
 ****************** Fin de datos ********************
 
 
SI QUE SE VE… pero ¡ESTO NO OS LO VAIS A CREER! 
 
La imagen que se ve detrás del PGMB es el recuerdo de la primera vez que mostró 
la pantalla LO SE POR LA HORA QUE SACO EN LA ESQUINA SUPERIOR DERECHA DE CADA 
PANTLLA, es como si se lo guardara en memoria NO SE, ES MUY RARO. Si esto lo 
llevo a explotación,  lo que se ve siempre en la pantalla del PGMA son los 
datos del primer registro que visualicé, Si es un mantenimiento de clientes, al 
sacar la pantalla del PGMB SIEMPRE SE VEN EN EL PGMA los datos del primer 
cliente al que llame??????¿¿¿¿¿¿¿¿¿¿¿¿¿
 
En fin, algún gallego en el foro con Meigas conocidas.
 
¿Cómo es posible que una chorrada tan gorda me este dando tantos dolores de 
cabeza?
 
Un  Saludo
Susana
JaquecoSauria 
 
P.D. Jorge: me olvidaba de ti, con el OVERLAY tampoco consigo nada, por lo 
menos aparentemente. Tambien gracias a ti
 



Tecnología, moda, motor, viajes,…suscríbete a nuestros boletines para estar 
siempre a la última MSN Newsletters__________ Información de NOD32, revisión 
3257 (20080710) __________Este mensaje ha sido analizado con NOD32 antivirus 
systemhttp://www.nod32.com
_________________________________________________________________
MSN Video. 
http://video.msn.com/?mkt=es-es
__________________________________________________
Forum.HELP400 es un servicio más de NEWS/400.
© Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________

Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400

Responder a