Buenos días:

¿Alguien sabe cómo hacer esto pero en cobol/400?, es decir, recuperar las 
coordenada x/y actuales del cursor en pantalla? :

DDSs pantalla :
A                                      CSRLOC(COORDY     COORDX)
A                                      OVERLAY
A                                      PROTECT
A            COORDY         3S 0H
A            COORDX         3S 0H

Sentencias RPG :
FPMTC002 CF  E                    WORKSTN      KINFDS CUR
F                                        NRR1  KSFILE SFL001
I*****************************************************************
I* POSICION DEL CURSOR
I*****************************************************************
ICUR         DS
I                                    B 370 3710LP
C*
C           LP        DIV  256       COORDY
C                     MVR            COORDX
C*

Saludos,

Javier
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.
____________________________________________________
Únete a Recursos AS400, nuestra Comunidad ( http://bit.ly/db68dd )
Forum.Help400 © Publicaciones Help400, S.L.

Responder a