Cobol Foro

Cobol Foro (https://www.cobolforo.es/index.php)
-   COBOL-IT (https://www.cobolforo.es/forumdisplay.php?f=51)
-   -   [Compilador] recuperar el valor teclado con CobolIT (https://www.cobolforo.es/showthread.php?t=1219)

MaloK 18 de septiembre de 2020 14:10

recuperar el valor teclado con CobolIT
 
Hola buenas tardes!

soy nuevo en el foro y tambien en cobol.
intento hacer un programa en cobol que es muy sencillo y solo consiste en recuperar el valor del teclado apretado por el usuario. el codigo es muy corto :


Código COBOL:
  1.        IDENTIFICATION DIVISION.
  2.        PROGRAM-ID.  Hello.
  3.        WORKING-STORAGE SECTION.
  4.         01 TOUCHE         PIC 9(2).
  5.        PROCEDURE DIVISION.
  6.        DisplayPrompt.
  7.        
  8.            DISPLAY 'Hello world'
  9.            PERFORM UNTIL TOUCHE NOT = ZEROS
  10.             ACCEPT TOUCHE FROM ESCAPE KEY END-ACCEPT
  11.             DISPLAY TOUCHE
  12.            END-PERFORM
  13.            DISPLAY TOUCHE
  14.            
  15.            STOP RUN
  16.            .
cuando ejecuto esto con COBOLIT se queda encerrado en un blucle y el valor de la variable TOUCHE se queda siempre a 00 aunque apriete todas las teclas.
he visto que era posible desbloquear las teclas con un
Código COBOL:
  1.     call x"AF" using  set-bit-pairs
  2.                       adis-key-control
pero claro con cobolIT no tengo este sub programa y no se como podría sustituirlo.
Alguien tiene una idea?

gracias de antemano.

un saludo

Kuk 18 de septiembre de 2020 18:58

@MaloK, hola, bienvenido ;)

Para empezar, dinos por qué has elegido Cobol-IT para aprender, y por qué has empezado con manejos de teclado?

Sigues algún curso o algo?

Es que Cobol-IT es un producto no muy conocido y, al menos lo que yo lo conozco, no muy maduro. Puede tener bugs, sobre todo para este tipo de cosas, porque está orientado a migraciones de Mainframes sobre Linux (o sea, para grandes empresas), donde no se usan capacidades de Cobol para manejar ni pantallas ni teclados ni nada.


De lo de ADIS olvídate, porque eso es de la capa técnica de Micro Focus. Y aunque estos han comprado Cobol-IT, no le han integrado cosas de su propio compilador ni nada. De hecho sólo dan soporte, no le hacen evolución alguna.

MaloK 20 de septiembre de 2020 12:10

Hola @Kuk,
Gracias por contestarme.
He elegido Cobol-it porque me lo proporcionó un compañero del trabajo. Solo quería conocer esta función para ver como funciona pero entiendo que Cobol-it no puede hacerlo. Si tienes en mente otro emulador mejor me interesa también.

Muchas gracias

Kuk 20 de septiembre de 2020 17:23

@MaloK, hombre, imagino que es posible, lo que pasa es que habría que buscar documentación de Cobol-IT. Pero sabiendo que fueron 4 tíos mal contaos que lo crearon y mantuvieron hasta que fue vendido a Micro Focus, me temo que mucha documentación no debe haber por ahí.

Yo diría que empezaras por Visual Cobol Eclipse de Micro Focus. Tienen versión gratuita para uso no comercial. Échale un ojo a ver: Visual COBOL 2.3 Personal Edition - COBOL Foro


La franja horaria es GMT +2. Ahora son las 23:46.

Powered by: vBulletin, Versión 3.8.7
Derechos de Autor ©2000 - 2026, Jelsoft Enterprises Ltd.