Hola David

No si problemas no tengo. Yo tambien uso Cobol

Creo que el problema esta en usar el Subfichero con Seleccion Simple SFLCHCCTL.

Este mismo subfichero con varios campos, me funciona correctamente
Gracias
Rafael Garcia

-----Mensaje original-----
De: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] nombre de David
Enviado el: martes, 28 de marzo de 2006 16:19
Para: [email protected]
Asunto: Re: SFLCHCCTL Y EL COLOR


Yo con los indicadores en COBOL no tengo ningun problema en pintar un color 
a cada campo determinado de un subfichero, dependiendo de programa,,
 no se cual sera vuestro problema en RPG porque yo lo unico que tengo que 
hacer es activar un indicador en las dds en palabra clave color.



[EMAIL PROTECTED]
Dpto.Informático
www.foisa.com
----- Original Message ----- 
From: "RGB" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Tuesday, March 28, 2006 4:00 PM
Subject: RE: SFLCHCCTL Y EL COLOR


> Gracias Jordi
>
> Incluso quitando la palabra clave CHCAVAIL, sigue sin funcionar. Pues 
> aparece en verde.
>
> El SFl lo unico que hace es mostrar una serie de Equipos(Baterias) para 
> una maquina en concreto, y el usuario
> selecciona una Bateria.
>
> Queria simplemente mostrar en Rojo aquella bateria que es standar de la 
> maquina. Y solamente puede haber una
>
> Gracias por todo, seguire investigando
>
> Rafael Garcia
>
>
> -----Mensaje original-----
> De: [EMAIL PROTECTED]
> [mailto:[EMAIL PROTECTED] nombre de
> [EMAIL PROTECTED]
> Enviado el: martes, 28 de marzo de 2006 15:13
> Para: [email protected]
> Asunto: Re: SFLCHCCTL Y EL COLOR
>
>
>
>
>
>
> Rafael,
>
> Fíjate que tienes definido en el registro de control la palabra clave
> CHCAVAIL(*COLOR WHT), ésto es lo que te está forzando que cuando 
> visualizas
> el campo del sfl, siempre lo veas en alta intensidad (color blanco).
>
> Dependiendo del valor que tenga el campo SCONTROL, (creo recordar que los
> valores posibles iban del 0 a 3, dependiendo de si estaba disponible,
> seleccionado, no disponible, etc.), podrías llegar a condicionar los
> atributos del campo SNOMEQU.
>
> Lo que no recuerdo es si puedes llegar a condicionar la propia palabra
> clave CHCAVAIL... pero mucho me temo que no :-(
>
> Espero haberte ayudado.
>
> Jordi.
>
>
>
>
>
>                      "RGB"
>                      <[EMAIL PROTECTED]      Para: 
> <[email protected]>
>                      s>                       cc:
>                      Enviado por:             Asunto:   SFLCHCCTL Y EL 
> COLOR
>                      forum.help400-admin
>                      @combios.es
>
>
>                      28/03/2006 09:08
>                      Por favor, responda
>                      a forum.help400
>
>
>
>
>
>
> Hola
>
> Tengo el siguiente archivo de pantalla
>
> Deseo que en determinadas circustancias el campo SNOMEQU del subficheo
> FSM01 se ponga en Rojo
> Para eso activo el indicador 89
> Pues no hay forma siempre sale en alta intensidad
>
> Alguna sugerencia
>
> Gracias
>
>
> A                                      DSPSIZ(24 80 *DS3)
> A                                      INDARA
>
> A          R FMT01
> A                                      OVERLAY
> A                                      WINDOW(2 12 20 27 *NOMSGLIN 
> *NORSTC-
> A                                      SR)
> A                                      WDWTITLE((*TEXT &MTITULO) (*COLOR 
> R-
>
> A                                      ED) (*DSPATR UL) *CENTER)
> A            MTITULO       10A  P
> A            MBOTON         2Y 0B 20  1PSHBTNFLD
> A                                      CHCAVAIL((*COLOR BLU))
> A                                      PSHBTNCHC(1 'Pantalla anterior')
> A                                      WINDOW(2 12 20 27 *NOMSGLIN
> A                                      SR)
> A                                      WDWTITLE((*TEXT &MTITULO) (*COLOR 
> R-
>
> A                                      ED) (*DSPATR UL) *CENTER)
> A          R FMS01                     SFL
> A            SCONTROL       1Y 0H      SFLCHCCTL
> A            SCODEQU        6S 0H
> A            SNOMEQU       22   O  1  1
> A  89                                  COLOR(RED)
> A          R FMC01                     SFLCTL(FMS01)
> A                                      CF12(12 'Pantalla Anterior')
> A                                      OVERLAY
> A  40                                  SFLDSP
> A N70                                  SFLDSPCTL
> A  70                                  SFLCLR
> A  60                                  SFLEND(*SCRBAR *SCRBAR)
> A                                      SFLSIZ(9999)
> A                                      SFLPAG(0018)
> A                                      WINDOW(FMT01)
> A                                      SFLSNGCHC(*SLTIND *AUTOSLT)
> A                                      CHCAVAIL((*COLOR WHT))
> A          R FMT02
> A                                      WINDOW(FMT01)
> A                                      OVERLAY
> A                                 10  1'No hay Equipos'
> A                                      DSPATR(HI)
> A                                 11  1'para Mostrar'
> A                                      DSPATR(HI)
> A          R FMT03
> A                                      ASSUME
> A                                      OVERLAY
> A                                  2  4' '
>
>
>
> Rafael Garcia
>
>
> __________________________________________________
> 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://coyote.combios.es/mailman/listinfo/forum.help400
>
>
>
>
> __________________________________________________
> 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://coyote.combios.es/mailman/listinfo/forum.help400
>
> __________________________________________________
> 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://coyote.combios.es/mailman/listinfo/forum.help400 

__________________________________________________
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://coyote.combios.es/mailman/listinfo/forum.help400

__________________________________________________
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://coyote.combios.es/mailman/listinfo/forum.help400

Responder a