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.