Yo utilize el sflchcctl. Quizas te puede servir esta fracción de código de
pantalla. Lo que te va a devolver es un 1 en el sfl001 si el registro le
dieron click.
Saludos.
A R WSF001 SFL
A*%%TS SD 20070329 162344 ESTBX001 REL-V5R2M0 5722-WDS
A SEL001 1Y 0H SFLCHCCTL
A CCCO R H REFFLD(I0010/CCCO *LIBL/F00
A CCNAME R H REFFLD(I0010/CCNAME *LIBL/F
A CCCRCD R H REFFLD(I0010/CCCRCD *LIBL/F
A F1 48A O 1 4
A R WCT001 SFLCTL(WSF001)
A*%%TS SD 20080222 102236 ESTBX001 REL-V5R2M0 5722-WDS
A SFLSIZ(0100)
A SFLPAG(0005)
A WINDOW(1 14 22 56)
A OVERLAY
A 30 SFLDSP
A 31 SFLDSPCTL
A 32 SFLCLR
A 30 SFLEND(*SCRBAR *SCRBAR)
A 54 SFLMSG('Debe Seleccionar Entidad' 5-
A 4)
A SFLMLTCHC
A CSRINPONLY
A WDWTITLE((*TEXT 'Generación de Cuad-
A re Conta Hacia COM') (*DSPATR RI HI-
A ) *CENTER)
From: [email protected]
[mailto:[email protected]] On Behalf Of INFORMATICA
Sent: Viernes, 22 de Octubre de 2010 06:25 a.m.
To: FORO_400
Subject: Ayuda con SUBFICHERO
Buenas tardes.
Os explico lo que me gustaría hacer:
Un subfichero de unos 200 registros. El tamaño puede variar.
Que el usuario marcara encima de un registro e hiciera
"algo".
El diseño debería ser parecido al de un menú.
He mirado el MNUBAR, pero no me aclaro.
Alguien tiene algún ejemplo?
Gracias
Este mensaje se dirige exclusivamente a su destinatario y puede contener
información CONFIDENCIAL sometida a secreto profesional o cuya divulgación
este prohibida en virtud de la legislación vigente. Si ha recibido este
mensaje por error, le rogamos que nos lo comunique inmediatamente por esta
misma vía y proceda a su destrucción.
(This message is intended exclusively for its address and may contain
information that is CONFIDENTIAL and protected by a professional privilege
or whose disclosure is prohibited by law. If this message has been received
in error, please immediately notify us via e-mail and delete it.)
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
