Página orientada a estudiantes y profesionales de la programación e informática. Aunque en este blog intento abarcar diferentes aspectos, está especialmente orientado al entorno HOST (cobol, DB2, JCL,...).
Los gdg's suelen tener una serie de versiones de las cuales están migradas las versiones más antiguas, de manera que podemos ver las versiones más actuales (se corresponden con las últimas versiones) en modo VIEW o BROWSE. Si queremos consultar una de las versiones migradas en modo VIEW o BROWSE nos aparece un mensaje por pantalla.
El problema de entrar en esta manera es que el HOST se queda ahí, bloqueado; y no podemos continuar trabajando. Llega un momento en el que se acaba desmigrando pero tarda bastante (con lo que ello implica de no poder trabajar durante un buen rato). Por lo tanto, la mejor manera es realizar la consulta con el comando HRECALL. ------------------------------------------------------------------------------ hrecall xx.xx.xxxxxxx.xxxxx.xxxxx.G00001V00 *******************End of Data Set list*******************
Damos INTRO y se lanza un job que cuando finalice nos dejará la versión desmigrada y lista para ser consultada.
Solemos estar acostumbrados a inicializar variables numéricas en Cobol de la siguiente manera: MOVE ZEROES TO WS-VAR-NUM Y en todas sus vertientes: MOVE ZEROS TO WS-VAR-NUM MOVE 0 TO WS-VAR-NUM Pero, ¿qué pasa cuándo queremos inicializarla con un valor distinto de 0 (por ejemplo, 9)? Si nuestro objetivo es inicializarla con nueves, sólo tenemos que hacer lo siguiente: MOVE ALL '9' TO WS-VAR-NUM Seguro que te choca ver '9' en lugar de 9, pero es así y me ha funcionado. Pruébalo tú y nos cuentas.
En http://www.consultoriocobol.com/p/y-mas.html encontrarás diferentes secciones y una de ellas está dedicada a easytrieve. También he encontrado la entrada de un blog en donde se explica muy bien los conceptos básicos y necesarios del easytrieve. Pincha aquí para acceder a dicha entrada.
Os dejo el siguiente link (http://www.hercules-390.eu/) en donde se explica como descargar y configurar un PC como emulador de HOST System/370,
ESA/390 y z/Architecture Emulator.